// C code generated by Lisaac compiler (www.isaacOS.com) //
int arg_count;
char **arg_vector;

//==========================//
// EXTERNAL                 //
//==========================//

// LISAAC
#include "path.h"
// SYSTEM
#include <time.h>
// FS_MIN
#include <unistd.h>
// MEMORY

#define MINIMUM_SIZE 256  
void *table_size[MINIMUM_SIZE/sizeof(void *)];
void *last_block[64];

// FLOAT_REAL
#include <math.h>
// SYSTEM_IO

#include <stdio.h>
#include <stdlib.h>
  
// Hardware 'print_char'
void print_char(char car)
{
  fputc(car,stdout);
}

// Hardware 'exit'
int die_with_code(int code)
{
  exit(code);
}



//==========================//
// TYPE                     //
//==========================//

// Generic Object
struct ___OBJ {
  unsigned long __id;
};

// NULL
#ifndef NULL
#define NULL ((void *)0)
#endif

// INTEGER
typedef int __INTEGER;

// CHARACTER
typedef char __CHARACTER;

// STRING
#define __STRING__ 4
typedef struct STRING_struct __STRING;
struct STRING_struct {
  unsigned long __id;
  __INTEGER count__VF;
  __INTEGER capacity__MNK;
  __CHARACTER *storage__XNK;
};
__STRING STRING_={__STRING__};
#define STRING__ (&STRING_)

// ARRAYED_COLLECTION[STRING]
#define __ARRAYED_COLLECTIONoSTRINGo__ 0
typedef struct ARRAYED_COLLECTIONoSTRINGo_struct __ARRAYED_COLLECTIONoSTRINGo;
struct ARRAYED_COLLECTIONoSTRINGo_struct {
  __INTEGER upper__TXD;
  __INTEGER capacity__Y1M;
  void **storage__D2M;
};
__ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
#define ARRAYED_COLLECTIONoSTRINGo__ (&ARRAYED_COLLECTIONoSTRINGo_)

// FAST_ARRAY[STRING]
#define __FAST_ARRAYoSTRINGo__ 1
typedef struct FAST_ARRAYoSTRINGo_struct __FAST_ARRAYoSTRINGo;
struct FAST_ARRAYoSTRINGo_struct {
  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__QXD;
};
__FAST_ARRAYoSTRINGo FAST_ARRAYoSTRINGo_;
#define FAST_ARRAYoSTRINGo__ (&FAST_ARRAYoSTRINGo_)

// LINKED_COLLECTION[STRING_CONSTANT]
#define __LINKED_COLLECTIONoSTRING_CONSTANTo__ 2
typedef struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct __LINKED_COLLECTIONoSTRING_CONSTANTo;
struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct {
  __INTEGER upper__JC;
};
__LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
#define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)

// LINKED_LIST[STRING_CONSTANT]
#define __LINKED_LISToSTRING_CONSTANTo__ 3
typedef struct LINKED_LISToSTRING_CONSTANTo_struct __LINKED_LISToSTRING_CONSTANTo;
struct LINKED_LISToSTRING_CONSTANTo_struct {
  __LINKED_COLLECTIONoSTRING_CONSTANTo parent_linked_collection__DC;
  __INTEGER mem_idx__PUU;
  void *first_link__5UK;
  void *mem_lnk__YUU;
  void *last_link__F21;
};
__LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
#define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)

// POINTER
typedef void * __POINTER;

// UINTEGER_32
typedef unsigned long __UINTEGER_32;

// HASHED_DICTIONARY_NODE[ITM_TYPE_SIMPLE,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__ 4
typedef struct HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct {
  void *key__CHL;
  void *item__VHL;
  void *next__NHL;
};
__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_)

// HASHED_DICTIONARY[ITM_TYPE_SIMPLE,STRING_CONSTANT]
#define __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ 5
typedef struct HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo;
struct HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct {
  __INTEGER capacity__RGL;
  __INTEGER count__OWL;
  void **buckets__WGL;
};
__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_)

// POSITION
typedef unsigned long __POSITION;

// ITM_OBJECT
#define __ITM_OBJECT__ 6
typedef struct ITM_OBJECT_struct __ITM_OBJECT;
struct ITM_OBJECT_struct {
  __POSITION position__BJM;
};
__ITM_OBJECT ITM_OBJECT_;
#define ITM_OBJECT__ (&ITM_OBJECT_)

// NAMED
#define __NAMED__ 7
typedef struct NAMED_struct __NAMED;
struct NAMED_struct {
  __ITM_OBJECT parent_itm_object__PD;
  void *name__1QB;
  __CHARACTER style__LDGC;
};
__NAMED NAMED_;
#define NAMED__ (&NAMED_)

// VARIABLE
#define __VARIABLE__ 8
typedef struct VARIABLE_struct __VARIABLE;
struct VARIABLE_struct {
  __NAMED parent_named__A2LC;
  void *type_list__HKZD;
  void *intern_name__025F;
  void *type__125F;
  __INTEGER ensure_count__QEAG;
  void *require_first__DAEH;
  __INTEGER level_type__XTHK;
  void *require_list__UAEH;
};
__VARIABLE VARIABLE_;
#define VARIABLE__ (&VARIABLE_)

// LOCAL
#define __LOCAL__ 5
typedef struct LOCAL_struct __LOCAL;
struct LOCAL_struct {
  unsigned long __id;
  __VARIABLE parent_variable__B2LC;
  void *my_alias__PWAH;
  void *last_seq__LRJJ;
};
__LOCAL LOCAL_={__LOCAL__};
#define LOCAL__ (&LOCAL_)

// ARRAYED_COLLECTION[LOCAL]
#define __ARRAYED_COLLECTIONoLOCALo__ 9
typedef struct ARRAYED_COLLECTIONoLOCALo_struct __ARRAYED_COLLECTIONoLOCALo;
struct ARRAYED_COLLECTIONoLOCALo_struct {
  __INTEGER upper__TI4F;
  __INTEGER capacity__0WPG;
  void **storage__FXPG;
};
__ARRAYED_COLLECTIONoLOCALo ARRAYED_COLLECTIONoLOCALo_;
#define ARRAYED_COLLECTIONoLOCALo__ (&ARRAYED_COLLECTIONoLOCALo_)

// FAST_ARRAY[LOCAL]
#define __FAST_ARRAYoLOCALo__ 10
typedef struct FAST_ARRAYoLOCALo_struct __FAST_ARRAYoLOCALo;
struct FAST_ARRAYoLOCALo_struct {
  __ARRAYED_COLLECTIONoLOCALo parent_arrayed_collection__QI4F;
};
__FAST_ARRAYoLOCALo FAST_ARRAYoLOCALo_;
#define FAST_ARRAYoLOCALo__ (&FAST_ARRAYoLOCALo_)

// LINKED_COLLECTION[NODE_TYPE]
#define __LINKED_COLLECTIONoNODE_TYPEo__ 11
typedef struct LINKED_COLLECTIONoNODE_TYPEo_struct __LINKED_COLLECTIONoNODE_TYPEo;
struct LINKED_COLLECTIONoNODE_TYPEo_struct {
  __INTEGER upper__ZCID;
};
__LINKED_COLLECTIONoNODE_TYPEo LINKED_COLLECTIONoNODE_TYPEo_;
#define LINKED_COLLECTIONoNODE_TYPEo__ (&LINKED_COLLECTIONoNODE_TYPEo_)

// LINKED_LIST[NODE_TYPE]
#define __LINKED_LISToNODE_TYPEo__ 12
typedef struct LINKED_LISToNODE_TYPEo_struct __LINKED_LISToNODE_TYPEo;
struct LINKED_LISToNODE_TYPEo_struct {
  __LINKED_COLLECTIONoNODE_TYPEo parent_linked_collection__OMQC;
  __INTEGER mem_idx__X4YD;
  void *first_link__N4YD;
  void *last_link__W4YD;
  void *mem_lnk__Z4YD;
};
__LINKED_LISToNODE_TYPEo LINKED_LISToNODE_TYPEo_;
#define LINKED_LISToNODE_TYPEo__ (&LINKED_LISToNODE_TYPEo_)

// TYPE
#define __TYPE__ 6
typedef struct TYPE_struct __TYPE;
struct TYPE_struct {
  unsigned long __id;
  void *prototype__RD;
  __INTEGER index__LJC;
  void *default__AKC;
  __INTEGER size__JPY;
  __INTEGER last_pass_binding__YYZI;
  void *slot_run__1JC;
  void *subtype_list__APY;
  void *type_full_list__VUCB;
};
__TYPE TYPE_={__TYPE__};
#define TYPE__ (&TYPE_)

// ARRAYED_COLLECTION[TYPE]
#define __ARRAYED_COLLECTIONoTYPEo__ 13
typedef struct ARRAYED_COLLECTIONoTYPEo_struct __ARRAYED_COLLECTIONoTYPEo;
struct ARRAYED_COLLECTIONoTYPEo_struct {
  __INTEGER upper__1OB;
  __INTEGER capacity__M2L;
  void **storage__X2L;
};
__ARRAYED_COLLECTIONoTYPEo ARRAYED_COLLECTIONoTYPEo_;
#define ARRAYED_COLLECTIONoTYPEo__ (&ARRAYED_COLLECTIONoTYPEo_)

// FAST_ARRAY[TYPE]
#define __FAST_ARRAYoTYPEo__ 14
typedef struct FAST_ARRAYoTYPEo_struct __FAST_ARRAYoTYPEo;
struct FAST_ARRAYoTYPEo_struct {
  __ARRAYED_COLLECTIONoTYPEo parent_arrayed_collection__UOB;
};
__FAST_ARRAYoTYPEo FAST_ARRAYoTYPEo_;
#define FAST_ARRAYoTYPEo__ (&FAST_ARRAYoTYPEo_)

// SLOT_DATA
#define __SLOT_DATA__ 7
typedef struct SLOT_DATA_struct __SLOT_DATA;
struct SLOT_DATA_struct {
  unsigned long __id;
  __VARIABLE parent_variable__AJZD;
  void *parent_slot__BJZD;
  void *value__M4OG;
  void *last_write__Y5IL;
  __UINTEGER_32 last_seq_index__55IL;
  void *last_list_current__UAJL;
  __INTEGER last_index__UOPL;
  __UINTEGER_32 last_seq_call_and_loop__ZWPL;
  __UINTEGER_32 last_seq_call_local_and_loop__S0PL;
  __UINTEGER_32 last_seq_or_and__TDQL;
};
__SLOT_DATA SLOT_DATA_={__SLOT_DATA__};
#define SLOT_DATA__ (&SLOT_DATA_)

// ARRAYED_COLLECTION[SLOT_DATA]
#define __ARRAYED_COLLECTIONoSLOT_DATAo__ 15
typedef struct ARRAYED_COLLECTIONoSLOT_DATAo_struct __ARRAYED_COLLECTIONoSLOT_DATAo;
struct ARRAYED_COLLECTIONoSLOT_DATAo_struct {
  __INTEGER upper__035F;
  __INTEGER capacity__235F;
  void **storage__Y45F;
};
__ARRAYED_COLLECTIONoSLOT_DATAo ARRAYED_COLLECTIONoSLOT_DATAo_;
#define ARRAYED_COLLECTIONoSLOT_DATAo__ (&ARRAYED_COLLECTIONoSLOT_DATAo_)

// FAST_ARRAY[SLOT_DATA]
#define __FAST_ARRAYoSLOT_DATAo__ 16
typedef struct FAST_ARRAYoSLOT_DATAo_struct __FAST_ARRAYoSLOT_DATAo;
struct FAST_ARRAYoSLOT_DATAo_struct {
  __ARRAYED_COLLECTIONoSLOT_DATAo parent_arrayed_collection__3K3F;
};
__FAST_ARRAYoSLOT_DATAo FAST_ARRAYoSLOT_DATAo_;
#define FAST_ARRAYoSLOT_DATAo__ (&FAST_ARRAYoSLOT_DATAo_)

// HASHED_SET_NODE[ABSTRACT_STRING]
#define __HASHED_SET_NODEoABSTRACT_STRINGo__ 17
typedef struct HASHED_SET_NODEoABSTRACT_STRINGo_struct __HASHED_SET_NODEoABSTRACT_STRINGo;
struct HASHED_SET_NODEoABSTRACT_STRINGo_struct {
  void *item__ESK;
  void *next__QSK;
};
__HASHED_SET_NODEoABSTRACT_STRINGo HASHED_SET_NODEoABSTRACT_STRINGo_;
#define HASHED_SET_NODEoABSTRACT_STRINGo__ (&HASHED_SET_NODEoABSTRACT_STRINGo_)

// HASHED_SET[ABSTRACT_STRING]
#define __HASHED_SEToABSTRACT_STRINGo__ 18
typedef struct HASHED_SEToABSTRACT_STRINGo_struct __HASHED_SEToABSTRACT_STRINGo;
struct HASHED_SEToABSTRACT_STRINGo_struct {
  __INTEGER capacity__TRK;
  __INTEGER count__ZSK;
  void **buckets__YRK;
};
__HASHED_SEToABSTRACT_STRINGo HASHED_SEToABSTRACT_STRINGo_;
#define HASHED_SEToABSTRACT_STRINGo__ (&HASHED_SEToABSTRACT_STRINGo_)

// BOOLEAN
typedef char __BOOLEAN;

// STRING_CONSTANT
#define __STRING_CONSTANT__ 8
typedef struct STRING_CONSTANT_struct __STRING_CONSTANT;
struct STRING_CONSTANT_struct {
  unsigned long __id;
  __INTEGER count__XHB;
  __CHARACTER *storage__C5K;
};
__STRING_CONSTANT STRING_CONSTANT_={__STRING_CONSTANT__};
#define STRING_CONSTANT__ (&STRING_CONSTANT_)

// HASHED_DICTIONARY_NODE[STRING_CONSTANT,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__ 19
typedef struct HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo_struct {
  void *key__4PL;
  void *item__3XM;
  void *next__KQL;
};
__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo_)

// HASHED_DICTIONARY[STRING_CONSTANT,STRING_CONSTANT]
#define __HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__ 20
typedef struct HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo;
struct HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo_struct {
  __INTEGER capacity__NPL;
  __INTEGER count__TQL;
  void **buckets__SPL;
};
__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo_)

// PROTOTYPE
#define __PROTOTYPE__ 21
typedef struct PROTOTYPE_struct __PROTOTYPE;
struct PROTOTYPE_struct {
  __NAMED parent_named__QD;
  void *filename__4QB;
  void *source__UFD;
  __INTEGER index__GAH;
  __INTEGER generic_count__DIM;
  void *type_style__ZNY;
  void *last_slot__05BC;
  void *default_value__JNDC;
  void *type_c__EPDC;
  void *first_slot__5QMC;
  void *idf_generic_list__KIM;
  void *slot_list__3IM;
  void *export_list__SFDC;
  void *import_list__0FDC;
  __BOOLEAN is_mapping__1RMC;
};
__PROTOTYPE PROTOTYPE_;
#define PROTOTYPE__ (&PROTOTYPE_)

// HASHED_DICTIONARY_NODE[TYPE,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ 22
typedef struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct {
  void *key__TBL;
  void *item__AXQ;
  void *next__4BL;
};
__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)

// HASHED_DICTIONARY[TYPE,STRING_CONSTANT]
#define __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ 23
typedef struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo;
struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct {
  __INTEGER capacity__CBL;
  __INTEGER count__HCL;
  void **buckets__HBL;
};
__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)

// SLOT
#define __SLOT__ 24
typedef struct SLOT_struct __SLOT;
struct SLOT_struct {
  void *slot_data_intern__1JZD;
  void *base_slot__P22F;
  void *receiver_type__Q22F;
  void *slot_code_intern__322F;
  void *slot_id__04OG;
  void *slot_data_list__CL3F;
  void *slot_code_list__ZUIJ;
};
__SLOT SLOT_;
#define SLOT__ (&SLOT_)

// ARRAYED_COLLECTION[SLOT]
#define __ARRAYED_COLLECTIONoSLOTo__ 25
typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
struct ARRAYED_COLLECTIONoSLOTo_struct {
  __INTEGER capacity__HSL;
  __INTEGER upper__WSL;
  void **storage__SSL;
};
__ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
#define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)

// FAST_ARRAY[SLOT]
#define __FAST_ARRAYoSLOTo__ 26
typedef struct FAST_ARRAYoSLOTo_struct __FAST_ARRAYoSLOTo;
struct FAST_ARRAYoSLOTo_struct {
  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__ZJC;
};
__FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
#define FAST_ARRAYoSLOTo__ (&FAST_ARRAYoSLOTo_)

// UINTEGER_8
typedef unsigned char __UINTEGER_8;

// TYPE_FULL
#define __TYPE_FULL__ 27
typedef struct TYPE_FULL_struct __TYPE_FULL;
struct TYPE_FULL_struct {
  void *parent_type__KTL;
  __UINTEGER_8 flag__LTL;
};
__TYPE_FULL TYPE_FULL_;
#define TYPE_FULL__ (&TYPE_FULL_)

// TYPE_ID
#define __TYPE_ID__ 9
typedef struct TYPE_ID_struct __TYPE_ID;
struct TYPE_ID_struct {
  unsigned long __id;
  __TYPE parent_type__WIB;
};
__TYPE_ID TYPE_ID_={__TYPE_ID__};
#define TYPE_ID__ (&TYPE_ID_)

// ARRAYED_COLLECTION[TYPE_ID]
#define __ARRAYED_COLLECTIONoTYPE_IDo__ 28
typedef struct ARRAYED_COLLECTIONoTYPE_IDo_struct __ARRAYED_COLLECTIONoTYPE_IDo;
struct ARRAYED_COLLECTIONoTYPE_IDo_struct {
  __INTEGER upper__MDL;
  __INTEGER capacity__ODL;
  void **storage__KEL;
};
__ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
#define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)

// FAST_ARRAY[TYPE_ID]
#define __FAST_ARRAYoTYPE_IDo__ 29
typedef struct FAST_ARRAYoTYPE_IDo_struct __FAST_ARRAYoTYPE_IDo;
struct FAST_ARRAYoTYPE_IDo_struct {
  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__WKC;
};
__FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
#define FAST_ARRAYoTYPE_IDo__ (&FAST_ARRAYoTYPE_IDo_)

// ITM_TYPE_SIMPLE
#define __ITM_TYPE_SIMPLE__ 10
typedef struct ITM_TYPE_SIMPLE_struct __ITM_TYPE_SIMPLE;
struct ITM_TYPE_SIMPLE_struct {
  unsigned long __id;
  void *to_run__1VK;
  void *name__UMC;
  int to_run__2VK;
};
__ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
#define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)

// ITM_TYPE_MONO
#define __ITM_TYPE_MONO__ 30
typedef struct ITM_TYPE_MONO_struct __ITM_TYPE_MONO;
struct ITM_TYPE_MONO_struct {
  void *Nothing;
};
__ITM_TYPE_MONO ITM_TYPE_MONO_;
#define ITM_TYPE_MONO__ (&ITM_TYPE_MONO_)

// ARRAYED_COLLECTION[ITM_TYPE_MONO]
#define __ARRAYED_COLLECTIONoITM_TYPE_MONOo__ 31
typedef struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct __ARRAYED_COLLECTIONoITM_TYPE_MONOo;
struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct {
  __INTEGER upper__BWK;
  __INTEGER capacity__DWK;
  void **storage__5WK;
};
__ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
#define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_TYPE_MONOo_)

// FAST_ARRAY[ITM_TYPE_MONO]
#define __FAST_ARRAYoITM_TYPE_MONOo__ 32
typedef struct FAST_ARRAYoITM_TYPE_MONOo_struct __FAST_ARRAYoITM_TYPE_MONOo;
struct FAST_ARRAYoITM_TYPE_MONOo_struct {
  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__PIB;
};
__FAST_ARRAYoITM_TYPE_MONOo FAST_ARRAYoITM_TYPE_MONOo_;
#define FAST_ARRAYoITM_TYPE_MONOo__ (&FAST_ARRAYoITM_TYPE_MONOo_)

// ITM_TYPE_STYLE
#define __ITM_TYPE_STYLE__ 11
typedef struct ITM_TYPE_STYLE_struct __ITM_TYPE_STYLE;
struct ITM_TYPE_STYLE_struct {
  unsigned long __id;
  __ITM_TYPE_SIMPLE parent_itm_type_simple__3IB;
  void *to_run__U1IB;
  void *style__3MC;
  int to_run__V1IB;
};
__ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
#define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)

// ITM_TYPE_GENERIC
#define __ITM_TYPE_GENERIC__ 12
typedef struct ITM_TYPE_GENERIC_struct __ITM_TYPE_GENERIC;
struct ITM_TYPE_GENERIC_struct {
  unsigned long __id;
  __ITM_TYPE_STYLE parent_itm_type_style__LLB;
  void *list_type__MRC;
};
__ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
#define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)

// INSTR
#define __INSTR__ 33
typedef struct INSTR_struct __INSTR;
struct INSTR_struct {
  __ITM_OBJECT parent_itm_object__TE;
};
__INSTR INSTR_;
#define INSTR__ (&INSTR_)

// EXPR
#define __EXPR__ 34
typedef struct EXPR_struct __EXPR;
struct EXPR_struct {
  __INSTR parent_instr__UE;
};
__EXPR EXPR_;
#define EXPR__ (&EXPR_)

// EXTERNAL_C
#define __EXTERNAL_C__ 13
typedef struct EXTERNAL_C_struct __EXTERNAL_C;
struct EXTERNAL_C_struct {
  unsigned long __id;
  __EXPR parent_expr__W2LC;
  void *static_type__UXZD;
  void *code__WXZD;
  void *living_type__R4QH;
  __BOOLEAN is_persistant__VXZD;
  void *access_list__XXZD;
};
__EXTERNAL_C EXTERNAL_C_={__EXTERNAL_C__};
#define EXTERNAL_C__ (&EXTERNAL_C_)

// ARRAYED_COLLECTION[INSTR]
#define __ARRAYED_COLLECTIONoINSTRo__ 35
typedef struct ARRAYED_COLLECTIONoINSTRo_struct __ARRAYED_COLLECTIONoINSTRo;
struct ARRAYED_COLLECTIONoINSTRo_struct {
  __INTEGER upper__THQG;
  __INTEGER capacity__FL4G;
  void **storage__BM4G;
};
__ARRAYED_COLLECTIONoINSTRo ARRAYED_COLLECTIONoINSTRo_;
#define ARRAYED_COLLECTIONoINSTRo__ (&ARRAYED_COLLECTIONoINSTRo_)

// FAST_ARRAY[INSTR]
#define __FAST_ARRAYoINSTRo__ 36
typedef struct FAST_ARRAYoINSTRo_struct __FAST_ARRAYoINSTRo;
struct FAST_ARRAYoINSTRo_struct {
  __ARRAYED_COLLECTIONoINSTRo parent_arrayed_collection__IUOG;
};
__FAST_ARRAYoINSTRo FAST_ARRAYoINSTRo_;
#define FAST_ARRAYoINSTRo__ (&FAST_ARRAYoINSTRo_)

// ITM_SLOT
#define __ITM_SLOT__ 37
typedef struct ITM_SLOT_struct __ITM_SLOT;
struct ITM_SLOT_struct {
  __NAMED parent_named__XIM;
  void *id_section__EACC;
  void *next__YRMC;
  void *type__PD2D;
  void *value__C42D;
  void *require__SB3D;
  void *ensure__WB3D;
  __INTEGER priority_and_level__NHUE;
  void *argument_list__BC2D;
  __CHARACTER affect__TD2D;
};
__ITM_SLOT ITM_SLOT_;
#define ITM_SLOT__ (&ITM_SLOT_)

// TYPE_NULL
#define __TYPE_NULL__ 14
typedef struct TYPE_NULL_struct __TYPE_NULL;
struct TYPE_NULL_struct {
  unsigned long __id;
  __TYPE parent_type__TIB;
};
__TYPE_NULL TYPE_NULL_={__TYPE_NULL__};
#define TYPE_NULL__ (&TYPE_NULL_)

// TYPE_VOID
#define __TYPE_VOID__ 15
typedef struct TYPE_VOID_struct __TYPE_VOID;
struct TYPE_VOID_struct {
  unsigned long __id;
  __TYPE parent_type__UIB;
};
__TYPE_VOID TYPE_VOID_={__TYPE_VOID__};
#define TYPE_VOID__ (&TYPE_VOID_)

// TYPE_CONTEXT
#define __TYPE_CONTEXT__ 16
typedef struct TYPE_CONTEXT_struct __TYPE_CONTEXT;
struct TYPE_CONTEXT_struct {
  unsigned long __id;
  __TYPE parent_type__VIB;
};
__TYPE_CONTEXT TYPE_CONTEXT_={__TYPE_CONTEXT__};
#define TYPE_CONTEXT__ (&TYPE_CONTEXT_)

// TYPE_GENERIC
#define __TYPE_GENERIC__ 17
typedef struct TYPE_GENERIC_struct __TYPE_GENERIC;
struct TYPE_GENERIC_struct {
  unsigned long __id;
  __TYPE parent_type__T2IB;
  void *name__2R2B;
  void *intern_name__FS2B;
  void *old_type__G2YM;
  void *generic_list__3R2B;
  void *put_to_list__F1YM;
  __BOOLEAN recursive_test__M1YM;
};
__TYPE_GENERIC TYPE_GENERIC_={__TYPE_GENERIC__};
#define TYPE_GENERIC__ (&TYPE_GENERIC_)

// CONSTANT
#define __CONSTANT__ 38
typedef struct CONSTANT_struct __CONSTANT;
struct CONSTANT_struct {
  __EXPR parent_expr__4F;
  void *static_type__F4YD;
};
__CONSTANT CONSTANT_;
#define CONSTANT__ (&CONSTANT_)

// PROTOTYPE_CST
#define __PROTOTYPE_CST__ 18
typedef struct PROTOTYPE_CST_struct __PROTOTYPE_CST;
struct PROTOTYPE_CST_struct {
  unsigned long __id;
  __CONSTANT parent_constant__E3LC;
};
__PROTOTYPE_CST PROTOTYPE_CST_={__PROTOTYPE_CST__};
#define PROTOTYPE_CST__ (&PROTOTYPE_CST_)

// INTEGER_64
typedef signed long long __INTEGER_64;

// INTEGER_CST
#define __INTEGER_CST__ 19
typedef struct INTEGER_CST_struct __INTEGER_CST;
struct INTEGER_CST_struct {
  unsigned long __id;
  __CONSTANT parent_constant__P3LC;
  __INTEGER_64 value__PAZD;
};
__INTEGER_CST INTEGER_CST_={__INTEGER_CST__};
#define INTEGER_CST__ (&INTEGER_CST_)

// NODE
#define __NODE__ 39
typedef struct NODE_struct __NODE;
struct NODE_struct {
  void *expr__KLZD;
  void *data__LLZD;
  void *first_code__FIAG;
  void *first_type__NIAG;
  void *switch__ELAG;
};
__NODE NODE_;
#define NODE__ (&NODE_)

// NODE_TYPE
#define __NODE_TYPE__ 20
typedef struct NODE_TYPE_struct __NODE_TYPE;
struct NODE_TYPE_struct {
  unsigned long __id;
  __NODE parent_node__DMQC;
};
__NODE_TYPE NODE_TYPE_={__NODE_TYPE__};
#define NODE_TYPE__ (&NODE_TYPE_)

// INTEGER_32
typedef signed long __INTEGER_32;

// LIST
#define __LIST__ 21
typedef struct LIST_struct __LIST;
struct LIST_struct {
  unsigned long __id;
  __EXPR parent_expr__VE;
  __INTEGER index__PXRG;
  void *expr_list__JUOG;
};
__LIST LIST_={__LIST__};
#define LIST__ (&LIST_)

// INTEGER_8
typedef signed char __INTEGER_8;

// PROFIL
#define __PROFIL__ 40
typedef struct PROFIL_struct __PROFIL;
struct PROFIL_struct {
  void *context__0M0G;
  void *code__HZJH;
  void *result_last__XGKH;
  void *type_self__RIEI;
  void *name__XJEI;
  __INTEGER life_index__01RI;
  __INTEGER link_count__FALJ;
  __INTEGER count_intern_call__WTSL;
  void *argument_list__N5JH;
  void *result_list__SA2H;
  __INTEGER_8 stat__BNEJ;
};
__PROFIL PROFIL_;
#define PROFIL__ (&PROFIL_)

// PROFIL_SLOT
#define __PROFIL_SLOT__ 22
typedef struct PROFIL_SLOT_struct __PROFIL_SLOT;
struct PROFIL_SLOT_struct {
  unsigned long __id;
  __PROFIL parent_profil__51LC;
  void *slot_code__X4NL;
  __BOOLEAN is_context_sensitive__5POL;
};
__PROFIL_SLOT PROFIL_SLOT_={__PROFIL_SLOT__};
#define PROFIL_SLOT__ (&PROFIL_SLOT_)

// PROFIL_BLOCK
#define __PROFIL_BLOCK__ 23
typedef struct PROFIL_BLOCK_struct __PROFIL_BLOCK;
struct PROFIL_BLOCK_struct {
  unsigned long __id;
  __PROFIL parent_profil__GHAG;
  __TYPE parent_type__HHAG;
  void *slot_value__H4IH;
  void *slot_self__T4IH;
  void *context_extern__OMXH;
  void *profil_list__MJEI;
  void *node_list__OJEI;
};
__PROFIL_BLOCK PROFIL_BLOCK_={__PROFIL_BLOCK__};
#define PROFIL_BLOCK__ (&PROFIL_BLOCK_)

// HASHED_DICTIONARY_NODE[STRING,Expanded UINTEGER_32]
#define __HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__ 41
typedef struct HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o_struct __HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o;
struct HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o_struct {
  __UINTEGER_32 key__S10D;
  void *item__J20D;
  void *next__V3BE;
};
__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o_;
#define HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__ (&HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o_)

// HASHED_DICTIONARY[STRING,Expanded UINTEGER_32]
#define __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__ 42
typedef struct HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o_struct __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o;
struct HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o_struct {
  __INTEGER count__1RB;
  __INTEGER capacity__OYZD;
  __INTEGER cache_user__5GAE;
  __INTEGER cache_buckets__C4BE;
  void *cache_node__Q10D;
  void **buckets__3GAE;
};
__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o_;
#define HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__ (&HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o_)

// MEMORY
#define __MEMORY__ 43
typedef struct MEMORY_struct __MEMORY;
struct MEMORY_struct {
  volatile __UINTEGER_32 previous_linear__20C;
  volatile __UINTEGER_32 size_and_id__30C;
  __MEMORY *next_free__40C;
  __MEMORY *previous_free__50C;
} __attribute__ ((packed));
__MEMORY MEMORY_;
#define MEMORY__ (&MEMORY_)

// LINKED_LIST_NODE[STRING_CONSTANT]
#define __LINKED_LIST_NODEoSTRING_CONSTANTo__ 44
typedef struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct __LINKED_LIST_NODEoSTRING_CONSTANTo;
struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct {
  void *item__BVK;
  void *next__AT4;
};
__LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
#define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)

// HASHED_DICTIONARY_NODE[PROTOTYPE,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ 45
typedef struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct {
  void *key__XIJB;
  void *item__ZALB;
  void *next__CJJB;
};
__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)

// HASHED_DICTIONARY[PROTOTYPE,STRING_CONSTANT]
#define __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ 46
typedef struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo;
struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct {
  __INTEGER capacity__GIJB;
  __INTEGER count__LJJB;
  void **buckets__LIJB;
};
__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)

// HASHED_SET_NODE[TYPE]
#define __HASHED_SET_NODEoTYPEo__ 47
typedef struct HASHED_SET_NODEoTYPEo_struct __HASHED_SET_NODEoTYPEo;
struct HASHED_SET_NODEoTYPEo_struct {
  void *item__PRKB;
  void *next__0RKB;
};
__HASHED_SET_NODEoTYPEo HASHED_SET_NODEoTYPEo_;
#define HASHED_SET_NODEoTYPEo__ (&HASHED_SET_NODEoTYPEo_)

// HASHED_SET[TYPE]
#define __HASHED_SEToTYPEo__ 48
typedef struct HASHED_SEToTYPEo_struct __HASHED_SEToTYPEo;
struct HASHED_SEToTYPEo_struct {
  __INTEGER capacity__4QKB;
  __INTEGER count__DSKB;
  void **buckets__DRKB;
};
__HASHED_SEToTYPEo HASHED_SEToTYPEo_;
#define HASHED_SEToTYPEo__ (&HASHED_SEToTYPEo_)

// HASHED_SET_NODE[FAST_ARRAY[ITM_TYPE_MONO]]
#define __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ 49
typedef struct HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo;
struct HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_struct {
  void *item__NKL;
  void *next__ZKL;
};
__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_;
#define HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_)

// HASHED_SET[FAST_ARRAY[ITM_TYPE_MONO]]
#define __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ 50
typedef struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo;
struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct {
  __INTEGER capacity__2JL;
  __INTEGER count__KQM;
  void **buckets__BKL;
};
__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
#define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)

// ARRAYED_COLLECTION[TYPE_FULL]
#define __ARRAYED_COLLECTIONoTYPE_FULLo__ 51
typedef struct ARRAYED_COLLECTIONoTYPE_FULLo_struct __ARRAYED_COLLECTIONoTYPE_FULLo;
struct ARRAYED_COLLECTIONoTYPE_FULLo_struct {
  __INTEGER upper__JVCB;
  __INTEGER capacity__PYMB;
  void **storage__LZMB;
};
__ARRAYED_COLLECTIONoTYPE_FULLo ARRAYED_COLLECTIONoTYPE_FULLo_;
#define ARRAYED_COLLECTIONoTYPE_FULLo__ (&ARRAYED_COLLECTIONoTYPE_FULLo_)

// FAST_ARRAY[TYPE_FULL]
#define __FAST_ARRAYoTYPE_FULLo__ 52
typedef struct FAST_ARRAYoTYPE_FULLo_struct __FAST_ARRAYoTYPE_FULLo;
struct FAST_ARRAYoTYPE_FULLo_struct {
  __ARRAYED_COLLECTIONoTYPE_FULLo parent_arrayed_collection__UUCB;
};
__FAST_ARRAYoTYPE_FULLo FAST_ARRAYoTYPE_FULLo_;
#define FAST_ARRAYoTYPE_FULLo__ (&FAST_ARRAYoTYPE_FULLo_)

// ITM_TYPE_GENERIC_ELT
#define __ITM_TYPE_GENERIC_ELT__ 24
typedef struct ITM_TYPE_GENERIC_ELT_struct __ITM_TYPE_GENERIC_ELT;
struct ITM_TYPE_GENERIC_ELT_struct {
  unsigned long __id;
  __INTEGER index__0E0D;
};
__ITM_TYPE_GENERIC_ELT ITM_TYPE_GENERIC_ELT_={__ITM_TYPE_GENERIC_ELT__};
#define ITM_TYPE_GENERIC_ELT__ (&ITM_TYPE_GENERIC_ELT_)

// HASHED_SET_NODE[FAST_ARRAY[TYPE_FULL]]
#define __HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__ 53
typedef struct HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo_struct __HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo;
struct HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo_struct {
  void *item__DMNC;
  void *next__PMNC;
};
__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo_;
#define HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__ (&HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo_)

// HASHED_SET[FAST_ARRAY[TYPE_FULL]]
#define __HASHED_SEToFAST_ARRAYoTYPE_FULLoo__ 54
typedef struct HASHED_SEToFAST_ARRAYoTYPE_FULLoo_struct __HASHED_SEToFAST_ARRAYoTYPE_FULLoo;
struct HASHED_SEToFAST_ARRAYoTYPE_FULLoo_struct {
  __INTEGER capacity__SLNC;
  __INTEGER count__SFOC;
  void **buckets__XLNC;
};
__HASHED_SEToFAST_ARRAYoTYPE_FULLoo HASHED_SEToFAST_ARRAYoTYPE_FULLoo_;
#define HASHED_SEToFAST_ARRAYoTYPE_FULLoo__ (&HASHED_SEToFAST_ARRAYoTYPE_FULLoo_)

// CONTEXT
#define __CONTEXT__ 55
typedef struct CONTEXT_struct __CONTEXT;
struct CONTEXT_struct {
  __INTEGER local__CI4F;
  __INTEGER result__FI4F;
  void *list__HI4F;
  void *old_profil_first__JI4F;
  void *profil__LI4F;
  void *context_extern__B3NH;
};
__CONTEXT CONTEXT_;
#define CONTEXT__ (&CONTEXT_)

// ARRAYED_COLLECTION[CONTEXT]
#define __ARRAYED_COLLECTIONoCONTEXTo__ 56
typedef struct ARRAYED_COLLECTIONoCONTEXTo_struct __ARRAYED_COLLECTIONoCONTEXTo;
struct ARRAYED_COLLECTIONoCONTEXTo_struct {
  __INTEGER upper__IHQC;
  __INTEGER capacity__3TZD;
  void **storage__33YD;
};
__ARRAYED_COLLECTIONoCONTEXTo ARRAYED_COLLECTIONoCONTEXTo_;
#define ARRAYED_COLLECTIONoCONTEXTo__ (&ARRAYED_COLLECTIONoCONTEXTo_)

// FAST_ARRAY[CONTEXT]
#define __FAST_ARRAYoCONTEXTo__ 57
typedef struct FAST_ARRAYoCONTEXTo_struct __FAST_ARRAYoCONTEXTo;
struct FAST_ARRAYoCONTEXTo_struct {
  __ARRAYED_COLLECTIONoCONTEXTo parent_arrayed_collection__FHQC;
};
__FAST_ARRAYoCONTEXTo FAST_ARRAYoCONTEXTo_;
#define FAST_ARRAYoCONTEXTo__ (&FAST_ARRAYoCONTEXTo_)

// PUSH
#define __PUSH__ 25
typedef struct PUSH_struct __PUSH;
struct PUSH_struct {
  unsigned long __id;
  __INSTR parent_instr__YRB;
  void *context__ZYPG;
  __BOOLEAN is_first__0YPG;
};
__PUSH PUSH_={__PUSH__};
#define PUSH__ (&PUSH_)

// SLOT_CODE
#define __SLOT_CODE__ 26
typedef struct SLOT_CODE_struct __SLOT_CODE;
struct SLOT_CODE_struct {
  unsigned long __id;
  void *parent_slot__Y22F;
  void *value__C15F;
  void *last_type_contract__2NRL;
  void *profil__J15F;
  __BOOLEAN is_require__YNRL;
};
__SLOT_CODE SLOT_CODE_={__SLOT_CODE__};
#define SLOT_CODE__ (&SLOT_CODE_)

// EXPR_MULTIPLE
#define __EXPR_MULTIPLE__ 27
typedef struct EXPR_MULTIPLE_struct __EXPR_MULTIPLE;
struct EXPR_MULTIPLE_struct {
  unsigned long __id;
  void *expr_list__VFMH;
};
__EXPR_MULTIPLE EXPR_MULTIPLE_={__EXPR_MULTIPLE__};
#define EXPR_MULTIPLE__ (&EXPR_MULTIPLE_)

// EXPR_BINARY
#define __EXPR_BINARY__ 58
typedef struct EXPR_BINARY_struct __EXPR_BINARY;
struct EXPR_BINARY_struct {
  __EXPR parent_expr__GBKH;
  void *left__PP1H;
  void *right__OP2H;
};
__EXPR_BINARY EXPR_BINARY_;
#define EXPR_BINARY__ (&EXPR_BINARY_)

// EXPR_SUB
#define __EXPR_SUB__ 28
typedef struct EXPR_SUB_struct __EXPR_SUB;
struct EXPR_SUB_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__HBKH;
};
__EXPR_SUB EXPR_SUB_={__EXPR_SUB__};
#define EXPR_SUB__ (&EXPR_SUB_)

// EXPR_MUL
#define __EXPR_MUL__ 29
typedef struct EXPR_MUL_struct __EXPR_MUL;
struct EXPR_MUL_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__0BKH;
};
__EXPR_MUL EXPR_MUL_={__EXPR_MUL__};
#define EXPR_MUL__ (&EXPR_MUL_)

// EXPR_DIV
#define __EXPR_DIV__ 30
typedef struct EXPR_DIV_struct __EXPR_DIV;
struct EXPR_DIV_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__NCKH;
};
__EXPR_DIV EXPR_DIV_={__EXPR_DIV__};
#define EXPR_DIV__ (&EXPR_DIV_)

// EXPR_AND
#define __EXPR_AND__ 31
typedef struct EXPR_AND_struct __EXPR_AND;
struct EXPR_AND_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__ADKH;
};
__EXPR_AND EXPR_AND_={__EXPR_AND__};
#define EXPR_AND__ (&EXPR_AND_)

// EXPR_SHIFT_R
#define __EXPR_SHIFT_R__ 32
typedef struct EXPR_SHIFT_R_struct __EXPR_SHIFT_R;
struct EXPR_SHIFT_R_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__TDKH;
};
__EXPR_SHIFT_R EXPR_SHIFT_R_={__EXPR_SHIFT_R__};
#define EXPR_SHIFT_R__ (&EXPR_SHIFT_R_)

// EXPR_SHIFT_L
#define __EXPR_SHIFT_L__ 33
typedef struct EXPR_SHIFT_L_struct __EXPR_SHIFT_L;
struct EXPR_SHIFT_L_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__GEKH;
};
__EXPR_SHIFT_L EXPR_SHIFT_L_={__EXPR_SHIFT_L__};
#define EXPR_SHIFT_L__ (&EXPR_SHIFT_L_)

// ITEM
#define __ITEM__ 34
typedef struct ITEM_struct __ITEM;
struct ITEM_struct {
  unsigned long __id;
  __EXPR parent_expr__RFKH;
  void *receiver__TQ1H;
  void *index__CS2H;
};
__ITEM ITEM_={__ITEM__};
#define ITEM__ (&ITEM_)

// CALL_SLOT
#define __CALL_SLOT__ 35
typedef struct CALL_SLOT_struct __CALL_SLOT;
struct CALL_SLOT_struct {
  unsigned long __id;
  __EXPR parent_expr__O41H;
  void *profil__QA2H;
  void *result_list__1A2H;
  void *argument_list__OTHJ;
};
__CALL_SLOT CALL_SLOT_={__CALL_SLOT__};
#define CALL_SLOT__ (&CALL_SLOT_)

// EXPR_UNARY
#define __EXPR_UNARY__ 59
typedef struct EXPR_UNARY_struct __EXPR_UNARY;
struct EXPR_UNARY_struct {
  __EXPR parent_expr__IZDL;
  void *right__XZDL;
};
__EXPR_UNARY EXPR_UNARY_;
#define EXPR_UNARY__ (&EXPR_UNARY_)

// EXPR_NEG
#define __EXPR_NEG__ 36
typedef struct EXPR_NEG_struct __EXPR_NEG;
struct EXPR_NEG_struct {
  unsigned long __id;
  __EXPR_UNARY parent_expr_unary__JZDL;
};
__EXPR_NEG EXPR_NEG_={__EXPR_NEG__};
#define EXPR_NEG__ (&EXPR_NEG_)

// EXPR_ADD
#define __EXPR_ADD__ 37
typedef struct EXPR_ADD_struct __EXPR_ADD;
struct EXPR_ADD_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__UZDL;
};
__EXPR_ADD EXPR_ADD_={__EXPR_ADD__};
#define EXPR_ADD__ (&EXPR_ADD_)

// EXPR_NOT
#define __EXPR_NOT__ 38
typedef struct EXPR_NOT_struct __EXPR_NOT;
struct EXPR_NOT_struct {
  unsigned long __id;
  __EXPR_UNARY parent_expr_unary__M5VL;
};
__EXPR_NOT EXPR_NOT_={__EXPR_NOT__};
#define EXPR_NOT__ (&EXPR_NOT_)

// EXPR_MOD
#define __EXPR_MOD__ 39
typedef struct EXPR_MOD_struct __EXPR_MOD;
struct EXPR_MOD_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__PDWL;
};
__EXPR_MOD EXPR_MOD_={__EXPR_MOD__};
#define EXPR_MOD__ (&EXPR_MOD_)

// EXPR_OR
#define __EXPR_OR__ 40
typedef struct EXPR_OR_struct __EXPR_OR;
struct EXPR_OR_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__ET1M;
};
__EXPR_OR EXPR_OR_={__EXPR_OR__};
#define EXPR_OR__ (&EXPR_OR_)

// EXPR_XOR
#define __EXPR_XOR__ 41
typedef struct EXPR_XOR_struct __EXPR_XOR;
struct EXPR_XOR_struct {
  unsigned long __id;
  __EXPR_BINARY parent_expr_binary__UA5N;
};
__EXPR_XOR EXPR_XOR_={__EXPR_XOR__};
#define EXPR_XOR__ (&EXPR_XOR_)

// DTA
#define __DTA__ 60
typedef struct DTA_struct __DTA;
struct DTA_struct {
  __ITM_OBJECT parent_itm_object__5LQC;
  void *context__OJZD;
  void *slot__PJZD;
  void *self_arg__QJZD;
  void *result_expr__RJZD;
};
__DTA DTA_;
#define DTA__ (&DTA_)

// DTA_RD
#define __DTA_RD__ 42
typedef struct DTA_RD_struct __DTA_RD;
struct DTA_RD_struct {
  unsigned long __id;
  __DTA parent_dta__AMQC;
};
__DTA_RD DTA_RD_={__DTA_RD__};
#define DTA_RD__ (&DTA_RD_)

// DTA_CAST
#define __DTA_CAST__ 43
typedef struct DTA_CAST_struct __DTA_CAST;
struct DTA_CAST_struct {
  unsigned long __id;
  void *result_expr__401H;
};
__DTA_CAST DTA_CAST_={__DTA_CAST__};
#define DTA_CAST__ (&DTA_CAST_)

// DTA_WR_CODE
#define __DTA_WR_CODE__ 44
typedef struct DTA_WR_CODE_struct __DTA_WR_CODE;
struct DTA_WR_CODE_struct {
  unsigned long __id;
  __DTA parent_dta__E0LH;
  void *code__IOEI;
};
__DTA_WR_CODE DTA_WR_CODE_={__DTA_WR_CODE__};
#define DTA_WR_CODE__ (&DTA_WR_CODE_)

// DTA_BLOCK
#define __DTA_BLOCK__ 45
typedef struct DTA_BLOCK_struct __DTA_BLOCK;
struct DTA_BLOCK_struct {
  unsigned long __id;
  void *context__52UH;
  void *result_expr__341H;
  void *argument_list__2KFI;
  __BOOLEAN copy_argument__Z0TI;
};
__DTA_BLOCK DTA_BLOCK_={__DTA_BLOCK__};
#define DTA_BLOCK__ (&DTA_BLOCK_)

// DTA_WR_VALUE
#define __DTA_WR_VALUE__ 46
typedef struct DTA_WR_VALUE_struct __DTA_WR_VALUE;
struct DTA_WR_VALUE_struct {
  unsigned long __id;
  __DTA parent_dta__PTUH;
  void *value__RNFI;
  __BOOLEAN copy_value__ZZ5I;
};
__DTA_WR_VALUE DTA_WR_VALUE_={__DTA_WR_VALUE__};
#define DTA_WR_VALUE__ (&DTA_WR_VALUE_)

// DTA_RD_ARGS
#define __DTA_RD_ARGS__ 47
typedef struct DTA_RD_ARGS_struct __DTA_RD_ARGS;
struct DTA_RD_ARGS_struct {
  unsigned long __id;
  __DTA parent_dta__5OWH;
  void *argument_list__UTFI;
  __BOOLEAN copy_argument__WADK;
};
__DTA_RD_ARGS DTA_RD_ARGS_={__DTA_RD_ARGS__};
#define DTA_RD_ARGS__ (&DTA_RD_ARGS_)

// TYPES
#define __TYPES__ 61
typedef struct TYPES_struct __TYPES;
struct TYPES_struct {
  __INTEGER upper__4LAG;
  void **storage__WWFJ;
};
__TYPES TYPES_;
#define TYPES__ (&TYPES_)

// TYPES_TMP
#define __TYPES_TMP__ 62
typedef struct TYPES_TMP_struct __TYPES_TMP;
struct TYPES_TMP_struct {
  __TYPES parent_types__W25F;
  __INTEGER capacity__W3GJ;
};
__TYPES_TMP TYPES_TMP_;
#define TYPES_TMP__ (&TYPES_TMP_)

// READ
#define __READ__ 63
typedef struct READ_struct __READ;
struct READ_struct {
  __EXPR parent_expr__EJZD;
};
__READ READ_;
#define READ__ (&READ_)

// READ_LOCAL
#define __READ_LOCAL__ 48
typedef struct READ_LOCAL_struct __READ_LOCAL;
struct READ_LOCAL_struct {
  unsigned long __id;
  __READ parent_read__FJZD;
  void *local__ALZD;
};
__READ_LOCAL READ_LOCAL_={__READ_LOCAL__};
#define READ_LOCAL__ (&READ_LOCAL_)

// READ_SLOT
#define __READ_SLOT__ 49
typedef struct READ_SLOT_struct __READ_SLOT;
struct READ_SLOT_struct {
  unsigned long __id;
  __READ parent_read__X0TI;
  void *receiver__I1TI;
  void *slot__EVGK;
};
__READ_SLOT READ_SLOT_={__READ_SLOT__};
#define READ_SLOT__ (&READ_SLOT_)

// SWITCH
#define __SWITCH__ 50
typedef struct SWITCH_struct __SWITCH;
struct SWITCH_struct {
  unsigned long __id;
  __INSTR parent_instr__HAMC;
  void *expr__MMFI;
  void *list__SLAG;
};
__SWITCH SWITCH_={__SWITCH__};
#define SWITCH__ (&SWITCH_)

// CASE
#define __CASE__ 64
typedef struct CASE_struct __CASE;
struct CASE_struct {
  void *id__QMAG;
  void *code__BQAG;
};
__CASE CASE_;
#define CASE__ (&CASE_)

// ARRAYED_COLLECTION[CASE]
#define __ARRAYED_COLLECTIONoCASEo__ 65
typedef struct ARRAYED_COLLECTIONoCASEo_struct __ARRAYED_COLLECTIONoCASEo;
struct ARRAYED_COLLECTIONoCASEo_struct {
  __INTEGER upper__HMAG;
  __INTEGER capacity__Q2GJ;
  void **storage__NYEJ;
};
__ARRAYED_COLLECTIONoCASEo ARRAYED_COLLECTIONoCASEo_;
#define ARRAYED_COLLECTIONoCASEo__ (&ARRAYED_COLLECTIONoCASEo_)

// FAST_ARRAY[CASE]
#define __FAST_ARRAYoCASEo__ 66
typedef struct FAST_ARRAYoCASEo_struct __FAST_ARRAYoCASEo;
struct FAST_ARRAYoCASEo_struct {
  __ARRAYED_COLLECTIONoCASEo parent_arrayed_collection__CHAG;
};
__FAST_ARRAYoCASEo FAST_ARRAYoCASEo_;
#define FAST_ARRAYoCASEo__ (&FAST_ARRAYoCASEo_)

// STRING_CST
#define __STRING_CST__ 51
typedef struct STRING_CST_struct __STRING_CST;
struct STRING_CST_struct {
  unsigned long __id;
  __CONSTANT parent_constant__5F;
  void *string__ZK2H;
};
__STRING_CST STRING_CST_={__STRING_CST__};
#define STRING_CST__ (&STRING_CST_)

// NODE_STYLE
#define __NODE_STYLE__ 52
typedef struct NODE_STYLE_struct __NODE_STYLE;
struct NODE_STYLE_struct {
  unsigned long __id;
  __NODE parent_node__OP0G;
  void *slot__GO5G;
  void *result_expr__HO5G;
};
__NODE_STYLE NODE_STYLE_={__NODE_STYLE__};
#define NODE_STYLE__ (&NODE_STYLE_)

// EXPR_BINARY_CMP
#define __EXPR_BINARY_CMP__ 67
typedef struct EXPR_BINARY_CMP_struct __EXPR_BINARY_CMP;
struct EXPR_BINARY_CMP_struct {
  __EXPR parent_expr__0LJH;
  void *left__HN2H;
  void *right__LN2H;
};
__EXPR_BINARY_CMP EXPR_BINARY_CMP_;
#define EXPR_BINARY_CMP__ (&EXPR_BINARY_CMP_)

// EXPR_EQUAL
#define __EXPR_EQUAL__ 53
typedef struct EXPR_EQUAL_struct __EXPR_EQUAL;
struct EXPR_EQUAL_struct {
  unsigned long __id;
  __EXPR_BINARY_CMP parent_expr_binary_cmp__1LJH;
};
__EXPR_EQUAL EXPR_EQUAL_={__EXPR_EQUAL__};
#define EXPR_EQUAL__ (&EXPR_EQUAL_)

// EXPR_NOT_EQUAL
#define __EXPR_NOT_EQUAL__ 54
typedef struct EXPR_NOT_EQUAL_struct __EXPR_NOT_EQUAL;
struct EXPR_NOT_EQUAL_struct {
  unsigned long __id;
  __EXPR_BINARY_CMP parent_expr_binary_cmp__DMJH;
};
__EXPR_NOT_EQUAL EXPR_NOT_EQUAL_={__EXPR_NOT_EQUAL__};
#define EXPR_NOT_EQUAL__ (&EXPR_NOT_EQUAL_)

// REAL_CST
#define __REAL_CST__ 55
typedef struct REAL_CST_struct __REAL_CST;
struct REAL_CST_struct {
  unsigned long __id;
  __CONSTANT parent_constant__M3JH;
  void *value__5N2H;
};
__REAL_CST REAL_CST_={__REAL_CST__};
#define REAL_CST__ (&REAL_CST_)

// CHARACTER_CST
#define __CHARACTER_CST__ 56
typedef struct CHARACTER_CST_struct __CHARACTER_CST;
struct CHARACTER_CST_struct {
  unsigned long __id;
  __CONSTANT parent_constant__53JH;
  void *text__HO2H;
};
__CHARACTER_CST CHARACTER_CST_={__CHARACTER_CST__};
#define CHARACTER_CST__ (&CHARACTER_CST_)

// GET_TYPE_ID
#define __GET_TYPE_ID__ 57
typedef struct GET_TYPE_ID_struct __GET_TYPE_ID;
struct GET_TYPE_ID_struct {
  unsigned long __id;
  __EXPR parent_expr__AAKH;
  void *receiver__XO2H;
};
__GET_TYPE_ID GET_TYPE_ID_={__GET_TYPE_ID__};
#define GET_TYPE_ID__ (&GET_TYPE_ID_)

// EXPR_SUP
#define __EXPR_SUP__ 58
typedef struct EXPR_SUP_struct __EXPR_SUP;
struct EXPR_SUP_struct {
  unsigned long __id;
  __EXPR_BINARY_CMP parent_expr_binary_cmp__TAKH;
};
__EXPR_SUP EXPR_SUP_={__EXPR_SUP__};
#define EXPR_SUP__ (&EXPR_SUP_)

// PUT_TO
#define __PUT_TO__ 59
typedef struct PUT_TO_struct __PUT_TO;
struct PUT_TO_struct {
  unsigned long __id;
  __EXPR parent_expr__4EKH;
  void *receiver__OR2H;
  void *index__SR2H;
  void *value__WR2H;
};
__PUT_TO PUT_TO_={__PUT_TO__};
#define PUT_TO__ (&PUT_TO_)

// SIZE_OF
#define __SIZE_OF__ 60
typedef struct SIZE_OF_struct __SIZE_OF;
struct SIZE_OF_struct {
  unsigned long __id;
  __EXPR parent_expr__NGKH;
  void *receiver__LS2H;
};
__SIZE_OF SIZE_OF_={__SIZE_OF__};
#define SIZE_OF__ (&SIZE_OF_)

// CAST
#define __CAST__ 61
typedef struct CAST_struct __CAST;
struct CAST_struct {
  unsigned long __id;
  __EXPR parent_expr__5GKH;
  void *static_type__SO1H;
  void *value__US2H;
};
__CAST CAST_={__CAST__};
#define CAST__ (&CAST_)

// READ_GLOBAL
#define __READ_GLOBAL__ 62
typedef struct READ_GLOBAL_struct __READ_GLOBAL;
struct READ_GLOBAL_struct {
  unsigned long __id;
  __READ parent_read__U0UJ;
  void *global__RHJK;
};
__READ_GLOBAL READ_GLOBAL_={__READ_GLOBAL__};
#define READ_GLOBAL__ (&READ_GLOBAL_)

// EXPR_UNARY_LOGIC
#define __EXPR_UNARY_LOGIC__ 68
typedef struct EXPR_UNARY_LOGIC_struct __EXPR_UNARY_LOGIC;
struct EXPR_UNARY_LOGIC_struct {
  __EXPR parent_expr__ZEUK;
  void *right__AQZM;
};
__EXPR_UNARY_LOGIC EXPR_UNARY_LOGIC_;
#define EXPR_UNARY_LOGIC__ (&EXPR_UNARY_LOGIC_)

// EXPR_NOT_LOGIC
#define __EXPR_NOT_LOGIC__ 63
typedef struct EXPR_NOT_LOGIC_struct __EXPR_NOT_LOGIC;
struct EXPR_NOT_LOGIC_struct {
  unsigned long __id;
  __EXPR_UNARY_LOGIC parent_expr_unary_logic__0EUK;
};
__EXPR_NOT_LOGIC EXPR_NOT_LOGIC_={__EXPR_NOT_LOGIC__};
#define EXPR_NOT_LOGIC__ (&EXPR_NOT_LOGIC_)

// EXPR_BINARY_LOGIC
#define __EXPR_BINARY_LOGIC__ 69
typedef struct EXPR_BINARY_LOGIC_struct __EXPR_BINARY_LOGIC;
struct EXPR_BINARY_LOGIC_struct {
  __EXPR parent_expr__VHCL;
  void *left__NMEO;
  void *right__RMEO;
};
__EXPR_BINARY_LOGIC EXPR_BINARY_LOGIC_;
#define EXPR_BINARY_LOGIC__ (&EXPR_BINARY_LOGIC_)

// EXPR_OR_LOGIC
#define __EXPR_OR_LOGIC__ 64
typedef struct EXPR_OR_LOGIC_struct __EXPR_OR_LOGIC;
struct EXPR_OR_LOGIC_struct {
  unsigned long __id;
  __EXPR_BINARY_LOGIC parent_expr_binary_logic__WHCL;
};
__EXPR_OR_LOGIC EXPR_OR_LOGIC_={__EXPR_OR_LOGIC__};
#define EXPR_OR_LOGIC__ (&EXPR_OR_LOGIC_)

// EXPR_OR_OR_LOGIC
#define __EXPR_OR_OR_LOGIC__ 65
typedef struct EXPR_OR_OR_LOGIC_struct __EXPR_OR_OR_LOGIC;
struct EXPR_OR_OR_LOGIC_struct {
  unsigned long __id;
  __EXPR_OR_LOGIC parent_expr_or_logic__QICL;
};
__EXPR_OR_OR_LOGIC EXPR_OR_OR_LOGIC_={__EXPR_OR_OR_LOGIC__};
#define EXPR_OR_OR_LOGIC__ (&EXPR_OR_OR_LOGIC_)

// EXPR_AND_LOGIC
#define __EXPR_AND_LOGIC__ 66
typedef struct EXPR_AND_LOGIC_struct __EXPR_AND_LOGIC;
struct EXPR_AND_LOGIC_struct {
  unsigned long __id;
  __EXPR_BINARY_LOGIC parent_expr_binary_logic__WJCL;
};
__EXPR_AND_LOGIC EXPR_AND_LOGIC_={__EXPR_AND_LOGIC__};
#define EXPR_AND_LOGIC__ (&EXPR_AND_LOGIC_)

// EXPR_AND_AND_LOGIC
#define __EXPR_AND_AND_LOGIC__ 67
typedef struct EXPR_AND_AND_LOGIC_struct __EXPR_AND_AND_LOGIC;
struct EXPR_AND_AND_LOGIC_struct {
  unsigned long __id;
  __EXPR_AND_LOGIC parent_expr_and_logic__QKCL;
};
__EXPR_AND_AND_LOGIC EXPR_AND_AND_LOGIC_={__EXPR_AND_AND_LOGIC__};
#define EXPR_AND_AND_LOGIC__ (&EXPR_AND_AND_LOGIC_)

// EXPR_SUP_EQ
#define __EXPR_SUP_EQ__ 68
typedef struct EXPR_SUP_EQ_struct __EXPR_SUP_EQ;
struct EXPR_SUP_EQ_struct {
  unsigned long __id;
  __EXPR_BINARY_CMP parent_expr_binary_cmp__EP1M;
};
__EXPR_SUP_EQ EXPR_SUP_EQ_={__EXPR_SUP_EQ__};
#define EXPR_SUP_EQ__ (&EXPR_SUP_EQ_)

// EXPR_INF
#define __EXPR_INF__ 69
typedef struct EXPR_INF_struct __EXPR_INF;
struct EXPR_INF_struct {
  unsigned long __id;
  __EXPR_BINARY_CMP parent_expr_binary_cmp__WQ1M;
};
__EXPR_INF EXPR_INF_={__EXPR_INF__};
#define EXPR_INF__ (&EXPR_INF_)

// EXPR_INF_EQ
#define __EXPR_INF_EQ__ 70
typedef struct EXPR_INF_EQ_struct __EXPR_INF_EQ;
struct EXPR_INF_EQ_struct {
  unsigned long __id;
  __EXPR_BINARY_CMP parent_expr_binary_cmp__MR1M;
};
__EXPR_INF_EQ EXPR_INF_EQ_={__EXPR_INF_EQ__};
#define EXPR_INF_EQ__ (&EXPR_INF_EQ_)

// WRITE
#define __WRITE__ 70
typedef struct WRITE_struct __WRITE;
struct WRITE_struct {
  __INSTR parent_instr__H4OG;
  void *value__HBEH;
  __BOOLEAN is_create__1BDI;
  __BOOLEAN is_delete__PDNL;
};
__WRITE WRITE_;
#define WRITE__ (&WRITE_)

// WRITE_GLOBAL
#define __WRITE_GLOBAL__ 71
typedef struct WRITE_GLOBAL_struct __WRITE_GLOBAL;
struct WRITE_GLOBAL_struct {
  unsigned long __id;
  __WRITE parent_write__QBGH;
  void *global__4U1H;
};
__WRITE_GLOBAL WRITE_GLOBAL_={__WRITE_GLOBAL__};
#define WRITE_GLOBAL__ (&WRITE_GLOBAL_)

// WRITE_SLOT
#define __WRITE_SLOT__ 72
typedef struct WRITE_SLOT_struct __WRITE_SLOT;
struct WRITE_SLOT_struct {
  unsigned long __id;
  __WRITE parent_write__3BGH;
  void *slot__5T1H;
  void *receiver__HU1H;
};
__WRITE_SLOT WRITE_SLOT_={__WRITE_SLOT__};
#define WRITE_SLOT__ (&WRITE_SLOT_)

// WRITE_LOCAL
#define __WRITE_LOCAL__ 73
typedef struct WRITE_LOCAL_struct __WRITE_LOCAL;
struct WRITE_LOCAL_struct {
  unsigned long __id;
  __WRITE parent_write__X50I;
  void *local__2RIJ;
};
__WRITE_LOCAL WRITE_LOCAL_={__WRITE_LOCAL__};
#define WRITE_LOCAL__ (&WRITE_LOCAL_)

// LOOP
#define __LOOP__ 74
typedef struct LOOP_struct __LOOP;
struct LOOP_struct {
  unsigned long __id;
  __INSTR parent_instr__QKAL;
  __INTEGER link_count__YALM;
  void *body__5ALM;
  void *name__DILM;
};
__LOOP LOOP_={__LOOP__};
#define LOOP__ (&LOOP_)

// PARSER
#define __PARSER__ 71
typedef struct PARSER_struct __PARSER;
struct PARSER_struct {
  void *Nothing;
};
__PARSER PARSER_;
#define PARSER__ (&PARSER_)

// SECTION_
#define __SECTION___ 72
typedef struct SECTION__struct __SECTION_;
struct SECTION__struct {
  void *name__1I0D;
  void *type_list__JY1D;
};
__SECTION_ SECTION__;
#define SECTION___ (&SECTION__)

// ITM_ARGUMENT
#define __ITM_ARGUMENT__ 73
typedef struct ITM_ARGUMENT_struct __ITM_ARGUMENT;
struct ITM_ARGUMENT_struct {
  __ITM_OBJECT parent_itm_code__QXIC;
};
__ITM_ARGUMENT ITM_ARGUMENT_;
#define ITM_ARGUMENT__ (&ITM_ARGUMENT_)

// ITM_ARG
#define __ITM_ARG__ 75
typedef struct ITM_ARG_struct __ITM_ARG;
struct ITM_ARG_struct {
  unsigned long __id;
  __ITM_ARGUMENT parent_itm_argument__QECD;
  void *name__332D;
  void *type__432D;
};
__ITM_ARG ITM_ARG_={__ITM_ARG__};
#define ITM_ARG__ (&ITM_ARG_)

// ARRAYED_COLLECTION[ITM_ARGUMENT]
#define __ARRAYED_COLLECTIONoITM_ARGUMENTo__ 74
typedef struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct __ARRAYED_COLLECTIONoITM_ARGUMENTo;
struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct {
  __INTEGER upper__W31D;
  __INTEGER capacity__Y31D;
  void **storage__U41D;
};
__ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
#define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)

// FAST_ARRAY[ITM_ARGUMENT]
#define __FAST_ARRAYoITM_ARGUMENTo__ 75
typedef struct FAST_ARRAYoITM_ARGUMENTo_struct __FAST_ARRAYoITM_ARGUMENTo;
struct FAST_ARRAYoITM_ARGUMENTo_struct {
  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__5GJD;
};
__FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
#define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)

// HASHED_DICTIONARY_NODE[ITM_SLOT,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ 76
typedef struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct {
  void *key__PFQD;
  void *item__CGQD;
  void *next__0FQD;
};
__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)

// HASHED_DICTIONARY[ITM_SLOT,STRING_CONSTANT]
#define __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ 77
typedef struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo;
struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct {
  __INTEGER capacity__AVJB;
  __INTEGER count__1YNB;
  void **buckets__YYNB;
};
__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)

// ARRAYED_COLLECTION[EXPR]
#define __ARRAYED_COLLECTIONoEXPRo__ 78
typedef struct ARRAYED_COLLECTIONoEXPRo_struct __ARRAYED_COLLECTIONoEXPRo;
struct ARRAYED_COLLECTIONoEXPRo_struct {
  __INTEGER upper__USSH;
  __INTEGER capacity__QSDI;
  void **storage__1SDI;
};
__ARRAYED_COLLECTIONoEXPRo ARRAYED_COLLECTIONoEXPRo_;
#define ARRAYED_COLLECTIONoEXPRo__ (&ARRAYED_COLLECTIONoEXPRo_)

// FAST_ARRAY[EXPR]
#define __FAST_ARRAYoEXPRo__ 79
typedef struct FAST_ARRAYoEXPRo_struct __FAST_ARRAYoEXPRo;
struct FAST_ARRAYoEXPRo_struct {
  __ARRAYED_COLLECTIONoEXPRo parent_arrayed_collection__42LC;
};
__FAST_ARRAYoEXPRo FAST_ARRAYoEXPRo_;
#define FAST_ARRAYoEXPRo__ (&FAST_ARRAYoEXPRo_)

// ITM_CODE
#define __ITM_CODE__ 80
typedef struct ITM_CODE_struct __ITM_CODE;
struct ITM_CODE_struct {
  __ITM_OBJECT parent_itm_object__X1CC;
};
__ITM_CODE ITM_CODE_;
#define ITM_CODE__ (&ITM_CODE_)

// ITM_LIST
#define __ITM_LIST__ 76
typedef struct ITM_LIST_struct __ITM_LIST;
struct ITM_LIST_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__YVDC;
  void *code__G5OC;
  void *local_list__3HPC;
  void *static_list__JIPC;
};
__ITM_LIST ITM_LIST_={__ITM_LIST__};
#define ITM_LIST__ (&ITM_LIST_)

// ITM_CONSTANT
#define __ITM_CONSTANT__ 81
typedef struct ITM_CONSTANT_struct __ITM_CONSTANT;
struct ITM_CONSTANT_struct {
  __ITM_CODE parent_itm_code__KHEC;
};
__ITM_CONSTANT ITM_CONSTANT_;
#define ITM_CONSTANT__ (&ITM_CONSTANT_)

// ITM_PROTOTYPE
#define __ITM_PROTOTYPE__ 77
typedef struct ITM_PROTOTYPE_struct __ITM_PROTOTYPE;
struct ITM_PROTOTYPE_struct {
  unsigned long __id;
  __ITM_CONSTANT parent_itm_constant__LHEC;
  void *type__VAPC;
};
__ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
#define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)

// ITM_WRITE
#define __ITM_WRITE__ 82
typedef struct ITM_WRITE_struct __ITM_WRITE;
struct ITM_WRITE_struct {
  __ITM_CODE parent_itm_code__CYFC;
  void *assign__HV2D;
  void *value__IV2D;
};
__ITM_WRITE ITM_WRITE_;
#define ITM_WRITE__ (&ITM_WRITE_)

// ITM_WRITE_VALUE
#define __ITM_WRITE_VALUE__ 78
typedef struct ITM_WRITE_VALUE_struct __ITM_WRITE_VALUE;
struct ITM_WRITE_VALUE_struct {
  unsigned long __id;
  __ITM_WRITE parent_itm_write__DYFC;
};
__ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
#define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)

// ITM_WRITE_CAST
#define __ITM_WRITE_CAST__ 79
typedef struct ITM_WRITE_CAST_struct __ITM_WRITE_CAST;
struct ITM_WRITE_CAST_struct {
  unsigned long __id;
  __ITM_WRITE parent_itm_write__ZYFC;
};
__ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
#define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)

// ITM_READ
#define __ITM_READ__ 80
typedef struct ITM_READ_struct __ITM_READ;
struct ITM_READ_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__G1FC;
  void *name__TVPC;
};
__ITM_READ ITM_READ_={__ITM_READ__};
#define ITM_READ__ (&ITM_READ_)

// ITM_WRITE_CODE
#define __ITM_WRITE_CODE__ 81
typedef struct ITM_WRITE_CODE_struct __ITM_WRITE_CODE;
struct ITM_WRITE_CODE_struct {
  unsigned long __id;
  __ITM_WRITE parent_itm_write__E2FC;
};
__ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
#define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)

// ITM_READ_ARG2
#define __ITM_READ_ARG2__ 82
typedef struct ITM_READ_ARG2_struct __ITM_READ_ARG2;
struct ITM_READ_ARG2_struct {
  unsigned long __id;
  __ITM_READ parent_itm_read__V4FC;
  void *arg_first__MEQC;
  void *arg_second__NEQC;
};
__ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
#define ITM_READ_ARG2__ (&ITM_READ_ARG2_)

// ITM_BINARY
#define __ITM_BINARY__ 83
typedef struct ITM_BINARY_struct __ITM_BINARY;
struct ITM_BINARY_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__J5FC;
  void *position_list__NW0D;
  void *value_list__OW0D;
  void *operator_list__PW0D;
};
__ITM_BINARY ITM_BINARY_={__ITM_BINARY__};
#define ITM_BINARY__ (&ITM_BINARY_)

// ITM_READ_ARG1
#define __ITM_READ_ARG1__ 84
typedef struct ITM_READ_ARG1_struct __ITM_READ_ARG1;
struct ITM_READ_ARG1_struct {
  unsigned long __id;
  __ITM_READ parent_itm_read__S5GC;
  void *arg__UVPC;
};
__ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
#define ITM_READ_ARG1__ (&ITM_READ_ARG1_)

// ITM_OLD
#define __ITM_OLD__ 85
typedef struct ITM_OLD_struct __ITM_OLD;
struct ITM_OLD_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__CIIC;
  void *value__OZPC;
};
__ITM_OLD ITM_OLD_={__ITM_OLD__};
#define ITM_OLD__ (&ITM_OLD_)

// ITM_EXTERN
#define __ITM_EXTERN__ 83
typedef struct ITM_EXTERN_struct __ITM_EXTERN;
struct ITM_EXTERN_struct {
  __ITM_CODE parent_itm_code__KXIC;
  void *extern__CJ1D;
};
__ITM_EXTERN ITM_EXTERN_;
#define ITM_EXTERN__ (&ITM_EXTERN_)

// ITM_EXTERNAL_TYPE
#define __ITM_EXTERNAL_TYPE__ 86
typedef struct ITM_EXTERNAL_TYPE_struct __ITM_EXTERNAL_TYPE;
struct ITM_EXTERNAL_TYPE_struct {
  unsigned long __id;
  __ITM_EXTERN parent_itm_extern__LXIC;
  void *type__WY0D;
  __BOOLEAN is_persistant__ECJC;
  void *type_list__TV1D;
};
__ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
#define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)

// ITM_REAL
#define __ITM_REAL__ 87
typedef struct ITM_REAL_struct __ITM_REAL;
struct ITM_REAL_struct {
  unsigned long __id;
  __ITM_CONSTANT parent_itm_constant__30IC;
  void *value__0C0D;
};
__ITM_REAL ITM_REAL_={__ITM_REAL__};
#define ITM_REAL__ (&ITM_REAL_)

// ITM_NUMBER
#define __ITM_NUMBER__ 88
typedef struct ITM_NUMBER_struct __ITM_NUMBER;
struct ITM_NUMBER_struct {
  unsigned long __id;
  __ITM_CONSTANT parent_itm_constant__P1IC;
  __INTEGER_64 value__5C0D;
};
__ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
#define ITM_NUMBER__ (&ITM_NUMBER_)

// ITM_EXTERNAL
#define __ITM_EXTERNAL__ 89
typedef struct ITM_EXTERNAL_struct __ITM_EXTERNAL;
struct ITM_EXTERNAL_struct {
  unsigned long __id;
  __ITM_EXTERN parent_itm_extern__MAJC;
};
__ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
#define ITM_EXTERNAL__ (&ITM_EXTERNAL_)

// ITM_READ_ARGS
#define __ITM_READ_ARGS__ 90
typedef struct ITM_READ_ARGS_struct __ITM_READ_ARGS;
struct ITM_READ_ARGS_struct {
  unsigned long __id;
  __ITM_READ parent_itm_read__J5JC;
  void *args__TEQC;
};
__ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
#define ITM_READ_ARGS__ (&ITM_READ_ARGS_)

// IS_EXPANDED
#define __IS_EXPANDED__ 91
typedef struct IS_EXPANDED_struct __IS_EXPANDED;
struct IS_EXPANDED_struct {
  unsigned long __id;
  __EXPR parent_expr__S5JH;
  void *receiver__OO2H;
};
__IS_EXPANDED IS_EXPANDED_={__IS_EXPANDED__};
#define IS_EXPANDED__ (&IS_EXPANDED_)

// LINKED_LIST_NODE[NODE_TYPE]
#define __LINKED_LIST_NODEoNODE_TYPEo__ 84
typedef struct LINKED_LIST_NODEoNODE_TYPEo_struct __LINKED_LIST_NODEoNODE_TYPEo;
struct LINKED_LIST_NODEoNODE_TYPEo_struct {
  void *item__O1SE;
  void *next__GX4E;
};
__LINKED_LIST_NODEoNODE_TYPEo LINKED_LIST_NODEoNODE_TYPEo_;
#define LINKED_LIST_NODEoNODE_TYPEo__ (&LINKED_LIST_NODEoNODE_TYPEo_)

// ARRAYED_COLLECTION[SLOT_CODE]
#define __ARRAYED_COLLECTIONoSLOT_CODEo__ 85
typedef struct ARRAYED_COLLECTIONoSLOT_CODEo_struct __ARRAYED_COLLECTIONoSLOT_CODEo;
struct ARRAYED_COLLECTIONoSLOT_CODEo_struct {
  __INTEGER upper__TVIJ;
  __INTEGER capacity__VPIK;
  void **storage__RQIK;
};
__ARRAYED_COLLECTIONoSLOT_CODEo ARRAYED_COLLECTIONoSLOT_CODEo_;
#define ARRAYED_COLLECTIONoSLOT_CODEo__ (&ARRAYED_COLLECTIONoSLOT_CODEo_)

// FAST_ARRAY[SLOT_CODE]
#define __FAST_ARRAYoSLOT_CODEo__ 86
typedef struct FAST_ARRAYoSLOT_CODEo_struct __FAST_ARRAYoSLOT_CODEo;
struct FAST_ARRAYoSLOT_CODEo_struct {
  __ARRAYED_COLLECTIONoSLOT_CODEo parent_arrayed_collection__YUIJ;
};
__FAST_ARRAYoSLOT_CODEo FAST_ARRAYoSLOT_CODEo_;
#define FAST_ARRAYoSLOT_CODEo__ (&FAST_ARRAYoSLOT_CODEo_)

// ARRAYED_COLLECTION[WRITE]
#define __ARRAYED_COLLECTIONoWRITEo__ 87
typedef struct ARRAYED_COLLECTIONoWRITEo_struct __ARRAYED_COLLECTIONoWRITEo;
struct ARRAYED_COLLECTIONoWRITEo_struct {
  __INTEGER upper__NPDI;
  __INTEGER capacity__PPDI;
  void **storage__LQDI;
};
__ARRAYED_COLLECTIONoWRITEo ARRAYED_COLLECTIONoWRITEo_;
#define ARRAYED_COLLECTIONoWRITEo__ (&ARRAYED_COLLECTIONoWRITEo_)

// FAST_ARRAY[WRITE]
#define __FAST_ARRAYoWRITEo__ 88
typedef struct FAST_ARRAYoWRITEo_struct __FAST_ARRAYoWRITEo;
struct FAST_ARRAYoWRITEo_struct {
  __ARRAYED_COLLECTIONoWRITEo parent_arrayed_collection__TAEH;
};
__FAST_ARRAYoWRITEo FAST_ARRAYoWRITEo_;
#define FAST_ARRAYoWRITEo__ (&FAST_ARRAYoWRITEo_)

// HASHED_DICTIONARY_NODE[Expanded INTEGER,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__ 89
typedef struct HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo_struct {
  void *key__RKFF;
  __INTEGER item__U11F;
  void *next__2KFF;
};
__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo_)

// HASHED_DICTIONARY[Expanded INTEGER,STRING_CONSTANT]
#define __HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__ 90
typedef struct HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo;
struct HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo_struct {
  __INTEGER capacity__AKFF;
  __INTEGER count__FLFF;
  void **buckets__FKFF;
};
__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo_)

// ARRAYED_COLLECTION[Expanded CHARACTER]
#define __ARRAYED_COLLECTIONoExpanded_CHARACTERo__ 91
typedef struct ARRAYED_COLLECTIONoExpanded_CHARACTERo_struct __ARRAYED_COLLECTIONoExpanded_CHARACTERo;
struct ARRAYED_COLLECTIONoExpanded_CHARACTERo_struct {
  __INTEGER capacity__JTJB;
  __INTEGER upper__WTJB;
  __CHARACTER *storage__STJB;
};
__ARRAYED_COLLECTIONoExpanded_CHARACTERo ARRAYED_COLLECTIONoExpanded_CHARACTERo_;
#define ARRAYED_COLLECTIONoExpanded_CHARACTERo__ (&ARRAYED_COLLECTIONoExpanded_CHARACTERo_)

// FAST_ARRAY[Expanded CHARACTER]
#define __FAST_ARRAYoExpanded_CHARACTERo__ 92
typedef struct FAST_ARRAYoExpanded_CHARACTERo_struct __FAST_ARRAYoExpanded_CHARACTERo;
struct FAST_ARRAYoExpanded_CHARACTERo_struct {
  __ARRAYED_COLLECTIONoExpanded_CHARACTERo parent_arrayed_collection__IIM;
};
__FAST_ARRAYoExpanded_CHARACTERo FAST_ARRAYoExpanded_CHARACTERo_;
#define FAST_ARRAYoExpanded_CHARACTERo__ (&FAST_ARRAYoExpanded_CHARACTERo_)

// ARRAYED_COLLECTION[STRING_CONSTANT]
#define __ARRAYED_COLLECTIONoSTRING_CONSTANTo__ 93
typedef struct ARRAYED_COLLECTIONoSTRING_CONSTANTo_struct __ARRAYED_COLLECTIONoSTRING_CONSTANTo;
struct ARRAYED_COLLECTIONoSTRING_CONSTANTo_struct {
  __INTEGER upper__RSSD;
  __INTEGER capacity__PRZD;
  void **storage__FB0D;
};
__ARRAYED_COLLECTIONoSTRING_CONSTANTo ARRAYED_COLLECTIONoSTRING_CONSTANTo_;
#define ARRAYED_COLLECTIONoSTRING_CONSTANTo__ (&ARRAYED_COLLECTIONoSTRING_CONSTANTo_)

// FAST_ARRAY[STRING_CONSTANT]
#define __FAST_ARRAYoSTRING_CONSTANTo__ 94
typedef struct FAST_ARRAYoSTRING_CONSTANTo_struct __FAST_ARRAYoSTRING_CONSTANTo;
struct FAST_ARRAYoSTRING_CONSTANTo_struct {
  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__VTFC;
};
__FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
#define FAST_ARRAYoSTRING_CONSTANTo__ (&FAST_ARRAYoSTRING_CONSTANTo_)

// ARRAYED_COLLECTION[ITM_CODE]
#define __ARRAYED_COLLECTIONoITM_CODEo__ 95
typedef struct ARRAYED_COLLECTIONoITM_CODEo_struct __ARRAYED_COLLECTIONoITM_CODEo;
struct ARRAYED_COLLECTIONoITM_CODEo_struct {
  __INTEGER upper__ZAPC;
  __INTEGER capacity__VBPC;
  void **storage__ACPC;
};
__ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
#define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)

// FAST_ARRAY[ITM_CODE]
#define __FAST_ARRAYoITM_CODEo__ 96
typedef struct FAST_ARRAYoITM_CODEo_struct __FAST_ARRAYoITM_CODEo;
struct FAST_ARRAYoITM_CODEo_struct {
  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__AFEC;
};
__FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
#define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)

// ARRAYED_COLLECTION[Expanded POSITION]
#define __ARRAYED_COLLECTIONoExpanded_POSITIONo__ 97
typedef struct ARRAYED_COLLECTIONoExpanded_POSITIONo_struct __ARRAYED_COLLECTIONoExpanded_POSITIONo;
struct ARRAYED_COLLECTIONoExpanded_POSITIONo_struct {
  __INTEGER upper__VO0D;
  __INTEGER capacity__BP0D;
  __POSITION *storage__MA0D;
};
__ARRAYED_COLLECTIONoExpanded_POSITIONo ARRAYED_COLLECTIONoExpanded_POSITIONo_;
#define ARRAYED_COLLECTIONoExpanded_POSITIONo__ (&ARRAYED_COLLECTIONoExpanded_POSITIONo_)

// FAST_ARRAY[Expanded POSITION]
#define __FAST_ARRAYoExpanded_POSITIONo__ 98
typedef struct FAST_ARRAYoExpanded_POSITIONo_struct __FAST_ARRAYoExpanded_POSITIONo;
struct FAST_ARRAYoExpanded_POSITIONo_struct {
  __ARRAYED_COLLECTIONoExpanded_POSITIONo parent_arrayed_collection__1TFC;
};
__FAST_ARRAYoExpanded_POSITIONo FAST_ARRAYoExpanded_POSITIONo_;
#define FAST_ARRAYoExpanded_POSITIONo__ (&FAST_ARRAYoExpanded_POSITIONo_)

// HASHED_SET_NODE[TYPES]
#define __HASHED_SET_NODEoTYPESo__ 99
typedef struct HASHED_SET_NODEoTYPESo_struct __HASHED_SET_NODEoTYPESo;
struct HASHED_SET_NODEoTYPESo_struct {
  void *item__MJIK;
  void *next__YJIK;
};
__HASHED_SET_NODEoTYPESo HASHED_SET_NODEoTYPESo_;
#define HASHED_SET_NODEoTYPESo__ (&HASHED_SET_NODEoTYPESo_)

// HASHED_SET[TYPES]
#define __HASHED_SEToTYPESo__ 100
typedef struct HASHED_SEToTYPESo_struct __HASHED_SEToTYPESo;
struct HASHED_SEToTYPESo_struct {
  __INTEGER capacity__1IIK;
  __INTEGER count__CXIK;
  void **buckets__AJIK;
};
__HASHED_SEToTYPESo HASHED_SEToTYPESo_;
#define HASHED_SEToTYPESo__ (&HASHED_SEToTYPESo_)

// ARRAYED_COLLECTION[PROFIL_SLOT]
#define __ARRAYED_COLLECTIONoPROFIL_SLOTo__ 101
typedef struct ARRAYED_COLLECTIONoPROFIL_SLOTo_struct __ARRAYED_COLLECTIONoPROFIL_SLOTo;
struct ARRAYED_COLLECTIONoPROFIL_SLOTo_struct {
  __INTEGER capacity__ZUPG;
  __INTEGER upper__IVPG;
  void **storage__EVPG;
};
__ARRAYED_COLLECTIONoPROFIL_SLOTo ARRAYED_COLLECTIONoPROFIL_SLOTo_;
#define ARRAYED_COLLECTIONoPROFIL_SLOTo__ (&ARRAYED_COLLECTIONoPROFIL_SLOTo_)

// FAST_ARRAY[PROFIL_SLOT]
#define __FAST_ARRAYoPROFIL_SLOTo__ 102
typedef struct FAST_ARRAYoPROFIL_SLOTo_struct __FAST_ARRAYoPROFIL_SLOTo;
struct FAST_ARRAYoPROFIL_SLOTo_struct {
  __ARRAYED_COLLECTIONoPROFIL_SLOTo parent_arrayed_collection__H15F;
};
__FAST_ARRAYoPROFIL_SLOTo FAST_ARRAYoPROFIL_SLOTo_;
#define FAST_ARRAYoPROFIL_SLOTo__ (&FAST_ARRAYoPROFIL_SLOTo_)

// ITM_ARGS
#define __ITM_ARGS__ 92
typedef struct ITM_ARGS_struct __ITM_ARGS;
struct ITM_ARGS_struct {
  unsigned long __id;
  __ITM_ARGUMENT parent_itm_argument__ZUSD;
  void *type__GH3D;
  void *name__FH3D;
};
__ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
#define ITM_ARGS__ (&ITM_ARGS_)

// ITM_LDOTS
#define __ITM_LDOTS__ 93
typedef struct ITM_LDOTS_struct __ITM_LDOTS;
struct ITM_LDOTS_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_constant__5FEC;
};
__ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
#define ITM_LDOTS__ (&ITM_LDOTS_)

// LOOP_END
#define __LOOP_END__ 94
typedef struct LOOP_END_struct __LOOP_END;
struct LOOP_END_struct {
  unsigned long __id;
  __INSTR parent_instr__G12L;
  void *loop__5WLM;
};
__LOOP_END LOOP_END_={__LOOP_END__};
#define LOOP_END__ (&LOOP_END_)

// HASHED_SET_NODE[FAST_ARRAY[STRING_CONSTANT]]
#define __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ 103
typedef struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo;
struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct {
  void *item__ET0D;
  void *next__QT0D;
};
__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
#define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)

// HASHED_SET[FAST_ARRAY[STRING_CONSTANT]]
#define __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ 104
typedef struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo;
struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct {
  __INTEGER capacity__TS0D;
  __INTEGER count__MT1D;
  void **buckets__YS0D;
};
__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
#define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)

// ITM_LOCAL
#define __ITM_LOCAL__ 105
typedef struct ITM_LOCAL_struct __ITM_LOCAL;
struct ITM_LOCAL_struct {
  __ITM_OBJECT parent_itm_object__RCFC;
  void *name__A0GC;
  void *type__K5EF;
};
__ITM_LOCAL ITM_LOCAL_;
#define ITM_LOCAL__ (&ITM_LOCAL_)

// ARRAYED_COLLECTION[ITM_LOCAL]
#define __ARRAYED_COLLECTIONoITM_LOCALo__ 106
typedef struct ARRAYED_COLLECTIONoITM_LOCALo_struct __ARRAYED_COLLECTIONoITM_LOCALo;
struct ARRAYED_COLLECTIONoITM_LOCALo_struct {
  __INTEGER upper__3XGC;
  __INTEGER capacity__1LPC;
  void **storage__GMPC;
};
__ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
#define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)

// FAST_ARRAY[ITM_LOCAL]
#define __FAST_ARRAYoITM_LOCALo__ 107
typedef struct FAST_ARRAYoITM_LOCALo_struct __FAST_ARRAYoITM_LOCALo;
struct FAST_ARRAYoITM_LOCALo_struct {
  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__WCFC;
};
__FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
#define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)

// ITM_TYPE_SELF
#define __ITM_TYPE_SELF__ 95
typedef struct ITM_TYPE_SELF_struct __ITM_TYPE_SELF;
struct ITM_TYPE_SELF_struct {
  unsigned long __id;
  __ITM_TYPE_SIMPLE parent_itm_type_simple__5KD;
};
__ITM_TYPE_SELF ITM_TYPE_SELF_={__ITM_TYPE_SELF__};
#define ITM_TYPE_SELF__ (&ITM_TYPE_SELF_)

// NUMERIC
#define __NUMERIC__ 108
typedef struct NUMERIC_struct __NUMERIC;
struct NUMERIC_struct {
  void *Nothing;
};
__NUMERIC NUMERIC_;
#define NUMERIC__ (&NUMERIC_)

// OBJECT
#define __OBJECT__ 109
typedef struct OBJECT_struct __OBJECT;
struct OBJECT_struct {
  void *Nothing;
};
__OBJECT OBJECT_;
#define OBJECT__ (&OBJECT_)

// ALIAS_STR
#define __ALIAS_STR__ 110
typedef struct ALIAS_STR_struct __ALIAS_STR;
struct ALIAS_STR_struct {
  void *Nothing;
};
__ALIAS_STR ALIAS_STR_;
#define ALIAS_STR__ (&ALIAS_STR_)

// ANY
#define __ANY__ 111
typedef struct ANY_struct __ANY;
struct ANY_struct {
  __INTEGER object_id__WAZG;
  int object_id__XAZG;
};
__ANY ANY_;
#define ANY__ (&ANY_)

// FALSE
#define FALSE__ 0

// LISAAC
#define __LISAAC__ 112
typedef struct LISAAC_struct __LISAAC;
struct LISAAC_struct {
  void *Nothing;
};
__LISAAC LISAAC_;
#define LISAAC__ (&LISAAC_)

// FS_MIN
#define __FS_MIN__ 113
typedef struct FS_MIN_struct __FS_MIN;
struct FS_MIN_struct {
  void *Nothing;
};
__FS_MIN FS_MIN_;
#define FS_MIN__ (&FS_MIN_)

// ARRAYED_COLLECTION[PROTOTYPE]
#define __ARRAYED_COLLECTIONoPROTOTYPEo__ 114
typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
  __INTEGER upper__QQB;
  __INTEGER capacity__YZM;
  void **storage__D0M;
};
__ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
#define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)

// FAST_ARRAY[PROTOTYPE]
#define __FAST_ARRAYoPROTOTYPEo__ 115
typedef struct FAST_ARRAYoPROTOTYPEo_struct __FAST_ARRAYoPROTOTYPEo;
struct FAST_ARRAYoPROTOTYPEo_struct {
  __ARRAYED_COLLECTIONoPROTOTYPEo parent_arrayed_collection__FQB;
};
__FAST_ARRAYoPROTOTYPEo FAST_ARRAYoPROTOTYPEo_;
#define FAST_ARRAYoPROTOTYPEo__ (&FAST_ARRAYoPROTOTYPEo_)

// ARRAYED_COLLECTION[FAST_ARRAY[ITM_TYPE_MONO]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ 116
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct {
  __INTEGER upper__WIL;
  __INTEGER capacity__HYL;
  void **storage__CZL;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)

// FAST_ARRAY[FAST_ARRAY[ITM_TYPE_MONO]]
#define __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ 117
typedef struct FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_struct __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo;
struct FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__ROC;
};
__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
#define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)

// ALIAS_ARRAY[ITM_TYPE_MONO]
#define __ALIAS_ARRAYoITM_TYPE_MONOo__ 118
typedef struct ALIAS_ARRAYoITM_TYPE_MONOo_struct __ALIAS_ARRAYoITM_TYPE_MONOo;
struct ALIAS_ARRAYoITM_TYPE_MONOo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoITM_TYPE_MONOo ALIAS_ARRAYoITM_TYPE_MONOo_;
#define ALIAS_ARRAYoITM_TYPE_MONOo__ (&ALIAS_ARRAYoITM_TYPE_MONOo_)

// ARRAYED_COLLECTION[ITM_TYPE_GENERIC]
#define __ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ 119
typedef struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct __ARRAYED_COLLECTIONoITM_TYPE_GENERICo;
struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct {
  __INTEGER upper__RQC;
  __INTEGER capacity__NSM;
  void **storage__YSM;
};
__ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
#define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)

// FAST_ARRAY[ITM_TYPE_GENERIC]
#define __FAST_ARRAYoITM_TYPE_GENERICo__ 120
typedef struct FAST_ARRAYoITM_TYPE_GENERICo_struct __FAST_ARRAYoITM_TYPE_GENERICo;
struct FAST_ARRAYoITM_TYPE_GENERICo_struct {
  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__HQC;
};
__FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
#define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)

// ARRAYED_COLLECTION[ITM_TYPE_GENERIC_ELT]
#define __ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo__ 121
typedef struct ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo_struct __ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo;
struct ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo_struct {
  __INTEGER capacity__SFQC;
  __INTEGER upper__4FQC;
  void **storage__FFQC;
};
__ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo_;
#define ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo_)

// FAST_ARRAY[ITM_TYPE_GENERIC_ELT]
#define __FAST_ARRAYoITM_TYPE_GENERIC_ELTo__ 122
typedef struct FAST_ARRAYoITM_TYPE_GENERIC_ELTo_struct __FAST_ARRAYoITM_TYPE_GENERIC_ELTo;
struct FAST_ARRAYoITM_TYPE_GENERIC_ELTo_struct {
  __ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo parent_arrayed_collection__3SLC;
};
__FAST_ARRAYoITM_TYPE_GENERIC_ELTo FAST_ARRAYoITM_TYPE_GENERIC_ELTo_;
#define FAST_ARRAYoITM_TYPE_GENERIC_ELTo__ (&FAST_ARRAYoITM_TYPE_GENERIC_ELTo_)

// TRUE
#define TRUE__ 1

// ARRAYED_COLLECTION[ITM_TYPE_STYLE]
#define __ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ 123
typedef struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct __ARRAYED_COLLECTIONoITM_TYPE_STYLEo;
struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct {
  __INTEGER upper__KMC;
  __INTEGER capacity__RKM;
  void **storage__2KM;
};
__ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
#define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)

// FAST_ARRAY[ITM_TYPE_STYLE]
#define __FAST_ARRAYoITM_TYPE_STYLEo__ 124
typedef struct FAST_ARRAYoITM_TYPE_STYLEo_struct __FAST_ARRAYoITM_TYPE_STYLEo;
struct FAST_ARRAYoITM_TYPE_STYLEo_struct {
  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__AMC;
};
__FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
#define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)

// ITM_CHARACTER
#define __ITM_CHARACTER__ 96
typedef struct ITM_CHARACTER_struct __ITM_CHARACTER;
struct ITM_CHARACTER_struct {
  unsigned long __id;
  __ITM_CONSTANT parent_itm_constant__B2IC;
  void *character__ED0D;
};
__ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
#define ITM_CHARACTER__ (&ITM_CHARACTER_)

// ITM_STRING
#define __ITM_STRING__ 97
typedef struct ITM_STRING_struct __ITM_STRING;
struct ITM_STRING_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__S2IC;
  void *string__QD0D;
};
__ITM_STRING ITM_STRING_={__ITM_STRING__};
#define ITM_STRING__ (&ITM_STRING_)

// ARRAYED_COLLECTION[FAST_ARRAY[ITM_LOCAL]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ 125
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct {
  __INTEGER upper__LCPC;
  __INTEGER capacity__AKPC;
  void **storage__LKPC;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)

// FAST_ARRAY[FAST_ARRAY[ITM_LOCAL]]
#define __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ 126
typedef struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo;
struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__ENFC;
};
__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
#define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)

// ALIAS_ARRAY[ITM_LOCAL]
#define __ALIAS_ARRAYoITM_LOCALo__ 127
typedef struct ALIAS_ARRAYoITM_LOCALo_struct __ALIAS_ARRAYoITM_LOCALo;
struct ALIAS_ARRAYoITM_LOCALo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoITM_LOCALo ALIAS_ARRAYoITM_LOCALo_;
#define ALIAS_ARRAYoITM_LOCALo__ (&ALIAS_ARRAYoITM_LOCALo_)

// ARRAYED_COLLECTION[FAST_ARRAY[ITM_CODE]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ 128
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct {
  __INTEGER upper__CAPC;
  __INTEGER capacity__WEPC;
  void **storage__SFPC;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)

// FAST_ARRAY[FAST_ARRAY[ITM_CODE]]
#define __FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ 129
typedef struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoITM_CODEoo;
struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__SFFC;
};
__FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
#define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)

// ALIAS_ARRAY[ITM_CODE]
#define __ALIAS_ARRAYoITM_CODEo__ 130
typedef struct ALIAS_ARRAYoITM_CODEo_struct __ALIAS_ARRAYoITM_CODEo;
struct ALIAS_ARRAYoITM_CODEo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoITM_CODEo ALIAS_ARRAYoITM_CODEo_;
#define ALIAS_ARRAYoITM_CODEo__ (&ALIAS_ARRAYoITM_CODEo_)

// ARRAYED_COLLECTION[FAST_ARRAY[STRING_CONSTANT]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ 131
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct {
  __INTEGER upper__CSPC;
  __INTEGER capacity__VTPC;
  void **storage__AUPC;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)

// FAST_ARRAY[FAST_ARRAY[STRING_CONSTANT]]
#define __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ 132
typedef struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo;
struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__J2GC;
};
__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
#define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)

// ALIAS_ARRAY[STRING_CONSTANT]
#define __ALIAS_ARRAYoSTRING_CONSTANTo__ 133
typedef struct ALIAS_ARRAYoSTRING_CONSTANTo_struct __ALIAS_ARRAYoSTRING_CONSTANTo;
struct ALIAS_ARRAYoSTRING_CONSTANTo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoSTRING_CONSTANTo ALIAS_ARRAYoSTRING_CONSTANTo_;
#define ALIAS_ARRAYoSTRING_CONSTANTo__ (&ALIAS_ARRAYoSTRING_CONSTANTo_)

// ITM_LIST_IDF
#define __ITM_LIST_IDF__ 98
typedef struct ITM_LIST_IDF_struct __ITM_LIST_IDF;
struct ITM_LIST_IDF_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__NXFC;
  void *list_name__DHGF;
};
__ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
#define ITM_LIST_IDF__ (&ITM_LIST_IDF_)

// ARRAYED_COLLECTION[FAST_ARRAY[Expanded POSITION]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo__ 134
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo_struct {
  __INTEGER upper__YRZD;
  __INTEGER capacity__UN0D;
  void **storage__5N0D;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo_)

// FAST_ARRAY[FAST_ARRAY[Expanded POSITION]]
#define __FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo__ 135
typedef struct FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo_struct __FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo;
struct FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo parent_arrayed_collection__DYZC;
};
__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo_;
#define FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo__ (&FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo_)

// ALIAS_ARRAY[Expanded POSITION]
#define __ALIAS_ARRAYoExpanded_POSITIONo__ 136
typedef struct ALIAS_ARRAYoExpanded_POSITIONo_struct __ALIAS_ARRAYoExpanded_POSITIONo;
struct ALIAS_ARRAYoExpanded_POSITIONo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoExpanded_POSITIONo ALIAS_ARRAYoExpanded_POSITIONo_;
#define ALIAS_ARRAYoExpanded_POSITIONo__ (&ALIAS_ARRAYoExpanded_POSITIONo_)

// ITM_RESULT
#define __ITM_RESULT__ 99
typedef struct ITM_RESULT_struct __ITM_RESULT;
struct ITM_RESULT_struct {
  unsigned long __id;
  __ITM_CODE parent_itm_code__FBCD;
  void *value__H52D;
};
__ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
#define ITM_RESULT__ (&ITM_RESULT_)

// ITM_TYPE_MULTI
#define __ITM_TYPE_MULTI__ 100
typedef struct ITM_TYPE_MULTI_struct __ITM_TYPE_MULTI;
struct ITM_TYPE_MULTI_struct {
  unsigned long __id;
  void *list_type__VZVD;
};
__ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
#define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)

// ARRAYED_COLLECTION[ITM_TYPE_MULTI]
#define __ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ 137
typedef struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct __ARRAYED_COLLECTIONoITM_TYPE_MULTIo;
struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct {
  __INTEGER upper__LZVD;
  __INTEGER capacity__JI3D;
  void **storage__UI3D;
};
__ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
#define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)

// FAST_ARRAY[ITM_TYPE_MULTI]
#define __FAST_ARRAYoITM_TYPE_MULTIo__ 138
typedef struct FAST_ARRAYoITM_TYPE_MULTIo_struct __FAST_ARRAYoITM_TYPE_MULTIo;
struct FAST_ARRAYoITM_TYPE_MULTIo_struct {
  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__BZVD;
};
__FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
#define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)

// ITM_BLOCK
#define __ITM_BLOCK__ 101
typedef struct ITM_BLOCK_struct __ITM_BLOCK;
struct ITM_BLOCK_struct {
  unsigned long __id;
  void *list__VD0D;
  void *argument__WD0D;
};
__ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
#define ITM_BLOCK__ (&ITM_BLOCK_)

// HASHED_DICTIONARY_NODE[SECTION_,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ 139
typedef struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct {
  void *key__C40D;
  void *item__V40D;
  void *next__N40D;
};
__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)

// HASHED_DICTIONARY[SECTION_,STRING_CONSTANT]
#define __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ 140
typedef struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo;
struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct {
  __INTEGER capacity__R30D;
  __INTEGER count__XZ1D;
  void **buckets__W30D;
};
__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)

// HASHED_DICTIONARY_NODE[SECTION_,FAST_ARRAY[ITM_TYPE_MONO]]
#define __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ 141
typedef struct HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo;
struct HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct {
  void *item__1A1D;
  void *key__IA1D;
  void *next__TA1D;
};
__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_;
#define HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_)

// HASHED_DICTIONARY[SECTION_,FAST_ARRAY[ITM_TYPE_MONO]]
#define __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ 142
typedef struct HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo;
struct HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct {
  __INTEGER capacity__X50D;
  __INTEGER count__R21D;
  void **buckets__250D;
};
__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_;
#define HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_)

// ARRAYED_COLLECTION[FAST_ARRAY[ITM_ARGUMENT]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ 143
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_struct {
  __INTEGER upper__ET2D;
  __INTEGER capacity__JY2D;
  void **storage__FZ2D;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)

// FAST_ARRAY[FAST_ARRAY[ITM_ARGUMENT]]
#define __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ 144
typedef struct FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_struct __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo;
struct FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__Y0PD;
};
__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
#define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)

// ALIAS_ARRAY[ITM_ARGUMENT]
#define __ALIAS_ARRAYoITM_ARGUMENTo__ 145
typedef struct ALIAS_ARRAYoITM_ARGUMENTo_struct __ALIAS_ARRAYoITM_ARGUMENTo;
struct ALIAS_ARRAYoITM_ARGUMENTo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoITM_ARGUMENTo ALIAS_ARRAYoITM_ARGUMENTo_;
#define ALIAS_ARRAYoITM_ARGUMENTo__ (&ALIAS_ARRAYoITM_ARGUMENTo_)

// ARRAYED_COLLECTION[FAST_ARRAY[TYPE_FULL]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo__ 146
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo_struct {
  __INTEGER upper__MKNC;
  __INTEGER capacity__WZNC;
  void **storage__R0NC;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo_)

// FAST_ARRAY[FAST_ARRAY[TYPE_FULL]]
#define __FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo__ 147
typedef struct FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo_struct __FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo;
struct FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo parent_arrayed_collection__ABNB;
};
__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo_;
#define FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo__ (&FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo_)

// ALIAS_ARRAY[TYPE_FULL]
#define __ALIAS_ARRAYoTYPE_FULLo__ 148
typedef struct ALIAS_ARRAYoTYPE_FULLo_struct __ALIAS_ARRAYoTYPE_FULLo;
struct ALIAS_ARRAYoTYPE_FULLo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoTYPE_FULLo ALIAS_ARRAYoTYPE_FULLo_;
#define ALIAS_ARRAYoTYPE_FULLo__ (&ALIAS_ARRAYoTYPE_FULLo_)

// HASHED_DICTIONARY_NODE[TYPE_GENERIC,STRING_CONSTANT]
#define __HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__ 149
typedef struct HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo;
struct HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo_struct {
  void *key__LONC;
  void *item__4ONC;
  void *next__WONC;
};
__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo_;
#define HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo_)

// HASHED_DICTIONARY[TYPE_GENERIC,STRING_CONSTANT]
#define __HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__ 150
typedef struct HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo;
struct HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo_struct {
  __INTEGER capacity__0NNC;
  __INTEGER count__EJOC;
  void **buckets__5NNC;
};
__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo_;
#define HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo_)

// ARRAYED_COLLECTION[TYPES_TMP]
#define __ARRAYED_COLLECTIONoTYPES_TMPo__ 151
typedef struct ARRAYED_COLLECTIONoTYPES_TMPo_struct __ARRAYED_COLLECTIONoTYPES_TMPo;
struct ARRAYED_COLLECTIONoTYPES_TMPo_struct {
  __INTEGER upper__MY4G;
  __INTEGER capacity__H44G;
  void **storage__S44G;
};
__ARRAYED_COLLECTIONoTYPES_TMPo ARRAYED_COLLECTIONoTYPES_TMPo_;
#define ARRAYED_COLLECTIONoTYPES_TMPo__ (&ARRAYED_COLLECTIONoTYPES_TMPo_)

// FAST_ARRAY[TYPES_TMP]
#define __FAST_ARRAYoTYPES_TMPo__ 152
typedef struct FAST_ARRAYoTYPES_TMPo_struct __FAST_ARRAYoTYPES_TMPo;
struct FAST_ARRAYoTYPES_TMPo_struct {
  __ARRAYED_COLLECTIONoTYPES_TMPo parent_arrayed_collection__5WSG;
};
__FAST_ARRAYoTYPES_TMPo FAST_ARRAYoTYPES_TMPo_;
#define FAST_ARRAYoTYPES_TMPo__ (&FAST_ARRAYoTYPES_TMPo_)

// ARRAYED_COLLECTION[PUT_TO]
#define __ARRAYED_COLLECTIONoPUT_TOo__ 153
typedef struct ARRAYED_COLLECTIONoPUT_TOo_struct __ARRAYED_COLLECTIONoPUT_TOo;
struct ARRAYED_COLLECTIONoPUT_TOo_struct {
  __INTEGER upper__01YM;
  __INTEGER capacity__VSFN;
  void **storage__RTFN;
};
__ARRAYED_COLLECTIONoPUT_TOo ARRAYED_COLLECTIONoPUT_TOo_;
#define ARRAYED_COLLECTIONoPUT_TOo__ (&ARRAYED_COLLECTIONoPUT_TOo_)

// FAST_ARRAY[PUT_TO]
#define __FAST_ARRAYoPUT_TOo__ 154
typedef struct FAST_ARRAYoPUT_TOo_struct __FAST_ARRAYoPUT_TOo;
struct FAST_ARRAYoPUT_TOo_struct {
  __ARRAYED_COLLECTIONoPUT_TOo parent_arrayed_collection__E1YM;
};
__FAST_ARRAYoPUT_TOo FAST_ARRAYoPUT_TOo_;
#define FAST_ARRAYoPUT_TOo__ (&FAST_ARRAYoPUT_TOo_)

// ARRAYED_COLLECTION[PROFIL]
#define __ARRAYED_COLLECTIONoPROFILo__ 155
typedef struct ARRAYED_COLLECTIONoPROFILo_struct __ARRAYED_COLLECTIONoPROFILo;
struct ARRAYED_COLLECTIONoPROFILo_struct {
  __INTEGER upper__KNB;
  __INTEGER capacity__E1L;
  void **storage__P1L;
};
__ARRAYED_COLLECTIONoPROFILo ARRAYED_COLLECTIONoPROFILo_;
#define ARRAYED_COLLECTIONoPROFILo__ (&ARRAYED_COLLECTIONoPROFILo_)

// FAST_ARRAY[PROFIL]
#define __FAST_ARRAYoPROFILo__ 156
typedef struct FAST_ARRAYoPROFILo_struct __FAST_ARRAYoPROFILo;
struct FAST_ARRAYoPROFILo_struct {
  __ARRAYED_COLLECTIONoPROFILo parent_arrayed_collection__DNB;
};
__FAST_ARRAYoPROFILo FAST_ARRAYoPROFILo_;
#define FAST_ARRAYoPROFILo__ (&FAST_ARRAYoPROFILo_)

// PROFIL_LIST
#define __PROFIL_LIST__ 157
typedef struct PROFIL_LIST_struct __PROFIL_LIST;
struct PROFIL_LIST_struct {
  void *Nothing;
};
__PROFIL_LIST PROFIL_LIST_;
#define PROFIL_LIST__ (&PROFIL_LIST_)

// ARRAYED_COLLECTION[FAST_ARRAY[EXPR]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo__ 158
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo_struct {
  __INTEGER upper__FXDI;
  __INTEGER capacity__CZDI;
  void **storage__4ZDI;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo_)

// FAST_ARRAY[FAST_ARRAY[EXPR]]
#define __FAST_ARRAYoFAST_ARRAYoEXPRoo__ 159
typedef struct FAST_ARRAYoFAST_ARRAYoEXPRoo_struct __FAST_ARRAYoFAST_ARRAYoEXPRoo;
struct FAST_ARRAYoFAST_ARRAYoEXPRoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo parent_arrayed_collection__H1LH;
};
__FAST_ARRAYoFAST_ARRAYoEXPRoo FAST_ARRAYoFAST_ARRAYoEXPRoo_;
#define FAST_ARRAYoFAST_ARRAYoEXPRoo__ (&FAST_ARRAYoFAST_ARRAYoEXPRoo_)

// ALIAS_ARRAY[EXPR]
#define __ALIAS_ARRAYoEXPRo__ 160
typedef struct ALIAS_ARRAYoEXPRo_struct __ALIAS_ARRAYoEXPRo;
struct ALIAS_ARRAYoEXPRo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoEXPRo ALIAS_ARRAYoEXPRo_;
#define ALIAS_ARRAYoEXPRo__ (&ALIAS_ARRAYoEXPRo_)

// LOCAL_SEQ
#define __LOCAL_SEQ__ 161
typedef struct LOCAL_SEQ_struct __LOCAL_SEQ;
struct LOCAL_SEQ_struct {
  void *last_write__G1IL;
  void *last_list_current__T1IL;
  __UINTEGER_32 last_seq_call_local_and_loop__31IL;
  __UINTEGER_32 last_seq_index__43IL;
  __UINTEGER_32 last_seq_call_and_loop__LAJL;
  __UINTEGER_32 last_seq_or_and__1BJL;
  __INTEGER last_index__MDUL;
};
__LOCAL_SEQ LOCAL_SEQ_;
#define LOCAL_SEQ__ (&LOCAL_SEQ_)

// ARRAYED_COLLECTION[FAST_ARRAY[SLOT]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo__ 162
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo_struct {
  __INTEGER upper__XXDI;
  __INTEGER capacity__11DI;
  void **storage__X2DI;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo_)

// FAST_ARRAY[FAST_ARRAY[SLOT]]
#define __FAST_ARRAYoFAST_ARRAYoSLOToo__ 163
typedef struct FAST_ARRAYoFAST_ARRAYoSLOToo_struct __FAST_ARRAYoFAST_ARRAYoSLOToo;
struct FAST_ARRAYoFAST_ARRAYoSLOToo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo parent_arrayed_collection__C2LH;
};
__FAST_ARRAYoFAST_ARRAYoSLOToo FAST_ARRAYoFAST_ARRAYoSLOToo_;
#define FAST_ARRAYoFAST_ARRAYoSLOToo__ (&FAST_ARRAYoFAST_ARRAYoSLOToo_)

// ALIAS_ARRAY[SLOT]
#define __ALIAS_ARRAYoSLOTo__ 164
typedef struct ALIAS_ARRAYoSLOTo_struct __ALIAS_ARRAYoSLOTo;
struct ALIAS_ARRAYoSLOTo_struct {
  void *Nothing;
};
__ALIAS_ARRAYoSLOTo ALIAS_ARRAYoSLOTo_;
#define ALIAS_ARRAYoSLOTo__ (&ALIAS_ARRAYoSLOTo_)

// OUTPUT_STREAM
#define __OUTPUT_STREAM__ 165
typedef struct OUTPUT_STREAM_struct __OUTPUT_STREAM;
struct OUTPUT_STREAM_struct {
  void *Nothing;
};
__OUTPUT_STREAM OUTPUT_STREAM_;
#define OUTPUT_STREAM__ (&OUTPUT_STREAM_)

// ARRAYED_COLLECTION[LIST]
#define __ARRAYED_COLLECTIONoLISTo__ 166
typedef struct ARRAYED_COLLECTIONoLISTo_struct __ARRAYED_COLLECTIONoLISTo;
struct ARRAYED_COLLECTIONoLISTo_struct {
  __INTEGER upper__SU4G;
  __INTEGER capacity__UU4G;
  void **storage__QV4G;
};
__ARRAYED_COLLECTIONoLISTo ARRAYED_COLLECTIONoLISTo_;
#define ARRAYED_COLLECTIONoLISTo__ (&ARRAYED_COLLECTIONoLISTo_)

// FAST_ARRAY[LIST]
#define __FAST_ARRAYoLISTo__ 167
typedef struct FAST_ARRAYoLISTo_struct __FAST_ARRAYoLISTo;
struct FAST_ARRAYoLISTo_struct {
  __ARRAYED_COLLECTIONoLISTo parent_arrayed_collection__CXRG;
};
__FAST_ARRAYoLISTo FAST_ARRAYoLISTo_;
#define FAST_ARRAYoLISTo__ (&FAST_ARRAYoLISTo_)

// ARRAYED_COLLECTION[LOCAL_SEQ]
#define __ARRAYED_COLLECTIONoLOCAL_SEQo__ 168
typedef struct ARRAYED_COLLECTIONoLOCAL_SEQo_struct __ARRAYED_COLLECTIONoLOCAL_SEQo;
struct ARRAYED_COLLECTIONoLOCAL_SEQo_struct {
  __INTEGER upper__FAJK;
  __INTEGER capacity__HAJK;
  void **storage__DBJK;
};
__ARRAYED_COLLECTIONoLOCAL_SEQo ARRAYED_COLLECTIONoLOCAL_SEQo_;
#define ARRAYED_COLLECTIONoLOCAL_SEQo__ (&ARRAYED_COLLECTIONoLOCAL_SEQo_)

// FAST_ARRAY[LOCAL_SEQ]
#define __FAST_ARRAYoLOCAL_SEQo__ 169
typedef struct FAST_ARRAYoLOCAL_SEQo_struct __FAST_ARRAYoLOCAL_SEQo;
struct FAST_ARRAYoLOCAL_SEQo_struct {
  __ARRAYED_COLLECTIONoLOCAL_SEQo parent_arrayed_collection__IRJJ;
};
__FAST_ARRAYoLOCAL_SEQo FAST_ARRAYoLOCAL_SEQo_;
#define FAST_ARRAYoLOCAL_SEQo__ (&FAST_ARRAYoLOCAL_SEQo_)

// ARRAYED_COLLECTION[FAST_ARRAY[LOCAL]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo__ 170
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo_struct {
  __INTEGER capacity__OT4G;
  __INTEGER upper__0T4G;
  void **storage__3K4G;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo_)

// FAST_ARRAY[FAST_ARRAY[LOCAL]]
#define __FAST_ARRAYoFAST_ARRAYoLOCALoo__ 171
typedef struct FAST_ARRAYoFAST_ARRAYoLOCALoo_struct __FAST_ARRAYoFAST_ARRAYoLOCALoo;
struct FAST_ARRAYoFAST_ARRAYoLOCALoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo parent_arrayed_collection__ZSOG;
};
__FAST_ARRAYoFAST_ARRAYoLOCALoo FAST_ARRAYoFAST_ARRAYoLOCALoo_;
#define FAST_ARRAYoFAST_ARRAYoLOCALoo__ (&FAST_ARRAYoFAST_ARRAYoLOCALoo_)

// ARRAYED_COLLECTION[FAST_ARRAY[SLOT_DATA]]
#define __ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo__ 172
typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo;
struct ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo_struct {
  __INTEGER capacity__ZCJJ;
  __INTEGER upper__FDJJ;
  void **storage__5ZIJ;
};
__ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo_;
#define ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo_)

// FAST_ARRAY[FAST_ARRAY[SLOT_DATA]]
#define __FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo__ 173
typedef struct FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo_struct __FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo;
struct FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo_struct {
  __ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo parent_arrayed_collection__3H3G;
};
__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo_;
#define FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo__ (&FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo_)

// UINTEGER_64
typedef unsigned long long __UINTEGER_64;

// BLOCK
#define __BLOCK__ 102
typedef struct BLOCK_struct __BLOCK;
struct BLOCK_struct {
  unsigned long __id;
  void *self;
};
__BLOCK BLOCK_={__BLOCK__};
#define BLOCK__ (&BLOCK_)

// NOP
#define __NOP__ 103
typedef struct NOP_struct __NOP;
struct NOP_struct {
  unsigned long __id;
};
__NOP NOP_={__NOP__};
#define NOP__ (&NOP_)


void *table_type[174];

//==========================//
// GLOBAL                   //
//==========================//

void *parent_numeric__J;
__INTEGER type_error__4AH;
void *msg_err__5AH;
__BOOLEAN verify__JDAG;
void *context_extern__1OLH;
__INTEGER level_pass__QYUC;
__BOOLEAN is_alias__4WAH;
void *list_alias__ZLZN;
__INTEGER id_counter_without_type__2E;
void *genere_list__VOB;
__INTEGER index_count__JJC;
void *dico_type__RJC;
void *slot_size__4H3G;
__INTEGER id_counter_with_type__4K3G;
void *last_type_contract__VORL;
void *prototype_list__GQB;
void *prototype_dico__XHM;
void *last_cast_name__L42H;
void *list_id__YKC;
void *dico__ILC;
void *type_void__NHEC;
void *dico__BMC;
void *dico__IQC;
void *dicog_type__4DNB;
void *node_list__PMQC;
void *node_list_base__WZJH;
void *stack_type__5MAG;
__UINTEGER_32 old_seq_or_and__CYRG;
__BOOLEAN mode_recursive__WYUC;
__POINTER begin_memory__4PI;
__UINTEGER_32 nb_page__OQJ;
__UINTEGER_32 capacity_max__GJU;
__MEMORY *first_free__04AB;
void *list__4SLC;
void *string_tmp__2KEF;
__INTEGER top__3GQC;
void *stack__GHQC;
void *source_line__ZRB;
__INTEGER count_context_sensitive__VSEJ;
__INTEGER count_no_recursive__GBCL;
__INTEGER size__JDJK;
void *free_list__AXSG;
void *bucket__V4EJ;
__BOOLEAN switch_new_pass__IAMC;
__INTEGER output_count__AG;
void *output__HG;
__INTEGER is_storage__KGEK__LGEK;
void *object__ODD;
void *variable__OED;
void *source__WFD;
__INTEGER position__ZFD;
__INTEGER pos_cur__2FD;
__INTEGER pos_line__3FD;
__INTEGER pos_col__4FD;
__BOOLEAN is_found__LGD;
__BOOLEAN is_good_section__OCE;
__INTEGER begin_position__SOF;
void *last_string__V1G;
__INTEGER last_len_string__VLIB;
void *last_section__D5BC;
void *last_group__KFEC;
__INTEGER old_position__TMFC;
__INTEGER old_pos_cur__VMFC;
__INTEGER old_pos_line__XMFC;
__INTEGER old_pos_col__ZMFC;
void *last_real__50IC;
__INTEGER_64 last_integer__R1IC;
void *last_slot__UIJD;
void *bucket_name__MEJD;
void *bucket_list__HGJD;
void *last_expr__K3IH;
void *stack_local_empty__NYJH;
void *last_code__41JH;
void *run_value__FMQC;
void *self_up__LKEF;
__UINTEGER_32 clone_allocation_size__S0C;
void *tmp_name__MK;
void *list__TK;
void *operator_equal__0V;
void *operator_not_equal__5V;
void *free__DBLC;
__INTEGER count_variable__GNBG;
void *string_tmp__RB;
void *path_directory__EC;
void *output_decl__1C;
__INTEGER debug_level_option__3C;
void *type_input__LD;
void *output_glob__VD;
void *output_code__XD;
void *list_main__WE;
__BOOLEAN is_quiet_operation__UG;
__BOOLEAN is_statistic__0H;
__INTEGER late_binding_counter__DI;
__INTEGER polymorphic_counter__FI;
__BOOLEAN is_optimization__II;
__INTEGER count_invariant__PI;
void *command_list__VI;
__INTEGER verbose_level__FX;
__INTEGER inline_level__20;
__BOOLEAN debug_with_code__R1;
__BOOLEAN is_warning__OBB;
__BOOLEAN is_all_warning__2BB;
void *string_tmp2__ADB;
void *type_true__FJB;
void *type_false__NJB;
void *type_boolean__VJB;
void *type_integer__3JB;
void *type_real__FKB;
void *type_string_constant__TKB;
void *type_character__1KB;
void *type_block__BLB;
void *type_pointer__HLB;
void *list_current__IF1;
__POSITION last_position__GG1;
void *context_main__D2LC;
__INTEGER pass_count__Z3LC;
__INTEGER modify_count__F4LC;
__BOOLEAN is_executing_pass__Q5LC;
void *profil_second__3PQC;
void *profil_first__4PQC;
__INTEGER stack_local_lower__AI4F;
__INTEGER stack_result_lower__DI4F;
void *stack_local__RI4F;
void *stack_result__WI4F;
void *indent__ZQOG;
void *var_size__0SOG;
void *seq_list__DXRG;
__UINTEGER_32 seq_inline__FXRG;
__UINTEGER_32 seq_or_and__AYRG;
__INTEGER object_counter__RAZG__SAZG;
__UINTEGER_32 seq_call_and_loop__VREJ;
__UINTEGER_32 seq_index__SIGK;
void *loop_invariant__RKAL;
void *loop_list__ILAL;
__UINTEGER_32 seq_call_local_and_loop__51IL;
__INTEGER loop_seq_call_and_loop__4J2L;
__INTEGER loop_seq_index__IK2L;
__INTEGER loop_seq_call_local_and_loop__Q3DM;
void *input_name__UB;
void *output_name_exe__ZB;
void *target__3B;
void *output_name_c__BF;
void *string_tmp__4TB;
void *free_list__SOC;
void *bucket__NPC;
void *dico_string__OD0D;
void *free_list__FNFC;
void *free_list__TFFC;
void *free_list__K2GC;
void *bucket__DYGD;
void *free_list__EYZC;
void *dico__CZVD;
void *free_list__Z0PD;
void *free_list__BBNB;
void *bucket__MCNB;
void *profil_list__ENB;
__INTEGER life_limit__2PQC;
__BOOLEAN reduce_profil__BQQC;
__INTEGER current__X30C;
__INTEGER inline_level_current__I40C;
void *free_list__I1LH;
void *list_busy__WQJJ;
void *list_free__JRJJ;
void *free_list__D2LH;
void *tmp_string__PSD;

//==========================//
// STRING CONSTANT          //
//==========================//

__STRING_CONSTANT __string_1={__STRING_CONSTANT__,4,"SELF"};
__STRING_CONSTANT __string_2={__STRING_CONSTANT__,4,"VOID"};
__STRING_CONSTANT __string_3={__STRING_CONSTANT__,3,"\n//"};
__STRING_CONSTANT __string_4={__STRING_CONSTANT__,6,"//\n// "};
__STRING_CONSTANT __string_5={__STRING_CONSTANT__,15,"STRING CONSTANT"};
__STRING_CONSTANT __string_6={__STRING_CONSTANT__,6," //\n//"};
__STRING_CONSTANT __string_7={__STRING_CONSTANT__,4,"//\n\n"};
__STRING_CONSTANT __string_8={__STRING_CONSTANT__,7,"Section"};
__STRING_CONSTANT __string_9={__STRING_CONSTANT__,5,"Right"};
__STRING_CONSTANT __string_10={__STRING_CONSTANT__,4,"Left"};
__STRING_CONSTANT __string_11={__STRING_CONSTANT__,3,"..."};
__STRING_CONSTANT __string_12={__STRING_CONSTANT__,3,"Old"};
__STRING_CONSTANT __string_13={__STRING_CONSTANT__,8,"Expanded"};
__STRING_CONSTANT __string_14={__STRING_CONSTANT__,6,"Strict"};
__STRING_CONSTANT __string_15={__STRING_CONSTANT__,6,"Result"};
__STRING_CONSTANT __string_16={__STRING_CONSTANT__,2,":="};
__STRING_CONSTANT __string_17={__STRING_CONSTANT__,2,"?="};
__STRING_CONSTANT __string_18={__STRING_CONSTANT__,2,"<-"};
__STRING_CONSTANT __string_19={__STRING_CONSTANT__,2,"->"};
__STRING_CONSTANT __string_20={__STRING_CONSTANT__,1,"="};
__STRING_CONSTANT __string_21={__STRING_CONSTANT__,2,"!="};
__STRING_CONSTANT __string_22={__STRING_CONSTANT__,6,"Header"};
__STRING_CONSTANT __string_23={__STRING_CONSTANT__,7,"Inherit"};
__STRING_CONSTANT __string_24={__STRING_CONSTANT__,6,"Insert"};
__STRING_CONSTANT __string_25={__STRING_CONSTANT__,9,"Interrupt"};
__STRING_CONSTANT __string_26={__STRING_CONSTANT__,7,"Private"};
__STRING_CONSTANT __string_27={__STRING_CONSTANT__,6,"Public"};
__STRING_CONSTANT __string_28={__STRING_CONSTANT__,7,"Mapping"};
__STRING_CONSTANT __string_29={__STRING_CONSTANT__,9,"Directory"};
__STRING_CONSTANT __string_30={__STRING_CONSTANT__,8,"External"};
__STRING_CONSTANT __string_31={__STRING_CONSTANT__,7,"DEFAULT"};
__STRING_CONSTANT __string_32={__STRING_CONSTANT__,6,"Common"};
__STRING_CONSTANT __string_33={__STRING_CONSTANT__,7,"INTEGER"};
__STRING_CONSTANT __string_34={__STRING_CONSTANT__,4,"REAL"};
__STRING_CONSTANT __string_35={__STRING_CONSTANT__,9,"CHARACTER"};
__STRING_CONSTANT __string_36={__STRING_CONSTANT__,15,"STRING_CONSTANT"};
__STRING_CONSTANT __string_37={__STRING_CONSTANT__,12,"NATIVE_ARRAY"};
__STRING_CONSTANT __string_38={__STRING_CONSTANT__,21,"NATIVE_ARRAY_VOLATILE"};
__STRING_CONSTANT __string_39={__STRING_CONSTANT__,5,"BLOCK"};
__STRING_CONSTANT __string_40={__STRING_CONSTANT__,7,"BOOLEAN"};
__STRING_CONSTANT __string_41={__STRING_CONSTANT__,4,"TRUE"};
__STRING_CONSTANT __string_42={__STRING_CONSTANT__,5,"FALSE"};
__STRING_CONSTANT __string_43={__STRING_CONSTANT__,7,"POINTER"};
__STRING_CONSTANT __string_44={__STRING_CONSTANT__,10,"___CONTEXT"};
__STRING_CONSTANT __string_45={__STRING_CONSTANT__,10,"___GENERIC"};
__STRING_CONSTANT __string_46={__STRING_CONSTANT__,10,"___TYPE_ID"};
__STRING_CONSTANT __string_47={__STRING_CONSTANT__,11,"UINTEGER_64"};
__STRING_CONSTANT __string_48={__STRING_CONSTANT__,11,"UINTEGER_32"};
__STRING_CONSTANT __string_49={__STRING_CONSTANT__,11,"UINTEGER_16"};
__STRING_CONSTANT __string_50={__STRING_CONSTANT__,10,"UINTEGER_8"};
__STRING_CONSTANT __string_51={__STRING_CONSTANT__,10,"INTEGER_64"};
__STRING_CONSTANT __string_52={__STRING_CONSTANT__,10,"INTEGER_32"};
__STRING_CONSTANT __string_53={__STRING_CONSTANT__,10,"INTEGER_16"};
__STRING_CONSTANT __string_54={__STRING_CONSTANT__,9,"INTEGER_8"};
__STRING_CONSTANT __string_55={__STRING_CONSTANT__,23,"NATIVE_ARRAY__CHARACT\
ER"};
__STRING_CONSTANT __string_56={__STRING_CONSTANT__,37,"NATIVE_ARRAY__NATIVE_\
ARRAY__CHARACTER"};
__STRING_CONSTANT __string_57={__STRING_CONSTANT__,4,"Self"};
__STRING_CONSTANT __string_58={__STRING_CONSTANT__,5,"__pos"};
__STRING_CONSTANT __string_59={__STRING_CONSTANT__,4,"NULL"};
__STRING_CONSTANT __string_60={__STRING_CONSTANT__,5,"__tmp"};
__STRING_CONSTANT __string_61={__STRING_CONSTANT__,6,"lisaac"};
__STRING_CONSTANT __string_62={__STRING_CONSTANT__,10,"input_file"};
__STRING_CONSTANT __string_63={__STRING_CONSTANT__,11,"output_file"};
__STRING_CONSTANT __string_64={__STRING_CONSTANT__,6,"target"};
__STRING_CONSTANT __string_65={__STRING_CONSTANT__,4,"name"};
__STRING_CONSTANT __string_66={__STRING_CONSTANT__,6,"export"};
__STRING_CONSTANT __string_67={__STRING_CONSTANT__,6,"import"};
__STRING_CONSTANT __string_68={__STRING_CONSTANT__,8,"external"};
__STRING_CONSTANT __string_69={__STRING_CONSTANT__,7,"default"};
__STRING_CONSTANT __string_70={__STRING_CONSTANT__,4,"type"};
__STRING_CONSTANT __string_71={__STRING_CONSTANT__,7,"version"};
__STRING_CONSTANT __string_72={__STRING_CONSTANT__,4,"date"};
__STRING_CONSTANT __string_73={__STRING_CONSTANT__,7,"comment"};
__STRING_CONSTANT __string_74={__STRING_CONSTANT__,6,"author"};
__STRING_CONSTANT __string_75={__STRING_CONSTANT__,12,"bibliography"};
__STRING_CONSTANT __string_76={__STRING_CONSTANT__,8,"language"};
__STRING_CONSTANT __string_77={__STRING_CONSTANT__,9,"copyright"};
__STRING_CONSTANT __string_78={__STRING_CONSTANT__,10,"bug_report"};
__STRING_CONSTANT __string_79={__STRING_CONSTANT__,5,"value"};
__STRING_CONSTANT __string_80={__STRING_CONSTANT__,4,"self"};
__STRING_CONSTANT __string_81={__STRING_CONSTANT__,4,"__id"};
__STRING_CONSTANT __string_82={__STRING_CONSTANT__,5,"clone"};
__STRING_CONSTANT __string_83={__STRING_CONSTANT__,4,"main"};
__STRING_CONSTANT __string_84={__STRING_CONSTANT__,7,"__infix"};
__STRING_CONSTANT __string_85={__STRING_CONSTANT__,8,"__prefix"};
__STRING_CONSTANT __string_86={__STRING_CONSTANT__,3,"to_"};
__STRING_CONSTANT __string_87={__STRING_CONSTANT__,5,"from_"};
__STRING_CONSTANT __string_88={__STRING_CONSTANT__,7,"storage"};
__STRING_CONSTANT __string_89={__STRING_CONSTANT__,4,"void"};
__STRING_CONSTANT __string_90={__STRING_CONSTANT__,9,"struct __"};
__STRING_CONSTANT __string_91={__STRING_CONSTANT__,13,"/* NOTHING */"};
__STRING_CONSTANT __string_92={__STRING_CONSTANT__,2,"__"};
__STRING_CONSTANT __string_93={__STRING_CONSTANT__,22,"__PATH_LISAAC_SYSTEM__"};
__STRING_CONSTANT __string_94={__STRING_CONSTANT__,23,"__SHORT_LISAAC_FORMAT\
__"};
__STRING_CONSTANT __string_95={__STRING_CONSTANT__,5,"token"};
__STRING_CONSTANT __string_96={__STRING_CONSTANT__,9,"type_file"};
__STRING_CONSTANT __string_97={__STRING_CONSTANT__,5,"begin"};
__STRING_CONSTANT __string_98={__STRING_CONSTANT__,3,"end"};
__STRING_CONSTANT __string_99={__STRING_CONSTANT__,7,"keyword"};
__STRING_CONSTANT __string_100={__STRING_CONSTANT__,15,"keyword_section"};
__STRING_CONSTANT __string_101={__STRING_CONSTANT__,7,"integer"};
__STRING_CONSTANT __string_102={__STRING_CONSTANT__,9,"character"};
__STRING_CONSTANT __string_103={__STRING_CONSTANT__,6,"string"};
__STRING_CONSTANT __string_104={__STRING_CONSTANT__,8,"operator"};
__STRING_CONSTANT __string_105={__STRING_CONSTANT__,9,"prototype"};
__STRING_CONSTANT __string_106={__STRING_CONSTANT__,12,"keyprototype"};
__STRING_CONSTANT __string_107={__STRING_CONSTANT__,12,"comment_line"};
__STRING_CONSTANT __string_108={__STRING_CONSTANT__,17,"comment_slot_line"};
__STRING_CONSTANT __string_109={__STRING_CONSTANT__,19,"comment_header_line"};
__STRING_CONSTANT __string_110={__STRING_CONSTANT__,4,"slot"};
__STRING_CONSTANT __string_111={__STRING_CONSTANT__,9,"slot_call"};
__STRING_CONSTANT __string_112={__STRING_CONSTANT__,10,"slot_style"};
__STRING_CONSTANT __string_113={__STRING_CONSTANT__,5,"block"};
__STRING_CONSTANT __string_114={__STRING_CONSTANT__,5,"index"};
__STRING_CONSTANT __string_115={__STRING_CONSTANT__,20,"directory_list_begin"};
__STRING_CONSTANT __string_116={__STRING_CONSTANT__,19,"directory_list_item"};
__STRING_CONSTANT __string_117={__STRING_CONSTANT__,18,"directory_list_end"};
__STRING_CONSTANT __string_118={__STRING_CONSTANT__,15,"file_list_begin"};
__STRING_CONSTANT __string_119={__STRING_CONSTANT__,14,"file_list_item"};
__STRING_CONSTANT __string_120={__STRING_CONSTANT__,13,"file_list_end"};
__STRING_CONSTANT __string_121={__STRING_CONSTANT__,2080,"------------------\
----------------------------------------------\n--            Lisaac IS An A\
dvanced Compiler V 0.13.1         --\n--            LORIA - LSIIT - ULP - CN\
RS - FRANCE             --\n--         Benoit SONNTAG - sonntag@icps.u-stras\
bg.fr         --\n--                   http://www.IsaacOS.com               \
    --\n----------------------------------------------------------------\nUs\
age:                                                          \n  lisaac <in\
put_file[.li]> [Options]                            \n                      \
                                          \nOptions:                        \
                                \n  -o <output_file>    : output file (defau\
lt:`input_file.c').   \n  -t <machine>        : target code (see path.li).  \
            \n  -s                  : statistic information.                \
  \n  -[d|D]([+|-]|[1-20]): debug mode (default: `debug_level' = 0) \n      \
                  `d'   : Without source code.            \n                \
        `D'   : With source code.               \n                        [d\
|D]-: `debug_level' = 5               \n                                (Req\
uire library only)          \n                        [d|D] : `debug_level' \
= 10              \n                                (Append user assertion) \
        \n                        [d|D]+: `debug_level' = 15              \n\
                                (Append Ensure library)         \n          \
              [d|D]n: `debug_level' = n (with 0<n<21) \n  -w                \
  : warning error stop compiler.            \n  -W                  : all wa\
rning (deferred detect, ...)      \n  -O                  : full optimizatio\
n.                      \n  -i[1-5000]          : inlining level (default : \
15)           \n  -q                  : quiet operation.                    \
    \n                                                                \nBug \
report:                                                     \n            po\
st in : https://gna.org/bugs/?group=isaac         \n            mail to : so\
nntag@icps.u-strasbg.fr                 \n"};
__STRING_CONSTANT __string_122={__STRING_CONSTANT__,24,"Incorrect inline lev\
el.\n"};
__STRING_CONSTANT __string_123={__STRING_CONSTANT__,2,"./"};
__STRING_CONSTANT __string_124={__STRING_CONSTANT__,57,"Warning: `-O' option\
 is not activated with a debug mode.\n"};
__STRING_CONSTANT __string_125={__STRING_CONSTANT__,2,".c"};
__STRING_CONSTANT __string_126={__STRING_CONSTANT__,7,"path.li"};
__STRING_CONSTANT __string_127={__STRING_CONSTANT__,6,"File `"};
__STRING_CONSTANT __string_128={__STRING_CONSTANT__,13,"' not found!\n"};
__STRING_CONSTANT __string_129={__STRING_CONSTANT__,36,"Target section ident\
ifier is needed."};
__STRING_CONSTANT __string_130={__STRING_CONSTANT__,30,"Variable identifier \
incorrect."};
__STRING_CONSTANT __string_131={__STRING_CONSTANT__,26,"Assignment ':=' is n\
eeded."};
__STRING_CONSTANT __string_132={__STRING_CONSTANT__,17,"Target is needed."};
__STRING_CONSTANT __string_133={__STRING_CONSTANT__,26,"Incorrect path defin\
ition."};
__STRING_CONSTANT __string_134={__STRING_CONSTANT__,29,"Incorrect command de\
finition."};
__STRING_CONSTANT __string_135={__STRING_CONSTANT__,20,"Added ';' is needed."};
__STRING_CONSTANT __string_136={__STRING_CONSTANT__,17,"Incorrect symbol."};
__STRING_CONSTANT __string_137={__STRING_CONSTANT__,8,"Target `"};
__STRING_CONSTANT __string_138={__STRING_CONSTANT__,12,"' not found."};
__STRING_CONSTANT __string_139={__STRING_CONSTANT__,15,"\ninput  file : "};
__STRING_CONSTANT __string_140={__STRING_CONSTANT__,18,".li\noutput file : "};
__STRING_CONSTANT __string_141={__STRING_CONSTANT__,10,"\ntarget : "};
__STRING_CONSTANT __string_142={__STRING_CONSTANT__,18,"\npath directory :\n"};
__STRING_CONSTANT __string_143={__STRING_CONSTANT__,2,"  "};
__STRING_CONSTANT __string_144={__STRING_CONSTANT__,60,"// C code generated \
by Lisaac compiler (www.isaacOS.com) //\n"};
__STRING_CONSTANT __string_145={__STRING_CONSTANT__,20,"#include <signal.h>\n"};
__STRING_CONSTANT __string_146={__STRING_CONSTANT__,34,"int arg_count;\nchar\
 **arg_vector;\n"};
__STRING_CONSTANT __string_147={__STRING_CONSTANT__,8,"EXTERNAL"};
__STRING_CONSTANT __string_148={__STRING_CONSTANT__,73,"arg_count  = argc;\n\
  arg_vector = argv;\n  signal(SIGINT,interrupt_signal)"};
__STRING_CONSTANT __string_149={__STRING_CONSTANT__,38,"arg_count  = argc;\n\
  arg_vector = argv"};
__STRING_CONSTANT __string_150={__STRING_CONSTANT__,28,"Unix mode: Not value\
 return."};
__STRING_CONSTANT __string_151={__STRING_CONSTANT__,29,"Unix mode: Not argum\
ent list."};
__STRING_CONSTANT __string_152={__STRING_CONSTANT__,56,"Entry point not foun\
d (slot `main' in `Section Public')."};
__STRING_CONSTANT __string_153={__STRING_CONSTANT__,17,"Depending pass: ."};
__STRING_CONSTANT __string_154={__STRING_CONSTANT__,1,"."};
__STRING_CONSTANT __string_155={__STRING_CONSTANT__,2," ("};
__STRING_CONSTANT __string_156={__STRING_CONSTANT__,2,")\n"};
__STRING_CONSTANT __string_157={__STRING_CONSTANT__,16,"Executing pass: "};
__STRING_CONSTANT __string_158={__STRING_CONSTANT__,1,"*"};
__STRING_CONSTANT __string_159={__STRING_CONSTANT__,4,"TYPE"};
__STRING_CONSTANT __string_160={__STRING_CONSTANT__,60,"// Generic Object\ns\
truct ___OBJ {\n  unsigned long __id;\n};\n\n"};
__STRING_CONSTANT __string_161={__STRING_CONSTANT__,6,"GLOBAL"};
__STRING_CONSTANT __string_162={__STRING_CONSTANT__,15,"FUNCTION HEADER"};
__STRING_CONSTANT __string_163={__STRING_CONSTANT__,17,"// Debug Manager\n"};
__STRING_CONSTANT __string_164={__STRING_CONSTANT__,30,"void print_string(ch\
ar *str);\n"};
__STRING_CONSTANT __string_165={__STRING_CONSTANT__,32,"void interrupt_signa\
l(int sig);\n"};
__STRING_CONSTANT __string_166={__STRING_CONSTANT__,180,"void stack_print(__\
___CONTEXT *up);\nvoid push_first(_____CONTEXT *path,unsigned long code);\nv\
oid push(_____CONTEXT *path,unsigned long code);\nvoid print_integer(unsigne\
d short n);\n"};
__STRING_CONSTANT __string_167={__STRING_CONSTANT__,15,"// Source code\n"};
__STRING_CONSTANT __string_168={__STRING_CONSTANT__,11,"SOURCE CODE"};
__STRING_CONSTANT __string_169={__STRING_CONSTANT__,31,"int main(int argc,ch\
ar **argv)\n"};
__STRING_CONSTANT __string_170={__STRING_CONSTANT__,4,"\n// "};
__STRING_CONSTANT __string_171={__STRING_CONSTANT__,14,"No recursive, "};
__STRING_CONSTANT __string_172={__STRING_CONSTANT__,11,"Recursive, "};
__STRING_CONSTANT __string_173={__STRING_CONSTANT__,13,"No inlinable."};
__STRING_CONSTANT __string_174={__STRING_CONSTANT__,10,"Inlinable."};
__STRING_CONSTANT __string_175={__STRING_CONSTANT__,54,"// NULL\n#ifndef NUL\
L\n#define NULL ((void *)0)\n#endif\n\n"};
__STRING_CONSTANT __string_176={__STRING_CONSTANT__,167,"// ___CONTEXT\ntype\
def struct ___CONTEXT_struct _____CONTEXT; \nstruct ___CONTEXT_struct {\n  u\
nsigned long code; \n  _____CONTEXT *back; \n};\n_____CONTEXT *top_context; \
\n\n"};
__STRING_CONSTANT __string_177={__STRING_CONSTANT__,18,"\nvoid *table_type["};
__STRING_CONSTANT __string_178={__STRING_CONSTANT__,3,"];\n"};
__STRING_CONSTANT __string_179={__STRING_CONSTANT__,13,"DEBUG MANAGER"};
__STRING_CONSTANT __string_180={__STRING_CONSTANT__,98,"void print_string(ch\
ar *str) \n{ \n  while (*str!=0) {\n    print_char(*str); \n    str++; \n  }\
;\n}  \n\n"};
__STRING_CONSTANT __string_181={__STRING_CONSTANT__,12,"char *trace["};
__STRING_CONSTANT __string_182={__STRING_CONSTANT__,4,"]={\n"};
__STRING_CONSTANT __string_183={__STRING_CONSTANT__,3,"  \""};
__STRING_CONSTANT __string_184={__STRING_CONSTANT__,4,")\",\n"};
__STRING_CONSTANT __string_185={__STRING_CONSTANT__,7,")\"\n};\n\n"};
__STRING_CONSTANT __string_186={__STRING_CONSTANT__,94,"\n//================\
==========//\n// SOURCE LINE REFERENCE    //\n//==========================//\
\n"};
__STRING_CONSTANT __string_187={__STRING_CONSTANT__,60,"struct __source {\n \
 unsigned int pos;\n  char *line;\n} __src["};
__STRING_CONSTANT __string_188={__STRING_CONSTANT__,9,"#define L"};
__STRING_CONSTANT __string_189={__STRING_CONSTANT__,3,"  {"};
__STRING_CONSTANT __string_190={__STRING_CONSTANT__,2,",\""};
__STRING_CONSTANT __string_191={__STRING_CONSTANT__,4,"\"},\n"};
__STRING_CONSTANT __string_192={__STRING_CONSTANT__,4,"};\n\n"};
__STRING_CONSTANT __string_193={__STRING_CONSTANT__,244,"// Unix Signal mana\
ger:\nvoid interrupt_signal(int sig)  \n{                               \n  \
stack_print(top_context);     \n  print_string(\"User interrupt.\\n\"); \n  \
die_with_code(1);                     \n}                                   \
    \n\n"};
__STRING_CONSTANT __string_194={__STRING_CONSTANT__,58,"void push_first(____\
_CONTEXT *path,unsigned long code)\n{ \n"};
__STRING_CONSTANT __string_195={__STRING_CONSTANT__,303,"  _____CONTEXT *cur\
,loop;\n  cur = top_context; \n  while ((cur != (void *)0) && (cur != path))\
 cur = cur->back; \n  if (cur == path) {\n    loop.back = top_context;\n    \
loop.code = code; \n    stack_print(&loop);\n    print_string(\"COMPILER : D\
ebug context looping detected !\\n\");\n    die_with_code(1);\n  };\n"};
__STRING_CONSTANT __string_196={__STRING_CONSTANT__,732,"  path->back  = top\
_context;\n  path->code  = code;\n  top_context = path;\n} \n  \nvoid push(_\
____CONTEXT *path,unsigned long code)\n{ \n  path->code  = code;\n  top_cont\
ext = path;\n} \n  \nvoid stack_print(_____CONTEXT *up)      \n{ _____CONTEX\
T *back,*next;             \n  int j;	                              \n  next\
 = (void *)0;                          \n  while (up != (void *)0) {        \
          \n    back = up -> back;                       \n    up -> back = \
next;                       \n    next = up;                               \\
n    up = back;                               \n  };                        \
                 \n  print_string(\"\\n============== BOTTOM ==============\\
\n\"); \n  while (next != (void *)0) {                \n"};
__STRING_CONSTANT __string_197={__STRING_CONSTANT__,812,"    print_string(\"\
Line #\");                           \n    print_integer(__src[next->code].p\
os >> 17);         \n    print_string(\" Column #\");                       \
 \n    print_integer((__src[next->code].pos >> 9) & 0xFF); \n    print_strin\
g(\" in \");                             \n    print_string(trace[__src[next\
->code].pos & 0x1FF]); \n    print_string(\".\\n\");                        \
     \n if ((__src[next->code].pos & 0x1FF) != 0) { \n    print_string(__src\
[next->code].line);               \n    print_char('\\n');                  \
                \n    for (j=0;j < ((__src[next->code].pos >> 9) & 0xFF);j++\
) {\n      if (__src[next->code].line[j]=='\\t') print_char('\\t');\n      e\
lse print_char(' ');\n    };                                                \
  \n    print_char('^');    \n    print_char('\\n');   \n }; \n"};
__STRING_CONSTANT __string_198={__STRING_CONSTANT__,307,"    print_string(\"\
Line #\");                \n    print_integer(next->code >> 17);         \n \
   print_string(\" Column #\");          \n    print_integer((next->code >> \
9) & 0xFF); \n    print_string(\" in \");               \n    print_string(t\
race[next->code & 0x1FF]); \n    print_string(\".\\n\");                  \n"};
__STRING_CONSTANT __string_199={__STRING_CONSTANT__,515,"    next = next -> \
back;                     \n  };                                         \n \
 print_string(\"================ TOP ===============\\n\"); \n  top_context \
= (void *)0;                   \n}                                          \
  \n \nvoid print_integer(unsigned short n) \n{ unsigned short val;         \
       \n  char car;                          \n  car = (n % 10) + '0';     \
         \n  val = n / 10;                      \n  if (val != 0) print_inte\
ger(val);  \n  print_char(car);                   \n} \n\n"};
__STRING_CONSTANT __string_200={__STRING_CONSTANT__,12,"Error: File "};
__STRING_CONSTANT __string_201={__STRING_CONSTANT__,18," is not created !\n"};
__STRING_CONSTANT __string_202={__STRING_CONSTANT__,4," => "};
__STRING_CONSTANT __string_203={__STRING_CONSTANT__,10," minutes, "};
__STRING_CONSTANT __string_204={__STRING_CONSTANT__,12," second(s).\n"};
__STRING_CONSTANT __string_205={__STRING_CONSTANT__,25,"  Null call score   \
   : "};
__STRING_CONSTANT __string_206={__STRING_CONSTANT__,25,"  Polymorphic call  \
   : "};
__STRING_CONSTANT __string_207={__STRING_CONSTANT__,25,"  Invariant loop sco\
re : "};
__STRING_CONSTANT __string_208={__STRING_CONSTANT__,5,"Run `"};
__STRING_CONSTANT __string_209={__STRING_CONSTANT__,3,"' \t"};
__STRING_CONSTANT __string_210={__STRING_CONSTANT__,3,"Ok\n"};
__STRING_CONSTANT __string_211={__STRING_CONSTANT__,9,"Failure!\n"};
__STRING_CONSTANT __string_212={__STRING_CONSTANT__,4,"_add"};
__STRING_CONSTANT __string_213={__STRING_CONSTANT__,4,"_sub"};
__STRING_CONSTANT __string_214={__STRING_CONSTANT__,9,"_logicnot"};
__STRING_CONSTANT __string_215={__STRING_CONSTANT__,4,"_not"};
__STRING_CONSTANT __string_216={__STRING_CONSTANT__,4,"_div"};
__STRING_CONSTANT __string_217={__STRING_CONSTANT__,4,"_mul"};
__STRING_CONSTANT __string_218={__STRING_CONSTANT__,4,"_xor"};
__STRING_CONSTANT __string_219={__STRING_CONSTANT__,4,"_mod"};
__STRING_CONSTANT __string_220={__STRING_CONSTANT__,8,"_greater"};
__STRING_CONSTANT __string_221={__STRING_CONSTANT__,5,"_less"};
__STRING_CONSTANT __string_222={__STRING_CONSTANT__,6,"_equal"};
__STRING_CONSTANT __string_223={__STRING_CONSTANT__,7,"_notdiv"};
__STRING_CONSTANT __string_224={__STRING_CONSTANT__,3,"_or"};
__STRING_CONSTANT __string_225={__STRING_CONSTANT__,4,"_and"};
__STRING_CONSTANT __string_226={__STRING_CONSTANT__,7,"_dollar"};
__STRING_CONSTANT __string_227={__STRING_CONSTANT__,6,"_diese"};
__STRING_CONSTANT __string_228={__STRING_CONSTANT__,3,"_at"};
__STRING_CONSTANT __string_229={__STRING_CONSTANT__,4,"_ask"};
__STRING_CONSTANT __string_230={__STRING_CONSTANT__,22,"Line counter overflo\
w."};
__STRING_CONSTANT __string_231={__STRING_CONSTANT__,40,"Column counter overf\
low (line too long)."};
__STRING_CONSTANT __string_232={__STRING_CONSTANT__,20,"--SYNTAX-----------\n"};
__STRING_CONSTANT __string_233={__STRING_CONSTANT__,20,"--SEMANTIC---------\n"};
__STRING_CONSTANT __string_234={__STRING_CONSTANT__,20,"--WARNING----------\n"};
__STRING_CONSTANT __string_235={__STRING_CONSTANT__,20,"--MESSAGE----------\n"};
__STRING_CONSTANT __string_236={__STRING_CONSTANT__,6,"\nLine "};
__STRING_CONSTANT __string_237={__STRING_CONSTANT__,8," column "};
__STRING_CONSTANT __string_238={__STRING_CONSTANT__,4," in "};
__STRING_CONSTANT __string_239={__STRING_CONSTANT__,3,"):\n"};
__STRING_CONSTANT __string_240={__STRING_CONSTANT__,2,"^\n"};
__STRING_CONSTANT __string_241={__STRING_CONSTANT__,24,"Identifier is incorr\
ect."};
__STRING_CONSTANT __string_242={__STRING_CONSTANT__,26,"Incorrect path expre\
ssion."};
__STRING_CONSTANT __string_243={__STRING_CONSTANT__,26,"End of comment not f\
ound !"};
__STRING_CONSTANT __string_244={__STRING_CONSTANT__,47,"SELF type result for\
 data slot is not possible."};
__STRING_CONSTANT __string_245={__STRING_CONSTANT__,3,".li"};
__STRING_CONSTANT __string_246={__STRING_CONSTANT__,17," is not found in\n"};
__STRING_CONSTANT __string_247={__STRING_CONSTANT__,32,"Incorrect genericity\
 definition."};
__STRING_CONSTANT __string_248={__STRING_CONSTANT__,21,"DTA_RD : Bug BLOCK!!!"};
__STRING_CONSTANT __string_249={__STRING_CONSTANT__,12,"Local slot `"};
__STRING_CONSTANT __string_250={__STRING_CONSTANT__,11,"' not used."};
__STRING_CONSTANT __string_251={__STRING_CONSTANT__,24,"Double declaration f\
or `"};
__STRING_CONSTANT __string_252={__STRING_CONSTANT__,7,"' slot."};
__STRING_CONSTANT __string_253={__STRING_CONSTANT__,22,"EXPR_MULTIPLE.get_ty\
pe"};
__STRING_CONSTANT __string_254={__STRING_CONSTANT__,23,"\n------------------\
---\n"};
__STRING_CONSTANT __string_255={__STRING_CONSTANT__,11,"BLOCK SEND "};
__STRING_CONSTANT __string_256={__STRING_CONSTANT__,5,"push("};
__STRING_CONSTANT __string_257={__STRING_CONSTANT__,3," :="};
__STRING_CONSTANT __string_258={__STRING_CONSTANT__,6,"<NULL>"};
__STRING_CONSTANT __string_259={__STRING_CONSTANT__,12,"is_expanded("};
__STRING_CONSTANT __string_260={__STRING_CONSTANT__,3,"nop"};
__STRING_CONSTANT __string_261={__STRING_CONSTANT__,1,"<"};
__STRING_CONSTANT __string_262={__STRING_CONSTANT__,1,">"};
__STRING_CONSTANT __string_263={__STRING_CONSTANT__,2,":\n"};
__STRING_CONSTANT __string_264={__STRING_CONSTANT__,5,"goto "};
__STRING_CONSTANT __string_265={__STRING_CONSTANT__,7,"static "};
__STRING_CONSTANT __string_266={__STRING_CONSTANT__,5,"void "};
__STRING_CONSTANT __string_267={__STRING_CONSTANT__,31,"BUG PROFIL.genere_ha\
ndler Error"};
__STRING_CONSTANT __string_268={__STRING_CONSTANT__,95,"Compiler limit : Thi\
s block is context sensitive, and evaluation too far away from the context."};
__STRING_CONSTANT __string_269={__STRING_CONSTANT__,2,"{\n"};
__STRING_CONSTANT __string_270={__STRING_CONSTANT__,35," /* INSTR.genere :: \
Not genere ! */"};
__STRING_CONSTANT __string_271={__STRING_CONSTANT__,20,"IS_EXPANDED.genere !"};
__STRING_CONSTANT __string_272={__STRING_CONSTANT__,2,";\n"};
__STRING_CONSTANT __string_273={__STRING_CONSTANT__,7,"return("};
__STRING_CONSTANT __string_274={__STRING_CONSTANT__,12," With result"};
__STRING_CONSTANT __string_275={__STRING_CONSTANT__,5," Void"};
__STRING_CONSTANT __string_276={__STRING_CONSTANT__,34,"Slot is not possible\
 with a type C"};
__STRING_CONSTANT __string_277={__STRING_CONSTANT__,3,"// "};
__STRING_CONSTANT __string_278={__STRING_CONSTANT__,17,"#define TRUE__ 1\n"};
__STRING_CONSTANT __string_279={__STRING_CONSTANT__,18,"#define FALSE__ 0\n"};
__STRING_CONSTANT __string_280={__STRING_CONSTANT__,42,"Late binding is not \
possible with a type C"};
__STRING_CONSTANT __string_281={__STRING_CONSTANT__,8,"typedef "};
__STRING_CONSTANT __string_282={__STRING_CONSTANT__,3," __"};
__STRING_CONSTANT __string_283={__STRING_CONSTANT__,11,"\n#define __"};
__STRING_CONSTANT __string_284={__STRING_CONSTANT__,3,"__ "};
__STRING_CONSTANT __string_285={__STRING_CONSTANT__,22,"  unsigned long __id\
;\n"};
__STRING_CONSTANT __string_286={__STRING_CONSTANT__,51,"Late binding is not \
possible with `mapping' object."};
__STRING_CONSTANT __string_287={__STRING_CONSTANT__,11,"  volatile "};
__STRING_CONSTANT __string_288={__STRING_CONSTANT__,14,"  void *self;\n"};
__STRING_CONSTANT __string_289={__STRING_CONSTANT__,17,"  void *Nothing;\n"};
__STRING_CONSTANT __string_290={__STRING_CONSTANT__,15,"typedef struct "};
__STRING_CONSTANT __string_291={__STRING_CONSTANT__,10,"_struct __"};
__STRING_CONSTANT __string_292={__STRING_CONSTANT__,9,";\nstruct "};
__STRING_CONSTANT __string_293={__STRING_CONSTANT__,10,"_struct {\n"};
__STRING_CONSTANT __string_294={__STRING_CONSTANT__,28,"} __attribute__ ((pa\
cked));\n"};
__STRING_CONSTANT __string_295={__STRING_CONSTANT__,3,"};\n"};
__STRING_CONSTANT __string_296={__STRING_CONSTANT__,4,"={__"};
__STRING_CONSTANT __string_297={__STRING_CONSTANT__,3,"__}"};
__STRING_CONSTANT __string_298={__STRING_CONSTANT__,8,"#define "};
__STRING_CONSTANT __string_299={__STRING_CONSTANT__,5,"__ (&"};
__STRING_CONSTANT __string_300={__STRING_CONSTANT__,4,"_)\n\n"};
__STRING_CONSTANT __string_301={__STRING_CONSTANT__,3,"% ("};
__STRING_CONSTANT __string_302={__STRING_CONSTANT__,19,"Variable not found."};
__STRING_CONSTANT __string_303={__STRING_CONSTANT__,20,"`Section' is needed."};
__STRING_CONSTANT __string_304={__STRING_CONSTANT__,27,"Section `Header' is \
needed."};
__STRING_CONSTANT __string_305={__STRING_CONSTANT__,22,"Slot `name' not foun\
d."};
__STRING_CONSTANT __string_306={__STRING_CONSTANT__,23,"Incorrect type secti\
on."};
__STRING_CONSTANT __string_307={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
ert' must to be first section."};
__STRING_CONSTANT __string_308={__STRING_CONSTANT__,78,"`Section Inherit' is\
 not possible with Expanded object (Use `Section Insert')."};
__STRING_CONSTANT __string_309={__STRING_CONSTANT__,30,"Incorrect argument d\
efinition."};
__STRING_CONSTANT __string_310={__STRING_CONSTANT__,20,"Added ')' is needed."};
__STRING_CONSTANT __string_311={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
n External'."};
__STRING_CONSTANT __string_312={__STRING_CONSTANT__,19,"Operator is needed."};
__STRING_CONSTANT __string_313={__STRING_CONSTANT__,19,"Incorrect operator."};
__STRING_CONSTANT __string_314={__STRING_CONSTANT__,10,"Added `''."};
__STRING_CONSTANT __string_315={__STRING_CONSTANT__,31,"Level priority level\
 is needed."};
__STRING_CONSTANT __string_316={__STRING_CONSTANT__,33,"Not priority for pre\
fix operator."};
__STRING_CONSTANT __string_317={__STRING_CONSTANT__,27,"Incorrect slot decla\
ration."};
__STRING_CONSTANT __string_318={__STRING_CONSTANT__,22,"Incorrect result typ\
e."};
__STRING_CONSTANT __string_319={__STRING_CONSTANT__,21,"Incorrect expression."};
__STRING_CONSTANT __string_320={__STRING_CONSTANT__,10,"Added ';'."};
__STRING_CONSTANT __string_321={__STRING_CONSTANT__,24,"Double slot declarat\
ion."};
__STRING_CONSTANT __string_322={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
t yet implemented."};
__STRING_CONSTANT __string_323={__STRING_CONSTANT__,16,"Type parameter `"};
__STRING_CONSTANT __string_324={__STRING_CONSTANT__,16,"' is not define."};
__STRING_CONSTANT __string_325={__STRING_CONSTANT__,7,"Strict "};
__STRING_CONSTANT __string_326={__STRING_CONSTANT__,9,"Expanded "};
__STRING_CONSTANT __string_327={__STRING_CONSTANT__,4,"PUSH"};
__STRING_CONSTANT __string_328={__STRING_CONSTANT__,24,"ITM_LIST_IDF.to_run_\
expr"};
__STRING_CONSTANT __string_329={__STRING_CONSTANT__,26,"Invalid constant int\
eger ("};
__STRING_CONSTANT __string_330={__STRING_CONSTANT__,12,") cast into "};
__STRING_CONSTANT __string_331={__STRING_CONSTANT__,2," ["};
__STRING_CONSTANT __string_332={__STRING_CONSTANT__,2,".."};
__STRING_CONSTANT __string_333={__STRING_CONSTANT__,17,"] => new value=0."};
__STRING_CONSTANT __string_334={__STRING_CONSTANT__,22,"Incorrect vector siz\
e."};
__STRING_CONSTANT __string_335={__STRING_CONSTANT__,21,"Cyclic inheritance : "};
__STRING_CONSTANT __string_336={__STRING_CONSTANT__,2,", "};
__STRING_CONSTANT __string_337={__STRING_CONSTANT__,8,"Generic "};
__STRING_CONSTANT __string_338={__STRING_CONSTANT__,7,"Switch "};
__STRING_CONSTANT __string_339={__STRING_CONSTANT__,2,"| "};
__STRING_CONSTANT __string_340={__STRING_CONSTANT__,7,"<Empty>"};
__STRING_CONSTANT __string_341={__STRING_CONSTANT__,11,"<NODE VIDE="};
__STRING_CONSTANT __string_342={__STRING_CONSTANT__,8,", Data: "};
__STRING_CONSTANT __string_343={__STRING_CONSTANT__,8,"DTA_READ"};
__STRING_CONSTANT __string_344={__STRING_CONSTANT__,8,"DTA_CAST"};
__STRING_CONSTANT __string_345={__STRING_CONSTANT__,9,"DTA_BLOCK"};
__STRING_CONSTANT __string_346={__STRING_CONSTANT__,10,", Result: "};
__STRING_CONSTANT __string_347={__STRING_CONSTANT__,2,"/R"};
__STRING_CONSTANT __string_348={__STRING_CONSTANT__,2,"/E"};
__STRING_CONSTANT __string_349={__STRING_CONSTANT__,2,"=="};
__STRING_CONSTANT __string_350={__STRING_CONSTANT__,8,"type_id("};
__STRING_CONSTANT __string_351={__STRING_CONSTANT__,1,"-"};
__STRING_CONSTANT __string_352={__STRING_CONSTANT__,1,"/"};
__STRING_CONSTANT __string_353={__STRING_CONSTANT__,1,"&"};
__STRING_CONSTANT __string_354={__STRING_CONSTANT__,2,">>"};
__STRING_CONSTANT __string_355={__STRING_CONSTANT__,2,"<<"};
__STRING_CONSTANT __string_356={__STRING_CONSTANT__,2,"]="};
__STRING_CONSTANT __string_357={__STRING_CONSTANT__,8,"size_of("};
__STRING_CONSTANT __string_358={__STRING_CONSTANT__,2,"()"};
__STRING_CONSTANT __string_359={__STRING_CONSTANT__,1,"("};
__STRING_CONSTANT __string_360={__STRING_CONSTANT__,2,"<>"};
__STRING_CONSTANT __string_361={__STRING_CONSTANT__,1,"|"};
__STRING_CONSTANT __string_362={__STRING_CONSTANT__,2,"||"};
__STRING_CONSTANT __string_363={__STRING_CONSTANT__,2,"&&"};
__STRING_CONSTANT __string_364={__STRING_CONSTANT__,1,"+"};
__STRING_CONSTANT __string_365={__STRING_CONSTANT__,1,"%"};
__STRING_CONSTANT __string_366={__STRING_CONSTANT__,2,">="};
__STRING_CONSTANT __string_367={__STRING_CONSTANT__,2,"<="};
__STRING_CONSTANT __string_368={__STRING_CONSTANT__,1,"^"};
__STRING_CONSTANT __string_369={__STRING_CONSTANT__,7,"__BLOCK"};
__STRING_CONSTANT __string_370={__STRING_CONSTANT__,3,"int"};
__STRING_CONSTANT __string_371={__STRING_CONSTANT__,27,"__STRING_CONSTANT __\
string_"};
__STRING_CONSTANT __string_372={__STRING_CONSTANT__,2,"={"};
__STRING_CONSTANT __string_373={__STRING_CONSTANT__,20,"__STRING_CONSTANT__,"};
__STRING_CONSTANT __string_374={__STRING_CONSTANT__,2,"\\\n"};
__STRING_CONSTANT __string_375={__STRING_CONSTANT__,11,"(&__string_"};
__STRING_CONSTANT __string_376={__STRING_CONSTANT__,8," style ["};
__STRING_CONSTANT __string_377={__STRING_CONSTANT__,2,"]\n"};
__STRING_CONSTANT __string_378={__STRING_CONSTANT__,26,"BUG ANY.add_var_size\
 Error"};
__STRING_CONSTANT __string_379={__STRING_CONSTANT__,12,"push_first(&"};
__STRING_CONSTANT __string_380={__STRING_CONSTANT__,6,"push(&"};
__STRING_CONSTANT __string_381={__STRING_CONSTANT__,6,"; // L"};
__STRING_CONSTANT __string_382={__STRING_CONSTANT__,2,"(("};
__STRING_CONSTANT __string_383={__STRING_CONSTANT__,2,")("};
__STRING_CONSTANT __string_384={__STRING_CONSTANT__,2,"))"};
__STRING_CONSTANT __string_385={__STRING_CONSTANT__,2,"(*"};
__STRING_CONSTANT __string_386={__STRING_CONSTANT__,3,"LLU"};
__STRING_CONSTANT __string_387={__STRING_CONSTANT__,2,"LU"};
__STRING_CONSTANT __string_388={__STRING_CONSTANT__,4,"if ("};
__STRING_CONSTANT __string_389={__STRING_CONSTANT__,8,".__id==0"};
__STRING_CONSTANT __string_390={__STRING_CONSTANT__,2,") "};
__STRING_CONSTANT __string_391={__STRING_CONSTANT__,6," else "};
__STRING_CONSTANT __string_392={__STRING_CONSTANT__,8," else {\n"};
__STRING_CONSTANT __string_393={__STRING_CONSTANT__,8,"switch ("};
__STRING_CONSTANT __string_394={__STRING_CONSTANT__,4,") {\n"};
__STRING_CONSTANT __string_395={__STRING_CONSTANT__,5,"case "};
__STRING_CONSTANT __string_396={__STRING_CONSTANT__,2,": "};
__STRING_CONSTANT __string_397={__STRING_CONSTANT__,7,"break;\n"};
__STRING_CONSTANT __string_398={__STRING_CONSTANT__,7,".__id=0"};
__STRING_CONSTANT __string_399={__STRING_CONSTANT__,3,")->"};
__STRING_CONSTANT __string_400={__STRING_CONSTANT__,8,"(void *)"};
__STRING_CONSTANT __string_401={__STRING_CONSTANT__,15,"(unsigned long)"};
__STRING_CONSTANT __string_402={__STRING_CONSTANT__,5,".__id"};
__STRING_CONSTANT __string_403={__STRING_CONSTANT__,2,"-1"};
__STRING_CONSTANT __string_404={__STRING_CONSTANT__,2,"*("};
__STRING_CONSTANT __string_405={__STRING_CONSTANT__,7,"sizeof("};
__STRING_CONSTANT __string_406={__STRING_CONSTANT__,58,"Impossible `Self' ar\
gument for External or Interrupt slot."};
__STRING_CONSTANT __string_407={__STRING_CONSTANT__,6,".self)"};
__STRING_CONSTANT __string_408={__STRING_CONSTANT__,27,"LOOP BUG: Body loop \
empty !"};
__STRING_CONSTANT __string_409={__STRING_CONSTANT__,8,"while (!"};
__STRING_CONSTANT __string_410={__STRING_CONSTANT__,7,"while ("};
__STRING_CONSTANT __string_411={__STRING_CONSTANT__,3,"do "};
__STRING_CONSTANT __string_412={__STRING_CONSTANT__,9," while (!"};
__STRING_CONSTANT __string_413={__STRING_CONSTANT__,8," while ("};
__STRING_CONSTANT __string_414={__STRING_CONSTANT__,12,"_____CONTEXT"};
__STRING_CONSTANT __string_415={__STRING_CONSTANT__,33,"Slot is not in `Mapp\
ing' section."};
__STRING_CONSTANT __string_416={__STRING_CONSTANT__,19,"Not enough memory.\n"};
__STRING_CONSTANT __string_417={__STRING_CONSTANT__,29,"Unterminated string \
constant."};
__STRING_CONSTANT __string_418={__STRING_CONSTANT__,27,"Incorrect style slot\
 ('-')."};
__STRING_CONSTANT __string_419={__STRING_CONSTANT__,88,"`- name' is reserved\
 for Concurrent Object Prototype.\nSorry, COP is not yet implemented."};
__STRING_CONSTANT __string_420={__STRING_CONSTANT__,11,"Added ':='."};
__STRING_CONSTANT __string_421={__STRING_CONSTANT__,31,"Prototype identifier\
 is needed."};
__STRING_CONSTANT __string_422={__STRING_CONSTANT__,34,"Incorrect name (file\
name != name)."};
__STRING_CONSTANT __string_423={__STRING_CONSTANT__,33,"Incorrect name (name\
 length > 1)."};
__STRING_CONSTANT __string_424={__STRING_CONSTANT__,24,"Object can't be gene\
ric."};
__STRING_CONSTANT __string_425={__STRING_CONSTANT__,36,"Identifier parameter\
 type is needed."};
__STRING_CONSTANT __string_426={__STRING_CONSTANT__,37,"Sorry, not yet imple\
mented (ignored)."};
__STRING_CONSTANT __string_427={__STRING_CONSTANT__,10,"Added ']'."};
__STRING_CONSTANT __string_428={__STRING_CONSTANT__,28,"Invalid generic list\
 number."};
__STRING_CONSTANT __string_429={__STRING_CONSTANT__,15,"Incorrect type."};
__STRING_CONSTANT __string_430={__STRING_CONSTANT__,34,"Slot `name' must to \
be first slot."};
__STRING_CONSTANT __string_431={__STRING_CONSTANT__,20,"Incorrect type list."};
__STRING_CONSTANT __string_432={__STRING_CONSTANT__,19,"Incorrect external."};
__STRING_CONSTANT __string_433={__STRING_CONSTANT__,15,"Incorrect expr."};
__STRING_CONSTANT __string_434={__STRING_CONSTANT__,33,"Double `default' slo\
t definition."};
__STRING_CONSTANT __string_435={__STRING_CONSTANT__,30,"Double `type' slot d\
efinition."};
__STRING_CONSTANT __string_436={__STRING_CONSTANT__,17,"Incorrect number."};
__STRING_CONSTANT __string_437={__STRING_CONSTANT__,17,"Incorrect string."};
__STRING_CONSTANT __string_438={__STRING_CONSTANT__,15,"Incorrect slot."};
__STRING_CONSTANT __string_439={__STRING_CONSTANT__,59,"For a section, the p\
rototype name only (without '['...']')."};
__STRING_CONSTANT __string_440={__STRING_CONSTANT__,30,"Incorrect argument i\
dentifier."};
__STRING_CONSTANT __string_441={__STRING_CONSTANT__,24,"Incorrect argument t\
ype."};
__STRING_CONSTANT __string_442={__STRING_CONSTANT__,20,"Added ':' is needed."};
__STRING_CONSTANT __string_443={__STRING_CONSTANT__,10,"Added ')'."};
__STRING_CONSTANT __string_444={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
__STRING_CONSTANT __string_445={__STRING_CONSTANT__,23,"Incorrect octal numb\
er."};
__STRING_CONSTANT __string_446={__STRING_CONSTANT__,24,"Incorrect binary num\
ber."};
__STRING_CONSTANT __string_447={__STRING_CONSTANT__,25,"Incorrect decimal nu\
mber."};
__STRING_CONSTANT __string_448={__STRING_CONSTANT__,31,"No argument for inte\
rrupt slot."};
__STRING_CONSTANT __string_449={__STRING_CONSTANT__,33,"No argument for inhe\
ritance slot."};
__STRING_CONSTANT __string_450={__STRING_CONSTANT__,27,"`Expanded' is not po\
ssible."};
__STRING_CONSTANT __string_451={__STRING_CONSTANT__,36,"Incorrect type for i\
nheritance slot."};
__STRING_CONSTANT __string_452={__STRING_CONSTANT__,45,"Impossible '<-' styl\
e assignment with vector."};
__STRING_CONSTANT __string_453={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
mented !"};
__STRING_CONSTANT __string_454={__STRING_CONSTANT__,22,"Incorrect size vecto\
r."};
__STRING_CONSTANT __string_455={__STRING_CONSTANT__,31,"ITM_WRITE: Not yet i\
mplemented."};
__STRING_CONSTANT __string_456={__STRING_CONSTANT__,6,"Slot `"};
__STRING_CONSTANT __string_457={__STRING_CONSTANT__,27,"' not found in stati\
c type "};
__STRING_CONSTANT __string_458={__STRING_CONSTANT__,32,"`?=' is not necessar\
y, use `:='."};
__STRING_CONSTANT __string_459={__STRING_CONSTANT__,36,"Argument assignment \
is not possible."};
__STRING_CONSTANT __string_460={__STRING_CONSTANT__,13,"Crash system."};
__STRING_CONSTANT __string_461={__STRING_CONSTANT__,5," and "};
__STRING_CONSTANT __string_462={__STRING_CONSTANT__,20," are not comparable."};
__STRING_CONSTANT __string_463={__STRING_CONSTANT__,12,"Call on Void"};
__STRING_CONSTANT __string_464={__STRING_CONSTANT__,16,"' not found in `"};
__STRING_CONSTANT __string_465={__STRING_CONSTANT__,2,"'."};
__STRING_CONSTANT __string_466={__STRING_CONSTANT__,26,"Incorrect number arg\
ument."};
__STRING_CONSTANT __string_467={__STRING_CONSTANT__,5,"Type "};
__STRING_CONSTANT __string_468={__STRING_CONSTANT__,35," does not have acces\
s to this slot."};
__STRING_CONSTANT __string_469={__STRING_CONSTANT__,8,"deferred"};
__STRING_CONSTANT __string_470={__STRING_CONSTANT__,13,"Deferred in `"};
__STRING_CONSTANT __string_471={__STRING_CONSTANT__,6,"' for "};
__STRING_CONSTANT __string_472={__STRING_CONSTANT__,50,"Conflicting declarat\
ion associativity or priority."};
__STRING_CONSTANT __string_473={__STRING_CONSTANT__,32,"Conflicting left/rig\
ht priority."};
__STRING_CONSTANT __string_474={__STRING_CONSTANT__,42,"Incorrect vector siz\
e for `value' message."};
__STRING_CONSTANT __string_475={__STRING_CONSTANT__,37,"Incorrect external l\
ocal slot access."};
__STRING_CONSTANT __string_476={__STRING_CONSTANT__,28,"External local slot \
access `"};
__STRING_CONSTANT __string_477={__STRING_CONSTANT__,15,"' is not found."};
__STRING_CONSTANT __string_478={__STRING_CONSTANT__,23,"' must be in `+' sty\
le."};
__STRING_CONSTANT __string_479={__STRING_CONSTANT__,3,"(@)"};
__STRING_CONSTANT __string_480={__STRING_CONSTANT__,37,"Unknown external lis\
aac code (0..15)."};
__STRING_CONSTANT __string_481={__STRING_CONSTANT__,23,"top_context->back->b\
ack"};
__STRING_CONSTANT __string_482={__STRING_CONSTANT__,27,"External Lisaac #15 \
: Free."};
__STRING_CONSTANT __string_483={__STRING_CONSTANT__,4," -> "};
__STRING_CONSTANT __string_484={__STRING_CONSTANT__,8,". Slot `"};
__STRING_CONSTANT __string_485={__STRING_CONSTANT__,26,"No argument for this\
 slot."};
__STRING_CONSTANT __string_486={__STRING_CONSTANT__,12,"Type result "};
__STRING_CONSTANT __string_487={__STRING_CONSTANT__,45,"' is incorrect (Used\
 for auto-conversion to `"};
__STRING_CONSTANT __string_488={__STRING_CONSTANT__,3,"')."};
__STRING_CONSTANT __string_489={__STRING_CONSTANT__,4," <- "};
__STRING_CONSTANT __string_490={__STRING_CONSTANT__,33,"Incorrect argument f\
or this slot."};
__STRING_CONSTANT __string_491={__STRING_CONSTANT__,44," is incorrect (Used \
for auto-conversion to `"};
__STRING_CONSTANT __string_492={__STRING_CONSTANT__,6,"Type `"};
__STRING_CONSTANT __string_493={__STRING_CONSTANT__,19,"' is invalid with `"};
__STRING_CONSTANT __string_494={__STRING_CONSTANT__,74,"stack_print(top_cont\
ext); print_string(\"Call on NULL\\n\"); die_with_code(1)"};
__STRING_CONSTANT __string_495={__STRING_CONSTANT__,67,"print_string(\"Call \
on NULL\\n(Use `-D' option)\\n\"); die_with_code(1)"};
__STRING_CONSTANT __string_496={__STRING_CONSTANT__,18,"NODE_STYLE.my_copy"};
__STRING_CONSTANT __string_497={__STRING_CONSTANT__,19,"LOOP.my_copy BUG!!!"};
__STRING_CONSTANT __string_498={__STRING_CONSTANT__,8," Origin:"};
__STRING_CONSTANT __string_499={__STRING_CONSTANT__,6," copy:"};
__STRING_CONSTANT __string_500={__STRING_CONSTANT__,18,"LOOP: Bug in copy."};
__STRING_CONSTANT __string_501={__STRING_CONSTANT__,31,"Invariance type resu\
lt invalid."};
__STRING_CONSTANT __string_502={__STRING_CONSTANT__,39,"Invariance section d\
eclaration invalid."};
__STRING_CONSTANT __string_503={__STRING_CONSTANT__,42,"Invariance number ve\
ctor argument invalid."};
__STRING_CONSTANT __string_504={__STRING_CONSTANT__,33,"Invariance name argu\
ment invalid."};
__STRING_CONSTANT __string_505={__STRING_CONSTANT__,33,"Invariance type argu\
ment invalid."};
__STRING_CONSTANT __string_506={__STRING_CONSTANT__,8,"C'est : "};
__STRING_CONSTANT __string_507={__STRING_CONSTANT__,9,"\n dans :\n"};
__STRING_CONSTANT __string_508={__STRING_CONSTANT__,35,"Recursivity without \
end (LOOP_END)."};
__STRING_CONSTANT __string_509={__STRING_CONSTANT__,12,"DTA_WR_CODE:"};
__STRING_CONSTANT __string_510={__STRING_CONSTANT__,13,"DTA_WR_VALUE:"};
__STRING_CONSTANT __string_511={__STRING_CONSTANT__,12,"DTA_RD_ARGS:"};
__STRING_CONSTANT __string_512={__STRING_CONSTANT__,9,"volatile "};
__STRING_CONSTANT __string_513={__STRING_CONSTANT__,18,"((struct ___OBJ *)"};
__STRING_CONSTANT __string_514={__STRING_CONSTANT__,7,")->__id"};
__STRING_CONSTANT __string_515={__STRING_CONSTANT__,2,"&("};
__STRING_CONSTANT __string_516={__STRING_CONSTANT__,24,"Unknown escape seque\
nce."};
__STRING_CONSTANT __string_517={__STRING_CONSTANT__,39,"Invalid range charac\
ter number [0,255]."};
__STRING_CONSTANT __string_518={__STRING_CONSTANT__,23,"Character '\' is nee\
ded."};
__STRING_CONSTANT __string_519={__STRING_CONSTANT__,24,"Incorrect Result num\
ber."};
__STRING_CONSTANT __string_520={__STRING_CONSTANT__,22,"Incorrect real numbe\
r."};
__STRING_CONSTANT __string_521={__STRING_CONSTANT__,28,"Character constant t\
oo long."};
__STRING_CONSTANT __string_522={__STRING_CONSTANT__,32,"Unterminated charact\
er constant."};
__STRING_CONSTANT __string_523={__STRING_CONSTANT__,10,"Added '}'."};
__STRING_CONSTANT __string_524={__STRING_CONSTANT__,25,"Incorrect live type \
list."};
__STRING_CONSTANT __string_525={__STRING_CONSTANT__,25,"Incorrect parameter \
type."};
__STRING_CONSTANT __string_526={__STRING_CONSTANT__,23,"Incorrect generic ty\
pe."};
__STRING_CONSTANT __string_527={__STRING_CONSTANT__,7,"Style `"};
__STRING_CONSTANT __string_528={__STRING_CONSTANT__,10,"' ignored."};
__STRING_CONSTANT __string_529={__STRING_CONSTANT__,21,"Incorrect identifier."};
__STRING_CONSTANT __string_530={__STRING_CONSTANT__,21,"Incorrect local type."};
__STRING_CONSTANT __string_531={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
ession."};
__STRING_CONSTANT __string_532={__STRING_CONSTANT__,18,"Incorrect message."};
__STRING_CONSTANT __string_533={__STRING_CONSTANT__,48,"Type `SELF' is not p\
ossible for `-' style local."};
__STRING_CONSTANT __string_534={__STRING_CONSTANT__,21,"ITM_LDOTS.to_run_expr"};
__STRING_CONSTANT __string_535={__STRING_CONSTANT__,126,"Profil block not fo\
und, a first definition must to be before a first evaluation.\nSorry, it's a\
 limit for this actual compiler."};
__STRING_CONSTANT __string_536={__STRING_CONSTANT__,49,"Incorrect size of ve\
ctor argument for this block."};
__STRING_CONSTANT __string_537={__STRING_CONSTANT__,4,"NODE"};
__STRING_CONSTANT __string_538={__STRING_CONSTANT__,6,"Slot '"};
__STRING_CONSTANT __string_539={__STRING_CONSTANT__,15,"' not found in "};
__STRING_CONSTANT __string_540={__STRING_CONSTANT__,4,". ( "};
__STRING_CONSTANT __string_541={__STRING_CONSTANT__,42,"Polymorphic External\
 slot is not possible."};
__STRING_CONSTANT __string_542={__STRING_CONSTANT__,19,"/* External slot */"};
__STRING_CONSTANT __string_543={__STRING_CONSTANT__,20,"Value result missing"};
__STRING_CONSTANT __string_544={__STRING_CONSTANT__,19,"__BEGIN_INTERRUPT__"};
__STRING_CONSTANT __string_545={__STRING_CONSTANT__,17,"__END_INTERRUPT__"};
__STRING_CONSTANT __string_546={__STRING_CONSTANT__,10,"New type: "};
__STRING_CONSTANT __string_547={__STRING_CONSTANT__,4,") x "};
__STRING_CONSTANT __string_548={__STRING_CONSTANT__,6,"<Vide>"};
__STRING_CONSTANT __string_549={__STRING_CONSTANT__,11,"\nOld type: "};
__STRING_CONSTANT __string_550={__STRING_CONSTANT__,23,"*****SWITCH BUG*****\
***"};
__STRING_CONSTANT __string_551={__STRING_CONSTANT__,15,"PB dans SWITCH."};
__STRING_CONSTANT __string_552={__STRING_CONSTANT__,24,"Recursivity without \
end."};
__STRING_CONSTANT __string_553={__STRING_CONSTANT__,17,"PROFIL_BLOCK.slot"};
__STRING_CONSTANT __string_554={__STRING_CONSTANT__,19,"CALL_SLOT : BUG!!!!"};
__STRING_CONSTANT __string_555={__STRING_CONSTANT__,20,"CALL_SLOT : BUG2!!!!"};
__STRING_CONSTANT __string_556={__STRING_CONSTANT__,7,"style ["};
__STRING_CONSTANT __string_557={__STRING_CONSTANT__,44,"READ : Compiler BUG!\
 (require_first = NULL) "};
__STRING_CONSTANT __string_558={__STRING_CONSTANT__,26,"EXPR_MULTIPLE.execut\
e_link"};
__STRING_CONSTANT __string_559={__STRING_CONSTANT__,17,"Division by zero."};
__STRING_CONSTANT __string_560={__STRING_CONSTANT__,30,"Right shift count is\
 negative."};
__STRING_CONSTANT __string_561={__STRING_CONSTANT__,29,"Left shift count is \
negative."};
__STRING_CONSTANT __string_562={__STRING_CONSTANT__,63,"******** VARIABLE.un\
write : BUG require_list = NULL **********\n"};
__STRING_CONSTANT __string_563={__STRING_CONSTANT__,47,"******** VARIABLE.un\
write : BUG !!! **********\n"};
__STRING_CONSTANT __string_564={__STRING_CONSTANT__,37,"Incorrect multiple r\
esult expression."};
__STRING_CONSTANT __string_565={__STRING_CONSTANT__,19,"Incorrect argument."};
__STRING_CONSTANT __string_566={__STRING_CONSTANT__,31,"More result value fo\
r this slot"};
__STRING_CONSTANT __string_567={__STRING_CONSTANT__,30,"One result value for\
 this slot"};
__STRING_CONSTANT __string_568={__STRING_CONSTANT__,29,"No result value for \
this slot"};
__STRING_CONSTANT __string_569={__STRING_CONSTANT__,46,"This block is extern\
 context sensitive (with `"};
__STRING_CONSTANT __string_570={__STRING_CONSTANT__,18,"' local variable)."};
__STRING_CONSTANT __string_571={__STRING_CONSTANT__,4,"_of_"};
__STRING_CONSTANT __string_572={__STRING_CONSTANT__,5,"_and_"};
__STRING_CONSTANT __string_573={__STRING_CONSTANT__,36,"Recursivity without \
end (call_slot)."};

//==========================//
// FUNCTION HEADER          //
//==========================//

// Debug Manager
void print_string(char *str);
// Source code
static __STRING* create__AXB(__INTEGER needed_capacity__CXB);
static __FAST_ARRAYoSTRINGo* create_with_capacity__CEG(__INTEGER new_count__EEG);
static __INTEGER fast_first_index_of__until__PAD(__CHARACTER *Self__QAD,__CHARACTER element__RAD,__INTEGER upper__SAD);
static void add_last__YPK(__STRING *Self__ZPK,__CHARACTER ch__0PK);
static void add_last__00X(__FAST_ARRAYoSTRINGo *Self__10X,void *element__20X);
static __LINKED_LISToSTRING_CONSTANTo* create__CZC();
static __POINTER micro_alloc__table__lab__BOI(__UINTEGER_32 new_size__DOI,__POINTER ptr_table__EOI,__UINTEGER_32 lab_type__FOI);
static __INTEGER prime_number_ceiling__A4Q(__INTEGER integer__C4Q);
static void** create__S2TB(__INTEGER nb_elements__U2TB);
static void** create__KY5(__INTEGER nb_elements__MY5);
static void** create__GJT(__INTEGER nb_elements__IJT);
static void** create__3MT(__INTEGER nb_elements__5MT);
static void fast_put__to__BVL(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__CVL,void *v__DVL,void *k__EVL);
static void** create__G02(__INTEGER nb_elements__I02);
static void** create__BVT(__INTEGER nb_elements__DVT);
static void** create__TVBB(__INTEGER nb_elements__VVBB);
static void** create__QMCD(__INTEGER nb_elements__SMCD);
static __POINTER realloc_dynamic__old_size__new_size__K3OB(__POINTER p__M3OB,__UINTEGER_32 old_sz__N3OB,__UINTEGER_32 new_sz__O3OB);
static void** create__GRBB(__INTEGER nb_elements__IRBB);
static void** create__YXOF(__INTEGER nb_elements__0XOF);
static void** create__XKBD(__INTEGER nb_elements__ZKBD);
static void** create__TIBD(__INTEGER nb_elements__VIBD);
static void** create__Z1BD(__INTEGER nb_elements__11BD);
static void** create__GJSE(__INTEGER nb_elements__IJSE);
static void** create__FSKE(__INTEGER nb_elements__HSKE);
static void* get__5KC(void *n__BLC);
static void** create__K2UE(__INTEGER nb_elements__M2UE);
static void** create__54KE(__INTEGER nb_elements__B5KE);
static void** create__CELE(__INTEGER nb_elements__EELE);
static void** create__XQUE(__INTEGER nb_elements__ZQUE);
static void** create__QP5C(__INTEGER nb_elements__SP5C);
static void** create__IWXC(__INTEGER nb_elements__KWXC);
static void** create__04XC(__INTEGER nb_elements__24XC);
static void** create__N0EH(__INTEGER nb_elements__P0EH);
static void** create__RLRK(__INTEGER nb_elements__TLRK);
static void** create__TORE(__INTEGER nb_elements__VORE);
static __FAST_ARRAYoLOCALo* create_with_capacity__NXBG(__INTEGER new_count__PXBG);
static __LINKED_LISToNODE_TYPEo* create__O00C();
static void** create__IUSB(__INTEGER nb_elements__KUSB);
static void** create__WXXI(__INTEGER nb_elements__YXXI);
static void** create__QYXI(__INTEGER nb_elements__SYXI);
static __FAST_ARRAYoLOCALo* create__NTOH(__INTEGER new_count__PTOH);
static __FAST_ARRAYoTYPEo* create_with_capacity__3ND(__INTEGER new_count__5ND);
static void** create__BZEH(__INTEGER nb_elements__DZEH);
static void** create__TCZK(__INTEGER nb_elements__VCZK);
static void append__MOK(__STRING *Self__NOK,void *other__OOK);
static void** create__AOEH(__INTEGER nb_elements__COEH);
static void** create__5CIE(__INTEGER nb_elements__BDIE);
static void** create__PGXJ(__INTEGER nb_elements__RGXJ);
static __FAST_ARRAYoSLOT_DATAo* create_with_capacity__TB4F(__INTEGER new_count__VB4F);
static void** create__KJR(__INTEGER nb_elements__MJR);
static void add__CRK(__HASHED_SEToABSTRACT_STRINGo *Self__DRK,void *e__ERK);
static void* operator_to_name__E1B(void *op__H1B);
static __BOOLEAN is_digit__EWEB(__CHARACTER Self__FWEB);
static void print__1ZE(__STRING_CONSTANT *Self__2ZE);
static __CHARACTER to_lower__OA1(__CHARACTER Self__PA1);
static void copy__BNK(__STRING *Self__CNK,void *other__DNK);
static __INTEGER last_index__L01(void *n__N01,__CHARACTER c__O01);
static void remove_last__RLLB(__STRING *Self__SLLB,__INTEGER n__TLLB);
static void* get__QEC(void *str__SEC);
static void to_upper__LWKB(__STRING *Self__MWKB);
static void replace_all__with__RZ1(__STRING *Self__SZ1,__CHARACTER old_char__TZ1,__CHARACTER new_char__UZ1);
static void remove_between__to__ZVCC(__STRING *Self__0VCC,__INTEGER start__1VCC,__INTEGER end__2VCC);
static void add_last__Z11(__LINKED_LISToSTRING_CONSTANTo *Self__011,void *element__111);
static void to_lower__LVK(__STRING *Self__MVK);
static __STRING_CONSTANT* clone__U1D();
static void** create__E1S(__INTEGER nb_elements__G1S);
static void put__to__4OL(__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *Self__5OL,void *v__APL,void *k__BPL);
static __CHARACTER* to_external__4YK(__STRING *Self__5YK);
static void put_string__2EG(void *s__4EG);
static __PROTOTYPE* create__name__generic_count__TBE(void *f__VBE,void *n__WBE,__INTEGER c__XBE);
static __BOOLEAN read_word__NWH(void *st__PWH);
static __BOOLEAN read_target__MWX();
static __POSITION current_position__EJG();
static void put_error__text__0AH(__INTEGER type__2AH,void *txt__3AH);
static void put_position__ECH(__POSITION Self__FCH);
static void send_error__2FH();
static __BOOLEAN read_character__EQ3(__CHARACTER ch__GQ3);
static __BOOLEAN read_identifier__OLEB();
static __BOOLEAN read_symbol__5OEB(void *st__BPEB);
static __BOOLEAN read_cap_identifier__Y45();
static __BOOLEAN read_path__1TGB();
static __BOOLEAN read_space__UAF();
static __CHARACTER last_character__0OF();
static void* at__3WM(__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *Self__4WM,void *k__5WM);
static void* item__EUU(__LINKED_LISToSTRING_CONSTANTo *Self__FUU,__INTEGER i__GUU);
static void title__in__NHB(void *txt__PHB,void *buf__QHB);
static void fast_put__to__SAL(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__TAL,void *v__UAL,void *k__VAL);
static __FAST_ARRAYoSLOTo* create_with_capacity__YID(__INTEGER new_count__0ID);
static __TYPE_FULL* create__with__VJD(void *typ__XJD,__UINTEGER_8 code__YJD);
static void** create__WD2(__INTEGER nb_elements__YD2);
static __TYPE_ID* create__WKD(__INTEGER i__YKD);
static void add_last__IDL(__FAST_ARRAYoTYPE_IDo *Self__JDL,void *element__KDL);
static void* to_run__XVK(__ITM_TYPE_SIMPLE *Self__YVK);
static void* to_run__MPXD();
static void* get__style__VLC(void *n__XLC,void *s__YLC);
static void* get__XUN(void *itm_typ__ZUN);
static void* new__JOC();
static void add_last__3VK(__FAST_ARRAYoITM_TYPE_MONOo *Self__4VK,void *element__5VK);
static void* alias__EPC(void *tmp__GPC);
static void* get__style__with__1PC(void *n__3PC,void *s__4PC,void *lt__5PC);
static void* to_run__W1IB(__ITM_TYPE_GENERIC *Self__X1IB);
static void* prototype__IMEJ();
static void* push_extern__profil__YGQC(__POSITION pos__0GQC,void *prof__1GQC);
static __EXTERNAL_C* create__text__access__persistant__type__2U0C(__POSITION p__4U0C,void *c__5U0C,void *ac__AV0C,__BOOLEAN per__BV0C,void *t__CV0C);
static void add_last__AL4G(__FAST_ARRAYoINSTRo *Self__BL4G,void *element__CL4G);
static __INTEGER argument_count__P0BG(__ITM_SLOT *Self__Q0BG);
static void* get_slot__U1BG(__TYPE *Self__V1BG,void *n__W1BG);
static void* get_slot__K3BG(__TYPE_NULL *Self__L3BG,void *n__M3BG);
static void* get_slot__A5BG(__TYPE_VOID *Self__B5BG,void *n__C5BG);
static void* get_slot__WACG(__TYPE_CONTEXT *Self__XACG,void *n__YACG);
static void* get_slot__MCCG(__TYPE_ID *Self__NCCG,void *n__OCCG);
static void* get_slot__CECG(__TYPE_GENERIC *Self__DECG,void *n__EECG);
static void* get_slot__VXEJ(void *n__XXEJ);
static __PROTOTYPE_CST* create__type__CLQC(__POSITION p__ELQC,void *t__FLQC);
static void* new_read__slot__receiver__self__YLQC(__POSITION p__0LQC,void *s__1LQC,void *rec__2LQC,void *my_self__3LQC);
static __INTEGER_CST* create__value__type__DNQC(__POSITION p__FNQC,__INTEGER_64 v__GNQC,void *t__HNQC);
static void pop_stack_until__DDAG(__INTEGER stack_top__FDAG);
static void remove_since__ERPG(__FAST_ARRAYoLOCALo *Self__FRPG,__INTEGER beg__GRPG);
static void put_string__EQD(void *s__GQD);
static void* item__00SE(__LINKED_LISToNODE_TYPEo *Self__10SE,__INTEGER i__20SE);
static __BOOLEAN update_case__XGAG(__NODE_TYPE *Self__YGAG);
static __BOOLEAN update_depth__QNAG(__NODE_TYPE *Self__RNAG,__BOOLEAN is_first__SNAG);
static void remove__50RG(__LINKED_LISToNODE_TYPEo *Self__A1RG,__INTEGER index__B1RG);
static void append_in__4VC(__INTEGER_32 Self__5VC,void *buffer__AWC);
static void display__Y10C();
static void* execute_link__LUOG(__LIST *Self__MUOG);
static void clean__2YUC();
static void execute__2LHM(__PROFIL_SLOT *Self__3LHM,__INTEGER inline_lev__4LHM);
static void execute__OREJ(__PROFIL_BLOCK *Self__PREJ,__INTEGER inline_lev__QREJ);
static void display__2QQG(__LIST *Self__3QQG,void *buffer__4QQG);
static void genere_handler__PYIM(__PROFIL_SLOT *Self__QYIM,void *buffer__RYIM);
static void genere_handler__NMEJ(__PROFIL_BLOCK *Self__OMEJ,void *buffer__PMEJ);
static void genere_extern__TQOG(__LIST *Self__UQOG,void *buffer__VQOG);
static void append_type__X0LM(__PROFIL_SLOT *Self__Y0LM,void *buffer__Z0LM);
static void append_type__LMJJ(__PROFIL_BLOCK *Self__MMJJ,void *buffer__NMJJ);
static void genere_struct__U22G(__TYPE *Self__V22G);
static void genere_struct__1P3G(__TYPE_GENERIC *Self__2P3G);
static void set_cache_user__C3BE(__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__D3BE,__INTEGER index__E3BE);
static void append_in__Z4H(__UINTEGER_32 Self__04H,void *buffer__14H);
static void print__stat__for__J0UC(void *msg__L0UC,__INTEGER n__M0UC,__INTEGER t__N0UC);
static void print__Y0CD(__INTEGER Self__Z0CD);
static __CHARACTER* create__5UX(__INTEGER nb_elements__BVX);
static void** create__ITEB(__INTEGER nb_elements__KTEB);
static void clear__to__SCNC(__CHARACTER *Self__TCNC,__INTEGER lower__UCNC,__INTEGER upper__VCNC);
static __POINTER new_lab__2PJ(__UINTEGER_32 t__4PJ);
static __POINTER alloc_dynamic__J0Y(__UINTEGER_32 sz__L0Y);
static __INTEGER hash_code__WPN(__STRING_CONSTANT *Self__XPN);
static void copy__to__size__GB4B(__POINTER src__IB4B,__POINTER dst__JB4B,__UINTEGER_32 sz__KB4B);
static void to_busy__index__OAMB(__MEMORY *Self__PAMB,__UINTEGER_32 sz__QAMB,__UINTEGER_32 idx__RAMB);
static __MEMORY* search__X3AB(__UINTEGER_32 new_size__Z3AB);
static void add_link_free__SDKB(__MEMORY *Self__TDKB);
static void delete_link_free__W0QB(__MEMORY *Self__X0QB);
static __FAST_ARRAYoLOCALo* clone__VYEG();
static void** create__OWWG(__INTEGER nb_elements__QWWG);
static void clear__to__TVEI(void **Self__UVEI,__INTEGER lower__VVEI,__INTEGER upper__WVEI);
static void** create__CVSB(__INTEGER nb_elements__EVSB);
static void copy__to__until__FCJB(__CHARACTER *Self__GCJB,__CHARACTER *src__HCJB,__INTEGER dest__ICJB,__INTEGER src_capacity__JCJB);
static void** create__R4JG(__INTEGER nb_elements__T4JG);
static __BOOLEAN has__URN(__HASHED_SEToABSTRACT_STRINGo *Self__VRN,void *e__WRN);
static __BOOLEAN __infix_equal_equal__TKW(__STRING_CONSTANT *Self__UKW,void *other__VKW);
static void increase_capacity__430(__HASHED_SEToABSTRACT_STRINGo *Self__530);
static __HASHED_SET_NODEoABSTRACT_STRINGo* create__next__RMU(void *i__TMU,void *n__UMU);
static void copy_from__until__YVX(__CHARACTER *Self__ZVX,__CHARACTER *model__0VX,__INTEGER upper__1VX);
static __STRING_CONSTANT* create_copy__I0E(void *other__K0E);
static void fast_add__GAM(__HASHED_SEToABSTRACT_STRINGo *Self__HAM,void *e__IAM);
static __LINKED_LIST_NODEoSTRING_CONSTANTo* create__next__PIDB(void *i__RIDB);
static void** create__3DTB(__INTEGER nb_elements__5DTB);
static __BOOLEAN is_lower__NKHB(__CHARACTER Self__OKHB);
static __INTEGER first_substring_index__GKVE(__STRING *Self__HKVE);
static __BOOLEAN is_upper__HXFB(__CHARACTER Self__IXFB);
static __BOOLEAN read_path_expr__TLHB();
static void** create__IRSB(__INTEGER nb_elements__KRSB);
static void* fast_reference_at__N5KB(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__O5KB,void *k__P5KB);
static void go_on__55AC(void *obj__BABC);
static void init_slot_for__1QMC(__PROTOTYPE *Self__2QMC,void *typ__3QMC);
static __HASHED_SEToTYPEo* create__1H1();
static void fast_add__OQKB(__HASHED_SEToTYPEo *Self__PQKB,void *e__QQKB);
static void add_subtype__BI1(__TYPE *Self__CI1,void *t__DI1);
static void* get_with__HSAB(__TYPE_FULL *Self__ISAB,__UINTEGER_8 flg__JSAB);
static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__L0F(__INTEGER new_count__N0F);
static void** create__LK1(__INTEGER nb_elements__NK1);
static __INTEGER hash_code__GQO(__FAST_ARRAYoITM_TYPE_MONOo *Self__HQO);
static __BOOLEAN fast_has__O5P(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__P5P,void *e__Q5P);
static void free__EMD(void *tmp__GMD);
static __FAST_ARRAYoTYPE_FULLo* create_with_capacity__B1HB(__INTEGER new_count__D1HB);
static void* to_run__DKEF(__ITM_TYPE_GENERIC_ELT *Self__EKEF);
static void add_last__KYMB(__FAST_ARRAYoTYPE_FULLo *Self__LYMB,void *element__MYMB);
static __INTEGER hash_code__ZKRC(__FAST_ARRAYoTYPE_FULLo *Self__0KRC);
static void** create__JG2B(__INTEGER nb_elements__LG2B);
static __BOOLEAN fast_has__2HSC(__HASHED_SEToFAST_ARRAYoTYPE_FULLoo *Self__3HSC,void *e__4HSC);
static void append_name_in__FBYD(__TYPE_FULL *Self__GBYD,void *buffer__HBYD);
static void add_subtype__O05B(__TYPE_GENERIC *Self__P05B,void *t__Q05B);
static __CONTEXT* clone__2RCD();
static void add_last__YUZD(__FAST_ARRAYoCONTEXTo *Self__ZUZD,void *element__0UZD);
static __LIST* create__QCAG(__POSITION p__SCAG);
static __LOCAL* create__name__style__type__25JG(__POSITION p__45JG,void *n__55JG,__CHARACTER c__AAKG,void *t__BAKG);
static __PUSH* create__context__first__20EG(__PUSH *Self__30EG,__POSITION pos__40EG,void *v__50EG,__BOOLEAN f__A1EG);
static void** create__2FEH();
static void* get_local_slot__H4EG(__TYPE *Self__I4EG,void *n__J4EG);
static void* id_section__UG4F(__SLOT_DATA *Self__VG4F);
static void* get_type_result__PG2G(__SLOT_DATA *Self__QG2G);
static void* get_type_result__ZH2G(__SLOT_CODE *Self__0H2G);
static void* get_slot__AP5G(__TYPE_FULL *Self__BP5G,void *n__CP5G);
static void* get_local_slot__1AFG(__TYPE_VOID *Self__2AFG,void *n__3AFG);
static void* get_local_slot__DDFG(__TYPE_CONTEXT *Self__EDFG,void *n__FDFG);
static void* get_local_slot__LFFG(__TYPE_ID *Self__MFFG,void *n__NFFG);
static void* get_local_slot__THFG(__TYPE_GENERIC *Self__UHFG,void *n__VHFG);
static void* to_strict__LE5D(__TYPE_FULL *Self__ME5D);
static void* static_type__GIQG(__LIST *Self__HIQG);
static void* static_type__0N1H(__EXPR_MULTIPLE *Self__1N1H);
static void* static_type__TO1H();
static void* static_type__YO1H();
static void* static_type__3O1H();
static void* static_type__CP1H();
static void* static_type__HP1H();
static void* static_type__MP1H(__EXPR_SUB *Self__NP1H);
static void* static_type__SP1H(__EXPR_MUL *Self__TP1H);
static void* static_type__XP1H(__EXPR_DIV *Self__YP1H);
static void* static_type__2P1H(__EXPR_AND *Self__3P1H);
static void* static_type__BQ1H(__EXPR_SHIFT_R *Self__CQ1H);
static void* static_type__GQ1H(__EXPR_SHIFT_L *Self__HQ1H);
static void* static_type__PQ1H(__ITEM *Self__QQ1H);
static void* static_type__1Q1H();
static void* static_type__GIKL(__CALL_SLOT *Self__HIKL);
static void* static_type__JRZM();
static void* static_type__VLEO();
static void* static_type__LVIO();
static void* static_type__0LEO();
static void* static_type__RVIO();
static void* static_type__Z2IM(__EXPR_NEG *Self__02IM);
static void* static_type__IXML(__EXPR_ADD *Self__JXML);
static void* static_type__BTXM(__EXPR_NOT *Self__CTXM);
static void* static_type__5LEO(__EXPR_MOD *Self__AMEO);
static void* static_type__W2DP();
static void* static_type__FQQN();
static void* static_type__KQQN();
static void* static_type__NOPN(__EXPR_OR *Self__OOPN);
static void* static_type__XCSO(__EXPR_XOR *Self__YCSO);
static void* get_expr_result__RUOG(__SLOT_DATA *Self__SUOG);
static void* get_expr_result__QXOG(__SLOT_CODE *Self__RXOG);
static void init__C4OG(__SLOT_DATA *Self__D4OG);
static __NODE_TYPE* create__with__GWUC(void *e__IWUC,void *d__JWUC);
static void add_last__I4YD(__LINKED_LISToNODE_TYPEo *Self__J4YD,void *element__K4YD);
static void check_type__RI5D(__INTEGER_CST *Self__SI5D);
static void* lookup__LLJM(__PROFIL_SLOT *Self__MLJM,void *n__NLJM);
static void go_item__QV4E(__LINKED_LISToNODE_TYPEo *Self__RV4E,__INTEGER i__SV4E);
static void* product__with__WMYG(__DTA_RD *Self__XMYG,void *t__YMYG,void *e__ZMYG);
static void* product__with__S01H(__DTA_CAST *Self__T01H,void *t__U01H,void *e__V01H);
static void* product__with__O31H(__DTA_WR_CODE *Self__P31H,void *t__Q31H,void *e__R31H);
static void* product__with__F41H(__DTA_BLOCK *Self__G41H,void *t__H41H,void *e__I41H);
static void* product__with__CC2H(__DTA_WR_VALUE *Self__DC2H,void *t__EC2H,void *e__FC2H);
static void* product__with__YC2H(__DTA_RD_ARGS *Self__ZC2H,void *t__0C2H,void *e__1C2H);
static __INTEGER count__PNYG(__NODE_TYPE *Self__QNYG);
static void* subtype_list__0NFJ();
static void* new__XWSG();
static void get_type__EYMJ(__LIST *Self__FYMJ,void *t__GYMJ);
static void add__R2EJ(__TYPES_TMP *Self__S2EJ,void *t__T2EJ);
static void get_type__ZHDI(__EXTERNAL_C *Self__0HDI,void *t__1HDI);
static void get_type__AOFJ(__READ_LOCAL *Self__BOFJ,void *t__COFJ);
static void get_type__ZJDI(__EXPR_SUB *Self__0JDI,void *t__1JDI);
static void get_type__3JDI(__EXPR_MUL *Self__4JDI,void *t__5JDI);
static void get_type__BKDI(__EXPR_DIV *Self__CKDI,void *t__DKDI);
static void get_type__FKDI(__EXPR_AND *Self__GKDI,void *t__HKDI);
static void get_type__JKDI(__EXPR_SHIFT_R *Self__KKDI,void *t__LKDI);
static void get_type__NKDI(__EXPR_SHIFT_L *Self__OKDI,void *t__PKDI);
static void get_type__UKDI(__ITEM *Self__VKDI,void *t__WKDI);
static void get_type__DAML(__CALL_SLOT *Self__EAML,void *t__FAML);
static void get_type__OD0K(__READ_SLOT *Self__PD0K,void *t__QD0K);
static void get_type__ZJOL(__SLOT_DATA *Self__0JOL,void *t__1JOL);
static void get_type__YEOL(__EXPR_ADD *Self__ZEOL,void *t__0EOL);
static void get_type__FSEO(__EXPR_MOD *Self__GSEO,void *t__HSEO);
static void get_type__CVPN(__EXPR_OR *Self__DVPN,void *t__EVPN);
static void get_type__FNTO(__EXPR_XOR *Self__GNTO,void *t__HNTO);
static __SWITCH* create__with__size__5JVH(void *n__BKVH,void *e__CKVH,__INTEGER s__DKVH);
static void add_stack_type__2JNG(__NODE_TYPE *Self__3JNG,void *t__4JNG);
static __CASE* create__with__NC1H(void *val__PC1H,void *c__QC1H);
static void add__to__IDGJ(__FAST_ARRAYoCASEo *Self__JDGJ,void *element__KDGJ,__INTEGER index__LDGJ);
static void free__OOFJ(__TYPES_TMP *Self__POFJ);
static __BOOLEAN update_branch__PLNG(void *l__RLNG);
static __BOOLEAN update_branch__AS1H(void *l__CS1H);
static __BOOLEAN update_branch__ET1H(void *l__GT1H);
static __BOOLEAN update_branch__TV1H(void *l__VV1H);
static void* execute_list__EOQG(__LIST *Self__FOQG);
static void remove__KPJJ(__LIST *Self__LPJJ);
static void remove_profil__3FAM(__SLOT_CODE *Self__4FAM,void *prof__5FAM);
static void* execute_unlink__0SRJ(__LIST *Self__1SRJ);
static void clear__TQJJ();
static void display__SUFK(__STRING_CST *Self__TUFK,void *buffer__UUFK);
static void display__2UFK(__EXTERNAL_C *Self__3UFK,void *buffer__4UFK);
static void display__BXFK(__PROTOTYPE_CST *Self__CXFK,void *buffer__DXFK);
static void display__FXFK(__INTEGER_CST *Self__GXFK,void *buffer__HXFK);
static void display__5VTK(__SWITCH *Self__AWTK,void *buffer__BWTK);
static void display__KXFK(__NODE_TYPE *Self__LXFK,void *buffer__MXFK);
static void display__MYFK(__READ_LOCAL *Self__NYFK,void *buffer__OYFK);
static void display__UYFK(__EXPR_MULTIPLE *Self__VYFK,void *buffer__WYFK);
static void display__IZFK(__NODE_STYLE *Self__JZFK,void *buffer__KZFK);
static void display__E1FK(__EXPR_EQUAL *Self__F1FK,void *buffer__G1FK);
static void display__M1FK(__EXPR_NOT_EQUAL *Self__N1FK,void *buffer__O1FK);
static void display__U1FK(__REAL_CST *Self__V1FK,void *buffer__W1FK);
static void display__Z1FK(__CHARACTER_CST *Self__01FK,void *buffer__11FK);
static void display__B2FK(__GET_TYPE_ID *Self__C2FK,void *buffer__D2FK);
static void display__F2FK(__EXPR_SUP *Self__G2FK,void *buffer__H2FK);
static void display__N2FK(__EXPR_SUB *Self__O2FK,void *buffer__P2FK);
static void display__T2FK(__EXPR_MUL *Self__U2FK,void *buffer__V2FK);
static void display__Z2FK(__EXPR_DIV *Self__02FK,void *buffer__12FK);
static void display__52FK(__EXPR_AND *Self__A3FK,void *buffer__B3FK);
static void display__F3FK(__EXPR_SHIFT_R *Self__G3FK,void *buffer__H3FK);
static void display__L3FK(__EXPR_SHIFT_L *Self__M3FK,void *buffer__N3FK);
static void display__R3FK(__PUT_TO *Self__S3FK,void *buffer__T3FK);
static void display__X3FK(__ITEM *Self__Y3FK,void *buffer__Z3FK);
static void display__23FK(__SIZE_OF *Self__33FK,void *buffer__43FK);
static void display__A4FK(__CAST *Self__B4FK,void *buffer__C4FK);
static void display__VNKL(__CALL_SLOT *Self__WNKL,void *buffer__XNKL);
static void display__N1ZK(__READ_SLOT *Self__O1ZK,void *buffer__P1ZK);
static void display__S1ZK(__READ_GLOBAL *Self__T1ZK,void *buffer__U1ZK);
static void display__2PZM(__EXPR_NOT_LOGIC *Self__3PZM,void *buffer__4PZM);
static void display__NZEO(__EXPR_OR_LOGIC *Self__OZEO,void *buffer__PZEO);
static void display__F4KO(__EXPR_OR_OR_LOGIC *Self__G4KO,void *buffer__H4KO);
static void display__TZEO(__EXPR_AND_LOGIC *Self__UZEO,void *buffer__VZEO);
static void display__M4KO(__EXPR_AND_AND_LOGIC *Self__N4KO,void *buffer__O4KO);
static void display__VXJM(__EXPR_NEG *Self__WXJM,void *buffer__XXJM);
static void display__52ML(__EXPR_ADD *Self__A3ML,void *buffer__B3ML);
static void display__LKZM(__EXPR_NOT *Self__MKZM,void *buffer__NKZM);
static void display__ZZEO(__EXPR_MOD *Self__0ZEO,void *buffer__1ZEO);
static void display__VHEP(__EXPR_SUP_EQ *Self__WHEP,void *buffer__XHEP);
static void display__ZNQN(__EXPR_INF *Self__0NQN,void *buffer__1NQN);
static void display__COQN(__EXPR_INF_EQ *Self__DOQN,void *buffer__EOQN);
static void display__R5PN(__EXPR_OR *Self__S5PN,void *buffer__T5PN);
static void display__SHUO(__EXPR_XOR *Self__THUO,void *buffer__UHUO);
static void genere_declaration__Q2NI(__TYPE_FULL *Self__R2NI,void *buffer__S2NI);
static void genere_star_declaration__Q3NI(__TYPE_FULL *Self__R3NI,void *buffer__S3NI);
static void genere__result__in__ESWM(void *v__GSWM,__BOOLEAN is_res__HSWM,void *buffer__ISWM);
static void genere__result__in__IQBK(void *v__KQBK,__BOOLEAN is_res__LQBK,void *buffer__MQBK);
static void genere__SFEK(__LIST *Self__TFEK,void *buffer__UFEK);
static void genere__EGEK(__STRING_CST *Self__FGEK,void *buffer__GGEK);
static void genere__JNFK(__PUSH *Self__KNFK,void *buffer__LNFK);
static void genere__OJEK(__EXTERNAL_C *Self__PJEK,void *buffer__QJEK);
static void genere__AMEK(__PROTOTYPE_CST *Self__BMEK,void *buffer__CMEK);
static void genere__EMEK(__INTEGER_CST *Self__FMEK,void *buffer__GMEK);
static void genere__T3IM(__SWITCH *Self__U3IM,void *buffer__V3IM);
static void genere__FNEK(__READ_LOCAL *Self__GNEK,void *buffer__HNEK);
static void genere__GPFK(__WRITE_GLOBAL *Self__HPFK,void *buffer__IPFK);
static void genere__IQFK(__WRITE_SLOT *Self__JQFK,void *buffer__KQFK);
static void genere__HOEK(__EXPR_EQUAL *Self__IOEK,void *buffer__JOEK);
static void genere__WSEK(__EXPR_NOT_EQUAL *Self__XSEK,void *buffer__YSEK);
static void genere__QXEK(__GET_TYPE_ID *Self__RXEK,void *buffer__SXEK);
static void genere__KYEK(__EXPR_SUP *Self__LYEK,void *buffer__MYEK);
static void genere__Z2EK(__EXPR_SUB *Self__02EK,void *buffer__12EK);
static void genere__D5EK(__EXPR_MUL *Self__E5EK,void *buffer__F5EK);
static void genere__NBFK(__EXPR_DIV *Self__OBFK,void *buffer__PBFK);
static void genere__XDFK(__EXPR_AND *Self__YDFK,void *buffer__ZDFK);
static void genere__BGFK(__EXPR_SHIFT_R *Self__CGFK,void *buffer__DGFK);
static void genere__LIFK(__EXPR_SHIFT_L *Self__MIFK,void *buffer__NIFK);
static void genere__VKFK(__PUT_TO *Self__WKFK,void *buffer__XKFK);
static void genere__KMFK(__ITEM *Self__LMFK,void *buffer__MMFK);
static void genere__PMFK(__SIZE_OF *Self__QMFK,void *buffer__RMFK);
static void genere__WMFK(__CAST *Self__XMFK,void *buffer__YMFK);
static void genere__MJKL(__CALL_SLOT *Self__NJKL,void *buffer__OJKL);
static void genere__NUNL(__READ_SLOT *Self__OUNL,void *buffer__PUNL);
static void genere__ZSFK(__WRITE_LOCAL *Self__0SFK,void *buffer__1SFK);
static void genere__GZ0M(__EXPR_NOT_LOGIC *Self__HZ0M,void *buffer__IZ0M);
static void genere__WTXM(__LOOP *Self__XTXM,void *buffer__YTXM);
static void genere__XVEO(__EXPR_OR_LOGIC *Self__YVEO,void *buffer__ZVEO);
static void genere__J2KO(__EXPR_OR_OR_LOGIC *Self__K2KO,void *buffer__L2KO);
static void genere__4VEO(__EXPR_AND_LOGIC *Self__5VEO,void *buffer__AWEO);
static void genere__R2KO(__EXPR_AND_AND_LOGIC *Self__S2KO,void *buffer__T2KO);
static void genere__CXJM(__EXPR_NEG *Self__DXJM,void *buffer__EXJM);
static void genere__VYML(__EXPR_ADD *Self__WYML,void *buffer__XYML);
static void genere__4JZM(__EXPR_NOT *Self__5JZM,void *buffer__AKZM);
static void genere__FWEO(__EXPR_MOD *Self__GWEO,void *buffer__HWEO);
static void genere__PCEP(__EXPR_SUP_EQ *Self__QCEP,void *buffer__RCEP);
static void genere__LNRN(__EXPR_INF *Self__MNRN,void *buffer__NNRN);
static void genere__ZRRN(__EXPR_INF_EQ *Self__0RRN,void *buffer__1RRN);
static void genere__W0PN(__EXPR_OR *Self__X0PN,void *buffer__Y0PN);
static void genere__YAUO(__EXPR_XOR *Self__ZAUO,void *buffer__0AUO);
static __BOOLEAN is_expanded_c__0ZWG(__TYPE_FULL *Self__1ZWG);
static void add_local__in__LJQG(void *tab__NJQG,void *buf__OJQG);
static void insert_string__to__KMQG(__STRING *Self__LMQG,void *s__MMQG,__INTEGER i__NMQG);
static void display_type__3QBK(__LOCAL *Self__4QBK,void *buffer__5QBK);
static __INTEGER lower_style__DSPH(__SLOT_DATA *Self__ESPH);
static __INTEGER lower_style__PSPH(__SLOT_CODE *Self__QSPH);
static void add_slot_struct__TURI(__TYPE *Self__UURI,void *s__VURI);
static void genere__KRFI(__SLOT_DATA *Self__LRFI,void *buffer__MRFI);
static void* slot_data__Z4TH(__SLOT_DATA *Self__04TH);
static void* slot_data__T5TH(__SLOT_CODE *Self__U5TH);
static void force__to__IDDH(__FAST_ARRAYoSLOTo *Self__JDDH);
static void add_slot_struct__XWRI(__TYPE_GENERIC *Self__YWRI,void *s__ZWRI);
static void print_positif__HQSE(__INTEGER Self__IQSE);
static __MEMORY* new_page__2IU();
static __BOOLEAN fast_has__RKP(__HASHED_SEToABSTRACT_STRINGo *Self__SKP,void *e__TKP);
static __BOOLEAN read_string__BLIB();
static __BOOLEAN read_slot_header__R1CC(__BOOLEAN first__T1CC);
static void* get_name__DEJD(void *n__FEJD);
static void* read_type_list__BWAD(__PARSER *Self__CWAD,__BOOLEAN is_section__DWAD);
static __SECTION_* clone__QXPD();
static __CHARACTER read_style__GDEC();
static void* new__Q0PD();
static void* read_local_arg__with_self__5PSD(__PARSER *Self__AQSD,__BOOLEAN m__BQSD,__BOOLEAN s__CQSD);
static __ITM_ARG* create__name__type__AWSD(__POSITION p__CWSD,void *n__DWSD,void *t__EWSD);
static void add_last__S31D(__FAST_ARRAYoITM_ARGUMENTo *Self__T31D,void *element__U31D);
static void* new__5ALC();
static void* read_loc_arg__EDCD(__PARSER *Self__FDCD,__BOOLEAN mute__GDCD);
static __ITM_SLOT* create__name__feature__WVTD(__POSITION p__YVTD,void *n__ZVTD,void *sec__0VTD);
static __BOOLEAN read_operator__2IHC();
static __BOOLEAN read_integer__4MKC();
static void* operator_to_name__2YHC(void *typ__4YHC,void *op__5YHC);
static void* copy__FDQD(void *tmp__HDQD);
static void set_argument_list__QA2D(__ITM_SLOT *Self__RA2D,void *p__SA2D);
static __BOOLEAN read_affect__IWZC();
static void* get__XYVD(void *lt__ZYVD);
static void* read_type__YKLC(__PARSER *Self__ZKLC,__BOOLEAN is_local__0KLC);
static void set_type__GC2D(__ITM_SLOT *Self__HC2D,void *t__IC2D);
static void* read_contract__WEEC();
static void* read_expr__NTFC(__PARSER *Self__OTFC);
static void* fast_reference_at__UEQD(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__VEQD,void *k__WEQD);
static void add_slot__3GQD(__PROTOTYPE *Self__4GQD,void *s__5GQD);
static void* create__type__ZU2F(void *s__1U2F,void *t__2U2F);
static void add_last__BV2F(__FAST_ARRAYoSLOTo *Self__CV2F,void *element__DV2F);
static void** create__4NVB(__INTEGER nb_elements__AOVB);
static __BOOLEAN fast_has__DCLB(__HASHED_SEToTYPEo *Self__ECLB,void *e__FCLB);
static void add_subtype__WT3D(__TYPE_NULL *Self__XT3D,void *t__YT3D);
static void add_subtype__S43D(__TYPE_VOID *Self__T43D,void *t__U43D);
static void add_subtype__OJ4D(__TYPE_CONTEXT *Self__PJ4D,void *t__QJ4D);
static void add_subtype__XIHH(__TYPE_ID *Self__YIHH,void *t__ZIHH);
static void add_subtype__WNFJ(void *t__YNFJ);
static void* prototype__NQRF(__TYPE_FULL *Self__OQRF);
static __INTEGER hash_code__T20D(__TYPE_FULL *Self__U20D);
static void* get_intern__3MBG(void *str__5MBG);
static void* to_types__A4EJ(__TYPES_TMP *Self__B4EJ);
static void* receiver_type__R12G(__SLOT_DATA *Self__S12G);
static void* last_expr__URRG(__LIST *Self__VRRG);
static __BOOLEAN is_interrupt__2MQL(__CALL_SLOT *Self__3MQL);
static void* get_temporary_expr__RCUG(__TYPE_FULL *Self__SCUG,__POSITION p__TCUG);
static __FAST_ARRAYoEXPRo* create_with_capacity__3THH(__INTEGER new_count__5THH);
static void add_last__XSEI(__FAST_ARRAYoEXPRo *Self__YSEI,void *element__ZSEI);
static __EXPR_MULTIPLE* create__SUHH(void *l__UUHH);
static void add_last__T2FH(__FAST_ARRAYoLOCALo *Self__U2FH,void *element__V2FH);
static void* write__value__T5FH(__LOCAL *Self__U5FH,__POSITION p__V5FH,void *val__W5FH);
static void* default_value__U1IH(__TYPE_FULL *Self__V1IH,__POSITION p__W1IH);
static void* to_run_expr__D3IH(__ITM_LIST *Self__E3IH);
static void* to_run_expr__M3IH(__ITM_PROTOTYPE *Self__N3IH);
static void* to_run_expr__UAJH(__ITM_WRITE_VALUE *Self__VAJH);
static void* to_run_expr__WDJH(__ITM_WRITE_CAST *Self__XDJH);
static void* to_run_expr__JGJH(__ITM_READ *Self__KGJH);
static void* to_run_expr__MHJH(__ITM_WRITE_CODE *Self__NHJH);
static void* to_run_expr__3IJH(__ITM_READ_ARG2 *Self__4IJH);
static void* to_run_expr__RMJH(__ITM_BINARY *Self__SMJH);
static void* to_run_expr__0XJH(__ITM_READ_ARG1 *Self__1XJH);
static void* to_run_expr__5XJH(__ITM_OLD *Self__AYJH);
static void* to_run_expr__U1JH(__ITM_EXTERNAL_TYPE *Self__V1JH);
static void* to_run_expr__J3JH(__ITM_REAL *Self__K3JH);
static void* to_run_expr__T3JH(__ITM_NUMBER *Self__U3JH);
static __CHARACTER_CST* create__char__WTMH(__POSITION p__YTMH,void *car__ZTMH);
static __STRING_CST* create__text__AUMH(__POSITION p__CUMH,void *n__DUMH);
static void* to_run_expr__J4JH(__ITM_EXTERNAL *Self__K4JH);
static void* to_run_expr__TIKH(__ITM_READ_ARGS *Self__UIKH);
static void* check_type__with__T5CN(__LIST *Self__U5CN,void *t__V5CN,__POSITION p__W5CN);
static void* check_type__with__Q22H(__STRING_CST *Self__R22H,void *t__S22H,__POSITION p__T22H);
static void* check_type__with__PF3H(__EXTERNAL_C *Self__QF3H,void *t__RF3H,__POSITION p__SF3H);
static void* check_type__with__OO3H(__PROTOTYPE_CST *Self__PO3H,void *t__QO3H,__POSITION p__RO3H);
static void* check_type__with__NX3H(__INTEGER_CST *Self__OX3H,void *t__PX3H,__POSITION p__QX3H);
static void* check_type__with__LEFJ(__READ_LOCAL *Self__MEFJ,void *t__NEFJ,__POSITION p__OEFJ);
static void* check_type__with__LA4H(__EXPR_MULTIPLE *Self__MA4H,void *t__NA4H,__POSITION p__OA4H);
static void* check_type__with__KJ4H(__EXPR_EQUAL *Self__LJ4H,void *t__MJ4H,__POSITION p__NJ4H);
static void* check_type__with__JS4H(__EXPR_NOT_EQUAL *Self__KS4H,void *t__LS4H,__POSITION p__MS4H);
static void* check_type__with__I14H(__REAL_CST *Self__J14H,void *t__K14H,__POSITION p__L14H);
static void* check_type__with__HE5H(__CHARACTER_CST *Self__IE5H,void *t__JE5H,__POSITION p__KE5H);
static void* check_type__with__FN5H(__IS_EXPANDED *Self__GN5H,void *t__HN5H,__POSITION p__IN5H);
static void* check_type__with__DW5H(__GET_TYPE_ID *Self__EW5H,void *t__FW5H,__POSITION p__GW5H);
static void* check_type__with__C55H(__EXPR_SUP *Self__D55H,void *t__E55H,__POSITION p__F55H);
static void* check_type__with__BIAI(__EXPR_SUB *Self__CIAI,void *t__DIAI,__POSITION p__EIAI);
static void* check_type__with__ARAI(__EXPR_MUL *Self__BRAI,void *t__CRAI,__POSITION p__DRAI);
static void* check_type__with__5ZAI(__EXPR_DIV *Self__A0AI,void *t__B0AI,__POSITION p__C0AI);
static void* check_type__with__4CBI(__EXPR_AND *Self__5CBI,void *t__ADBI,__POSITION p__BDBI);
static void* check_type__with__3LBI(__EXPR_SHIFT_R *Self__4LBI,void *t__5LBI,__POSITION p__AMBI);
static void* check_type__with__2UBI(__EXPR_SHIFT_L *Self__3UBI,void *t__4UBI,__POSITION p__5UBI);
static void* check_type__with__03BI(__PUT_TO *Self__13BI,void *t__23BI,__POSITION p__33BI);
static void* check_type__with__YGCI(__ITEM *Self__ZGCI,void *t__0GCI,__POSITION p__1GCI);
static void* check_type__with__WPCI(__SIZE_OF *Self__XPCI,void *t__YPCI,__POSITION p__ZPCI);
static void* check_type__with__UYCI(__CAST *Self__VYCI,void *t__WYCI,__POSITION p__XYCI);
static void* check_type__with__RIDN(__CALL_SLOT *Self__SIDN,void *t__TIDN,__POSITION p__UIDN);
static void* check_type__with__VPKL(__READ_SLOT *Self__WPKL,void *t__XPKL,__POSITION p__YPKL);
static void* check_type__with__UYKL(__READ_GLOBAL *Self__VYKL,void *t__WYKL,__POSITION p__XYKL);
static void* check_type__with__IW2O(__EXPR_NOT_LOGIC *Self__JW2O,void *t__KW2O,__POSITION p__LW2O);
static void* check_type__with__AYIO(__EXPR_OR_LOGIC *Self__BYIO,void *t__CYIO,__POSITION p__DYIO);
static void* check_type__with__IFSO(__EXPR_OR_OR_LOGIC *Self__JFSO,void *t__KFSO,__POSITION p__LFSO);
static void* check_type__with__5AJO(__EXPR_AND_LOGIC *Self__ABJO,void *t__BBJO,__POSITION p__CBJO);
static void* check_type__with__IOSO(__EXPR_AND_AND_LOGIC *Self__JOSO,void *t__KOSO,__POSITION p__LOSO);
static void* check_type__with__SVXM(__EXPR_NEG *Self__TVXM,void *t__UVXM,__POSITION p__VVXM);
static void* check_type__with__R4XM(__EXPR_ADD *Self__S4XM,void *t__T4XM,__POSITION p__U4XM);
static void* check_type__with__QRDN(__EXPR_NOT *Self__RRDN,void *t__SRDN,__POSITION p__TRDN);
static void* check_type__with__4JJO(__EXPR_MOD *Self__5JJO,void *t__AKJO,__POSITION p__BKJO);
static void* check_type__with__SQIP(__EXPR_SUP_EQ *Self__TQIP,void *t__UQIP,__POSITION p__VQIP);
static void* check_type__with__H52O(__EXPR_INF *Self__I52O,void *t__J52O,__POSITION p__K52O);
static void* check_type__with__GI3O(__EXPR_INF_EQ *Self__HI3O,void *t__II3O,__POSITION p__JI3O);
static void* check_type__with__MZZN(__EXPR_OR *Self__NZZN,void *t__OZZN,__POSITION p__PZZN);
static void* check_type__with__FR3O(__EXPR_XOR *Self__GR3O,void *t__HR3O,__POSITION p__IR3O);
static void* write_direct__with__value__05DH(__SLOT_DATA *Self__15DH,__POSITION p__25DH,void *r__35DH,void *val__45DH);
static __LINKED_LIST_NODEoNODE_TYPEo* create__next__OAQE(void *i__QAQE);
static void append_in__PZWE(__INTEGER_64 Self__QZWE,void *buffer__RZWE);
static void product_error__for__in__with__2L0G(__POSITION p__4L0G,void *res__5L0G,void *lst__AM0G,void *prof__BM0G);
static void* get_local_slot__05EJ(void *n__25EJ);
static void* get_path_slot__JK1G(__TYPE *Self__KK1G,void *n__LK1G);
static void* get_path_slot__CM1G(__TYPE_VOID *Self__DM1G,void *n__EM1G);
static void* get_path_slot__XN1G(__TYPE_CONTEXT *Self__YN1G,void *n__ZN1G);
static void* get_path_slot__MP1G(__TYPE_ID *Self__NP1G,void *n__OP1G);
static void* get_path_slot__BR1G(__TYPE_GENERIC *Self__CR1G,void *n__DR1G);
static void* get_path_slot__HAFJ(void *n__JAFJ);
static __LIST* my_copy__2HYM(__LIST *Self__3HYM);
static __EXTERNAL_C* my_copy__2K2H(__EXTERNAL_C *Self__3K2H);
static __READ_LOCAL* my_copy__OAFJ(__READ_LOCAL *Self__PAFJ);
static __EXPR_MULTIPLE* my_copy__KM2H(__EXPR_MULTIPLE *Self__LM2H);
static __EXPR_EQUAL* my_copy__DN2H(__EXPR_EQUAL *Self__EN2H);
static __EXPR_NOT_EQUAL* my_copy__QN2H(__EXPR_NOT_EQUAL *Self__RN2H);
static __REAL_CST* create__value__type__1SMH(__POSITION p__3SMH,void *v__4SMH,void *t__5SMH);
static __IS_EXPANDED* create__receiver__WRWH(__POSITION p__YRWH,void *e__ZRWH);
static __GET_TYPE_ID* my_copy__TO2H(__GET_TYPE_ID *Self__UO2H);
static __EXPR_SUP* my_copy__2O2H(__EXPR_SUP *Self__3O2H);
static __EXPR_SUB* my_copy__HP2H(__EXPR_SUB *Self__IP2H);
static __EXPR_MUL* my_copy__TP2H(__EXPR_MUL *Self__UP2H);
static __EXPR_DIV* my_copy__4P2H(__EXPR_DIV *Self__5P2H);
static __EXPR_AND* my_copy__JQ2H(__EXPR_AND *Self__KQ2H);
static __EXPR_SHIFT_R* my_copy__UQ2H(__EXPR_SHIFT_R *Self__VQ2H);
static __EXPR_SHIFT_L* my_copy__5Q2H(__EXPR_SHIFT_L *Self__AR2H);
static __PUT_TO* my_copy__KR2H(__PUT_TO *Self__LR2H);
static __ITEM* my_copy__1R2H(__ITEM *Self__2R2H);
static __SIZE_OF* my_copy__HS2H(__SIZE_OF *Self__IS2H);
static __CAST* my_copy__QS2H(__CAST *Self__RS2H);
static __CALL_SLOT* my_copy__PIYM(__CALL_SLOT *Self__QIYM);
static __READ_SLOT* my_copy__AVGK(__READ_SLOT *Self__BVGK);
static __READ_GLOBAL* my_copy__NVGK(__READ_GLOBAL *Self__OVGK);
static __EXPR_NOT_LOGIC* my_copy__RFCN(__EXPR_NOT_LOGIC *Self__SFCN);
static __EXPR_OR_LOGIC* my_copy__JMEO(__EXPR_OR_LOGIC *Self__KMEO);
static __EXPR_OR_OR_LOGIC* my_copy__RTJO(__EXPR_OR_OR_LOGIC *Self__STJO);
static __EXPR_AND_LOGIC* my_copy__WMEO(__EXPR_AND_LOGIC *Self__XMEO);
static __EXPR_AND_AND_LOGIC* my_copy__3TJO(__EXPR_AND_AND_LOGIC *Self__4TJO);
static __EXPR_NEG* my_copy__YEJM(__EXPR_NEG *Self__ZEJM);
static __EXPR_ADD* my_copy__YRLL(__EXPR_ADD *Self__ZRLL);
static __EXPR_NOT* my_copy__GLYM(__EXPR_NOT *Self__HLYM);
static __EXPR_MOD* my_copy__BNEO(__EXPR_MOD *Self__CNEO);
static __EXPR_SUP_EQ* my_copy__M3DP(__EXPR_SUP_EQ *Self__N3DP);
static __EXPR_INF* my_copy__PBSN(__EXPR_INF *Self__QBSN);
static __EXPR_INF_EQ* my_copy__0BSN(__EXPR_INF_EQ *Self__1BSN);
static __EXPR_OR* my_copy__ZOPN(__EXPR_OR *Self__0OPN);
static __EXPR_XOR* my_copy__CYSO(__EXPR_XOR *Self__DYSO);
static __NODE_STYLE* create__with__result__2S1G(void *e__4S1G,void *sl__5S1G,void *dta__AT1G,void *r__BT1G);
static void is_equal_profil__PL5G(__ITM_SLOT *Self__QL5G,void *other__RL5G);
static __CAST* create__value__S1WH(__CAST *Self__T1WH,void *t__U1WH,void *v__V1WH);
static __BOOLEAN is_sub_type__5I3I(__TYPE *Self__AJ3I,void *other__BJ3I);
static __BOOLEAN is_sub_type__CK3I(__TYPE_CONTEXT *Self__DK3I,void *other__EK3I);
static __BOOLEAN is_sub_type__3K3I(void *other__5K3I);
static __BOOLEAN is_sub_type__DL3I(__TYPE_GENERIC *Self__EL3I,void *other__FL3I);
static __BOOLEAN __infix_equal_equal__GSFJ(__PROFIL_BLOCK *Self__HSFJ,void *other__ISFJ);
static void* create__with__YJ3F(void *base__0J3F,void *val__1J3F);
static void* get_index__B3ZH(__INTEGER idx__D3ZH);
static __SLOT_DATA* clone__K53F();
static void make__name__style__base__type__P25F(__SLOT_DATA *Self__Q25F,__POSITION pos__R25F,void *n__S25F,__CHARACTER s__T25F,void *b__U25F,void *t__V25F);
static __FAST_ARRAYoSLOT_CODEo* create_with_capacity__HV4J();
static void add_last__QPIK(__FAST_ARRAYoSLOT_CODEo *Self__RPIK,void *element__SPIK);
static void* get_argument__T0TI(__DTA_BLOCK *Self__U0TI);
static void* read__with__FYKJ(__SLOT_DATA *Self__GYKJ,void *r__IYKJ);
static __FAST_ARRAYoWRITEo* create_with_capacity__UIPH(__INTEGER new_count__WIPH);
static void add_last__JPDI(__FAST_ARRAYoWRITEo *Self__KPDI,void *element__LPDI);
static void remove__UUAK(__EXTERNAL_C *Self__VUAK);
static void unread__YVJK(__LOCAL *Self__ZVJK,void *e__0VJK);
static void remove__TVAK(__EXPR_MULTIPLE *Self__UVAK);
static void remove__DWAK(__EXPR_EQUAL *Self__EWAK);
static void remove__HWAK(__EXPR_NOT_EQUAL *Self__IWAK);
static void remove__SWAK(__GET_TYPE_ID *Self__TWAK);
static void remove__VWAK(__EXPR_SUP *Self__WWAK);
static void remove__ZWAK(__EXPR_SUB *Self__0WAK);
static void remove__3WAK(__EXPR_MUL *Self__4WAK);
static void remove__BXAK(__EXPR_DIV *Self__CXAK);
static void remove__FXAK(__EXPR_AND *Self__GXAK);
static void remove__JXAK(__EXPR_SHIFT_R *Self__KXAK);
static void remove__NXAK(__EXPR_SHIFT_L *Self__OXAK);
static void remove__RXAK(__PUT_TO *Self__SXAK);
static void remove__SYAK(__ITEM *Self__TYAK);
static void remove__WYAK(__SIZE_OF *Self__XYAK);
static void remove__ZYAK(__CAST *Self__0YAK);
static void remove__2NML(__CALL_SLOT *Self__3NML);
static void remove__4GHK(__READ_SLOT *Self__5GHK);
static void unread__15ML(__SLOT_DATA *Self__25ML,void *e__35ML);
static void remove__GWZM(__EXPR_NOT_LOGIC *Self__HWZM);
static void remove__WPEO(__EXPR_OR_LOGIC *Self__XPEO);
static void remove__WMKO(__EXPR_OR_OR_LOGIC *Self__XMKO);
static void remove__0PEO(__EXPR_AND_LOGIC *Self__1PEO);
static void remove__1MKO(__EXPR_AND_AND_LOGIC *Self__2MKO);
static void remove__3KJM(__EXPR_NEG *Self__4KJM);
static void remove__QQML(__EXPR_ADD *Self__RQML);
static void remove__D5YM(__EXPR_NOT *Self__E5YM);
static void remove__4PEO(__EXPR_MOD *Self__5PEO);
static void remove__X5DP(__EXPR_SUP_EQ *Self__Y5DP);
static void remove__KZQN(__EXPR_INF *Self__LZQN);
static void remove__OZQN(__EXPR_INF_EQ *Self__PZQN);
static void remove__LUPN(__EXPR_OR *Self__MUPN);
static void remove__AQTO(__EXPR_XOR *Self__BQTO);
static __CALL_SLOT* create__profil__with__W4TI(__POSITION p__Y4TI,void *prof__Z4TI,void *l_arg__04TI);
static void* read__IC5G(__LOCAL *Self__JC5G);
static void* new_write__rec__value__UKBJ(void *sd__WKBJ,void *e__XKBJ,void *val__YKBJ);
static void add_write_id__in__REBJ(void *e__TEBJ,void *s__UEBJ,void *lst__VEBJ);
static void add_last__TWRJ(__TYPES_TMP *Self__UWRJ,void *t__VWRJ);
static __INTEGER search__from__to__NXRJ(__TYPES_TMP *Self__OXRJ,void *t__PXRJ,__INTEGER beg__QXRJ,__INTEGER end__RXRJ);
static void add__to__BLYK(__TYPES_TMP *Self__CLYK,void *t__DLYK,__INTEGER index__ELYK);
static void union__IKHJ(__TYPES_TMP *Self__JKHJ,void *other__KKHJ);
static void get_type__44GL(__WRITE_GLOBAL *Self__54GL,void *t__A5GL);
static void get_type__K5GL(__WRITE_SLOT *Self__L5GL,void *t__M5GL);
static void get_type__W5GL(__WRITE_LOCAL *Self__X5GL,void *t__Y5GL);
static void* update__JYMJ(__TYPES_TMP *Self__KYMJ,void *t__LYMJ);
static void* source__Q53L(__CALL_SLOT *Self__R53L);
static __SWITCH* clone__CBXH(__SWITCH *Self__DBXH);
static __POSITION position__V54J(__NODE_STYLE *Self__W54J);
static __FAST_ARRAYoCASEo* create_with_capacity__RZNI(__INTEGER new_count__TZNI);
static void add_last__VPHJ(__FAST_ARRAYoCASEo *Self__WPHJ,void *element__XPHJ);
static void add_last__YAQG(__FAST_ARRAYoTYPEo *Self__ZAQG,void *element__0AQG);
static __BOOLEAN update_link__WYEJ(__NODE_STYLE *Self__XYEJ);
static void execute_case__0WRG(__LIST *Self__1WRG);
static void add__to__1H5G(__FAST_ARRAYoINSTRo *Self__2H5G,void *element__3H5G,__INTEGER index__4H5G);
static void remove__OZYK(__SWITCH *Self__PZYK);
static void remove__C5LK(__DTA_BLOCK *Self__D5LK);
static void remove__15LK(__DTA_WR_VALUE *Self__25LK);
static void remove__HAMK(__DTA_RD_ARGS *Self__IAMK);
static void remove__S5IK(__WRITE_GLOBAL *Self__T5IK);
static void remove__W5IK(__WRITE_SLOT *Self__X5IK);
static void remove__25IK(__WRITE_LOCAL *Self__35IK);
static void display__5S2K(__DTA_WR_CODE *Self__AT2K,void *buffer__BT2K);
static void display__IT2K(__DTA_WR_VALUE *Self__JT2K,void *buffer__KT2K);
static void display__OT2K(__DTA_RD_ARGS *Self__PT2K,void *buffer__QT2K);
static void* result_expr__PVDI(__NODE_TYPE *Self__QVDI);
static void add_genere_list__MK5I(__TYPE *Self__NK5I);
static void add_genere_list__ZL5I(__TYPE_NULL *Self__0L5I);
static void add_genere_list__GN5I(__TYPE_VOID *Self__HN5I);
static void add_genere_list__TO5I(__TYPE_CONTEXT *Self__UO5I);
static void add_genere_list__BQ5I(__TYPE_GENERIC *Self__CQ5I);
static void put_reference_declaration__55UJ(__TYPE_GENERIC *Self__AAVJ,void *buffer__BAVJ);
static void add_genere_list__NW0J(__PROFIL_BLOCK *Self__OW0J);
static void put_reference_star_declaration__TE3I(__TYPE *Self__UE3I,void *buffer__VE3I);
static void put_reference_star_declaration__4E3I(__TYPE_NULL *Self__5E3I,void *buffer__AF3I);
static void put_reference_star_declaration__JF3I(__TYPE_VOID *Self__KF3I,void *buffer__LF3I);
static void put_reference_star_declaration__UF3I(__TYPE_CONTEXT *Self__VF3I,void *buffer__WF3I);
static void put_reference_star_declaration__AG3I(__TYPE_GENERIC *Self__BG3I,void *buffer__CG3I);
static void put_reference_star_declaration__BDIJ(__PROFIL_BLOCK *Self__CDIJ,void *buffer__DDIJ);
static __BOOLEAN is_late_binding__LQSK(__TYPE_FULL *Self__MQSK);
static void fast_put__to__RJFF(__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *Self__SJFF,__INTEGER v__TJFF,void *k__UJFF);
static __INTEGER size__P2BJ(__TYPE_FULL *Self__Q2BJ);
static void add__to__DU5K(__FAST_ARRAYoLOCALo *Self__EU5K,void *element__FU5K,__INTEGER index__GU5K);
static __INTEGER index_of__since__ARSK(__STRING_CONSTANT *Self__BRSK,__INTEGER start_index__DRSK);
static void put_access_id__in__5KPM(void *e__BLPM,void *buffer__CLPM);
static void put_access_id__in__5LPM(void *e__BMPM,void *buffer__CMPM);
static void put_access_id__in__DMPM(void *e__FMPM,void *buffer__GMPM);
static void put_access_id__in__DNPM(void *e__FNPM,void *buffer__GNPM);
static void put_access_id__in__DOPM(void *e__FOPM,void *buffer__GOPM);
static void put_access_id__in__HOPM(void *e__JOPM,void *buffer__KOPM);
static void put_access_id__in__HPPM(void *e__JPPM,void *buffer__KPPM);
static __BOOLEAN is_empty__UJVL(__LIST *Self__VJVL);
static void genere_value__0JTK(__WRITE_GLOBAL *Self__1JTK,void *buffer__2JTK);
static void genere_value__LNTK(__WRITE_SLOT *Self__MNTK,void *buffer__NNTK);
static __BOOLEAN is_external__23NM(__CALL_SLOT *Self__33NM);
static void genere_value__HRTK(__WRITE_LOCAL *Self__IRTK,void *buffer__JRTK);
static void add_var_size__5JLK(void *v__BKLK);
static void remove_index__MD1G(__LIST *Self__ND1G,__INTEGER idx__OD1G);
static void add_last__W35F(__FAST_ARRAYoSLOT_DATAo *Self__X35F,void *element__Y35F);
static void clear__to__K15F(void **Self__L15F,__INTEGER lower__M15F,__INTEGER upper__N15F);
static void read_escape_character__BH0E();
static __CHARACTER read_cap_character__IPGC();
static void add_last__NRGC(__FAST_ARRAYoExpanded_CHARACTERo *Self__ORGC,__CHARACTER element__PRGC);
static __BOOLEAN read_external__JWKC();
static void* read_expr_primary__EXIC(__PARSER *Self__FXIC);
static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__FTRD(__INTEGER new_count__HTRD);
static void* new__B2GC();
static void add_last__4B1D(__FAST_ARRAYoSTRING_CONSTANTo *Self__5B1D,void *element__AC1D);
static void free__XXZC(void *tmp__ZXZC);
static void* alias__1XGD(void *tmp__3XGD);
static void** create__VHUE(__INTEGER nb_elements__XHUE);
static __BOOLEAN is_hexadecimal_digit__NLHD(__CHARACTER Self__OLHD);
static __BOOLEAN is_separator__4D3E(__CHARACTER Self__5D3E);
static void* read_prototype__X5JC(__PARSER *Self__Y5JC,void *style__Z5JC);
static __ITM_LIST* create__JCFC(__POSITION p__LCFC);
static void read_def_local__PCFC(__PARSER *Self__QCFC);
static void* new__KFFC();
static void add_last__I4PC(__FAST_ARRAYoITM_CODEo *Self__J4PC,void *element__K4PC);
static __ITM_PROTOTYPE* create__type__1GFC(__POSITION p__3GFC,void *n__4GFC);
static void* copy__CHFC(void *tmp__EHFC);
static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__4NOD(__INTEGER new_count__AOOD);
static void copy__CR1D(__FAST_ARRAYoSTRING_CONSTANTo *Self__DR1D,void *other__ER1D);
static __ITM_WRITE_VALUE* create__assign__with__AMQD(__POSITION p__CMQD,void *n__DMQD,void *v__EMQD);
static __ITM_WRITE_CAST* create__assign__with__SNQD(__POSITION p__UNQD,void *n__VNQD,void *v__WNQD);
static __ITM_READ* create__name__Q5JC(__POSITION p__S5JC,void *n__T5JC);
static void* read_expr_prefix__W4GC(__PARSER *Self__X4GC);
static void* new__1XZC();
static __POSITION* create__WXSE(__INTEGER nb_elements__YXSE);
static __ITM_READ_ARG2* create__name__args__BKLC(__POSITION p__DKLC,void *n__EKLC,void *a1__FKLC,void *a2__GKLC);
static void free__MQFC(void *tmp__OQFC);
static void free__XXGD(void *tmp__ZXGD);
static __FAST_ARRAYoExpanded_POSITIONo* create_with_capacity__MLKD(__INTEGER new_count__OLKD);
static void copy__0U0D(__FAST_ARRAYoExpanded_POSITIONo *Self__1U0D,void *other__2U0D);
static __BOOLEAN fast_has__5UNK(__HASHED_SEToTYPESo *Self__AVNK,void *e__BVNK);
static __INTEGER hash_code__VTNK(__TYPES *Self__WTNK);
static void** create__YBWI(__INTEGER nb_elements__0BWI);
static void* write_direct__with__value__AIWI(__LOCAL *Self__BIWI,__POSITION p__CIWI,void *val__EIWI);
static void* get_alias__IX4N(__LOCAL *Self__JX4N);
static void push_intern__VCLH(__POSITION p__XCLH);
static void to_run_base__KDLH(__ITM_LIST *Self__LDLH,__BOOLEAN last_out__MDLH);
static void pop_intern__CKLH();
static void add__30JI(void *p__50JI);
static __FAST_ARRAYoPROFIL_SLOTo* create_with_capacity__PKBG(__INTEGER new_count__RKBG);
static void to_run__TLXI(__ITM_ARG *Self__ULXI,void *arg_lst__VLXI);
static void to_run__3LXI(__ITM_ARGS *Self__4LXI,void *arg_lst__5LXI);
static __INTEGER affect__with__index__in__BKUH(__ITM_WRITE_VALUE *Self__CKUH,void *idf__DKUH,void *val__EKUH,__INTEGER n__FKUH,void *lst__GKUH);
static void* lookup__TJSH(void *n__VJSH);
static void* affect_local__with__PZVH(__ITM_WRITE_VALUE *Self__QZVH,void *loc__RZVH,void *v__SZVH);
static void* affect_slot__with__50VH(__ITM_WRITE_VALUE *Self__A1VH,void *name__B1VH,void *v__C1VH);
static void* lookup__0MLH(void *n__2MLH);
static __BOOLEAN affect_with__ZCHI(__TYPE_FULL *Self__0CHI,void *other__1CHI);
static void* affect_slot__with__5QSH(__ITM_WRITE_CAST *Self__ARSH,void *name__BRSH,void *v__CRSH);
static void* lookup__3RLH(void *n__5RLH);
static void* to_run_with__args__PKQH(__ITM_READ *Self__QKQH);
static void* to_run_expr__E0QH(__ITM_LDOTS *Self__F0QH);
static __BOOLEAN is_sub_type__FW4J(__TYPE_FULL *Self__GW4J,void *other__HW4J);
static __EXPR_EQUAL* create__with__and__TWUH(__POSITION p__VWUH,void *l__WWUH,void *r__XWUH);
static __EXPR_NOT_EQUAL* create__with__and__AXUH(__POSITION p__CXUH,void *l__DXUH,void *r__EXUH);
static void* new__50LH();
static void* lookup__R23I();
static __BOOLEAN search_parent__UJWH(__PROTOTYPE *Self__VJWH,void *n__WJWH);
static __BOOLEAN access__with__2QMM(__SECTION_ *Self__3QMM,void *me__4QMM,void *client__5QMM);
static void add_arg__to__in__for__block__ELWI(void *e__GLWI,__INTEGER idx__HLWI,void *args__ILWI,void *slot__JLWI,__BOOLEAN is_block_value__KLWI);
static void* copy__QGTH(void *tmp__SGTH);
static void* new_block__receiver__with__1GTH(__POSITION p__3GTH,void *e__4GTH,void *larg__5GTH);
static void free__C4LH(void *tmp__E4LH);
static void* new_read__slot__receiver__with__YOWH(__POSITION p__0OWH,void *s__1OWH,void *rec__2OWH,void *larg__3OWH);
static void error_slot__name__in__list__0G2I(__POSITION p__2G2I,void *s__3G2I,void *t__4G2I,void *st__5G2I);
static __INTEGER priority__BVDJ(__ITM_SLOT *Self__CVDJ);
static void* associativity__YGEJ(__ITM_SLOT *Self__ZGEJ);
static void* lookup__3ATH();
static void append_collection__53EI(__FAST_ARRAYoEXPRo *Self__A4EI,void *other__B4EI);
static void add_first__PPCM(__LIST *Self__QPCM,void *i__RPCM);
static __INTEGER index_of__since__AVOH(__STRING *Self__BVOH,__INTEGER start_index__DVOH);
static __BOOLEAN is_letter_or_digit__TBCJ(__CHARACTER Self__UBCJ);
static __GET_TYPE_ID* create__receiver__HSWH(__POSITION p__JSWH,void *e__KSWH);
static __EXPR_SUP* create__with__and__BTWH(__POSITION p__DTWH,void *l__ETWH,void *r__FTWH);
static __EXPR_SUB* create__with__and__2TWH(__POSITION p__4TWH,void *l__5TWH,void *r__AUWH);
static __EXPR_MUL* create__with__and__XUWH(__POSITION p__ZUWH,void *l__0UWH,void *r__1UWH);
static __EXPR_DIV* create__with__and__SVWH(__POSITION p__UVWH,void *l__VVWH,void *r__WVWH);
static __EXPR_AND* create__with__and__NWWH(__POSITION p__PWWH,void *l__QWWH,void *r__RWWH);
static __EXPR_SHIFT_R* create__with__and__IXWH(__POSITION p__KXWH,void *l__LXWH,void *r__MXWH);
static __EXPR_SHIFT_L* create__with__and__DYWH(__POSITION p__FYWH,void *l__GYWH,void *r__HYWH);
static __PUT_TO* create__base__index__value__DZWH(__POSITION p__FZWH,void *rec__GZWH,void *idx__HZWH,void *v__IZWH);
static __ITEM* create__base__index__3ZWH(__POSITION p__5ZWH,void *rec__A0WH,void *idx__B0WH);
static __SIZE_OF* create__receiver__A1WH(__POSITION p__C1WH,void *e__D1WH);
static void* lookup__SSTH();
static void add_arg__to__in__for__block__R3OH(void *e__T3OH,__INTEGER idx__U3OH,void *args__V3OH,void *slot__W3OH,__BOOLEAN is_block_value__X3OH);
static __BOOLEAN is_cast__to__in__ZD0I(__TYPE_FULL *Self__0D0I,void *n__1D0I,void *t__2D0I,void *lst__3D0I);
static void init__SRFI(__LOCAL *Self__TRFI);
static __WRITE_GLOBAL* my_copy__ILBN(__WRITE_GLOBAL *Self__JLBN);
static __WRITE_SLOT* my_copy__ULBN(__WRITE_SLOT *Self__VLBN);
static __WRITE_LOCAL* my_copy__GMBN(__WRITE_LOCAL *Self__HMBN);
static __LOOP* create__name__body__UHAM(__POSITION p__WHAM,void *lab__XHAM,void *lst__YHAM);
static __LOOP_END* create__loop__CJHM(__POSITION p__EJHM,void *l__FJHM);
static __CALL_SLOT* clone__EBZI(__CALL_SLOT *Self__FBZI);
static void link__DALJ(__PROFIL_BLOCK *Self__EALJ);
static __EXPR_NOT_LOGIC* create__with__BQNM(__POSITION p__DQNM,void *r__EQNM);
static __EXPR_OR_LOGIC* create__with__and__2TDO(__POSITION p__4TDO,void *l__5TDO,void *r__AUDO);
static __EXPR_OR_OR_LOGIC* create__with__and__0BIO(__POSITION p__2BIO,void *l__3BIO,void *r__4BIO);
static __EXPR_AND_LOGIC* create__with__and__B3DO(__POSITION p__D3DO,void *l__E3DO,void *r__F3DO);
static __EXPR_AND_AND_LOGIC* create__with__and__MCIO(__POSITION p__OCIO,void *l__PCIO,void *r__QCIO);
static __EXPR_NEG* create__with__2RBM(__POSITION p__4RBM,void *r__5RBM);
static __EXPR_ADD* create__with__and__TUHL(__POSITION p__VUHL,void *l__WUHL,void *r__XUHL);
static __EXPR_NOT* create__with__0YVM(__POSITION p__2YVM,void *r__3YVM);
static __EXPR_MOD* create__with__and__ZCCO(__POSITION p__1CCO,void *l__2CCO,void *r__3CCO);
static __EXPR_SUP_EQ* create__with__and__4LAP(__POSITION p__AMAP,void *l__BMAP,void *r__CMAP);
static __EXPR_INF* create__with__and__LOKN(__POSITION p__NOKN,void *l__OOKN,void *r__POKN);
static __EXPR_INF_EQ* create__with__and__1OKN(__POSITION p__3OKN,void *l__4OKN,void *r__5OKN);
static __EXPR_OR* create__with__and__UNJN(__POSITION p__WNJN,void *l__XNJN,void *r__YNJN);
static __EXPR_XOR* create__with__and__D5PO(__POSITION p__F5PO,void *l__G5PO,void *r__H5PO);
static void** create__Q5YK(__INTEGER nb_elements__S5YK);
static void** create__SVXI(__INTEGER nb_elements__UVXI);
static void unlink__ZVQL(__PROFIL_SLOT *Self__0VQL);
static void unlink__XWQL(__PROFIL_BLOCK *Self__YWQL);
static void* read_direct__with__4AVI(__LOCAL *Self__5AVI);
static void** realloc__with__0QZG(void **Self__1QZG,__INTEGER old_nb_elts__2QZG,__INTEGER new_nb_elts__3QZG);
static void** create__FZUJ(__INTEGER nb_elements__HZUJ);
static void* call_for__1S2J(__NODE_STYLE *Self__2S2J,void *t__3S2J);
static void* execute_unlink__42LK(__EXTERNAL_C *Self__52LK);
static void* execute__F2TK(__SWITCH *Self__G2TK);
static void* execute_unlink__PBMK(__EXPR_MULTIPLE *Self__QBMK);
static void* execute__GFGK(__WRITE_GLOBAL *Self__HFGK);
static void* execute__ZIGK(__WRITE_SLOT *Self__0IGK);
static void* execute_unlink__WGMK(__EXPR_EQUAL *Self__XGMK);
static void* execute_unlink__HHMK(__EXPR_NOT_EQUAL *Self__IHMK);
static void* execute_unlink__IIMK(__EXPR_SUP *Self__JIMK);
static void* execute_unlink__ZIMK(__EXPR_SUB *Self__0IMK);
static void* execute_unlink__KJMK(__EXPR_MUL *Self__LJMK);
static void* execute_unlink__1JMK(__EXPR_DIV *Self__2JMK);
static void* execute_unlink__MKMK(__EXPR_AND *Self__NKMK);
static void* execute_unlink__3KMK(__EXPR_SHIFT_R *Self__4KMK);
static void* execute_unlink__OLMK(__EXPR_SHIFT_L *Self__PLMK);
static void* execute_link__BOPK(__PUT_TO *Self__COPK);
static void* execute_unlink__CMMK(__ITEM *Self__DMMK);
static void* execute_unlink__SMMK(__SIZE_OF *Self__TMMK);
static void* execute_unlink__XMMK(__CAST *Self__YMMK);
static void* execute_unlink__2NQL(__CALL_SLOT *Self__3NQL);
static void* execute_unlink__WDAL(__READ_SLOT *Self__XDAL);
static void* execute__3OGK(__WRITE_LOCAL *Self__4OGK);
static void* execute_access_unlink__VMDL(__READ_GLOBAL *Self__WMDL);
static void* execute_unlink__CRZM(__EXPR_NOT_LOGIC *Self__DRZM);
static void* execute__SALM(__LOOP *Self__TALM);
static void* execute_unlink__B2EO(__EXPR_OR_LOGIC *Self__C2EO);
static void* execute_link__GJLO(__EXPR_OR_OR_LOGIC *Self__HJLO);
static void* execute_unlink__R2EO(__EXPR_AND_LOGIC *Self__S2EO);
static void* execute_link__KPLO(__EXPR_AND_AND_LOGIC *Self__LPLO);
static void* execute_unlink__XYJM(__EXPR_NEG *Self__YYJM);
static void* execute_unlink__3NNL(__EXPR_ADD *Self__4NNL);
static void* execute_unlink__YLZM(__EXPR_NOT *Self__ZLZM);
static void* execute_unlink__B3EO(__EXPR_MOD *Self__C3EO);
static void* execute_unlink__AJEP(__EXPR_SUP_EQ *Self__BJEP);
static void* execute_unlink__CPQN(__EXPR_INF *Self__DPQN);
static void* execute_unlink__SPQN(__EXPR_INF_EQ *Self__TPQN);
static void* execute_unlink__JDQN(__EXPR_OR *Self__KDQN);
static void* execute_unlink__YNUO(__EXPR_XOR *Self__ZNUO);
static void* execute_link__U5ZK(__EXTERNAL_C *Self__V5ZK);
static void* execute_link__EHAL(__READ_LOCAL *Self__FHAL);
static void* execute_link__YLAL();
static void* execute_link__2LAL(__EXPR_EQUAL *Self__3LAL);
static void* execute_link__FQAL(__EXPR_NOT_EQUAL *Self__GQAL);
static void* execute_link__UUAL(__IS_EXPANDED *Self__VUAL);
static void* execute_link__1VAL(__GET_TYPE_ID *Self__2VAL);
static void* execute_link__AWAL(__EXPR_SUP *Self__BWAL);
static void* execute_link__J0AL(__EXPR_SUB *Self__K0AL);
static void* execute_link__S4AL(__EXPR_MUL *Self__T4AL);
static void* execute_link__1CBL(__EXPR_DIV *Self__2CBL);
static void* execute_link__EHBL(__EXPR_AND *Self__FHBL);
static void* execute_link__NLBL(__EXPR_SHIFT_R *Self__OLBL);
static void* execute_link__WPBL(__EXPR_SHIFT_L *Self__XPBL);
static void* execute_link__5TBL(__ITEM *Self__AUBL);
static void* execute_link__GUBL(__SIZE_OF *Self__HUBL);
static void* execute_link__LUBL(__CAST *Self__MUBL);
static void* execute_link__A2TL(__CALL_SLOT *Self__B2TL);
static void* execute_link__EYBL(__READ_SLOT *Self__FYBL);
static void* execute_link__U2BL(__READ_GLOBAL *Self__V2BL);
static void* execute_link__SRZM(__EXPR_NOT_LOGIC *Self__TRZM);
static void* execute_link__OBFO(__EXPR_OR_LOGIC *Self__PBFO);
static void* execute_link__HHFO(__EXPR_AND_LOGIC *Self__IHFO);
static void* execute_link__0GKM(__EXPR_NEG *Self__1GKM);
static void* execute_link__RROL(__EXPR_ADD *Self__SROL);
static void* execute_link__GUZM(__EXPR_NOT *Self__HUZM);
static void* execute_link__ANFO(__EXPR_MOD *Self__BNFO);
static void* execute_link__YLEP(__EXPR_SUP_EQ *Self__ZLEP);
static void* execute_link__VQQN(__EXPR_INF *Self__WQQN);
static void* execute_link__4UQN(__EXPR_INF_EQ *Self__5UQN);
static void* execute_link__1HQN(__EXPR_OR *Self__2HQN);
static void* execute_link__IYUO(__EXPR_XOR *Self__JYUO);
static void move__to__by__ZAFH(__FAST_ARRAYoINSTRo *Self__0AFH,__INTEGER lower_index__1AFH,__INTEGER upper_index__2AFH);
static void unwrite__CDNL(__SLOT_DATA *Self__DDNL,void *e__EDNL);
static void unwrite__OGNL(__LOCAL *Self__PGNL,void *e__QGNL);
static __INTEGER fast_first_index_of__J0QJ(__FAST_ARRAYoTYPEo *Self__K0QJ,void *element__L0QJ);
static void* read_group__Z5BD(__PARSER *Self__05BD);
static void** create__V0TE(__INTEGER nb_elements__X0TE);
static __INTEGER hash_code__DRBE(__FAST_ARRAYoSTRING_CONSTANTo *Self__ERBE);
static __BOOLEAN fast_has__10CE(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__20CE,void *e__30CE);
static void* new__2MFC();
static void add_last__0VPC(__FAST_ARRAYoITM_LOCALo *Self__1VPC,void *element__2VPC);
static void free__3LGC(void *tmp__5LGC);
static void* copy__QFGC(void *tmp__SFGC);
static void append_collection__5LEF(__FAST_ARRAYoITM_LOCALo *Self__AMEF,void *other__BMEF);
static __FAST_ARRAYoITM_CODEo* create_with_capacity__GQFC(__INTEGER new_count__IQFC);
static void** create__UFBD(__INTEGER nb_elements__WFBD);
static __ITM_READ_ARG1* create__name__arg__3AIC(__POSITION p__5AIC,void *n__ABIC,void *a__BBIC);
static void* read_send_msg__L0JC(__PARSER *Self__M0JC,void *first_arg__N0JC);
static void* search_require__AS4L(__TYPE *Self__BS4L,void *n__CS4L);
static void* search_require__HU4L(__TYPE_NULL *Self__IU4L,void *n__JU4L);
static void* search_require__OW4L(__TYPE_VOID *Self__PW4L,void *n__QW4L);
static void* search_require__VY4L(__TYPE_CONTEXT *Self__WY4L,void *n__XY4L);
static void* search_require__204L(__TYPE_ID *Self__304L,void *n__404L);
static void* search_require__D34L(__TYPE_GENERIC *Self__E34L,void *n__F34L);
static void* search_require__LUBN(__PROFIL_BLOCK *Self__MUBN,void *n__NUBN);
static void* search_ensure__LA5L(__TYPE *Self__MA5L,void *n__NA5L);
static void* search_ensure__SC5L(__TYPE_NULL *Self__TC5L,void *n__UC5L);
static void* search_ensure__ZE5L(__TYPE_VOID *Self__0E5L,void *n__1E5L);
static void* search_ensure__AH5L(__TYPE_CONTEXT *Self__BH5L,void *n__CH5L);
static void* search_ensure__HJ5L(__TYPE_ID *Self__IJ5L,void *n__JJ5L);
static void* search_ensure__OL5L(__TYPE_GENERIC *Self__PL5L,void *n__QL5L);
static void* search_ensure__WXBN(__PROFIL_BLOCK *Self__XXBN,void *n__YXBN);
static void* put_result__Z0DN(__LIST *Self__00DN,__BOOLEAN is_last__10DN);
static void* put_result__HZKI(__STRING_CST *Self__IZKI,__BOOLEAN is_last__JZKI);
static void* put_result__X3KI(__EXTERNAL_C *Self__Y3KI,__BOOLEAN is_last__Z3KI);
static void* put_result__ICLI(__PROTOTYPE_CST *Self__JCLI,__BOOLEAN is_last__KCLI);
static void* put_result__ZGLI(__INTEGER_CST *Self__0GLI,__BOOLEAN is_last__1GLI);
static void* put_result__DYFJ(__READ_LOCAL *Self__EYFJ,__BOOLEAN is_last__FYFJ);
static void* put_result__JLLI(__EXPR_MULTIPLE *Self__KLLI,__BOOLEAN is_last__LLLI);
static void* put_result__DMLI(__EXPR_EQUAL *Self__EMLI,__BOOLEAN is_last__FMLI);
static void* put_result__UQLI(__EXPR_NOT_EQUAL *Self__VQLI,__BOOLEAN is_last__WQLI);
static void* put_result__FVLI(__REAL_CST *Self__GVLI,__BOOLEAN is_last__HVLI);
static void* put_result__WZLI(__CHARACTER_CST *Self__XZLI,__BOOLEAN is_last__YZLI);
static void* put_result__G4LI(__IS_EXPANDED *Self__H4LI,__BOOLEAN is_last__I4LI);
static void* put_result__WCMI(__GET_TYPE_ID *Self__XCMI,__BOOLEAN is_last__YCMI);
static void* put_result__HHMI(__EXPR_SUP *Self__IHMI,__BOOLEAN is_last__JHMI);
static void* put_result__YLMI(__EXPR_SUB *Self__ZLMI,__BOOLEAN is_last__0LMI);
static void* put_result__JQMI(__EXPR_MUL *Self__KQMI,__BOOLEAN is_last__LQMI);
static void* put_result__0UMI(__EXPR_DIV *Self__1UMI,__BOOLEAN is_last__2UMI);
static void* put_result__LZMI(__EXPR_AND *Self__MZMI,__BOOLEAN is_last__NZMI);
static void* put_result__23MI(__EXPR_SHIFT_R *Self__33MI,__BOOLEAN is_last__43MI);
static void* put_result__NCNI(__EXPR_SHIFT_L *Self__OCNI,__BOOLEAN is_last__PCNI);
static void* put_result__3GNI(__PUT_TO *Self__4GNI,__BOOLEAN is_last__5GNI);
static void* put_result__NLNI(__ITEM *Self__OLNI,__BOOLEAN is_last__PLNI);
static void* put_result__3PNI(__SIZE_OF *Self__4PNI,__BOOLEAN is_last__5PNI);
static void* put_result__NUNI(__CAST *Self__OUNI,__BOOLEAN is_last__PUNI);
static void* put_result__J5DN(__CALL_SLOT *Self__K5DN,__BOOLEAN is_last__L5DN);
static void* put_result__YCLL(__READ_SLOT *Self__ZCLL,__BOOLEAN is_last__0CLL);
static void* put_result__JHLL(__READ_GLOBAL *Self__KHLL,__BOOLEAN is_last__LHLL);
static void* put_result__I13O(__EXPR_NOT_LOGIC *Self__J13O,__BOOLEAN is_last__K13O);
static void* put_result__WUJO(__EXPR_OR_LOGIC *Self__XUJO,__BOOLEAN is_last__YUJO);
static void* put_result__3YSO(__EXPR_OR_OR_LOGIC *Self__4YSO,__BOOLEAN is_last__5YSO);
static void* put_result__HZJO(__EXPR_AND_LOGIC *Self__IZJO,__BOOLEAN is_last__JZJO);
static void* put_result__P3SO(__EXPR_AND_AND_LOGIC *Self__Q3SO,__BOOLEAN is_last__R3SO);
static void* put_result__WLYM(__EXPR_NEG *Self__XLYM,__BOOLEAN is_last__YLYM);
static void* put_result__HQYM(__EXPR_ADD *Self__IQYM,__BOOLEAN is_last__JQYM);
static void* put_result__0DEN(__EXPR_NOT *Self__1DEN,__BOOLEAN is_last__2DEN);
static void* put_result__Y3JO(__EXPR_MOD *Self__Z3JO,__BOOLEAN is_last__03JO);
static void* put_result__0ZIP(__EXPR_SUP_EQ *Self__1ZIP,__BOOLEAN is_last__2ZIP);
static void* put_result__Z53O(__EXPR_INF *Self__053O,__BOOLEAN is_last__153O);
static void* put_result__KE4O(__EXPR_INF_EQ *Self__LE4O,__BOOLEAN is_last__ME4O);
static void* put_result__0C0N(__EXPR_OR *Self__1C0N,__BOOLEAN is_last__2C0N);
static void* put_result__1I4O(__EXPR_XOR *Self__2I4O,__BOOLEAN is_last__3I4O);
static void** create__0SWG(__INTEGER nb_elements__2SWG);
static void* check__with__and__0SZH(void *v__2SZH,void *t__3SZH,__POSITION p__4SZH);
static void* new_write__slot__receiver__value__ITUH(__POSITION p__KTUH,void *s__LTUH,void *rec__MTUH,void *val__NTUH);
static void* check__with__and__TLXH(void *v__VLXH,void *t__WLXH,__POSITION p__XLXH);
static __BOOLEAN is_sub_type_with_name__F35N(__TYPE *Self__G35N,void *n__H35N);
static __BOOLEAN is_sub_type_with_name__O55N(__TYPE_NULL *Self__P55N,void *n__Q55N);
static __BOOLEAN is_sub_type_with_name__XBAO(__TYPE_VOID *Self__YBAO,void *n__ZBAO);
static __BOOLEAN is_sub_type_with_name__AEAO(__TYPE_CONTEXT *Self__BEAO,void *n__CEAO);
static __BOOLEAN is_sub_type_with_name__JGAO(__TYPE_ID *Self__KGAO,void *n__LGAO);
static __BOOLEAN is_sub_type_with_name__SIAO(__TYPE_GENERIC *Self__TIAO,void *n__UIAO);
static __BOOLEAN is_sub_type_with_name__1KAO(__PROFIL_BLOCK *Self__2KAO,void *n__3KAO);
static void* get_type__252J(__ITM_ARG *Self__352J);
static void* get_type__IA3J(__ITM_ARGS *Self__JA3J,__INTEGER idx__KA3J);
static void** create__F3KN(__INTEGER nb_elements__H3KN);
static void append_cast_name_in__Y1CJ(__ITM_TYPE_SIMPLE *Self__Z1CJ,void *buf__01CJ);
static void append_cast_name_in__L2CJ(__ITM_TYPE_STYLE *Self__M2CJ,void *buf__N2CJ);
static void append_cast_name_in__42CJ(__ITM_TYPE_GENERIC *Self__52CJ,void *buf__A3CJ);
static void append_cast_name_in__T3CJ(__ITM_TYPE_SELF *Self__U3CJ,void *buf__V3CJ);
static __BOOLEAN is_integer__M4NI(void *n__O4NI);
static void unset_life__UXBM(void *p__WXBM);
static void* new_write__with__S4CK(__NODE_STYLE *Self__T4CK,void *var__U4CK,void *e__V4CK,void *slot__W4CK);
static __PROFIL_SLOT* clone__FI5K();
static void add_last__5J5K(__FAST_ARRAYoPROFIL_SLOTo *Self__AK5K,void *element__BK5K);
static void* get__result__Z3KM(__TYPE_FULL *Self__03KM,__POSITION p__13KM,__INTEGER n__23KM);
static void* write_argument__WCOL(__PROFIL_SLOT *Self__XCOL,void *args__YCOL);
static void remove__EEPL(__CASE *Self__FEPL);
static void set_late_binding__OOSL();
static void execute__UPHL(__SLOT_DATA *Self__VPHL);
static void remove__OGAM(void *p__QGAM);
static void insert__to__PDDM(__LIST *Self__QDDM,void *e__RDDM,__INTEGER idx__SDDM);
static void argument_to_assignment__index__alias__ITLM(__CALL_SLOT *Self__JTLM,void *lst__KTLM,__INTEGER idx__LTLM,__BOOLEAN is_alias__MTLM);
static void* execute_inline__QFZL(__CALL_SLOT *Self__RFZL);
static void execute_normal__BMAM(__CALL_SLOT *Self__CMAM);
static void set_life__2OAM(__PROFIL_SLOT *Self__3OAM);
static void set_life__GPAM(__PROFIL_BLOCK *Self__HPAM);
static void* execute_access_unlink__5LDL(__READ_SLOT *Self__AMDL);
static __BOOLEAN __infix_equal_equal__WF1L(__STRING_CST *Self__XF1L,void *other__YF1L);
static __BOOLEAN __infix_equal_equal__LG1L(__PROTOTYPE_CST *Self__MG1L,void *other__NG1L);
static __BOOLEAN __infix_equal_equal__2G1L(__INTEGER_CST *Self__3G1L,void *other__4G1L);
static __BOOLEAN __infix_equal_equal__WH1L(__READ_LOCAL *Self__XH1L,void *other__YH1L);
static __BOOLEAN __infix_equal_equal__MI1L(__EXPR_EQUAL *Self__NI1L,void *other__OI1L);
static __BOOLEAN __infix_equal_equal__IJ1L(__EXPR_NOT_EQUAL *Self__JJ1L,void *other__KJ1L);
static __BOOLEAN __infix_equal_equal__EK1L(__REAL_CST *Self__FK1L,void *other__GK1L);
static __BOOLEAN __infix_equal_equal__4K1L(__CHARACTER_CST *Self__5K1L,void *other__AL1L);
static __BOOLEAN __infix_equal_equal__XL1L(__EXPR_SUP *Self__YL1L,void *other__ZL1L);
static __BOOLEAN __infix_equal_equal__TM1L(__EXPR_SUB *Self__UM1L,void *other__VM1L);
static __BOOLEAN __infix_equal_equal__PN1L(__EXPR_MUL *Self__QN1L,void *other__RN1L);
static __BOOLEAN __infix_equal_equal__LO1L(__EXPR_DIV *Self__MO1L,void *other__NO1L);
static __BOOLEAN __infix_equal_equal__HP1L(__EXPR_AND *Self__IP1L,void *other__JP1L);
static __BOOLEAN __infix_equal_equal__DQ1L(__EXPR_SHIFT_R *Self__EQ1L,void *other__FQ1L);
static __BOOLEAN __infix_equal_equal__5Q1L(__EXPR_SHIFT_L *Self__AR1L,void *other__BR1L);
static __BOOLEAN __infix_equal_equal__LS1L(__READ_SLOT *Self__MS1L,void *other__NS1L);
static __BOOLEAN __infix_equal_equal__HT1L(__READ_GLOBAL *Self__IT1L,void *other__JT1L);
static __BOOLEAN __infix_equal_equal__CZHO(__EXPR_NOT_LOGIC *Self__DZHO,void *other__EZHO);
static __BOOLEAN __infix_equal_equal__SXFO(__EXPR_OR_LOGIC *Self__TXFO,void *other__UXFO);
static __BOOLEAN __infix_equal_equal__TBMO(__EXPR_OR_OR_LOGIC *Self__UBMO,void *other__VBMO);
static __BOOLEAN __infix_equal_equal__OYFO(__EXPR_AND_LOGIC *Self__PYFO,void *other__QYFO);
static __BOOLEAN __infix_equal_equal__QCMO(__EXPR_AND_AND_LOGIC *Self__RCMO,void *other__SCMO);
static __BOOLEAN __infix_equal_equal__J5KM(__EXPR_NEG *Self__K5KM,void *other__L5KM);
static __BOOLEAN __infix_equal_equal__ZT1L(__EXPR_ADD *Self__0T1L,void *other__1T1L);
static __BOOLEAN __infix_equal_equal__QB0M(__EXPR_NOT *Self__RB0M,void *other__SB0M);
static __BOOLEAN __infix_equal_equal__KZFO(__EXPR_MOD *Self__LZFO,void *other__MZFO);
static __BOOLEAN __infix_equal_equal__OTEP(__EXPR_SUP_EQ *Self__PTEP,void *other__QTEP);
static __BOOLEAN __infix_equal_equal__UZHO(__EXPR_INF *Self__VZHO,void *other__WZHO);
static __BOOLEAN __infix_equal_equal__Q0HO(__EXPR_INF_EQ *Self__R0HO,void *other__S0HO);
static __BOOLEAN __infix_equal_equal__32QN(__EXPR_OR *Self__42QN,void *other__52QN);
static __BOOLEAN __infix_equal_equal__GOVO(__EXPR_XOR *Self__HOVO,void *other__IOVO);
static __BOOLEAN is_seq_list__PK2M(void *l__RK2M);
static __INTEGER require_count__MNCN(__LOCAL *Self__NNCN);
static __INTEGER require_count__IM2M(__SLOT_DATA *Self__JM2M);
static __BOOLEAN is_saturated__13QN(__INTEGER_CST *Self__23QN);
static __INTEGER_64 to_power__PCRN(__INTEGER_CST *Self__QCRN);
static void* get_last_value__FTPL(__SLOT_DATA *Self__GTPL,void *rec__HTPL);
static __BOOLEAN is_invariant__E4WL(__READ_SLOT *Self__F4WL);
static __BOOLEAN is_signed__WFKN(__INTEGER_CST *Self__XFKN);
static void remove_first__XRAM(__FAST_ARRAYoWRITEo *Self__YRAM);
static __INTEGER fast_first_index_of__NUZL(__FAST_ARRAYoWRITEo *Self__OUZL,void *element__PUZL);
static void remove__KWZL(__FAST_ARRAYoWRITEo *Self__LWZL,__INTEGER index__MWZL);
static __FAST_ARRAYoITM_LOCALo* create_with_capacity__XLGC(__INTEGER new_count__ZLGC);
static void** create__PNBD(__INTEGER nb_elements__RNBD);
static void* read_argument__VBLC(__PARSER *Self__WBLC);
static void swap__with__3GEM(__INTEGER i1__5GEM,__INTEGER i2__AHEM);
static void set_life__KBCM(void *p__MBCM);
static __BOOLEAN is_seq_list__HMAN(void *l__JMAN);
static __BOOLEAN is_invariant__FJ2L(__SLOT_DATA *Self__GJ2L,void *rec__HJ2L);
static __BOOLEAN is_invariant__AH0M(__LIST *Self__BH0M);
static __BOOLEAN is_invariant__FVCM(__READ_LOCAL *Self__GVCM);
static __BOOLEAN is_invariant__OVCM(__EXPR_EQUAL *Self__PVCM);
static __BOOLEAN is_invariant__2VCM(__EXPR_NOT_EQUAL *Self__3VCM);
static __BOOLEAN is_invariant__WWCM(__EXPR_SUP *Self__XWCM);
static __BOOLEAN is_invariant__EXCM(__EXPR_SUB *Self__FXCM);
static __BOOLEAN is_invariant__SXCM(__EXPR_MUL *Self__TXCM);
static __BOOLEAN is_invariant__AYCM(__EXPR_DIV *Self__BYCM);
static __BOOLEAN is_invariant__OYCM(__EXPR_AND *Self__PYCM);
static __BOOLEAN is_invariant__2YCM(__EXPR_SHIFT_R *Self__3YCM);
static __BOOLEAN is_invariant__KZCM(__EXPR_SHIFT_L *Self__LZCM);
static __BOOLEAN is_invariant__YZCM(__PUT_TO *Self__ZZCM);
static __BOOLEAN is_invariant__P0CM(__ITEM *Self__Q0CM);
static __BOOLEAN is_invariant__A1CM(__CAST *Self__B1CM);
static __BOOLEAN is_invariant__QKMN(__EXPR_NOT_LOGIC *Self__RKMN);
static __BOOLEAN is_invariant__M1FO(__EXPR_OR_LOGIC *Self__N1FO);
static __BOOLEAN is_invariant__XFMO(__EXPR_OR_OR_LOGIC *Self__YFMO);
static __BOOLEAN is_invariant__01FO(__EXPR_AND_LOGIC *Self__11FO);
static __BOOLEAN is_invariant__GGMO(__EXPR_AND_AND_LOGIC *Self__HGMO);
static __BOOLEAN is_invariant__ZKLM(__EXPR_NEG *Self__0KLM);
static __BOOLEAN is_invariant__Q5DM(__EXPR_ADD *Self__R5DM);
static __BOOLEAN is_invariant__FI0M(__EXPR_NOT *Self__GI0M);
static __BOOLEAN is_invariant__I2FO(__EXPR_MOD *Self__J2FO);
static __BOOLEAN is_invariant__PWEP(__EXPR_SUP_EQ *Self__QWEP);
static __BOOLEAN is_invariant__1TSN(__EXPR_INF *Self__2TSN);
static __BOOLEAN is_invariant__JUSN(__EXPR_INF_EQ *Self__KUSN);
static __BOOLEAN is_invariant__LERN(__EXPR_OR *Self__MERN);
static __BOOLEAN is_invariant__QTVO(__EXPR_XOR *Self__RTVO);

//==========================//
// SOURCE CODE              //
//==========================//

int main(int argc,char **argv)
{
  __UINTEGER_64 begin_time__5,end_time__CB;
  void *str__IZE,*result__PRD,*cmd__GW,*voir__S0OG,*result__WRE;
  __INTEGER Self__LEG,limit_up__MEG,i__D0X,typ_id__H4W;
  __INTEGER new_capacity__0LOB,typ_id__LTG,typ_id__PQF;
  __INTEGER new_capacity__GTP,typ_id__PUF,new_capacity__2UP,typ_id__YXF;
  __INTEGER typ_id__JZF,new_capacity__L1P,typ_id__50F,typ_id__XYLC;
  __INTEGER typ_id__GWHD,new_capacity__TNCD,__tmp__XOCD,__tmp__SS2D;
  __INTEGER Self__XFJF,typ_id__HWF,typ_id__UASE,new_capacity__4MJF;
  __INTEGER typ_id__VKGC,typ_id__GGGC,typ_id__ZXHC,typ_id__AKKD;
  __INTEGER typ_id__2MOD,new_capacity__YWCE,typ_id__YIWD,typ_id__KWPD;
  __INTEGER new_capacity__L5CE,typ_id__LZPD,new_capacity__GDDE;
  __INTEGER typ_id__RSTD,typ_id__1L2B,typ_id__ON2B,new_capacity__4DSC;
  __INTEGER typ_id__BP2B,new_capacity__VJSC,typ_id__ODZG,typ_id__U32J;
  __INTEGER new_capacity__ZQNK,typ_id__WQCD,typ_id__FOE,typ_id__E4SH;
  __INTEGER typ_id__U5SH,typ_id__53YG,typ_id__LSBK,Self__L5F,Self__15F;
  __INTEGER Self__KAG,typ_id__KZTG,Self__DSRG,new_capacity__V54G;
  __INTEGER __tmp__ZA5G,__tmp__KODI,Self__DJKJ,typ_id__O2CD;
  __INTEGER new_capacity__YGAE,typ_id__VCDJ,Self__WMCJ;
  __INTEGER new_capacity__BGJJ,__tmp__FHJJ,__tmp__02IK,Self__ECRL;
  __INTEGER time__FB,typ_id__11C,new_capacity__23N,i__IW,stat__KW,j__HW;
  __INTEGER Self__A55C,__tmp__TGC,typ_id__W3E,new_capacity__JMP;
  __INTEGER Self__NHD,limit_up__OHD,typ_id__XJE,j__PCID,i__E15Q;
  __INTEGER pass_count_depend__Z1LC,__tmp__J40C,i__F15Q,Self__NTC;
  __INTEGER limit_up__OTC,Self__2TC,limit_up__3TC,Self__QUC;
  __INTEGER limit_up__RUC,Self__URE,Self__1RE,limit_up__2RE,Self__T1UC;
  __INTEGER limit_up__U1UC,__tmp__USB,i__G15Q,Self__PWB,limit_up__QWB;
  __STRING *Self__B0X,*Self__M1UB,*new__ARQC;
  __POINTER ptr__C4W,ptr__GTG,ptr__KQF,ptr__KUF,ptr__TXF,ptr__EZF;
  __POINTER ptr__00F,ptr__SYLC,ptr__BWHD,ptr__CWF,ptr__PASE,ptr__QKGC;
  __POINTER ptr__BGGC,ptr__UXHC,ptr__1JKD,ptr__XMOD,ptr__TIWD,ptr__FWPD;
  __POINTER ptr__GZPD,ptr__MSTD,ptr__WL2B,ptr__JN2B,ptr__2O2B,ptr__JDZG;
  __POINTER ptr__P32J,ptr__RQCD,ptr__AOE,ptr__53SH,ptr__P5SH,ptr__03YG;
  __POINTER ptr__GSBK,ptr__FZTG,ptr__J2CD,ptr__QCDJ,ptr__W1C,ptr__R3E;
  __POINTER entry__IDD,ptr__SJE,stream__1TB,file_output__1;
  __UINTEGER_32 sz__E4W,a__IK3Q,new_size__GK3Q,t__MK3Q,a__OK3Q,sz__ITG;
  __UINTEGER_32 a__TK3Q,new_size__RK3Q,t__XK3Q,a__ZK3Q,sz__MQF,a__4K3Q;
  __UINTEGER_32 new_size__2K3Q,t__CL3Q,a__EL3Q,sz__MUF,a__JL3Q;
  __UINTEGER_32 new_size__HL3Q,t__NL3Q,a__PL3Q,sz__VXF,a__UL3Q;
  __UINTEGER_32 new_size__SL3Q,t__YL3Q,a__0L3Q,sz__GZF,a__5L3Q;
  __UINTEGER_32 new_size__3L3Q,t__DM3Q,a__FM3Q,sz__20F,a__KM3Q;
  __UINTEGER_32 new_size__IM3Q,t__OM3Q,a__QM3Q,sz__UYLC,a__VM3Q;
  __UINTEGER_32 new_size__TM3Q,t__ZM3Q,a__1M3Q,sz__DWHD,a__AN3Q;
  __UINTEGER_32 new_size__4M3Q,t__EN3Q,a__GN3Q,sz__EWF,a__RN3Q;
  __UINTEGER_32 new_size__PN3Q,t__VN3Q,a__XN3Q,sz__RASE,a__2N3Q;
  __UINTEGER_32 new_size__0N3Q,t__AO3Q,a__CO3Q,sz__SKGC,a__HO3Q;
  __UINTEGER_32 new_size__FO3Q,t__LO3Q,a__NO3Q,sz__DGGC,a__SO3Q;
  __UINTEGER_32 new_size__QO3Q,t__WO3Q,a__YO3Q,sz__WXHC,a__3O3Q;
  __UINTEGER_32 new_size__1O3Q,t__BP3Q,a__DP3Q,sz__3JKD,a__IP3Q;
  __UINTEGER_32 new_size__GP3Q,t__MP3Q,a__OP3Q,sz__ZMOD,a__TP3Q;
  __UINTEGER_32 new_size__RP3Q,t__XP3Q,a__ZP3Q,sz__VIWD,a__4P3Q;
  __UINTEGER_32 new_size__2P3Q,t__CQ3Q,a__EQ3Q,sz__HWPD,a__JQ3Q;
  __UINTEGER_32 new_size__HQ3Q,t__NQ3Q,a__PQ3Q,sz__IZPD,a__UQ3Q;
  __UINTEGER_32 new_size__SQ3Q,t__YQ3Q,a__0Q3Q,sz__OSTD,a__5Q3Q;
  __UINTEGER_32 new_size__3Q3Q,t__DR3Q,a__FR3Q,sz__YL2B,a__KR3Q;
  __UINTEGER_32 new_size__IR3Q,t__OR3Q,a__QR3Q,sz__LN2B,a__VR3Q;
  __UINTEGER_32 new_size__TR3Q,t__ZR3Q,a__1R3Q,sz__4O2B,a__AS3Q;
  __UINTEGER_32 new_size__4R3Q,t__ES3Q,a__GS3Q,sz__LDZG,a__LS3Q;
  __UINTEGER_32 new_size__JS3Q,t__PS3Q,a__RS3Q,sz__R32J,a__WS3Q;
  __UINTEGER_32 new_size__US3Q,t__0S3Q,a__2S3Q,sz__TQCD,a__BT3Q;
  __UINTEGER_32 new_size__5S3Q,t__FT3Q,a__HT3Q,sz__COE,a__MT3Q;
  __UINTEGER_32 new_size__KT3Q,t__QT3Q,a__ST3Q,sz__B4SH,a__XT3Q;
  __UINTEGER_32 new_size__VT3Q,t__1T3Q,a__3T3Q,sz__R5SH,a__CU3Q;
  __UINTEGER_32 new_size__AU3Q,t__GU3Q,a__IU3Q,sz__23YG,a__NU3Q;
  __UINTEGER_32 new_size__LU3Q,t__RU3Q,a__TU3Q,sz__ISBK,a__YU3Q;
  __UINTEGER_32 new_size__WU3Q,t__2U3Q,a__4U3Q,sz__HZTG,a__DV3Q;
  __UINTEGER_32 new_size__BV3Q,t__HV3Q,a__JV3Q,sz__L2CD,a__UV3Q;
  __UINTEGER_32 new_size__SV3Q,t__YV3Q,a__0V3Q,sz__SCDJ,a__5V3Q;
  __UINTEGER_32 new_size__3V3Q,t__DW3Q,a__FW3Q,sz__Y1C,a__QW3Q;
  __UINTEGER_32 new_size__OW3Q,t__UW3Q,a__WW3Q,sz__T3E,a__2Y3Q;
  __UINTEGER_32 new_size__0Y3Q,t__AZ3Q,a__CZ3Q,sz__UJE,a__JZ3Q;
  __UINTEGER_32 new_size__HZ3Q,t__NZ3Q,a__PZ3Q,Result__H10D;
  __ITM_TYPE_GENERIC_ELT *result__AWHD;
  void *result__RCD,*__tmp__LHC,*__tmp__MHC,*__tmp__OHC,*ic__GDD;
  void *name__ER3,*cmd__11LC,*__tmp__0JQC;
  __STRING_CONSTANT *Self__1OL,*Self__VY3Q,*Self__XY3Q,*Self__EZ3Q;
  __STRING_CONSTANT *Self__X4K,*Self__4QQC;
  __POSITION pos__TUGQ,pos__VUGQ,pos__XUGQ,pos__ZUGQ,pos__1UGQ;
  __POSITION pos__3UGQ,pos__5UGQ,pos__BVGQ,pos__DVGQ,pos__FVGQ,pos__KMG;
  __POSITION pos__PWGQ,pos__SWGQ,pos__RVCD,__tmp__F3LC,__tmp__K3LC;
  __POSITION __tmp__Q3LC;
  void *__tmp__ZIB,*__tmp__QKB,*__tmp__4KB,*__tmp__ELB;
  void *__tmp__1IB,*__tmp__DJB,*__tmp__AWGQ,*__tmp__LJB,*__tmp__CWGQ;
  void *__tmp__TJB,*__tmp__EWGQ,*__tmp__1JB,*__tmp__GWGQ,*__tmp__DKB;
  void *__tmp__IWGQ,*__tmp__RKB,*__tmp__ZKB,*__tmp__T1IB,*__tmp__5KB;
  void *__tmp__FLB,*__tmp__H3LC,*__tmp__S3LC;
  void *__tmp__CJB,*__tmp__KJB,*__tmp__SJB,*__tmp__0JB,*__tmp__CKB;
  void *__tmp__KKB;
  __ITM_TYPE_STYLE *Self__5VGQ,*Self__BWGQ,*Self__DWGQ,*Self__FWGQ;
  __ITM_TYPE_STYLE *Self__HWGQ,*Self__JWGQ,*Self__R1IB;
  void *itm_type_character__RIB,*itm_type_n_a_character__SIB;
  void *__tmp__SD,*proto__0PB;
  __PROTOTYPE *Self__U1LC;
  void *result__HIQC,*__tmp__1JQC;
  void *s__IIQC;
  void *__tmp__YJQC,*__tmp__EPB;
  void *self_main__W1LC;
  __CONTEXT *Self__LJ4F;
  __NODE_TYPE *Self__A04F;
  void *__tmp__H40C,*__tmp__TNB,*__tmp__MOB;
  __LIST *Self__R0OG;
  __PROFIL_SLOT *Self__U1IM;
  __PROFIL_BLOCK *Self__5MEJ;
  __CHARACTER *arg__HZE,*p__C0X,*path__HGC;
  void *result__GZE;
  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__B4W;
  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__A5JB;
  __FAST_ARRAYoPROTOTYPEo *result__FTG,*Self__PZM,*Self__Z4L;
  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__JQF,*Self__DJM;
  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__JUF;
  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__2JM;
  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__SXF,*Self__0LM;
  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__DZF,*Self__4MM;
  __FAST_ARRAYoITM_TYPE_GENERICo *result__Z0F,*Self__ESM;
  __FAST_ARRAYoITM_TYPE_GENERIC_ELTo *result__RYLC,*Self__JFQC;
  __FAST_ARRAYoITM_TYPE_GENERIC_ELTo *Self__RNCD;
  void *result__UTLC;
  __CHARACTER Self__QXLC,car__JW;
  __BOOLEAN __tmp__BOCD,__tmp__DA5G,__tmp__PGJJ,__tmp__GY,__tmp__TY;
  __BOOLEAN result__MU1,__tmp__AZ,result__4U1,__tmp__40,result__QV1;
  __BOOLEAN __tmp__U4,result__CW1,__tmp__L2,__tmp__X2,result__KEMD;
  __BOOLEAN __tmp__FAB,result__UW1,__tmp__CBB,result__GX1,__tmp__QBB;
  __BOOLEAN result__YX1,__tmp__4BB,result__KY1,__tmp__5GC,result__DR3;
  __BOOLEAN __tmp__UT3,__tmp__OV3,result__0CAB,__tmp__2U3,result__3TB;
  void **__tmp__WOCD,**new__5R2D;
  __FAST_ARRAYoITM_TYPE_STYLEo *result__BWF,*Self__IKM;
  __HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *result__OASE;
  __HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *Self__VIGF;
  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__PKGC,*Self__XJPC;
  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__AGGC,*Self__LIPC;
  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__TXHC,*Self__MTPC;
  __FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *result__0JKD,*Self__LN0D;
  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__WMOD,*Self__AQ1D;
  __FAST_ARRAYoITM_TYPE_MULTIo *result__SIWD,*Self__AI3D;
  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__EWPD;
  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__0X1D;
  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__FZPD;
  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__Z01D;
  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__LSTD,*Self__V22D;
  __FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *result__VL2B,*Self__SBOC;
  __HASHED_SEToFAST_ARRAYoTYPE_FULLoo *result__IN2B,*Self__WCOC;
  __HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *result__1O2B;
  __HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *Self__MHOC;
  __FAST_ARRAYoTYPES_TMPo *result__IDZG,*Self__434G;
  __HASHED_SEToTYPESo *result__O32J,*Self__CVIK;
  __FAST_ARRAYoCONTEXTo *result__QQCD,*Self__UTZD;
  __FAST_ARRAYoPROFILo *result__5NE,*Self__10L;
  __FAST_ARRAYoFAST_ARRAYoEXPRoo *result__43SH,*Self__4WEI;
  __FAST_ARRAYoFAST_ARRAYoSLOToo *result__O5SH,*Self__CYEI;
  __FAST_ARRAYoLISTo *result__Z3YG,*Self__W24G;
  __FAST_ARRAYoLOCAL_SEQo *result__FSBK,*Self__EIJK;
  __FAST_ARRAYoFAST_ARRAYoLOCALoo *result__EZTG,*Self__FT4G,*Self__T54G;
  void *result__2IQG;
  __FAST_ARRAYoLOCALo *__tmp__EJQG;
  void **__tmp__YA5G,**new__XNDI;
  __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *result__I2CD;
  __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__HYZD;
  __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__F10D;
  __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__410D;
  __FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *result__PCDJ,*Self__QCJJ;
  __FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *Self__5FJJ;
  void *result__O1BJ;
  __FAST_ARRAYoSLOT_DATAo *__tmp__W1BJ;
  void **__tmp__EHJJ,**new__H2IK;
  __HASHED_SEToABSTRACT_STRINGo *result__V1C,*Self__U1K;
  __HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *result__Q3E;
  __HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *Self__3GM;
  __FAST_ARRAYoTYPE_IDo *result__RJE,*Self__YTL;
  void *type_gen__QIB;
  void *src__TRB;
  arg_count  = argc;
  arg_vector = argv;
  parent_numeric__J=NUMERIC__;
  clone_allocation_size__S0C= 0;
  STRING_CONSTANT__->count__XHB=((__INTEGER )((0)));
  STRING__->count__VF= 0;
  STRING_CONSTANT__->storage__C5K=((__CHARACTER *)(NULL));
  STRING__->storage__XNK=NULL;
  nb_page__OQJ= 0;
  MEMORY__->size_and_id__30C= 0;
  capacity_max__GJU= 0;
  begin_memory__4PI=((__POINTER )(NULL));
  MEMORY__->previous_linear__20C= 0;
  first_free__04AB=NULL;
  MEMORY__->next_free__40C=NULL;
  MEMORY__->previous_free__50C=NULL;
  STRING__->capacity__MNK= 0;
  tmp_name__MK=NULL;
  HASHED_SEToABSTRACT_STRINGo__->buckets__YRK=NULL;
  HASHED_SEToABSTRACT_STRINGo__->capacity__TRK= 0;
  HASHED_SEToABSTRACT_STRINGo__->count__ZSK= 0;
  list__TK=NULL;
  HASHED_SET_NODEoABSTRACT_STRINGo__->item__ESK=NULL;
  HASHED_SET_NODEoABSTRACT_STRINGo__->next__QSK=NULL;
  string_tmp__RB=create__AXB( 256);
  operator_equal__0V=NULL;
  operator_not_equal__5V=NULL;
  ARRAYED_COLLECTIONoSTRINGo__->upper__TXD= 0;
  ARRAYED_COLLECTIONoSTRINGo__->capacity__Y1M= 0;
  ARRAYED_COLLECTIONoSTRINGo__->storage__D2M=NULL;
  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__QXD=(*ARRAYED_COLLECTIONoSTRINGo__);
  arg__HZE=NULL;
  str__IZE=NULL;
  result__GZE=create_with_capacity__CEG(((__INTEGER )(arg_count)));
  Self__LEG= 0;
  limit_up__MEG=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
  while ((Self__LEG <= limit_up__MEG)) {
    arg__HZE=((__CHARACTER *)(arg_vector[(Self__LEG)]));
    str__IZE=create__AXB(fast_first_index_of__until__PAD(arg__HZE,'\0', 1024));
    Self__B0X=((__STRING *)str__IZE);
    p__C0X=arg__HZE;
    i__D0X= 0;
    Self__B0X->count__VF= 0;
    while ((((__CHARACTER *)p__C0X)[i__D0X] != '\0')) {
      add_last__YPK(Self__B0X,((__CHARACTER *)p__C0X)[i__D0X]);
      i__D0X=(__INTEGER)(i__D0X +  1);
    };
    add_last__00X(result__GZE,str__IZE);
    Self__LEG=(__INTEGER)(Self__LEG +  1);
  };
  verbose_level__FX= 0;
  is_statistic__0H=FALSE__;
  is_quiet_operation__UG=FALSE__;
  inline_level__20= 17;
  debug_with_code__R1=FALSE__;
  debug_level_option__3C= 0;
  output_name_exe__ZB=NULL;
  target__3B=NULL;
  is_warning__OBB=FALSE__;
  is_all_warning__2BB=FALSE__;
  is_optimization__II=FALSE__;
  input_name__UB=NULL;
  string_tmp2__ADB=create__AXB( 256);
  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__JC= 0;
  LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__DC=(*LINKED_COLLECTIONoSTRING_CONSTANTo__);
  path_directory__EC=create__CZC();
  LINKED_LISToSTRING_CONSTANTo__->first_link__5UK=NULL;
  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__BVK=NULL;
  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__AT4=NULL;
  LINKED_LISToSTRING_CONSTANTo__->last_link__F21=NULL;
  LINKED_LISToSTRING_CONSTANTo__->mem_idx__PUU= 0;
  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__YUU=NULL;
  output_name_c__BF=NULL;
  object__ODD=NULL;
  HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__->buckets__SPL=NULL;
  HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__->capacity__NPL= 0;
  HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__->count__TQL= 0;
  variable__OED=NULL;
  HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__->key__4PL=NULL;
  HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__->next__KQL=NULL;
  HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__->item__3XM=NULL;
  string_tmp__4TB=create__AXB( 128);
  ITM_OBJECT__->position__BJM=((__POSITION ) 0);
  NAMED__->parent_itm_object__PD=(*ITM_OBJECT__);
  NAMED__->name__1QB=NULL;
  NAMED__->style__LDGC='\0';
  PROTOTYPE__->parent_named__QD=(*NAMED__);
  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__LIJB=NULL;
  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__GIJB= 0;
  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__LJJB= 0;
  result__B4W=NULL;
  ptr__C4W=((__POINTER )(NULL));
  typ_id__H4W= 0;
  sz__E4W=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
  if ((sz__E4W ==  0)) {
    result__B4W=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
  } else {
    typ_id__H4W=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__E4W);
    if ((typ_id__H4W == (__INTEGER)(-  1))) {
      a__IK3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__GK3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__E4W + a__IK3Q) & (__UINTEGER_32)(~ a__IK3Q));
      ptr__C4W=micro_alloc__table__lab__BOI(new_size__GK3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GK3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__GK3Q);
    } else {
      t__MK3Q=((__UINTEGER_32 )typ_id__H4W);
      a__OK3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__C4W=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__E4W + a__OK3Q) & (__UINTEGER_32)(~ a__OK3Q)),((__POINTER )(&(table_type[(t__MK3Q)]))),(__UINTEGER_32)(t__MK3Q |  1));
    };
    result__B4W=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__C4W);
    *(result__B4W) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
  };
  Self__A5JB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__B4W);
  new_capacity__0LOB=prime_number_ceiling__A4Q( 193);
  Self__A5JB->buckets__LIJB=create__S2TB(new_capacity__0LOB);
  Self__A5JB->capacity__GIJB=new_capacity__0LOB;
  Self__A5JB->count__LJJB= 0;
  prototype_dico__XHM=result__B4W;
  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__XIJB=NULL;
  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__CJJB=NULL;
  PROTOTYPE__->filename__4QB=NULL;
  PROTOTYPE__->generic_count__DIM= 0;
  ARRAYED_COLLECTIONoExpanded_CHARACTERo__->capacity__JTJB= 0;
  ARRAYED_COLLECTIONoExpanded_CHARACTERo__->storage__STJB=NULL;
  ARRAYED_COLLECTIONoExpanded_CHARACTERo__->upper__WTJB= 0;
  FAST_ARRAYoExpanded_CHARACTERo__->parent_arrayed_collection__IIM=(*ARRAYED_COLLECTIONoExpanded_CHARACTERo__);
  PROTOTYPE__->idf_generic_list__KIM=NULL;
  ARRAYED_COLLECTIONoPROTOTYPEo__->upper__QQB= 0;
  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__YZM= 0;
  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__D0M=NULL;
  FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__FQB=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
  result__FTG=NULL;
  ptr__GTG=((__POINTER )(NULL));
  typ_id__LTG= 0;
  sz__ITG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
  if ((sz__ITG ==  0)) {
    result__FTG=FAST_ARRAYoPROTOTYPEo__;
  } else {
    typ_id__LTG=__FAST_ARRAYoPROTOTYPEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ITG);
    if ((typ_id__LTG == (__INTEGER)(-  1))) {
      a__TK3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__RK3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__ITG + a__TK3Q) & (__UINTEGER_32)(~ a__TK3Q));
      ptr__GTG=micro_alloc__table__lab__BOI(new_size__RK3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RK3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__RK3Q);
    } else {
      t__XK3Q=((__UINTEGER_32 )typ_id__LTG);
      a__ZK3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GTG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ITG + a__ZK3Q) & (__UINTEGER_32)(~ a__ZK3Q)),((__POINTER )(&(table_type[(t__XK3Q)]))),(__UINTEGER_32)(t__XK3Q |  1));
    };
    result__FTG=((__FAST_ARRAYoPROTOTYPEo *)ptr__GTG);
    *(result__FTG) = *(FAST_ARRAYoPROTOTYPEo__);
  };
  Self__PZM=((__FAST_ARRAYoPROTOTYPEo *)result__FTG);
  if ((Self__PZM->parent_arrayed_collection__FQB.capacity__YZM <  512)) {
    Self__PZM->parent_arrayed_collection__FQB.storage__D0M=create__KY5( 512);
    Self__PZM->parent_arrayed_collection__FQB.capacity__YZM= 512;
  };
  Self__PZM->parent_arrayed_collection__FQB.upper__QQB=(__INTEGER)(-  1);
  prototype_list__GQB=result__FTG;
  PROTOTYPE__->index__GAH= 0;
  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__ZALB=NULL;
  PROTOTYPE__->source__UFD=NULL;
  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__YYNB=NULL;
  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__AVJB= 0;
  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__1YNB= 0;
  PROTOTYPE__->slot_list__3IM=NULL;
  source__WFD=NULL;
  position__ZFD= 0;
  pos_cur__2FD= 0;
  pos_line__3FD= 0;
  pos_col__4FD= 0;
  type_error__4AH= 0;
  msg_err__5AH=create__AXB( 256);
  begin_position__SOF= 0;
  last_string__V1G=NULL;
  is_good_section__OCE=FALSE__;
  is_found__LGD=FALSE__;
  last_len_string__VLIB= 0;
  last_integer__R1IC= 0;
  command_list__VI=create__CZC();
  output_decl__1C=create__AXB( 60000);
  ANY__->object_id__XAZG=1;
  TYPE__->prototype__RD=NULL;
  TYPE__->index__LJC= 0;
  TYPE__->slot_run__1JC=NULL;
  TYPE__->default__AKC=NULL;
  TYPE__->subtype_list__APY=NULL;
  TYPE__->size__JPY= 0;
  TYPE__->type_full_list__VUCB=NULL;
  TYPE__->last_pass_binding__YYZI= 0;
  TYPE_NULL__->parent_type__TIB=(*TYPE__);
  index_count__JJC= 0;
  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__HBL=NULL;
  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__CBL= 0;
  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__HCL= 0;
  result__JQF=NULL;
  ptr__KQF=((__POINTER )(NULL));
  typ_id__PQF= 0;
  sz__MQF=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
  if ((sz__MQF ==  0)) {
    result__JQF=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
  } else {
    typ_id__PQF=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MQF);
    if ((typ_id__PQF == (__INTEGER)(-  1))) {
      a__4K3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__2K3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__MQF + a__4K3Q) & (__UINTEGER_32)(~ a__4K3Q));
      ptr__KQF=micro_alloc__table__lab__BOI(new_size__2K3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2K3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__2K3Q);
    } else {
      t__CL3Q=((__UINTEGER_32 )typ_id__PQF);
      a__EL3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__KQF=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MQF + a__EL3Q) & (__UINTEGER_32)(~ a__EL3Q)),((__POINTER )(&(table_type[(t__CL3Q)]))),(__UINTEGER_32)(t__CL3Q |  1));
    };
    result__JQF=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__KQF);
    *(result__JQF) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
  };
  Self__DJM=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__JQF);
  new_capacity__GTP=prime_number_ceiling__A4Q( 193);
  Self__DJM->buckets__HBL=create__GJT(new_capacity__GTP);
  Self__DJM->capacity__CBL=new_capacity__GTP;
  Self__DJM->count__HCL= 0;
  dico_type__RJC=result__JQF;
  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__TBL=NULL;
  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__4BL=NULL;
  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->item__AXQ=NULL;
  ARRAYED_COLLECTIONoSLOTo__->capacity__HSL= 0;
  ARRAYED_COLLECTIONoSLOTo__->storage__SSL=NULL;
  ARRAYED_COLLECTIONoSLOTo__->upper__WSL= 0;
  FAST_ARRAYoSLOTo__->parent_arrayed_collection__ZJC=(*ARRAYED_COLLECTIONoSLOTo__);
  TYPE_FULL__->parent_type__KTL=NULL;
  TYPE_FULL__->flag__LTL= 0;
  TYPE_VOID__->parent_type__UIB=(*TYPE__);
  TYPE_CONTEXT__->parent_type__VIB=(*TYPE__);
  ARRAYED_COLLECTIONoTYPE_IDo__->upper__MDL= 0;
  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__ODL= 0;
  ARRAYED_COLLECTIONoTYPE_IDo__->storage__KEL=NULL;
  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__WKC=(*ARRAYED_COLLECTIONoTYPE_IDo__);
  TYPE_ID__->parent_type__WIB=(*TYPE__);
  list_id__YKC=NULL;
  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__WGL=NULL;
  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__RGL= 0;
  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__OWL= 0;
  ITM_TYPE_SIMPLE__->to_run__2VK=1;
  ITM_TYPE_SIMPLE__->name__UMC=NULL;
  ITM_TYPE_SELF__->parent_itm_type_simple__5KD=(*ITM_TYPE_SIMPLE__);
  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__CHL=NULL;
  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__NHL=NULL;
  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__VHL=NULL;
  result__JUF=NULL;
  ptr__KUF=((__POINTER )(NULL));
  typ_id__PUF= 0;
  sz__MUF=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
  if ((sz__MUF ==  0)) {
    result__JUF=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
  } else {
    typ_id__PUF=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MUF);
    if ((typ_id__PUF == (__INTEGER)(-  1))) {
      a__JL3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__HL3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__MUF + a__JL3Q) & (__UINTEGER_32)(~ a__JL3Q));
      ptr__KUF=micro_alloc__table__lab__BOI(new_size__HL3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HL3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HL3Q);
    } else {
      t__NL3Q=((__UINTEGER_32 )typ_id__PUF);
      a__PL3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__KUF=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MUF + a__PL3Q) & (__UINTEGER_32)(~ a__PL3Q)),((__POINTER )(&(table_type[(t__NL3Q)]))),(__UINTEGER_32)(t__NL3Q |  1));
    };
    result__JUF=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__KUF);
    *(result__JUF) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
  };
  Self__2JM=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__JUF);
  new_capacity__2UP=prime_number_ceiling__A4Q( 193);
  Self__2JM->buckets__WGL=create__3MT(new_capacity__2UP);
  Self__2JM->capacity__RGL=new_capacity__2UP;
  Self__2JM->count__OWL= 0;
  ITM_TYPE_SELF__->parent_itm_type_simple__5KD.name__UMC=(&__string_1);
  fast_put__to__BVL(result__JUF,ITM_TYPE_SELF__,(&__string_1));
  dico__ILC=result__JUF;
  ITM_TYPE_STYLE__->parent_itm_type_simple__3IB=(*ITM_TYPE_SIMPLE__);
  PROTOTYPE__->type_style__ZNY=NULL;
  PROTOTYPE__->export_list__SFDC=NULL;
  PROTOTYPE__->import_list__0FDC=NULL;
  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__BWK= 0;
  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__DWK= 0;
  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__5WK=NULL;
  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__PIB=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__WIL= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__HYL= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__CZL=NULL;
  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__ROC=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
  result__SXF=NULL;
  ptr__TXF=((__POINTER )(NULL));
  typ_id__YXF= 0;
  sz__VXF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
  if ((sz__VXF ==  0)) {
    result__SXF=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
  } else {
    typ_id__YXF=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__VXF);
    if ((typ_id__YXF == (__INTEGER)(-  1))) {
      a__UL3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__SL3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__VXF + a__UL3Q) & (__UINTEGER_32)(~ a__UL3Q));
      ptr__TXF=micro_alloc__table__lab__BOI(new_size__SL3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SL3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SL3Q);
    } else {
      t__YL3Q=((__UINTEGER_32 )typ_id__YXF);
      a__0L3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__TXF=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__VXF + a__0L3Q) & (__UINTEGER_32)(~ a__0L3Q)),((__POINTER )(&(table_type[(t__YL3Q)]))),(__UINTEGER_32)(t__YL3Q |  1));
    };
    result__SXF=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__TXF);
    *(result__SXF) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
  };
  Self__0LM=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__SXF);
  if ((Self__0LM->parent_arrayed_collection__ROC.capacity__HYL <  5)) {
    Self__0LM->parent_arrayed_collection__ROC.storage__CZL=create__G02( 5);
    Self__0LM->parent_arrayed_collection__ROC.capacity__HYL= 5;
  };
  Self__0LM->parent_arrayed_collection__ROC.upper__WIL=(__INTEGER)(-  1);
  free_list__SOC=result__SXF;
  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__BKL=NULL;
  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__2JL= 0;
  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__KQM= 0;
  result__DZF=NULL;
  ptr__EZF=((__POINTER )(NULL));
  typ_id__JZF= 0;
  sz__GZF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
  if ((sz__GZF ==  0)) {
    result__DZF=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
  } else {
    typ_id__JZF=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__GZF);
    if ((typ_id__JZF == (__INTEGER)(-  1))) {
      a__5L3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__3L3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__GZF + a__5L3Q) & (__UINTEGER_32)(~ a__5L3Q));
      ptr__EZF=micro_alloc__table__lab__BOI(new_size__3L3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3L3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3L3Q);
    } else {
      t__DM3Q=((__UINTEGER_32 )typ_id__JZF);
      a__FM3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__EZF=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__GZF + a__FM3Q) & (__UINTEGER_32)(~ a__FM3Q)),((__POINTER )(&(table_type[(t__DM3Q)]))),(__UINTEGER_32)(t__DM3Q |  1));
    };
    result__DZF=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__EZF);
    *(result__DZF) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
  };
  Self__4MM=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__DZF);
  new_capacity__L1P=prime_number_ceiling__A4Q( 53);
  Self__4MM->buckets__BKL=create__BVT(new_capacity__L1P);
  Self__4MM->capacity__2JL=new_capacity__L1P;
  Self__4MM->count__KQM= 0;
  bucket__NPC=result__DZF;
  ITM_TYPE_STYLE__->to_run__V1IB=1;
  ITM_TYPE_STYLE__->style__3MC=NULL;
  ITM_TYPE_GENERIC__->parent_itm_type_style__LLB=(*ITM_TYPE_STYLE__);
  ITM_TYPE_GENERIC_ELT__->index__0E0D= 0;
  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__NKL=NULL;
  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__ZKL=NULL;
  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__RQC= 0;
  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__NSM= 0;
  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__YSM=NULL;
  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__HQC=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
  result__Z0F=NULL;
  ptr__00F=((__POINTER )(NULL));
  typ_id__50F= 0;
  sz__20F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
  if ((sz__20F ==  0)) {
    result__Z0F=FAST_ARRAYoITM_TYPE_GENERICo__;
  } else {
    typ_id__50F=__FAST_ARRAYoITM_TYPE_GENERICo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__20F);
    if ((typ_id__50F == (__INTEGER)(-  1))) {
      a__KM3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__IM3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__20F + a__KM3Q) & (__UINTEGER_32)(~ a__KM3Q));
      ptr__00F=micro_alloc__table__lab__BOI(new_size__IM3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IM3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__IM3Q);
    } else {
      t__OM3Q=((__UINTEGER_32 )typ_id__50F);
      a__QM3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__00F=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__20F + a__QM3Q) & (__UINTEGER_32)(~ a__QM3Q)),((__POINTER )(&(table_type[(t__OM3Q)]))),(__UINTEGER_32)(t__OM3Q |  1));
    };
    result__Z0F=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__00F);
    *(result__Z0F) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
  };
  Self__ESM=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__Z0F);
  if ((Self__ESM->parent_arrayed_collection__HQC.capacity__NSM <  32)) {
    Self__ESM->parent_arrayed_collection__HQC.storage__YSM=create__TVBB( 32);
    Self__ESM->parent_arrayed_collection__HQC.capacity__NSM= 32;
  };
  Self__ESM->parent_arrayed_collection__HQC.upper__RQC=(__INTEGER)(-  1);
  dico__IQC=result__Z0F;
  ITM_TYPE_GENERIC__->list_type__MRC=NULL;
  ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo__->storage__FFQC=NULL;
  ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo__->capacity__SFQC= 0;
  ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo__->upper__4FQC= 0;
  FAST_ARRAYoITM_TYPE_GENERIC_ELTo__->parent_arrayed_collection__3SLC=(*ARRAYED_COLLECTIONoITM_TYPE_GENERIC_ELTo__);
  result__RYLC=NULL;
  ptr__SYLC=((__POINTER )(NULL));
  typ_id__XYLC= 0;
  sz__UYLC=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERIC_ELTo));
  if ((sz__UYLC ==  0)) {
    result__RYLC=FAST_ARRAYoITM_TYPE_GENERIC_ELTo__;
  } else {
    typ_id__XYLC=__FAST_ARRAYoITM_TYPE_GENERIC_ELTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__UYLC);
    if ((typ_id__XYLC == (__INTEGER)(-  1))) {
      a__VM3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__TM3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__UYLC + a__VM3Q) & (__UINTEGER_32)(~ a__VM3Q));
      ptr__SYLC=micro_alloc__table__lab__BOI(new_size__TM3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TM3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__TM3Q);
    } else {
      t__ZM3Q=((__UINTEGER_32 )typ_id__XYLC);
      a__1M3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__SYLC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__UYLC + a__1M3Q) & (__UINTEGER_32)(~ a__1M3Q)),((__POINTER )(&(table_type[(t__ZM3Q)]))),(__UINTEGER_32)(t__ZM3Q |  1));
    };
    result__RYLC=((__FAST_ARRAYoITM_TYPE_GENERIC_ELTo *)ptr__SYLC);
    *(result__RYLC) = *(FAST_ARRAYoITM_TYPE_GENERIC_ELTo__);
  };
  Self__JFQC=((__FAST_ARRAYoITM_TYPE_GENERIC_ELTo *)result__RYLC);
  if ((Self__JFQC->parent_arrayed_collection__3SLC.capacity__SFQC <  26)) {
    Self__JFQC->parent_arrayed_collection__3SLC.storage__FFQC=create__QMCD( 26);
    Self__JFQC->parent_arrayed_collection__3SLC.capacity__SFQC= 26;
  };
  Self__JFQC->parent_arrayed_collection__3SLC.upper__4FQC=(__INTEGER)(-  1);
  result__UTLC=result__RYLC;
  Self__QXLC='A';
  while ((((__INTEGER_8 )Self__QXLC) <= ((__INTEGER_8 )'Z'))) {
    result__AWHD=NULL;
    ptr__BWHD=((__POINTER )(NULL));
    typ_id__GWHD= 0;
    sz__DWHD=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC_ELT));
    if ((sz__DWHD ==  0)) {
      result__AWHD=ITM_TYPE_GENERIC_ELT__;
    } else {
      typ_id__GWHD=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__DWHD);
      if ((typ_id__GWHD == (__INTEGER)(-  1))) {
        a__AN3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__4M3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__DWHD + a__AN3Q) & (__UINTEGER_32)(~ a__AN3Q));
        ptr__BWHD=micro_alloc__table__lab__BOI(new_size__4M3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4M3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__4M3Q);
      } else {
        t__EN3Q=((__UINTEGER_32 )typ_id__GWHD);
        a__GN3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__BWHD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__DWHD + a__GN3Q) & (__UINTEGER_32)(~ a__GN3Q)),((__POINTER )(&(table_type[(t__EN3Q)]))),(__UINTEGER_32)(t__EN3Q |  1));
      };
      result__AWHD=((__ITM_TYPE_GENERIC_ELT *)ptr__BWHD);
      *(result__AWHD) = *(ITM_TYPE_GENERIC_ELT__);
    };
    ((__ITM_TYPE_GENERIC_ELT *)result__AWHD)->index__0E0D=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__QXLC) - ((__INTEGER_8 )'A')));
    Self__RNCD=((__FAST_ARRAYoITM_TYPE_GENERIC_ELTo *)result__UTLC);
    new_capacity__TNCD= 0;
    if (((__INTEGER)(Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC +  1) <= (__INTEGER)(Self__RNCD->parent_arrayed_collection__3SLC.capacity__SFQC -  1))) {
      Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC=(__INTEGER)(Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC +  1);
      __tmp__BOCD=TRUE__;
    } else {
      __tmp__BOCD=FALSE__;
    };
    if ((! __tmp__BOCD)) {
      if ((Self__RNCD->parent_arrayed_collection__3SLC.capacity__SFQC ==  0)) {
        Self__RNCD->parent_arrayed_collection__3SLC.storage__FFQC=create__QMCD( 2);
        Self__RNCD->parent_arrayed_collection__3SLC.capacity__SFQC= 2;
        Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC= 0;
      } else {
        new_capacity__TNCD=(__INTEGER)(Self__RNCD->parent_arrayed_collection__3SLC.capacity__SFQC <<  1);
        __tmp__WOCD=Self__RNCD->parent_arrayed_collection__3SLC.storage__FFQC;
        __tmp__XOCD=Self__RNCD->parent_arrayed_collection__3SLC.capacity__SFQC;
        new__5R2D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__WOCD)),((__UINTEGER_32 )(__INTEGER)(__tmp__XOCD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__TNCD * ((__INTEGER )(sizeof(void *)))))));
        __tmp__SS2D=(__INTEGER)(new_capacity__TNCD -  1);
        Self__XFJF=__tmp__XOCD;
        while ((Self__XFJF <= __tmp__SS2D)) {
          new__5R2D[Self__XFJF]=NULL;
          Self__XFJF=(__INTEGER)(Self__XFJF +  1);
        };
        Self__RNCD->parent_arrayed_collection__3SLC.storage__FFQC=new__5R2D;
        Self__RNCD->parent_arrayed_collection__3SLC.capacity__SFQC=new_capacity__TNCD;
        Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC=(__INTEGER)(Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC +  1);
      };
    };
    ((void **)Self__RNCD->parent_arrayed_collection__3SLC.storage__FFQC)[Self__RNCD->parent_arrayed_collection__3SLC.upper__4FQC]=result__AWHD;
    Self__QXLC=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__QXLC) + ((__INTEGER_8 )((__CHARACTER )(( 1))))))));
  };
  list__4SLC=result__RYLC;
  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__KMC= 0;
  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__RKM= 0;
  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__2KM=NULL;
  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__AMC=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
  result__BWF=NULL;
  ptr__CWF=((__POINTER )(NULL));
  typ_id__HWF= 0;
  sz__EWF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
  if ((sz__EWF ==  0)) {
    result__BWF=FAST_ARRAYoITM_TYPE_STYLEo__;
  } else {
    typ_id__HWF=__FAST_ARRAYoITM_TYPE_STYLEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__EWF);
    if ((typ_id__HWF == (__INTEGER)(-  1))) {
      a__RN3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__PN3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__EWF + a__RN3Q) & (__UINTEGER_32)(~ a__RN3Q));
      ptr__CWF=micro_alloc__table__lab__BOI(new_size__PN3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PN3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__PN3Q);
    } else {
      t__VN3Q=((__UINTEGER_32 )typ_id__HWF);
      a__XN3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__CWF=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__EWF + a__XN3Q) & (__UINTEGER_32)(~ a__XN3Q)),((__POINTER )(&(table_type[(t__VN3Q)]))),(__UINTEGER_32)(t__VN3Q |  1));
    };
    result__BWF=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__CWF);
    *(result__BWF) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
  };
  Self__IKM=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__BWF);
  if ((Self__IKM->parent_arrayed_collection__AMC.capacity__RKM <  32)) {
    Self__IKM->parent_arrayed_collection__AMC.storage__2KM=create__GRBB( 32);
    Self__IKM->parent_arrayed_collection__AMC.capacity__RKM= 32;
  };
  Self__IKM->parent_arrayed_collection__AMC.upper__KMC=(__INTEGER)(-  1);
  dico__BMC=result__BWF;
  ITM_CODE__->parent_itm_object__X1CC=(*ITM_OBJECT__);
  ITM_READ__->parent_itm_code__G1FC=(*ITM_CODE__);
  ITM_READ__->name__TVPC=NULL;
  ITM_CONSTANT__->parent_itm_code__KHEC=(*ITM_CODE__);
  ITM_PROTOTYPE__->parent_itm_constant__LHEC=(*ITM_CONSTANT__);
  ITM_PROTOTYPE__->type__VAPC=NULL;
  last_real__50IC=NULL;
  ITM_REAL__->parent_itm_constant__30IC=(*ITM_CONSTANT__);
  ITM_REAL__->value__0C0D=NULL;
  ITM_NUMBER__->parent_itm_constant__P1IC=(*ITM_CONSTANT__);
  ITM_NUMBER__->value__5C0D= 0;
  ITM_CHARACTER__->parent_itm_constant__B2IC=(*ITM_CONSTANT__);
  ITM_CHARACTER__->character__ED0D=NULL;
  ITM_STRING__->parent_itm_code__S2IC=(*ITM_CODE__);
  HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__->buckets__FKFF=NULL;
  HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__->capacity__AKFF= 0;
  HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__->count__FLFF= 0;
  result__OASE=NULL;
  ptr__PASE=((__POINTER )(NULL));
  typ_id__UASE= 0;
  sz__RASE=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo));
  if ((sz__RASE ==  0)) {
    result__OASE=HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__;
  } else {
    typ_id__UASE=__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__RASE);
    if ((typ_id__UASE == (__INTEGER)(-  1))) {
      a__2N3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__0N3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__RASE + a__2N3Q) & (__UINTEGER_32)(~ a__2N3Q));
      ptr__PASE=micro_alloc__table__lab__BOI(new_size__0N3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0N3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__0N3Q);
    } else {
      t__AO3Q=((__UINTEGER_32 )typ_id__UASE);
      a__CO3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__PASE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__RASE + a__CO3Q) & (__UINTEGER_32)(~ a__CO3Q)),((__POINTER )(&(table_type[(t__AO3Q)]))),(__UINTEGER_32)(t__AO3Q |  1));
    };
    result__OASE=((__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *)ptr__PASE);
    *(result__OASE) = *(HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo__);
  };
  Self__VIGF=((__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *)result__OASE);
  new_capacity__4MJF=prime_number_ceiling__A4Q( 193);
  Self__VIGF->buckets__FKFF=create__YXOF(new_capacity__4MJF);
  Self__VIGF->capacity__AKFF=new_capacity__4MJF;
  Self__VIGF->count__FLFF= 0;
  dico_string__OD0D=result__OASE;
  HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__->key__RKFF=NULL;
  HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__->next__2KFF=NULL;
  HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__->item__U11F= 0;
  ITM_STRING__->string__QD0D=NULL;
  last_group__KFEC=NULL;
  ITM_LIST__->parent_itm_code__YVDC=(*ITM_CODE__);
  old_position__TMFC= 0;
  old_pos_cur__VMFC= 0;
  old_pos_line__XMFC= 0;
  old_pos_col__ZMFC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__LCPC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__AKPC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__LKPC=NULL;
  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__ENFC=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
  ARRAYED_COLLECTIONoITM_LOCALo__->upper__3XGC= 0;
  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__1LPC= 0;
  ARRAYED_COLLECTIONoITM_LOCALo__->storage__GMPC=NULL;
  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__WCFC=(*ARRAYED_COLLECTIONoITM_LOCALo__);
  result__PKGC=NULL;
  ptr__QKGC=((__POINTER )(NULL));
  typ_id__VKGC= 0;
  sz__SKGC=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
  if ((sz__SKGC ==  0)) {
    result__PKGC=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
  } else {
    typ_id__VKGC=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__SKGC);
    if ((typ_id__VKGC == (__INTEGER)(-  1))) {
      a__HO3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__FO3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__SKGC + a__HO3Q) & (__UINTEGER_32)(~ a__HO3Q));
      ptr__QKGC=micro_alloc__table__lab__BOI(new_size__FO3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FO3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__FO3Q);
    } else {
      t__LO3Q=((__UINTEGER_32 )typ_id__VKGC);
      a__NO3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__QKGC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__SKGC + a__NO3Q) & (__UINTEGER_32)(~ a__NO3Q)),((__POINTER )(&(table_type[(t__LO3Q)]))),(__UINTEGER_32)(t__LO3Q |  1));
    };
    result__PKGC=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__QKGC);
    *(result__PKGC) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
  };
  Self__XJPC=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__PKGC);
  if ((Self__XJPC->parent_arrayed_collection__ENFC.capacity__AKPC <  5)) {
    Self__XJPC->parent_arrayed_collection__ENFC.storage__LKPC=create__XKBD( 5);
    Self__XJPC->parent_arrayed_collection__ENFC.capacity__AKPC= 5;
  };
  Self__XJPC->parent_arrayed_collection__ENFC.upper__LCPC=(__INTEGER)(-  1);
  free_list__FNFC=result__PKGC;
  ITM_LOCAL__->parent_itm_object__RCFC=(*ITM_OBJECT__);
  ITM_LOCAL__->name__A0GC=NULL;
  ITM_LOCAL__->type__K5EF=NULL;
  ITM_LIST__->local_list__3HPC=NULL;
  ITM_LIST__->static_list__JIPC=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__CAPC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__WEPC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__SFPC=NULL;
  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__SFFC=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
  ARRAYED_COLLECTIONoITM_CODEo__->upper__ZAPC= 0;
  ARRAYED_COLLECTIONoITM_CODEo__->capacity__VBPC= 0;
  ARRAYED_COLLECTIONoITM_CODEo__->storage__ACPC=NULL;
  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__AFEC=(*ARRAYED_COLLECTIONoITM_CODEo__);
  result__AGGC=NULL;
  ptr__BGGC=((__POINTER )(NULL));
  typ_id__GGGC= 0;
  sz__DGGC=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
  if ((sz__DGGC ==  0)) {
    result__AGGC=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
  } else {
    typ_id__GGGC=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__DGGC);
    if ((typ_id__GGGC == (__INTEGER)(-  1))) {
      a__SO3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__QO3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__DGGC + a__SO3Q) & (__UINTEGER_32)(~ a__SO3Q));
      ptr__BGGC=micro_alloc__table__lab__BOI(new_size__QO3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QO3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__QO3Q);
    } else {
      t__WO3Q=((__UINTEGER_32 )typ_id__GGGC);
      a__YO3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__BGGC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__DGGC + a__YO3Q) & (__UINTEGER_32)(~ a__YO3Q)),((__POINTER )(&(table_type[(t__WO3Q)]))),(__UINTEGER_32)(t__WO3Q |  1));
    };
    result__AGGC=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__BGGC);
    *(result__AGGC) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
  };
  Self__LIPC=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__AGGC);
  if ((Self__LIPC->parent_arrayed_collection__SFFC.capacity__WEPC <  5)) {
    Self__LIPC->parent_arrayed_collection__SFFC.storage__SFPC=create__TIBD( 5);
    Self__LIPC->parent_arrayed_collection__SFFC.capacity__WEPC= 5;
  };
  Self__LIPC->parent_arrayed_collection__SFFC.upper__CAPC=(__INTEGER)(-  1);
  free_list__TFFC=result__AGGC;
  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__CSPC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__VTPC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__AUPC=NULL;
  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__J2GC=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__RSSD= 0;
  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__PRZD= 0;
  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__FB0D=NULL;
  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__VTFC=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
  result__TXHC=NULL;
  ptr__UXHC=((__POINTER )(NULL));
  typ_id__ZXHC= 0;
  sz__WXHC=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
  if ((sz__WXHC ==  0)) {
    result__TXHC=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
  } else {
    typ_id__ZXHC=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__WXHC);
    if ((typ_id__ZXHC == (__INTEGER)(-  1))) {
      a__3O3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__1O3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__WXHC + a__3O3Q) & (__UINTEGER_32)(~ a__3O3Q));
      ptr__UXHC=micro_alloc__table__lab__BOI(new_size__1O3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1O3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__1O3Q);
    } else {
      t__BP3Q=((__UINTEGER_32 )typ_id__ZXHC);
      a__DP3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__UXHC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__WXHC + a__DP3Q) & (__UINTEGER_32)(~ a__DP3Q)),((__POINTER )(&(table_type[(t__BP3Q)]))),(__UINTEGER_32)(t__BP3Q |  1));
    };
    result__TXHC=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__UXHC);
    *(result__TXHC) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
  };
  Self__MTPC=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__TXHC);
  if ((Self__MTPC->parent_arrayed_collection__J2GC.capacity__VTPC <  5)) {
    Self__MTPC->parent_arrayed_collection__J2GC.storage__AUPC=create__Z1BD( 5);
    Self__MTPC->parent_arrayed_collection__J2GC.capacity__VTPC= 5;
  };
  Self__MTPC->parent_arrayed_collection__J2GC.upper__CSPC=(__INTEGER)(-  1);
  free_list__K2GC=result__TXHC;
  ITM_LIST_IDF__->parent_itm_code__NXFC=(*ITM_CODE__);
  ITM_LIST_IDF__->list_name__DHGF=NULL;
  ITM_WRITE__->parent_itm_code__CYFC=(*ITM_CODE__);
  ITM_WRITE__->assign__HV2D=NULL;
  ITM_WRITE__->value__IV2D=NULL;
  ITM_WRITE_VALUE__->parent_itm_write__DYFC=(*ITM_WRITE__);
  ITM_WRITE_CAST__->parent_itm_write__ZYFC=(*ITM_WRITE__);
  ITM_WRITE_CODE__->parent_itm_write__E2FC=(*ITM_WRITE__);
  ITM_READ_ARG2__->parent_itm_read__V4FC=(*ITM_READ__);
  ITM_BINARY__->parent_itm_code__J5FC=(*ITM_CODE__);
  ITM_READ_ARG1__->parent_itm_read__S5GC=(*ITM_READ__);
  ITM_OLD__->parent_itm_code__CIIC=(*ITM_CODE__);
  ITM_EXTERN__->parent_itm_code__KXIC=(*ITM_CODE__);
  ITM_EXTERN__->extern__CJ1D=NULL;
  ITM_EXTERNAL_TYPE__->parent_itm_extern__LXIC=(*ITM_EXTERN__);
  ITM_EXTERNAL__->parent_itm_extern__MAJC=(*ITM_EXTERN__);
  ITM_READ_ARGS__->parent_itm_read__J5JC=(*ITM_READ__);
  ITM_READ_ARG1__->arg__UVPC=NULL;
  ITM_OLD__->value__OZPC=NULL;
  free__DBLC=create_with_capacity__CEG( 5);
  ITM_READ_ARG2__->arg_first__MEQC=NULL;
  ITM_READ_ARG2__->arg_second__NEQC=NULL;
  ITM_READ_ARGS__->args__TEQC=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo__->upper__YRZD= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo__->capacity__UN0D= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo__->storage__5N0D=NULL;
  FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo__->parent_arrayed_collection__DYZC=(*ARRAYED_COLLECTIONoFAST_ARRAYoExpanded_POSITIONoo__);
  ARRAYED_COLLECTIONoExpanded_POSITIONo__->storage__MA0D=NULL;
  ARRAYED_COLLECTIONoExpanded_POSITIONo__->upper__VO0D= 0;
  ARRAYED_COLLECTIONoExpanded_POSITIONo__->capacity__BP0D= 0;
  FAST_ARRAYoExpanded_POSITIONo__->parent_arrayed_collection__1TFC=(*ARRAYED_COLLECTIONoExpanded_POSITIONo__);
  result__0JKD=NULL;
  ptr__1JKD=((__POINTER )(NULL));
  typ_id__AKKD= 0;
  sz__3JKD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo));
  if ((sz__3JKD ==  0)) {
    result__0JKD=FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo__;
  } else {
    typ_id__AKKD=__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__3JKD);
    if ((typ_id__AKKD == (__INTEGER)(-  1))) {
      a__IP3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__GP3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__3JKD + a__IP3Q) & (__UINTEGER_32)(~ a__IP3Q));
      ptr__1JKD=micro_alloc__table__lab__BOI(new_size__GP3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GP3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__GP3Q);
    } else {
      t__MP3Q=((__UINTEGER_32 )typ_id__AKKD);
      a__OP3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__1JKD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__3JKD + a__OP3Q) & (__UINTEGER_32)(~ a__OP3Q)),((__POINTER )(&(table_type[(t__MP3Q)]))),(__UINTEGER_32)(t__MP3Q |  1));
    };
    result__0JKD=((__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *)ptr__1JKD);
    *(result__0JKD) = *(FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo__);
  };
  Self__LN0D=((__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *)result__0JKD);
  if ((Self__LN0D->parent_arrayed_collection__DYZC.capacity__UN0D <  5)) {
    Self__LN0D->parent_arrayed_collection__DYZC.storage__5N0D=create__GJSE( 5);
    Self__LN0D->parent_arrayed_collection__DYZC.capacity__UN0D= 5;
  };
  Self__LN0D->parent_arrayed_collection__DYZC.upper__YRZD=(__INTEGER)(-  1);
  free_list__EYZC=result__0JKD;
  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__YS0D=NULL;
  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__TS0D= 0;
  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__MT1D= 0;
  result__WMOD=NULL;
  ptr__XMOD=((__POINTER )(NULL));
  typ_id__2MOD= 0;
  sz__ZMOD=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
  if ((sz__ZMOD ==  0)) {
    result__WMOD=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
  } else {
    typ_id__2MOD=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ZMOD);
    if ((typ_id__2MOD == (__INTEGER)(-  1))) {
      a__TP3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__RP3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__ZMOD + a__TP3Q) & (__UINTEGER_32)(~ a__TP3Q));
      ptr__XMOD=micro_alloc__table__lab__BOI(new_size__RP3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RP3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__RP3Q);
    } else {
      t__XP3Q=((__UINTEGER_32 )typ_id__2MOD);
      a__ZP3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__XMOD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ZMOD + a__ZP3Q) & (__UINTEGER_32)(~ a__ZP3Q)),((__POINTER )(&(table_type[(t__XP3Q)]))),(__UINTEGER_32)(t__XP3Q |  1));
    };
    result__WMOD=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__XMOD);
    *(result__WMOD) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
  };
  Self__AQ1D=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__WMOD);
  new_capacity__YWCE=prime_number_ceiling__A4Q( 53);
  Self__AQ1D->buckets__YS0D=create__FSKE(new_capacity__YWCE);
  Self__AQ1D->capacity__TS0D=new_capacity__YWCE;
  Self__AQ1D->count__MT1D= 0;
  bucket__DYGD=result__WMOD;
  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__ET0D=NULL;
  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__QT0D=NULL;
  ITM_BINARY__->position_list__NW0D=NULL;
  ITM_BINARY__->value_list__OW0D=NULL;
  ITM_BINARY__->operator_list__PW0D=NULL;
  ITM_RESULT__->parent_itm_code__FBCD=(*ITM_CODE__);
  ITM_RESULT__->value__H52D=NULL;
  type_void__NHEC=get__5KC((&__string_2));
  ITM_LIST__->code__G5OC=NULL;
  ITM_ARGUMENT__->parent_itm_code__QXIC=(*ITM_OBJECT__);
  ITM_ARG__->parent_itm_argument__QECD=(*ITM_ARGUMENT__);
  ITM_ARG__->name__332D=NULL;
  ITM_ARG__->type__432D=NULL;
  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__LZVD= 0;
  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__JI3D= 0;
  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__UI3D=NULL;
  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__BZVD=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
  result__SIWD=NULL;
  ptr__TIWD=((__POINTER )(NULL));
  typ_id__YIWD= 0;
  sz__VIWD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
  if ((sz__VIWD ==  0)) {
    result__SIWD=FAST_ARRAYoITM_TYPE_MULTIo__;
  } else {
    typ_id__YIWD=__FAST_ARRAYoITM_TYPE_MULTIo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__VIWD);
    if ((typ_id__YIWD == (__INTEGER)(-  1))) {
      a__4P3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__2P3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__VIWD + a__4P3Q) & (__UINTEGER_32)(~ a__4P3Q));
      ptr__TIWD=micro_alloc__table__lab__BOI(new_size__2P3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2P3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__2P3Q);
    } else {
      t__CQ3Q=((__UINTEGER_32 )typ_id__YIWD);
      a__EQ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__TIWD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__VIWD + a__EQ3Q) & (__UINTEGER_32)(~ a__EQ3Q)),((__POINTER )(&(table_type[(t__CQ3Q)]))),(__UINTEGER_32)(t__CQ3Q |  1));
    };
    result__SIWD=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__TIWD);
    *(result__SIWD) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
  };
  Self__AI3D=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__SIWD);
  if ((Self__AI3D->parent_arrayed_collection__BZVD.capacity__JI3D <  32)) {
    Self__AI3D->parent_arrayed_collection__BZVD.storage__UI3D=create__K2UE( 32);
    Self__AI3D->parent_arrayed_collection__BZVD.capacity__JI3D= 32;
  };
  Self__AI3D->parent_arrayed_collection__BZVD.upper__LZVD=(__INTEGER)(-  1);
  dico__CZVD=result__SIWD;
  ITM_TYPE_MULTI__->list_type__VZVD=NULL;
  ITM_ARGS__->parent_itm_argument__ZUSD=(*ITM_ARGUMENT__);
  ITM_ARGS__->name__FH3D=NULL;
  ITM_ARGS__->type__GH3D=NULL;
  ITM_BLOCK__->list__VD0D=NULL;
  ITM_BLOCK__->argument__WD0D=NULL;
  ITM_EXTERNAL_TYPE__->is_persistant__ECJC=FALSE__;
  ITM_EXTERNAL_TYPE__->type__WY0D=NULL;
  ITM_EXTERNAL_TYPE__->type_list__TV1D=NULL;
  PROTOTYPE__->default_value__JNDC=NULL;
  PROTOTYPE__->type_c__EPDC=NULL;
  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__W30D=NULL;
  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__R30D= 0;
  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__XZ1D= 0;
  result__EWPD=NULL;
  ptr__FWPD=((__POINTER )(NULL));
  typ_id__KWPD= 0;
  sz__HWPD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
  if ((sz__HWPD ==  0)) {
    result__EWPD=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
  } else {
    typ_id__KWPD=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__HWPD);
    if ((typ_id__KWPD == (__INTEGER)(-  1))) {
      a__JQ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__HQ3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__HWPD + a__JQ3Q) & (__UINTEGER_32)(~ a__JQ3Q));
      ptr__FWPD=micro_alloc__table__lab__BOI(new_size__HQ3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HQ3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HQ3Q);
    } else {
      t__NQ3Q=((__UINTEGER_32 )typ_id__KWPD);
      a__PQ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__FWPD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__HWPD + a__PQ3Q) & (__UINTEGER_32)(~ a__PQ3Q)),((__POINTER )(&(table_type[(t__NQ3Q)]))),(__UINTEGER_32)(t__NQ3Q |  1));
    };
    result__EWPD=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__FWPD);
    *(result__EWPD) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
  };
  Self__0X1D=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__EWPD);
  new_capacity__L5CE=prime_number_ceiling__A4Q( 193);
  Self__0X1D->buckets__W30D=create__54KE(new_capacity__L5CE);
  Self__0X1D->capacity__R30D=new_capacity__L5CE;
  Self__0X1D->count__XZ1D= 0;
  bucket_name__MEJD=result__EWPD;
  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__C40D=NULL;
  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__N40D=NULL;
  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__V40D=NULL;
  SECTION___->name__1I0D=NULL;
  SECTION___->type_list__JY1D=NULL;
  last_section__D5BC=NULL;
  PROTOTYPE__->is_mapping__1RMC=FALSE__;
  PROTOTYPE__->last_slot__05BC=NULL;
  ITM_SLOT__->id_section__EACC=NULL;
  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__250D=NULL;
  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__X50D= 0;
  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__R21D= 0;
  result__FZPD=NULL;
  ptr__GZPD=((__POINTER )(NULL));
  typ_id__LZPD= 0;
  sz__IZPD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
  if ((sz__IZPD ==  0)) {
    result__FZPD=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
  } else {
    typ_id__LZPD=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__IZPD);
    if ((typ_id__LZPD == (__INTEGER)(-  1))) {
      a__UQ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__SQ3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__IZPD + a__UQ3Q) & (__UINTEGER_32)(~ a__UQ3Q));
      ptr__GZPD=micro_alloc__table__lab__BOI(new_size__SQ3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SQ3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SQ3Q);
    } else {
      t__YQ3Q=((__UINTEGER_32 )typ_id__LZPD);
      a__0Q3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GZPD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__IZPD + a__0Q3Q) & (__UINTEGER_32)(~ a__0Q3Q)),((__POINTER )(&(table_type[(t__YQ3Q)]))),(__UINTEGER_32)(t__YQ3Q |  1));
    };
    result__FZPD=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__GZPD);
    *(result__FZPD) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
  };
  Self__Z01D=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__FZPD);
  new_capacity__GDDE=prime_number_ceiling__A4Q( 193);
  Self__Z01D->buckets__250D=create__CELE(new_capacity__GDDE);
  Self__Z01D->capacity__X50D=new_capacity__GDDE;
  Self__Z01D->count__R21D= 0;
  bucket_list__HGJD=result__FZPD;
  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__IA1D=NULL;
  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__TA1D=NULL;
  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__1A1D=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__ET2D= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__JY2D= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__FZ2D=NULL;
  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__Y0PD=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__W31D= 0;
  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__Y31D= 0;
  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__U41D=NULL;
  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__5GJD=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
  result__LSTD=NULL;
  ptr__MSTD=((__POINTER )(NULL));
  typ_id__RSTD= 0;
  sz__OSTD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
  if ((sz__OSTD ==  0)) {
    result__LSTD=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
  } else {
    typ_id__RSTD=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__OSTD);
    if ((typ_id__RSTD == (__INTEGER)(-  1))) {
      a__5Q3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__3Q3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__OSTD + a__5Q3Q) & (__UINTEGER_32)(~ a__5Q3Q));
      ptr__MSTD=micro_alloc__table__lab__BOI(new_size__3Q3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3Q3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3Q3Q);
    } else {
      t__DR3Q=((__UINTEGER_32 )typ_id__RSTD);
      a__FR3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__MSTD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__OSTD + a__FR3Q) & (__UINTEGER_32)(~ a__FR3Q)),((__POINTER )(&(table_type[(t__DR3Q)]))),(__UINTEGER_32)(t__DR3Q |  1));
    };
    result__LSTD=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__MSTD);
    *(result__LSTD) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
  };
  Self__V22D=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__LSTD);
  if ((Self__V22D->parent_arrayed_collection__Y0PD.capacity__JY2D <  5)) {
    Self__V22D->parent_arrayed_collection__Y0PD.storage__FZ2D=create__XQUE( 5);
    Self__V22D->parent_arrayed_collection__Y0PD.capacity__JY2D= 5;
  };
  Self__V22D->parent_arrayed_collection__Y0PD.upper__ET2D=(__INTEGER)(-  1);
  free_list__Z0PD=result__LSTD;
  ITM_SLOT__->parent_named__XIM=(*NAMED__);
  ITM_SLOT__->priority_and_level__NHUE= 0;
  last_slot__UIJD=NULL;
  ITM_SLOT__->argument_list__BC2D=NULL;
  ITM_SLOT__->type__PD2D=NULL;
  ITM_SLOT__->affect__TD2D='\0';
  ITM_LDOTS__->parent_itm_constant__5FEC=(*ITM_CODE__);
  ITM_SLOT__->require__SB3D=NULL;
  ITM_SLOT__->value__C42D=NULL;
  ITM_SLOT__->ensure__WB3D=NULL;
  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__PFQD=NULL;
  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__0FQD=NULL;
  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__CGQD=NULL;
  PROTOTYPE__->first_slot__5QMC=NULL;
  ITM_SLOT__->next__YRMC=NULL;
  list_current__IF1=NULL;
  INSTR__->parent_itm_object__TE=(*ITM_OBJECT__);
  EXPR__->parent_instr__UE=(*INSTR__);
  LIST__->parent_expr__VE=(*EXPR__);
  last_position__GG1=((__POSITION ) 0);
  TYPE_GENERIC__->parent_type__T2IB=(*TYPE__);
  SLOT__->base_slot__P22F=NULL;
  SLOT__->receiver_type__Q22F=NULL;
  SLOT_CODE__->parent_slot__Y22F=SLOT__;
  SLOT_CODE__->value__C15F=NULL;
  ARRAYED_COLLECTIONoPROFIL_SLOTo__->capacity__ZUPG= 0;
  ARRAYED_COLLECTIONoPROFIL_SLOTo__->storage__EVPG=NULL;
  ARRAYED_COLLECTIONoPROFIL_SLOTo__->upper__IVPG= 0;
  FAST_ARRAYoPROFIL_SLOTo__->parent_arrayed_collection__H15F=(*ARRAYED_COLLECTIONoPROFIL_SLOTo__);
  PROFIL__->context__0M0G=NULL;
  PROFIL__->code__HZJH=NULL;
  PROFIL__->argument_list__N5JH=NULL;
  PROFIL__->result_last__XGKH=NULL;
  PROFIL__->result_list__SA2H=NULL;
  PROFIL__->type_self__RIEI=NULL;
  PROFIL__->name__XJEI=NULL;
  PROFIL__->life_index__01RI= 0;
  PROFIL__->stat__BNEJ=((__INTEGER_8 )(__INTEGER)(-  1));
  PROFIL__->link_count__FALJ= 0;
  PROFIL__->count_intern_call__WTSL= 0;
  PROFIL_SLOT__->parent_profil__51LC=(*PROFIL__);
  SLOT_CODE__->profil__J15F=NULL;
  SLOT__->slot_code_intern__322F=NULL;
  self_up__LKEF=NULL;
  run_value__FMQC=NULL;
  ARRAYED_COLLECTIONoSLOT_DATAo__->upper__035F= 0;
  ARRAYED_COLLECTIONoSLOT_DATAo__->capacity__235F= 0;
  ARRAYED_COLLECTIONoSLOT_DATAo__->storage__Y45F=NULL;
  FAST_ARRAYoSLOT_DATAo__->parent_arrayed_collection__3K3F=(*ARRAYED_COLLECTIONoSLOT_DATAo__);
  VARIABLE__->parent_named__A2LC=(*NAMED__);
  VARIABLE__->type_list__HKZD=NULL;
  VARIABLE__->intern_name__025F=NULL;
  VARIABLE__->type__125F=NULL;
  VARIABLE__->ensure_count__QEAG= 0;
  VARIABLE__->require_first__DAEH=NULL;
  VARIABLE__->require_list__UAEH=NULL;
  VARIABLE__->level_type__XTHK= 0;
  SLOT_DATA__->parent_variable__AJZD=(*VARIABLE__);
  SLOT__->slot_data_list__CL3F=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo__->upper__MKNC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo__->capacity__WZNC= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo__->storage__R0NC=NULL;
  FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo__->parent_arrayed_collection__ABNB=(*ARRAYED_COLLECTIONoFAST_ARRAYoTYPE_FULLoo__);
  ARRAYED_COLLECTIONoTYPE_FULLo__->upper__JVCB= 0;
  ARRAYED_COLLECTIONoTYPE_FULLo__->capacity__PYMB= 0;
  ARRAYED_COLLECTIONoTYPE_FULLo__->storage__LZMB=NULL;
  FAST_ARRAYoTYPE_FULLo__->parent_arrayed_collection__UUCB=(*ARRAYED_COLLECTIONoTYPE_FULLo__);
  result__VL2B=NULL;
  ptr__WL2B=((__POINTER )(NULL));
  typ_id__1L2B= 0;
  sz__YL2B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo));
  if ((sz__YL2B ==  0)) {
    result__VL2B=FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo__;
  } else {
    typ_id__1L2B=__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__YL2B);
    if ((typ_id__1L2B == (__INTEGER)(-  1))) {
      a__KR3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__IR3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__YL2B + a__KR3Q) & (__UINTEGER_32)(~ a__KR3Q));
      ptr__WL2B=micro_alloc__table__lab__BOI(new_size__IR3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IR3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__IR3Q);
    } else {
      t__OR3Q=((__UINTEGER_32 )typ_id__1L2B);
      a__QR3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__WL2B=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__YL2B + a__QR3Q) & (__UINTEGER_32)(~ a__QR3Q)),((__POINTER )(&(table_type[(t__OR3Q)]))),(__UINTEGER_32)(t__OR3Q |  1));
    };
    result__VL2B=((__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *)ptr__WL2B);
    *(result__VL2B) = *(FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo__);
  };
  Self__SBOC=((__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *)result__VL2B);
  if ((Self__SBOC->parent_arrayed_collection__ABNB.capacity__WZNC <  5)) {
    Self__SBOC->parent_arrayed_collection__ABNB.storage__R0NC=create__QP5C( 5);
    Self__SBOC->parent_arrayed_collection__ABNB.capacity__WZNC= 5;
  };
  Self__SBOC->parent_arrayed_collection__ABNB.upper__MKNC=(__INTEGER)(-  1);
  free_list__BBNB=result__VL2B;
  TYPE_GENERIC__->generic_list__3R2B=NULL;
  string_tmp__2KEF=create__AXB( 100);
  PROFIL_BLOCK__->parent_profil__GHAG=(*PROFIL__);
  type_block__BLB=NULL;
  HASHED_SEToFAST_ARRAYoTYPE_FULLoo__->buckets__XLNC=NULL;
  HASHED_SEToFAST_ARRAYoTYPE_FULLoo__->capacity__SLNC= 0;
  HASHED_SEToFAST_ARRAYoTYPE_FULLoo__->count__SFOC= 0;
  result__IN2B=NULL;
  ptr__JN2B=((__POINTER )(NULL));
  typ_id__ON2B= 0;
  sz__LN2B=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoTYPE_FULLoo));
  if ((sz__LN2B ==  0)) {
    result__IN2B=HASHED_SEToFAST_ARRAYoTYPE_FULLoo__;
  } else {
    typ_id__ON2B=__HASHED_SEToFAST_ARRAYoTYPE_FULLoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__LN2B);
    if ((typ_id__ON2B == (__INTEGER)(-  1))) {
      a__VR3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__TR3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__LN2B + a__VR3Q) & (__UINTEGER_32)(~ a__VR3Q));
      ptr__JN2B=micro_alloc__table__lab__BOI(new_size__TR3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TR3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__TR3Q);
    } else {
      t__ZR3Q=((__UINTEGER_32 )typ_id__ON2B);
      a__1R3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__JN2B=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__LN2B + a__1R3Q) & (__UINTEGER_32)(~ a__1R3Q)),((__POINTER )(&(table_type[(t__ZR3Q)]))),(__UINTEGER_32)(t__ZR3Q |  1));
    };
    result__IN2B=((__HASHED_SEToFAST_ARRAYoTYPE_FULLoo *)ptr__JN2B);
    *(result__IN2B) = *(HASHED_SEToFAST_ARRAYoTYPE_FULLoo__);
  };
  Self__WCOC=((__HASHED_SEToFAST_ARRAYoTYPE_FULLoo *)result__IN2B);
  new_capacity__4DSC=prime_number_ceiling__A4Q( 53);
  Self__WCOC->buckets__XLNC=create__IWXC(new_capacity__4DSC);
  Self__WCOC->capacity__SLNC=new_capacity__4DSC;
  Self__WCOC->count__SFOC= 0;
  bucket__MCNB=result__IN2B;
  TYPE_GENERIC__->name__2R2B=NULL;
  HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__->item__DMNC=NULL;
  HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__->next__PMNC=NULL;
  HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__->buckets__5NNC=NULL;
  HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__->capacity__0NNC= 0;
  HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__->count__EJOC= 0;
  result__1O2B=NULL;
  ptr__2O2B=((__POINTER )(NULL));
  typ_id__BP2B= 0;
  sz__4O2B=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo));
  if ((sz__4O2B ==  0)) {
    result__1O2B=HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__;
  } else {
    typ_id__BP2B=__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__4O2B);
    if ((typ_id__BP2B == (__INTEGER)(-  1))) {
      a__AS3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__4R3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__4O2B + a__AS3Q) & (__UINTEGER_32)(~ a__AS3Q));
      ptr__2O2B=micro_alloc__table__lab__BOI(new_size__4R3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4R3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__4R3Q);
    } else {
      t__ES3Q=((__UINTEGER_32 )typ_id__BP2B);
      a__GS3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__2O2B=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__4O2B + a__GS3Q) & (__UINTEGER_32)(~ a__GS3Q)),((__POINTER )(&(table_type[(t__ES3Q)]))),(__UINTEGER_32)(t__ES3Q |  1));
    };
    result__1O2B=((__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *)ptr__2O2B);
    *(result__1O2B) = *(HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo__);
  };
  Self__MHOC=((__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *)result__1O2B);
  new_capacity__VJSC=prime_number_ceiling__A4Q( 193);
  Self__MHOC->buckets__5NNC=create__04XC(new_capacity__VJSC);
  Self__MHOC->capacity__0NNC=new_capacity__VJSC;
  Self__MHOC->count__EJOC= 0;
  dicog_type__4DNB=result__1O2B;
  HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__->key__LONC=NULL;
  HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__->next__WONC=NULL;
  HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__->item__4ONC=NULL;
  TYPE_GENERIC__->intern_name__FS2B=NULL;
  HASHED_SEToTYPEo__->buckets__DRKB=NULL;
  HASHED_SEToTYPEo__->capacity__4QKB= 0;
  HASHED_SEToTYPEo__->count__DSKB= 0;
  HASHED_SET_NODEoTYPEo__->item__PRKB=NULL;
  HASHED_SET_NODEoTYPEo__->next__0RKB=NULL;
  SLOT_DATA__->parent_slot__BJZD=SLOT__;
  SLOT__->slot_data_intern__1JZD=NULL;
  PROFIL_BLOCK__->parent_type__HHAG=(*TYPE__);
  count_variable__GNBG= 0;
  type_boolean__VJB=NULL;
  ARRAYED_COLLECTIONoTYPES_TMPo__->upper__MY4G= 0;
  ARRAYED_COLLECTIONoTYPES_TMPo__->capacity__H44G= 0;
  ARRAYED_COLLECTIONoTYPES_TMPo__->storage__S44G=NULL;
  FAST_ARRAYoTYPES_TMPo__->parent_arrayed_collection__5WSG=(*ARRAYED_COLLECTIONoTYPES_TMPo__);
  TYPES__->upper__4LAG=(__INTEGER)(-  1);
  TYPES__->storage__WWFJ=NULL;
  TYPES_TMP__->parent_types__W25F=(*TYPES__);
  result__IDZG=NULL;
  ptr__JDZG=((__POINTER )(NULL));
  typ_id__ODZG= 0;
  sz__LDZG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPES_TMPo));
  if ((sz__LDZG ==  0)) {
    result__IDZG=FAST_ARRAYoTYPES_TMPo__;
  } else {
    typ_id__ODZG=__FAST_ARRAYoTYPES_TMPo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__LDZG);
    if ((typ_id__ODZG == (__INTEGER)(-  1))) {
      a__LS3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__JS3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__LDZG + a__LS3Q) & (__UINTEGER_32)(~ a__LS3Q));
      ptr__JDZG=micro_alloc__table__lab__BOI(new_size__JS3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JS3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__JS3Q);
    } else {
      t__PS3Q=((__UINTEGER_32 )typ_id__ODZG);
      a__RS3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__JDZG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__LDZG + a__RS3Q) & (__UINTEGER_32)(~ a__RS3Q)),((__POINTER )(&(table_type[(t__PS3Q)]))),(__UINTEGER_32)(t__PS3Q |  1));
    };
    result__IDZG=((__FAST_ARRAYoTYPES_TMPo *)ptr__JDZG);
    *(result__IDZG) = *(FAST_ARRAYoTYPES_TMPo__);
  };
  Self__434G=((__FAST_ARRAYoTYPES_TMPo *)result__IDZG);
  if ((Self__434G->parent_arrayed_collection__5WSG.capacity__H44G <  5)) {
    Self__434G->parent_arrayed_collection__5WSG.storage__S44G=create__N0EH( 5);
    Self__434G->parent_arrayed_collection__5WSG.capacity__H44G= 5;
  };
  Self__434G->parent_arrayed_collection__5WSG.upper__MY4G=(__INTEGER)(-  1);
  free_list__AXSG=result__IDZG;
  TYPES_TMP__->capacity__W3GJ= 0;
  HASHED_SEToTYPESo__->buckets__AJIK=NULL;
  HASHED_SEToTYPESo__->capacity__1IIK= 0;
  HASHED_SEToTYPESo__->count__CXIK= 0;
  result__O32J=NULL;
  ptr__P32J=((__POINTER )(NULL));
  typ_id__U32J= 0;
  sz__R32J=((__UINTEGER_32 )sizeof(__HASHED_SEToTYPESo));
  if ((sz__R32J ==  0)) {
    result__O32J=HASHED_SEToTYPESo__;
  } else {
    typ_id__U32J=__HASHED_SEToTYPESo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__R32J);
    if ((typ_id__U32J == (__INTEGER)(-  1))) {
      a__WS3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__US3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__R32J + a__WS3Q) & (__UINTEGER_32)(~ a__WS3Q));
      ptr__P32J=micro_alloc__table__lab__BOI(new_size__US3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__US3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__US3Q);
    } else {
      t__0S3Q=((__UINTEGER_32 )typ_id__U32J);
      a__2S3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__P32J=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__R32J + a__2S3Q) & (__UINTEGER_32)(~ a__2S3Q)),((__POINTER )(&(table_type[(t__0S3Q)]))),(__UINTEGER_32)(t__0S3Q |  1));
    };
    result__O32J=((__HASHED_SEToTYPESo *)ptr__P32J);
    *(result__O32J) = *(HASHED_SEToTYPESo__);
  };
  Self__CVIK=((__HASHED_SEToTYPESo *)result__O32J);
  new_capacity__ZQNK=prime_number_ceiling__A4Q( 53);
  Self__CVIK->buckets__AJIK=create__RLRK(new_capacity__ZQNK);
  Self__CVIK->capacity__1IIK=new_capacity__ZQNK;
  Self__CVIK->count__CXIK= 0;
  bucket__V4EJ=result__O32J;
  HASHED_SET_NODEoTYPESo__->item__MJIK=NULL;
  HASHED_SET_NODEoTYPESo__->next__YJIK=NULL;
  size__JDJK= 0;
  type_input__LD=NULL;
  type_true__FJB=NULL;
  type_false__NJB=NULL;
  type_integer__3JB=NULL;
  type_real__FKB=NULL;
  type_string_constant__TKB=NULL;
  type_character__1KB=NULL;
  type_pointer__HLB=NULL;
  top__3GQC=(__INTEGER)(-  1);
  ARRAYED_COLLECTIONoCONTEXTo__->upper__IHQC= 0;
  ARRAYED_COLLECTIONoCONTEXTo__->storage__33YD=NULL;
  ARRAYED_COLLECTIONoCONTEXTo__->capacity__3TZD= 0;
  FAST_ARRAYoCONTEXTo__->parent_arrayed_collection__FHQC=(*ARRAYED_COLLECTIONoCONTEXTo__);
  result__QQCD=NULL;
  ptr__RQCD=((__POINTER )(NULL));
  typ_id__WQCD= 0;
  sz__TQCD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoCONTEXTo));
  if ((sz__TQCD ==  0)) {
    result__QQCD=FAST_ARRAYoCONTEXTo__;
  } else {
    typ_id__WQCD=__FAST_ARRAYoCONTEXTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__TQCD);
    if ((typ_id__WQCD == (__INTEGER)(-  1))) {
      a__BT3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__5S3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__TQCD + a__BT3Q) & (__UINTEGER_32)(~ a__BT3Q));
      ptr__RQCD=micro_alloc__table__lab__BOI(new_size__5S3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5S3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__5S3Q);
    } else {
      t__FT3Q=((__UINTEGER_32 )typ_id__WQCD);
      a__HT3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__RQCD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__TQCD + a__HT3Q) & (__UINTEGER_32)(~ a__HT3Q)),((__POINTER )(&(table_type[(t__FT3Q)]))),(__UINTEGER_32)(t__FT3Q |  1));
    };
    result__QQCD=((__FAST_ARRAYoCONTEXTo *)ptr__RQCD);
    *(result__QQCD) = *(FAST_ARRAYoCONTEXTo__);
  };
  Self__UTZD=((__FAST_ARRAYoCONTEXTo *)result__QQCD);
  if ((Self__UTZD->parent_arrayed_collection__FHQC.capacity__3TZD <  16)) {
    Self__UTZD->parent_arrayed_collection__FHQC.storage__33YD=create__TORE( 16);
    Self__UTZD->parent_arrayed_collection__FHQC.capacity__3TZD= 16;
  };
  Self__UTZD->parent_arrayed_collection__FHQC.upper__IHQC=(__INTEGER)(-  1);
  stack__GHQC=result__QQCD;
  stack_local_lower__AI4F= 0;
  CONTEXT__->local__CI4F= 0;
  stack_result_lower__DI4F= 0;
  CONTEXT__->result__FI4F= 0;
  CONTEXT__->list__HI4F=NULL;
  profil_first__4PQC=NULL;
  CONTEXT__->old_profil_first__JI4F=NULL;
  profil_second__3PQC=NULL;
  CONTEXT__->profil__LI4F=NULL;
  ARRAYED_COLLECTIONoLOCALo__->upper__TI4F= 0;
  ARRAYED_COLLECTIONoLOCALo__->capacity__0WPG= 0;
  ARRAYED_COLLECTIONoLOCALo__->storage__FXPG=NULL;
  FAST_ARRAYoLOCALo__->parent_arrayed_collection__QI4F=(*ARRAYED_COLLECTIONoLOCALo__);
  LOCAL__->parent_variable__B2LC=(*VARIABLE__);
  stack_local__RI4F=create_with_capacity__NXBG( 64);
  stack_result__WI4F=create_with_capacity__NXBG( 16);
  modify_count__F4LC= 0;
  ARRAYED_COLLECTIONoINSTRo__->upper__THQG= 0;
  ARRAYED_COLLECTIONoINSTRo__->capacity__FL4G= 0;
  ARRAYED_COLLECTIONoINSTRo__->storage__BM4G=NULL;
  FAST_ARRAYoINSTRo__->parent_arrayed_collection__IUOG=(*ARRAYED_COLLECTIONoINSTRo__);
  LIST__->expr_list__JUOG=NULL;
  PUSH__->parent_instr__YRB=(*INSTR__);
  PUSH__->context__ZYPG=NULL;
  PUSH__->is_first__0YPG=FALSE__;
  context_main__D2LC=NULL;
  EXTERNAL_C__->parent_expr__W2LC=(*EXPR__);
  EXTERNAL_C__->static_type__UXZD=NULL;
  EXTERNAL_C__->is_persistant__VXZD=FALSE__;
  EXTERNAL_C__->code__WXZD=NULL;
  EXTERNAL_C__->access_list__XXZD=NULL;
  CONSTANT__->parent_expr__4F=(*EXPR__);
  CONSTANT__->static_type__F4YD=NULL;
  PROTOTYPE_CST__->parent_constant__E3LC=(*CONSTANT__);
  STRING_CST__->parent_constant__5F=(*CONSTANT__);
  INTEGER_CST__->parent_constant__P3LC=(*CONSTANT__);
  READ__->parent_expr__EJZD=(*EXPR__);
  READ_LOCAL__->parent_read__FJZD=(*READ__);
  READ_LOCAL__->local__ALZD=NULL;
  EXPR_MULTIPLE__->expr_list__VFMH=NULL;
  ARRAYED_COLLECTIONoEXPRo__->upper__USSH= 0;
  ARRAYED_COLLECTIONoEXPRo__->capacity__QSDI= 0;
  ARRAYED_COLLECTIONoEXPRo__->storage__1SDI=NULL;
  FAST_ARRAYoEXPRo__->parent_arrayed_collection__42LC=(*ARRAYED_COLLECTIONoEXPRo__);
  EXPR_BINARY_CMP__->parent_expr__0LJH=(*EXPR__);
  EXPR_BINARY_CMP__->left__HN2H=NULL;
  EXPR_BINARY_CMP__->right__LN2H=NULL;
  EXPR_EQUAL__->parent_expr_binary_cmp__1LJH=(*EXPR_BINARY_CMP__);
  EXPR_NOT_EQUAL__->parent_expr_binary_cmp__DMJH=(*EXPR_BINARY_CMP__);
  REAL_CST__->parent_constant__M3JH=(*CONSTANT__);
  CHARACTER_CST__->parent_constant__53JH=(*CONSTANT__);
  IS_EXPANDED__->parent_expr__S5JH=(*EXPR__);
  GET_TYPE_ID__->parent_expr__AAKH=(*EXPR__);
  EXPR_SUP__->parent_expr_binary_cmp__TAKH=(*EXPR_BINARY_CMP__);
  EXPR_BINARY__->parent_expr__GBKH=(*EXPR__);
  EXPR_BINARY__->left__PP1H=NULL;
  EXPR_BINARY__->right__OP2H=NULL;
  EXPR_SUB__->parent_expr_binary__HBKH=(*EXPR_BINARY__);
  EXPR_MUL__->parent_expr_binary__0BKH=(*EXPR_BINARY__);
  EXPR_DIV__->parent_expr_binary__NCKH=(*EXPR_BINARY__);
  EXPR_AND__->parent_expr_binary__ADKH=(*EXPR_BINARY__);
  EXPR_SHIFT_R__->parent_expr_binary__TDKH=(*EXPR_BINARY__);
  EXPR_SHIFT_L__->parent_expr_binary__GEKH=(*EXPR_BINARY__);
  ITEM__->receiver__TQ1H=NULL;
  SIZE_OF__->parent_expr__NGKH=(*EXPR__);
  CAST__->static_type__SO1H=NULL;
  CALL_SLOT__->profil__QA2H=NULL;
  PROFIL_SLOT__->slot_code__X4NL=NULL;
  CALL_SLOT__->parent_expr__O41H=(*EXPR__);
  READ_SLOT__->parent_read__X0TI=(*READ__);
  READ_SLOT__->slot__EVGK=NULL;
  READ_GLOBAL__->parent_read__U0UJ=(*READ__);
  READ_GLOBAL__->global__RHJK=NULL;
  EXPR_UNARY_LOGIC__->parent_expr__ZEUK=(*EXPR__);
  EXPR_UNARY_LOGIC__->right__AQZM=NULL;
  EXPR_NOT_LOGIC__->parent_expr_unary_logic__0EUK=(*EXPR_UNARY_LOGIC__);
  EXPR_BINARY_LOGIC__->parent_expr__VHCL=(*EXPR__);
  EXPR_BINARY_LOGIC__->left__NMEO=NULL;
  EXPR_BINARY_LOGIC__->right__RMEO=NULL;
  EXPR_OR_LOGIC__->parent_expr_binary_logic__WHCL=(*EXPR_BINARY_LOGIC__);
  EXPR_OR_OR_LOGIC__->parent_expr_or_logic__QICL=(*EXPR_OR_LOGIC__);
  EXPR_AND_LOGIC__->parent_expr_binary_logic__WJCL=(*EXPR_BINARY_LOGIC__);
  EXPR_AND_AND_LOGIC__->parent_expr_and_logic__QKCL=(*EXPR_AND_LOGIC__);
  EXPR_UNARY__->parent_expr__IZDL=(*EXPR__);
  EXPR_UNARY__->right__XZDL=NULL;
  EXPR_NEG__->parent_expr_unary__JZDL=(*EXPR_UNARY__);
  EXPR_ADD__->parent_expr_binary__UZDL=(*EXPR_BINARY__);
  EXPR_NOT__->parent_expr_unary__M5VL=(*EXPR_UNARY__);
  EXPR_MOD__->parent_expr_binary__PDWL=(*EXPR_BINARY__);
  EXPR_SUP_EQ__->parent_expr_binary_cmp__EP1M=(*EXPR_BINARY_CMP__);
  EXPR_INF__->parent_expr_binary_cmp__WQ1M=(*EXPR_BINARY_CMP__);
  EXPR_INF_EQ__->parent_expr_binary_cmp__MR1M=(*EXPR_BINARY_CMP__);
  EXPR_OR__->parent_expr_binary__ET1M=(*EXPR_BINARY__);
  EXPR_XOR__->parent_expr_binary__UA5N=(*EXPR_BINARY__);
  DTA__->parent_itm_object__5LQC=(*ITM_OBJECT__);
  DTA__->context__OJZD=NULL;
  DTA__->slot__PJZD=NULL;
  DTA__->self_arg__QJZD=NULL;
  DTA__->result_expr__RJZD=NULL;
  DTA_RD__->parent_dta__AMQC=(*DTA__);
  LOCAL__->my_alias__PWAH=NULL;
  is_alias__4WAH=FALSE__;
  list_alias__ZLZN=create_with_capacity__NXBG( 64);
  PUT_TO__->parent_expr__4EKH=(*EXPR__);
  ITEM__->parent_expr__RFKH=(*EXPR__);
  CAST__->parent_expr__5GKH=(*EXPR__);
  SLOT_DATA__->value__M4OG=NULL;
  SLOT__->slot_id__04OG=NULL;
  WRITE__->parent_instr__H4OG=(*INSTR__);
  WRITE__->value__HBEH=NULL;
  WRITE__->is_create__1BDI=FALSE__;
  WRITE__->is_delete__PDNL=FALSE__;
  WRITE_LOCAL__->parent_write__X50I=(*WRITE__);
  WRITE_LOCAL__->local__2RIJ=NULL;
  ARRAYED_COLLECTIONoWRITEo__->upper__NPDI= 0;
  ARRAYED_COLLECTIONoWRITEo__->capacity__PPDI= 0;
  ARRAYED_COLLECTIONoWRITEo__->storage__LQDI=NULL;
  FAST_ARRAYoWRITEo__->parent_arrayed_collection__TAEH=(*ARRAYED_COLLECTIONoWRITEo__);
  is_executing_pass__Q5LC=FALSE__;
  EXTERNAL_C__->living_type__R4QH=NULL;
  level_pass__QYUC= 0;
  WRITE_GLOBAL__->parent_write__QBGH=(*WRITE__);
  TYPE_GENERIC__->put_to_list__F1YM=NULL;
  TYPE_GENERIC__->recursive_test__M1YM=FALSE__;
  ARRAYED_COLLECTIONoPUT_TOo__->upper__01YM= 0;
  ARRAYED_COLLECTIONoPUT_TOo__->capacity__VSFN= 0;
  ARRAYED_COLLECTIONoPUT_TOo__->storage__RTFN=NULL;
  FAST_ARRAYoPUT_TOo__->parent_arrayed_collection__E1YM=(*ARRAYED_COLLECTIONoPUT_TOo__);
  PUT_TO__->value__WR2H=NULL;
  WRITE_SLOT__->parent_write__3BGH=(*WRITE__);
  TYPE_GENERIC__->old_type__G2YM=NULL;
  context_extern__1OLH=NULL;
  CONTEXT__->context_extern__B3NH=NULL;
  INTEGER_CST__->value__PAZD= 0;
  last_cast_name__L42H=create__AXB( 32);
  NODE__->expr__KLZD=NULL;
  NODE__->data__LLZD=NULL;
  NODE__->first_code__FIAG=NULL;
  NODE__->first_type__NIAG=NULL;
  NODE__->switch__ELAG=NULL;
  NODE_TYPE__->parent_node__DMQC=(*NODE__);
  DTA_CAST__->result_expr__401H=NULL;
  DTA_WR_CODE__->parent_dta__E0LH=(*DTA__);
  DTA_BLOCK__->result_expr__341H=NULL;
  DTA_WR_VALUE__->parent_dta__PTUH=(*DTA__);
  DTA_RD_ARGS__->parent_dta__5OWH=(*DTA__);
  STRING_CST__->string__ZK2H=NULL;
  REAL_CST__->value__5N2H=NULL;
  CHARACTER_CST__->text__HO2H=NULL;
  IS_EXPANDED__->receiver__OO2H=NULL;
  GET_TYPE_ID__->receiver__XO2H=NULL;
  PUT_TO__->receiver__OR2H=NULL;
  SIZE_OF__->receiver__LS2H=NULL;
  CAST__->value__US2H=NULL;
  CALL_SLOT__->argument_list__OTHJ=NULL;
  WRITE_GLOBAL__->global__4U1H=NULL;
  WRITE_SLOT__->slot__5T1H=NULL;
  READ_SLOT__->receiver__I1TI=NULL;
  WRITE_SLOT__->receiver__HU1H=NULL;
  CALL_SLOT__->result_list__1A2H=NULL;
  LINKED_COLLECTIONoNODE_TYPEo__->upper__ZCID= 0;
  LINKED_LISToNODE_TYPEo__->parent_linked_collection__OMQC=(*LINKED_COLLECTIONoNODE_TYPEo__);
  node_list__PMQC=create__O00C();
  PROFIL_BLOCK__->node_list__OJEI=NULL;
  LINKED_LISToNODE_TYPEo__->mem_idx__X4YD= 0;
  LINKED_LISToNODE_TYPEo__->mem_lnk__Z4YD=NULL;
  LINKED_LISToNODE_TYPEo__->first_link__N4YD=NULL;
  LINKED_LIST_NODEoNODE_TYPEo__->next__GX4E=NULL;
  LINKED_LIST_NODEoNODE_TYPEo__->item__O1SE=NULL;
  LINKED_LISToNODE_TYPEo__->last_link__W4YD=NULL;
  ITEM__->index__CS2H=NULL;
  PUT_TO__->index__SR2H=NULL;
  SWITCH__->list__SLAG=NULL;
  ARRAYED_COLLECTIONoCASEo__->upper__HMAG= 0;
  ARRAYED_COLLECTIONoCASEo__->storage__NYEJ=NULL;
  ARRAYED_COLLECTIONoCASEo__->capacity__Q2GJ= 0;
  FAST_ARRAYoCASEo__->parent_arrayed_collection__CHAG=(*ARRAYED_COLLECTIONoCASEo__);
  CASE__->id__QMAG=NULL;
  CASE__->code__BQAG=NULL;
  PROFIL_BLOCK__->slot_value__H4IH=NULL;
  SWITCH__->parent_instr__HAMC=(*INSTR__);
  SWITCH__->expr__MMFI=NULL;
  late_binding_counter__DI= 0;
  NODE_STYLE__->parent_node__OP0G=(*NODE__);
  LOOP__->body__5ALM=NULL;
  LOOP__->parent_instr__QKAL=(*INSTR__);
  LOOP__->name__DILM=NULL;
  LOOP_END__->loop__5WLM=NULL;
  LOOP_END__->parent_instr__G12L=(*INSTR__);
  LOOP__->link_count__YALM= 0;
  DTA_RD_ARGS__->argument_list__UTFI=NULL;
  SLOT_CODE__->is_require__YNRL=FALSE__;
  SLOT_CODE__->last_type_contract__2NRL=NULL;
  last_type_contract__VORL=NULL;
  verify__JDAG=FALSE__;
  ARRAYED_COLLECTIONoPROFILo__->upper__KNB= 0;
  ARRAYED_COLLECTIONoPROFILo__->capacity__E1L= 0;
  ARRAYED_COLLECTIONoPROFILo__->storage__P1L=NULL;
  FAST_ARRAYoPROFILo__->parent_arrayed_collection__DNB=(*ARRAYED_COLLECTIONoPROFILo__);
  result__5NE=NULL;
  ptr__AOE=((__POINTER )(NULL));
  typ_id__FOE= 0;
  sz__COE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROFILo));
  if ((sz__COE ==  0)) {
    result__5NE=FAST_ARRAYoPROFILo__;
  } else {
    typ_id__FOE=__FAST_ARRAYoPROFILo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__COE);
    if ((typ_id__FOE == (__INTEGER)(-  1))) {
      a__MT3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__KT3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__COE + a__MT3Q) & (__UINTEGER_32)(~ a__MT3Q));
      ptr__AOE=micro_alloc__table__lab__BOI(new_size__KT3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KT3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__KT3Q);
    } else {
      t__QT3Q=((__UINTEGER_32 )typ_id__FOE);
      a__ST3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__AOE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__COE + a__ST3Q) & (__UINTEGER_32)(~ a__ST3Q)),((__POINTER )(&(table_type[(t__QT3Q)]))),(__UINTEGER_32)(t__QT3Q |  1));
    };
    result__5NE=((__FAST_ARRAYoPROFILo *)ptr__AOE);
    *(result__5NE) = *(FAST_ARRAYoPROFILo__);
  };
  Self__10L=((__FAST_ARRAYoPROFILo *)result__5NE);
  if ((Self__10L->parent_arrayed_collection__DNB.capacity__E1L <  65536)) {
    Self__10L->parent_arrayed_collection__DNB.storage__P1L=create__IUSB( 65536);
    Self__10L->parent_arrayed_collection__DNB.capacity__E1L= 65536;
  };
  Self__10L->parent_arrayed_collection__DNB.upper__KNB=(__INTEGER)(-  1);
  profil_list__ENB=result__5NE;
  PROFIL_BLOCK__->slot_self__T4IH=NULL;
  PROFIL_BLOCK__->profil_list__MJEI=NULL;
  PROFIL_BLOCK__->context_extern__OMXH=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo__->upper__FXDI= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo__->capacity__CZDI= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo__->storage__4ZDI=NULL;
  FAST_ARRAYoFAST_ARRAYoEXPRoo__->parent_arrayed_collection__H1LH=(*ARRAYED_COLLECTIONoFAST_ARRAYoEXPRoo__);
  result__43SH=NULL;
  ptr__53SH=((__POINTER )(NULL));
  typ_id__E4SH= 0;
  sz__B4SH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoEXPRoo));
  if ((sz__B4SH ==  0)) {
    result__43SH=FAST_ARRAYoFAST_ARRAYoEXPRoo__;
  } else {
    typ_id__E4SH=__FAST_ARRAYoFAST_ARRAYoEXPRoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__B4SH);
    if ((typ_id__E4SH == (__INTEGER)(-  1))) {
      a__XT3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__VT3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__B4SH + a__XT3Q) & (__UINTEGER_32)(~ a__XT3Q));
      ptr__53SH=micro_alloc__table__lab__BOI(new_size__VT3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VT3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__VT3Q);
    } else {
      t__1T3Q=((__UINTEGER_32 )typ_id__E4SH);
      a__3T3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__53SH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__B4SH + a__3T3Q) & (__UINTEGER_32)(~ a__3T3Q)),((__POINTER )(&(table_type[(t__1T3Q)]))),(__UINTEGER_32)(t__1T3Q |  1));
    };
    result__43SH=((__FAST_ARRAYoFAST_ARRAYoEXPRoo *)ptr__53SH);
    *(result__43SH) = *(FAST_ARRAYoFAST_ARRAYoEXPRoo__);
  };
  Self__4WEI=((__FAST_ARRAYoFAST_ARRAYoEXPRoo *)result__43SH);
  if ((Self__4WEI->parent_arrayed_collection__H1LH.capacity__CZDI <  5)) {
    Self__4WEI->parent_arrayed_collection__H1LH.storage__4ZDI=create__WXXI( 5);
    Self__4WEI->parent_arrayed_collection__H1LH.capacity__CZDI= 5;
  };
  Self__4WEI->parent_arrayed_collection__H1LH.upper__FXDI=(__INTEGER)(-  1);
  free_list__I1LH=result__43SH;
  DTA_BLOCK__->context__52UH=NULL;
  DTA_BLOCK__->argument_list__2KFI=NULL;
  object_counter__RAZG__SAZG= 0;
  indent__ZQOG=create__AXB( 128);
  NODE_STYLE__->result_expr__HO5G=NULL;
  life_limit__2PQC= 0;
  current__X30C= 0;
  SLOT_DATA__->last_write__Y5IL=NULL;
  LOCAL__->last_seq__LRJJ=NULL;
  LOCAL_SEQ__->last_write__G1IL=NULL;
  DTA_BLOCK__->copy_argument__Z0TI=FALSE__;
  DTA_WR_VALUE__->copy_value__ZZ5I=FALSE__;
  DTA_WR_VALUE__->value__RNFI=NULL;
  DTA_RD_ARGS__->copy_argument__WADK=FALSE__;
  DTA_WR_CODE__->code__IOEI=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo__->upper__XXDI= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo__->capacity__11DI= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo__->storage__X2DI=NULL;
  FAST_ARRAYoFAST_ARRAYoSLOToo__->parent_arrayed_collection__C2LH=(*ARRAYED_COLLECTIONoFAST_ARRAYoSLOToo__);
  result__O5SH=NULL;
  ptr__P5SH=((__POINTER )(NULL));
  typ_id__U5SH= 0;
  sz__R5SH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSLOToo));
  if ((sz__R5SH ==  0)) {
    result__O5SH=FAST_ARRAYoFAST_ARRAYoSLOToo__;
  } else {
    typ_id__U5SH=__FAST_ARRAYoFAST_ARRAYoSLOToo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__R5SH);
    if ((typ_id__U5SH == (__INTEGER)(-  1))) {
      a__CU3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__AU3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__R5SH + a__CU3Q) & (__UINTEGER_32)(~ a__CU3Q));
      ptr__P5SH=micro_alloc__table__lab__BOI(new_size__AU3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AU3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__AU3Q);
    } else {
      t__GU3Q=((__UINTEGER_32 )typ_id__U5SH);
      a__IU3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__P5SH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__R5SH + a__IU3Q) & (__UINTEGER_32)(~ a__IU3Q)),((__POINTER )(&(table_type[(t__GU3Q)]))),(__UINTEGER_32)(t__GU3Q |  1));
    };
    result__O5SH=((__FAST_ARRAYoFAST_ARRAYoSLOToo *)ptr__P5SH);
    *(result__O5SH) = *(FAST_ARRAYoFAST_ARRAYoSLOToo__);
  };
  Self__CYEI=((__FAST_ARRAYoFAST_ARRAYoSLOToo *)result__O5SH);
  if ((Self__CYEI->parent_arrayed_collection__C2LH.capacity__11DI <  5)) {
    Self__CYEI->parent_arrayed_collection__C2LH.storage__X2DI=create__QYXI( 5);
    Self__CYEI->parent_arrayed_collection__C2LH.capacity__11DI= 5;
  };
  Self__CYEI->parent_arrayed_collection__C2LH.upper__XXDI=(__INTEGER)(-  1);
  free_list__D2LH=result__O5SH;
  stack_local_empty__NYJH=create__NTOH( 0);
  last_code__41JH=NULL;
  node_list_base__WZJH=node_list__PMQC;
  last_expr__K3IH=NULL;
  list_main__WE=NULL;
  pass_count__Z3LC= 0;
  NODE_STYLE__->slot__GO5G=NULL;
  SLOT__->slot_code_list__ZUIJ=NULL;
  ARRAYED_COLLECTIONoSLOT_CODEo__->upper__TVIJ= 0;
  ARRAYED_COLLECTIONoSLOT_CODEo__->capacity__VPIK= 0;
  ARRAYED_COLLECTIONoSLOT_CODEo__->storage__RQIK=NULL;
  FAST_ARRAYoSLOT_CODEo__->parent_arrayed_collection__YUIJ=(*ARRAYED_COLLECTIONoSLOT_CODEo__);
  ARRAYED_COLLECTIONoTYPEo__->upper__1OB= 0;
  ARRAYED_COLLECTIONoTYPEo__->capacity__M2L= 0;
  ARRAYED_COLLECTIONoTYPEo__->storage__X2L=NULL;
  FAST_ARRAYoTYPEo__->parent_arrayed_collection__UOB=(*ARRAYED_COLLECTIONoTYPEo__);
  stack_type__5MAG=create_with_capacity__3ND( 16);
  PROFIL_SLOT__->is_context_sensitive__5POL=FALSE__;
  tmp_string__PSD=create__AXB( 512);
  mode_recursive__WYUC=FALSE__;
  ARRAYED_COLLECTIONoLISTo__->upper__SU4G= 0;
  ARRAYED_COLLECTIONoLISTo__->capacity__UU4G= 0;
  ARRAYED_COLLECTIONoLISTo__->storage__QV4G=NULL;
  FAST_ARRAYoLISTo__->parent_arrayed_collection__CXRG=(*ARRAYED_COLLECTIONoLISTo__);
  result__Z3YG=NULL;
  ptr__03YG=((__POINTER )(NULL));
  typ_id__53YG= 0;
  sz__23YG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLISTo));
  if ((sz__23YG ==  0)) {
    result__Z3YG=FAST_ARRAYoLISTo__;
  } else {
    typ_id__53YG=__FAST_ARRAYoLISTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__23YG);
    if ((typ_id__53YG == (__INTEGER)(-  1))) {
      a__NU3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__LU3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__23YG + a__NU3Q) & (__UINTEGER_32)(~ a__NU3Q));
      ptr__03YG=micro_alloc__table__lab__BOI(new_size__LU3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LU3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LU3Q);
    } else {
      t__RU3Q=((__UINTEGER_32 )typ_id__53YG);
      a__TU3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__03YG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__23YG + a__TU3Q) & (__UINTEGER_32)(~ a__TU3Q)),((__POINTER )(&(table_type[(t__RU3Q)]))),(__UINTEGER_32)(t__RU3Q |  1));
    };
    result__Z3YG=((__FAST_ARRAYoLISTo *)ptr__03YG);
    *(result__Z3YG) = *(FAST_ARRAYoLISTo__);
  };
  Self__W24G=((__FAST_ARRAYoLISTo *)result__Z3YG);
  if ((Self__W24G->parent_arrayed_collection__CXRG.capacity__UU4G <  64)) {
    Self__W24G->parent_arrayed_collection__CXRG.storage__QV4G=create__BZEH( 64);
    Self__W24G->parent_arrayed_collection__CXRG.capacity__UU4G= 64;
  };
  Self__W24G->parent_arrayed_collection__CXRG.upper__SU4G=(__INTEGER)(-  1);
  seq_list__DXRG=result__Z3YG;
  seq_inline__FXRG= 0;
  LIST__->index__PXRG= 0;
  seq_or_and__AYRG= 0;
  old_seq_or_and__CYRG= 0;
  loop_invariant__RKAL=NULL;
  LOCAL_SEQ__->last_list_current__T1IL=NULL;
  LOCAL_SEQ__->last_seq_call_local_and_loop__31IL= 0;
  seq_call_local_and_loop__51IL= 0;
  LOCAL_SEQ__->last_seq_index__43IL= 0;
  SLOT_DATA__->last_seq_index__55IL= 0;
  LOCAL_SEQ__->last_seq_call_and_loop__LAJL= 0;
  seq_call_and_loop__VREJ= 0;
  SLOT_DATA__->last_list_current__UAJL=NULL;
  LOCAL_SEQ__->last_seq_or_and__1BJL= 0;
  LOCAL_SEQ__->last_index__MDUL= 0;
  SLOT_DATA__->last_seq_call_and_loop__ZWPL= 0;
  SLOT_DATA__->last_seq_call_local_and_loop__S0PL= 0;
  SLOT_DATA__->last_seq_or_and__TDQL= 0;
  SLOT_DATA__->last_index__UOPL= 0;
  loop_seq_call_local_and_loop__Q3DM= 0;
  loop_seq_index__IK2L= 0;
  loop_seq_call_and_loop__4J2L= 0;
  loop_list__ILAL=NULL;
  count_invariant__PI= 0;
  seq_index__SIGK= 0;
  ARRAYED_COLLECTIONoLOCAL_SEQo__->upper__FAJK= 0;
  ARRAYED_COLLECTIONoLOCAL_SEQo__->capacity__HAJK= 0;
  ARRAYED_COLLECTIONoLOCAL_SEQo__->storage__DBJK=NULL;
  FAST_ARRAYoLOCAL_SEQo__->parent_arrayed_collection__IRJJ=(*ARRAYED_COLLECTIONoLOCAL_SEQo__);
  result__FSBK=NULL;
  ptr__GSBK=((__POINTER )(NULL));
  typ_id__LSBK= 0;
  sz__ISBK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLOCAL_SEQo));
  if ((sz__ISBK ==  0)) {
    result__FSBK=FAST_ARRAYoLOCAL_SEQo__;
  } else {
    typ_id__LSBK=__FAST_ARRAYoLOCAL_SEQo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ISBK);
    if ((typ_id__LSBK == (__INTEGER)(-  1))) {
      a__YU3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__WU3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__ISBK + a__YU3Q) & (__UINTEGER_32)(~ a__YU3Q));
      ptr__GSBK=micro_alloc__table__lab__BOI(new_size__WU3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WU3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__WU3Q);
    } else {
      t__2U3Q=((__UINTEGER_32 )typ_id__LSBK);
      a__4U3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GSBK=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ISBK + a__4U3Q) & (__UINTEGER_32)(~ a__4U3Q)),((__POINTER )(&(table_type[(t__2U3Q)]))),(__UINTEGER_32)(t__2U3Q |  1));
    };
    result__FSBK=((__FAST_ARRAYoLOCAL_SEQo *)ptr__GSBK);
    *(result__FSBK) = *(FAST_ARRAYoLOCAL_SEQo__);
  };
  Self__EIJK=((__FAST_ARRAYoLOCAL_SEQo *)result__FSBK);
  if ((Self__EIJK->parent_arrayed_collection__IRJJ.capacity__HAJK <  512)) {
    Self__EIJK->parent_arrayed_collection__IRJJ.storage__DBJK=create__TCZK( 512);
    Self__EIJK->parent_arrayed_collection__IRJJ.capacity__HAJK= 512;
  };
  Self__EIJK->parent_arrayed_collection__IRJJ.upper__FAJK=(__INTEGER)(-  1);
  list_free__JRJJ=result__FSBK;
  list_busy__WQJJ=create_with_capacity__NXBG( 512);
  count_context_sensitive__VSEJ= 0;
  count_no_recursive__GBCL= 0;
  switch_new_pass__IAMC=FALSE__;
  reduce_profil__BQQC=TRUE__;
  inline_level_current__I40C= 3;
  output_glob__VD=create__AXB( 10000);
  output_code__XD=create__AXB( 4000000);
  genere_list__VOB=create_with_capacity__3ND( 128);
  is_storage__KGEK__LGEK= 0;
  output_count__AG= 0;
  result__PRD=create__AXB( 256);
  append__MOK(result__PRD,(&__string_3));
  Self__L5F= 3;
  while ((Self__L5F <=  28)) {
    add_last__YPK(result__PRD,'=');
    Self__L5F=(__INTEGER)(Self__L5F +  1);
  };
  append__MOK(result__PRD,(&__string_4));
  append__MOK(result__PRD,(&__string_5));
  Self__15F=(__INTEGER)(((__STRING_CONSTANT *)(&__string_5))->count__XHB +  5);
  while ((Self__15F <=  28)) {
    add_last__YPK(result__PRD,' ');
    Self__15F=(__INTEGER)(Self__15F +  1);
  };
  append__MOK(result__PRD,(&__string_6));
  Self__KAG= 3;
  while ((Self__KAG <=  28)) {
    add_last__YPK(result__PRD,'=');
    Self__KAG=(__INTEGER)(Self__KAG +  1);
  };
  append__MOK(result__PRD,(&__string_7));
  output__HG=result__PRD;
  ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo__->storage__3K4G=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo__->capacity__OT4G= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo__->upper__0T4G= 0;
  FAST_ARRAYoFAST_ARRAYoLOCALoo__->parent_arrayed_collection__ZSOG=(*ARRAYED_COLLECTIONoFAST_ARRAYoLOCALoo__);
  result__EZTG=NULL;
  ptr__FZTG=((__POINTER )(NULL));
  typ_id__KZTG= 0;
  sz__HZTG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLOCALoo));
  if ((sz__HZTG ==  0)) {
    result__EZTG=FAST_ARRAYoFAST_ARRAYoLOCALoo__;
  } else {
    typ_id__KZTG=__FAST_ARRAYoFAST_ARRAYoLOCALoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__HZTG);
    if ((typ_id__KZTG == (__INTEGER)(-  1))) {
      a__DV3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__BV3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__HZTG + a__DV3Q) & (__UINTEGER_32)(~ a__DV3Q));
      ptr__FZTG=micro_alloc__table__lab__BOI(new_size__BV3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BV3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__BV3Q);
    } else {
      t__HV3Q=((__UINTEGER_32 )typ_id__KZTG);
      a__JV3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__FZTG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__HZTG + a__JV3Q) & (__UINTEGER_32)(~ a__JV3Q)),((__POINTER )(&(table_type[(t__HV3Q)]))),(__UINTEGER_32)(t__HV3Q |  1));
    };
    result__EZTG=((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)ptr__FZTG);
    *(result__EZTG) = *(FAST_ARRAYoFAST_ARRAYoLOCALoo__);
  };
  Self__FT4G=((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)result__EZTG);
  if ((Self__FT4G->parent_arrayed_collection__ZSOG.capacity__OT4G <  4)) {
    Self__FT4G->parent_arrayed_collection__ZSOG.storage__3K4G=create__AOEH( 4);
    Self__FT4G->parent_arrayed_collection__ZSOG.capacity__OT4G= 4;
  };
  Self__FT4G->parent_arrayed_collection__ZSOG.upper__0T4G=(__INTEGER)(-  1);
  result__2IQG=result__EZTG;
  Self__DSRG= 0;
  while ((Self__DSRG <=  3)) {
    __tmp__EJQG=create_with_capacity__NXBG( 32);
    Self__T54G=((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)result__2IQG);
    new_capacity__V54G= 0;
    if (((__INTEGER)(Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G +  1) <= (__INTEGER)(Self__T54G->parent_arrayed_collection__ZSOG.capacity__OT4G -  1))) {
      Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G=(__INTEGER)(Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G +  1);
      __tmp__DA5G=TRUE__;
    } else {
      __tmp__DA5G=FALSE__;
    };
    if ((! __tmp__DA5G)) {
      if ((Self__T54G->parent_arrayed_collection__ZSOG.capacity__OT4G ==  0)) {
        Self__T54G->parent_arrayed_collection__ZSOG.storage__3K4G=create__AOEH( 2);
        Self__T54G->parent_arrayed_collection__ZSOG.capacity__OT4G= 2;
        Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G= 0;
      } else {
        new_capacity__V54G=(__INTEGER)(Self__T54G->parent_arrayed_collection__ZSOG.capacity__OT4G <<  1);
        __tmp__YA5G=Self__T54G->parent_arrayed_collection__ZSOG.storage__3K4G;
        __tmp__ZA5G=Self__T54G->parent_arrayed_collection__ZSOG.capacity__OT4G;
        new__XNDI=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__YA5G)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZA5G * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__V54G * ((__INTEGER )(sizeof(void *)))))));
        __tmp__KODI=(__INTEGER)(new_capacity__V54G -  1);
        Self__DJKJ=__tmp__ZA5G;
        while ((Self__DJKJ <= __tmp__KODI)) {
          new__XNDI[Self__DJKJ]=NULL;
          Self__DJKJ=(__INTEGER)(Self__DJKJ +  1);
        };
        Self__T54G->parent_arrayed_collection__ZSOG.storage__3K4G=new__XNDI;
        Self__T54G->parent_arrayed_collection__ZSOG.capacity__OT4G=new_capacity__V54G;
        Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G=(__INTEGER)(Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G +  1);
      };
    };
    ((void **)Self__T54G->parent_arrayed_collection__ZSOG.storage__3K4G)[Self__T54G->parent_arrayed_collection__ZSOG.upper__0T4G]=__tmp__EJQG;
    Self__DSRG=(__INTEGER)(Self__DSRG +  1);
  };
  var_size__0SOG=result__EZTG;
  HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__->buckets__3GAE=NULL;
  HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__->capacity__OYZD= 0;
  HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__->cache_user__5GAE= 0;
  HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__->count__1RB= 0;
  result__I2CD=NULL;
  ptr__J2CD=((__POINTER )(NULL));
  typ_id__O2CD= 0;
  sz__L2CD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o));
  if ((sz__L2CD ==  0)) {
    result__I2CD=HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__;
  } else {
    typ_id__O2CD=__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__L2CD);
    if ((typ_id__O2CD == (__INTEGER)(-  1))) {
      a__UV3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__SV3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__L2CD + a__UV3Q) & (__UINTEGER_32)(~ a__UV3Q));
      ptr__J2CD=micro_alloc__table__lab__BOI(new_size__SV3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SV3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SV3Q);
    } else {
      t__YV3Q=((__UINTEGER_32 )typ_id__O2CD);
      a__0V3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__J2CD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__L2CD + a__0V3Q) & (__UINTEGER_32)(~ a__0V3Q)),((__POINTER )(&(table_type[(t__YV3Q)]))),(__UINTEGER_32)(t__YV3Q |  1));
    };
    result__I2CD=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)ptr__J2CD);
    *(result__I2CD) = *(HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__);
  };
  Self__HYZD=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)result__I2CD);
  new_capacity__YGAE=prime_number_ceiling__A4Q( 193);
  Self__HYZD->buckets__3GAE=create__5CIE(new_capacity__YGAE);
  Self__HYZD->capacity__OYZD=new_capacity__YGAE;
  Self__HYZD->cache_user__5GAE=(__INTEGER)(-  1);
  Self__HYZD->count__1RB= 0;
  source_line__ZRB=result__I2CD;
  HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__->key__S10D= 0;
  HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__->next__V3BE=NULL;
  HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__->item__J20D=NULL;
  polymorphic_counter__FI= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo__->storage__5ZIJ=NULL;
  ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo__->capacity__ZCJJ= 0;
  ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo__->upper__FDJJ= 0;
  FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo__->parent_arrayed_collection__3H3G=(*ARRAYED_COLLECTIONoFAST_ARRAYoSLOT_DATAoo__);
  result__PCDJ=NULL;
  ptr__QCDJ=((__POINTER )(NULL));
  typ_id__VCDJ= 0;
  sz__SCDJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo));
  if ((sz__SCDJ ==  0)) {
    result__PCDJ=FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo__;
  } else {
    typ_id__VCDJ=__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__SCDJ);
    if ((typ_id__VCDJ == (__INTEGER)(-  1))) {
      a__5V3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__3V3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__SCDJ + a__5V3Q) & (__UINTEGER_32)(~ a__5V3Q));
      ptr__QCDJ=micro_alloc__table__lab__BOI(new_size__3V3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3V3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3V3Q);
    } else {
      t__DW3Q=((__UINTEGER_32 )typ_id__VCDJ);
      a__FW3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__QCDJ=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__SCDJ + a__FW3Q) & (__UINTEGER_32)(~ a__FW3Q)),((__POINTER )(&(table_type[(t__DW3Q)]))),(__UINTEGER_32)(t__DW3Q |  1));
    };
    result__PCDJ=((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)ptr__QCDJ);
    *(result__PCDJ) = *(FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo__);
  };
  Self__QCJJ=((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)result__PCDJ);
  if ((Self__QCJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ <  5)) {
    Self__QCJJ->parent_arrayed_collection__3H3G.storage__5ZIJ=create__PGXJ( 5);
    Self__QCJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ= 5;
  };
  Self__QCJJ->parent_arrayed_collection__3H3G.upper__FDJJ=(__INTEGER)(-  1);
  result__O1BJ=result__PCDJ;
  Self__WMCJ= 0;
  while ((Self__WMCJ <=  4)) {
    __tmp__W1BJ=create_with_capacity__TB4F( 8);
    Self__5FJJ=((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)result__O1BJ);
    new_capacity__BGJJ= 0;
    if (((__INTEGER)(Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ +  1) <= (__INTEGER)(Self__5FJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ -  1))) {
      Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ=(__INTEGER)(Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ +  1);
      __tmp__PGJJ=TRUE__;
    } else {
      __tmp__PGJJ=FALSE__;
    };
    if ((! __tmp__PGJJ)) {
      if ((Self__5FJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ ==  0)) {
        Self__5FJJ->parent_arrayed_collection__3H3G.storage__5ZIJ=create__PGXJ( 2);
        Self__5FJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ= 2;
        Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ= 0;
      } else {
        new_capacity__BGJJ=(__INTEGER)(Self__5FJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ <<  1);
        __tmp__EHJJ=Self__5FJJ->parent_arrayed_collection__3H3G.storage__5ZIJ;
        __tmp__FHJJ=Self__5FJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ;
        new__H2IK=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__EHJJ)),((__UINTEGER_32 )(__INTEGER)(__tmp__FHJJ * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BGJJ * ((__INTEGER )(sizeof(void *)))))));
        __tmp__02IK=(__INTEGER)(new_capacity__BGJJ -  1);
        Self__ECRL=__tmp__FHJJ;
        while ((Self__ECRL <= __tmp__02IK)) {
          new__H2IK[Self__ECRL]=NULL;
          Self__ECRL=(__INTEGER)(Self__ECRL +  1);
        };
        Self__5FJJ->parent_arrayed_collection__3H3G.storage__5ZIJ=new__H2IK;
        Self__5FJJ->parent_arrayed_collection__3H3G.capacity__ZCJJ=new_capacity__BGJJ;
        Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ=(__INTEGER)(Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ +  1);
      };
    };
    ((void **)Self__5FJJ->parent_arrayed_collection__3H3G.storage__5ZIJ)[Self__5FJJ->parent_arrayed_collection__3H3G.upper__FDJJ]=__tmp__W1BJ;
    Self__WMCJ=(__INTEGER)(Self__WMCJ +  1);
  };
  slot_size__4H3G=result__PCDJ;
  id_counter_with_type__4K3G= 4;
  id_counter_without_type__2E= 0;
  HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__->cache_node__Q10D=NULL;
  HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o__->cache_buckets__C4BE= 0;
  time__FB= 0;
  tmp_name__MK=create__AXB( 255);
  result__V1C=NULL;
  ptr__W1C=((__POINTER )(NULL));
  typ_id__11C= 0;
  sz__Y1C=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
  if ((sz__Y1C ==  0)) {
    result__V1C=HASHED_SEToABSTRACT_STRINGo__;
  } else {
    typ_id__11C=__HASHED_SEToABSTRACT_STRINGo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__Y1C);
    if ((typ_id__11C == (__INTEGER)(-  1))) {
      a__QW3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__OW3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__Y1C + a__QW3Q) & (__UINTEGER_32)(~ a__QW3Q));
      ptr__W1C=micro_alloc__table__lab__BOI(new_size__OW3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OW3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__OW3Q);
    } else {
      t__UW3Q=((__UINTEGER_32 )typ_id__11C);
      a__WW3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__W1C=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__Y1C + a__WW3Q) & (__UINTEGER_32)(~ a__WW3Q)),((__POINTER )(&(table_type[(t__UW3Q)]))),(__UINTEGER_32)(t__UW3Q |  1));
    };
    result__V1C=((__HASHED_SEToABSTRACT_STRINGo *)ptr__W1C);
    *(result__V1C) = *(HASHED_SEToABSTRACT_STRINGo__);
  };
  Self__U1K=((__HASHED_SEToABSTRACT_STRINGo *)result__V1C);
  new_capacity__23N=prime_number_ceiling__A4Q( 53);
  Self__U1K->buckets__YRK=create__KJR(new_capacity__23N);
  Self__U1K->capacity__TRK=new_capacity__23N;
  Self__U1K->count__ZSK= 0;
  list__TK=result__V1C;
  add__CRK(result__V1C,(&__string_8));
  add__CRK(list__TK,(&__string_9));
  add__CRK(list__TK,(&__string_10));
  add__CRK(list__TK,(&__string_11));
  add__CRK(list__TK,(&__string_12));
  add__CRK(list__TK,(&__string_13));
  add__CRK(list__TK,(&__string_14));
  add__CRK(list__TK,(&__string_15));
  add__CRK(list__TK,(&__string_16));
  add__CRK(list__TK,(&__string_17));
  add__CRK(list__TK,(&__string_18));
  add__CRK(list__TK,(&__string_19));
  add__CRK(list__TK,(&__string_20));
  add__CRK(list__TK,(&__string_21));
  add__CRK(list__TK,(&__string_22));
  add__CRK(list__TK,(&__string_23));
  add__CRK(list__TK,(&__string_24));
  add__CRK(list__TK,(&__string_25));
  add__CRK(list__TK,(&__string_26));
  add__CRK(list__TK,(&__string_27));
  add__CRK(list__TK,(&__string_28));
  add__CRK(list__TK,(&__string_29));
  add__CRK(list__TK,(&__string_30));
  add__CRK(list__TK,(&__string_31));
  add__CRK(list__TK,(&__string_32));
  add__CRK(list__TK,(&__string_33));
  add__CRK(list__TK,(&__string_34));
  add__CRK(list__TK,(&__string_35));
  add__CRK(list__TK,(&__string_36));
  add__CRK(list__TK,(&__string_37));
  add__CRK(list__TK,(&__string_38));
  add__CRK(list__TK,(&__string_39));
  add__CRK(list__TK,(&__string_40));
  add__CRK(list__TK,(&__string_41));
  add__CRK(list__TK,(&__string_42));
  add__CRK(list__TK,(&__string_43));
  add__CRK(list__TK,(&__string_44));
  add__CRK(list__TK,(&__string_45));
  add__CRK(list__TK,(&__string_46));
  add__CRK(list__TK,(&__string_1));
  add__CRK(list__TK,(&__string_47));
  add__CRK(list__TK,(&__string_48));
  add__CRK(list__TK,(&__string_49));
  add__CRK(list__TK,(&__string_50));
  add__CRK(list__TK,(&__string_51));
  add__CRK(list__TK,(&__string_52));
  add__CRK(list__TK,(&__string_53));
  add__CRK(list__TK,(&__string_54));
  add__CRK(list__TK,(&__string_55));
  add__CRK(list__TK,(&__string_56));
  add__CRK(list__TK,(&__string_57));
  add__CRK(list__TK,(&__string_58));
  add__CRK(list__TK,(&__string_59));
  add__CRK(list__TK,(&__string_2));
  add__CRK(list__TK,(&__string_60));
  add__CRK(list__TK,(&__string_61));
  add__CRK(list__TK,(&__string_62));
  add__CRK(list__TK,(&__string_63));
  add__CRK(list__TK,(&__string_64));
  add__CRK(list__TK,(&__string_65));
  add__CRK(list__TK,(&__string_66));
  add__CRK(list__TK,(&__string_67));
  add__CRK(list__TK,(&__string_68));
  add__CRK(list__TK,(&__string_69));
  add__CRK(list__TK,(&__string_70));
  add__CRK(list__TK,(&__string_71));
  add__CRK(list__TK,(&__string_72));
  add__CRK(list__TK,(&__string_73));
  add__CRK(list__TK,(&__string_74));
  add__CRK(list__TK,(&__string_75));
  add__CRK(list__TK,(&__string_76));
  add__CRK(list__TK,(&__string_77));
  add__CRK(list__TK,(&__string_78));
  add__CRK(list__TK,(&__string_79));
  add__CRK(list__TK,(&__string_80));
  add__CRK(list__TK,(&__string_81));
  add__CRK(list__TK,(&__string_82));
  add__CRK(list__TK,(&__string_83));
  add__CRK(list__TK,(&__string_84));
  add__CRK(list__TK,(&__string_85));
  add__CRK(list__TK,(&__string_86));
  add__CRK(list__TK,(&__string_87));
  add__CRK(list__TK,(&__string_88));
  add__CRK(list__TK,(&__string_89));
  add__CRK(list__TK,(&__string_90));
  add__CRK(list__TK,(&__string_91));
  add__CRK(list__TK,(&__string_92));
  add__CRK(list__TK,(&__string_93));
  add__CRK(list__TK,(&__string_94));
  add__CRK(list__TK,(&__string_95));
  add__CRK(list__TK,(&__string_96));
  add__CRK(list__TK,(&__string_97));
  add__CRK(list__TK,(&__string_98));
  add__CRK(list__TK,(&__string_99));
  add__CRK(list__TK,(&__string_100));
  add__CRK(list__TK,(&__string_101));
  add__CRK(list__TK,(&__string_102));
  add__CRK(list__TK,(&__string_103));
  add__CRK(list__TK,(&__string_104));
  add__CRK(list__TK,(&__string_105));
  add__CRK(list__TK,(&__string_106));
  add__CRK(list__TK,(&__string_107));
  add__CRK(list__TK,(&__string_108));
  add__CRK(list__TK,(&__string_109));
  add__CRK(list__TK,(&__string_73));
  add__CRK(list__TK,(&__string_110));
  add__CRK(list__TK,(&__string_111));
  add__CRK(list__TK,(&__string_112));
  add__CRK(list__TK,(&__string_113));
  add__CRK(list__TK,(&__string_68));
  add__CRK(list__TK,(&__string_114));
  add__CRK(list__TK,(&__string_69));
  add__CRK(list__TK,(&__string_115));
  add__CRK(list__TK,(&__string_116));
  add__CRK(list__TK,(&__string_117));
  add__CRK(list__TK,(&__string_118));
  add__CRK(list__TK,(&__string_119));
  add__CRK(list__TK,(&__string_120));
  operator_equal__0V=operator_to_name__E1B((&__string_20));
  operator_not_equal__5V=operator_to_name__E1B((&__string_21));
  begin_time__5=((__UINTEGER_64 )((unsigned long long)time(NULL)));
  cmd__GW=NULL;
  i__IW= 0;
  car__JW='\0';
  stat__KW= 0;
  j__HW= 1;
  while ((j__HW <= ((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.upper__TXD)) {
    cmd__GW=((void **)((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.storage__D2M)[j__HW];
    if ((((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 0] == '-')) {
      if ((((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'v')) {
        verbose_level__FX= 1;
        if ((((__STRING *)cmd__GW)->count__VF >  2)) {
          if (((! is_digit__EWEB(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 2])) || (((__STRING *)cmd__GW)->count__VF >  3))) {
            print__1ZE((&__string_121));
            exit(( 1));
          };
          verbose_level__FX=(__INTEGER)(((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 2])) -  48);
        };
        __tmp__GY=TRUE__;
      } else {
        __tmp__GY=FALSE__;
      };
      if (__tmp__GY) {
        __tmp__TY=TRUE__;
      } else {
        result__MU1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 's');
        if (result__MU1) {
          is_statistic__0H=TRUE__;
        };
        __tmp__TY=result__MU1;
      };
      if (__tmp__TY) {
        __tmp__AZ=TRUE__;
      } else {
        result__4U1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'q');
        if (result__4U1) {
          is_quiet_operation__UG=TRUE__;
        };
        __tmp__AZ=result__4U1;
      };
      if (__tmp__AZ) {
        __tmp__40=TRUE__;
      } else {
        result__QV1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'i');
        if (result__QV1) {
          if ((((__STRING *)cmd__GW)->count__VF ==  2)) {
            print__1ZE((&__string_122));
            print__1ZE((&__string_121));
            exit(( 1));
          };
          stat__KW= 0;
          i__IW= 3;
          while ((i__IW <= ((__STRING *)cmd__GW)->count__VF)) {
            car__JW=((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[(__INTEGER)(i__IW -  1)];
            if (is_digit__EWEB(car__JW)) {
              stat__KW=(__INTEGER)((__INTEGER)(stat__KW *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )car__JW)) -  48));
            } else {
              print__1ZE((&__string_122));
              print__1ZE((&__string_121));
              exit(( 1));
            };
            i__IW=(__INTEGER)(i__IW +  1);
          };
          if ((! (( 1 <= stat__KW) && ( 5000 >= stat__KW)))) {
            print__1ZE((&__string_122));
            print__1ZE((&__string_121));
            exit(( 1));
          };
          inline_level__20=(__INTEGER)(stat__KW +  2);
        };
        __tmp__40=result__QV1;
      };
      if (__tmp__40) {
        __tmp__U4=TRUE__;
      } else {
        result__CW1=(to_lower__OA1(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1]) == 'd');
        if (result__CW1) {
          if ((((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'D')) {
            debug_with_code__R1=TRUE__;
          };
          debug_level_option__3C= 10;
          stat__KW= 0;
          i__IW= 3;
          while ((i__IW <= ((__STRING *)cmd__GW)->count__VF)) {
            car__JW=((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[(__INTEGER)(i__IW -  1)];
            Self__A55C=stat__KW;
            if ((stat__KW ==  0)) {
              if ((car__JW == '-')) {
                debug_level_option__3C= 5;
                stat__KW= 2;
                __tmp__L2=TRUE__;
              } else {
                __tmp__L2=FALSE__;
              };
              if (__tmp__L2) {
                __tmp__X2=TRUE__;
              } else {
                result__KEMD=(car__JW == '+');
                if (result__KEMD) {
                  debug_level_option__3C= 15;
                  stat__KW= 2;
                };
                __tmp__X2=result__KEMD;
              };
              if ((! __tmp__X2)) {
                if (is_digit__EWEB(car__JW)) {
                  debug_level_option__3C=(__INTEGER)(((__INTEGER )((__INTEGER_8 )car__JW)) -  48);
                  stat__KW= 1;
                } else {
                  print__1ZE((&__string_121));
                  exit(( 1));
                };
              };
            };
            if ((Self__A55C ==  1)) {
              if (is_digit__EWEB(car__JW)) {
                debug_level_option__3C=(__INTEGER)((__INTEGER)(debug_level_option__3C *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )car__JW)) -  48));
                if ((debug_level_option__3C >  20)) {
                  print__1ZE((&__string_121));
                  exit(( 1));
                };
                stat__KW= 2;
              } else {
                print__1ZE((&__string_121));
                exit(( 1));
              };
            };
            if ((Self__A55C ==  2)) {
              print__1ZE((&__string_121));
              exit(( 1));
            };
            i__IW=(__INTEGER)(i__IW +  1);
          };
        };
        __tmp__U4=result__CW1;
      };
      if (__tmp__U4) {
        __tmp__FAB=TRUE__;
      } else {
        result__UW1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'o');
        if (result__UW1) {
          j__HW=(__INTEGER)(j__HW +  1);
          if ((j__HW > ((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.upper__TXD)) {
            print__1ZE((&__string_121));
            exit(( 1));
          };
          copy__BNK(string_tmp__RB,((void **)((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.storage__D2M)[j__HW]);
          i__IW=last_index__L01(string_tmp__RB,'.');
          if ((i__IW >  1)) {
            remove_last__RLLB(string_tmp__RB,(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__RB)->count__VF - i__IW) +  1));
          };
          output_name_exe__ZB=get__QEC(string_tmp__RB);
        };
        __tmp__FAB=result__UW1;
      };
      if (__tmp__FAB) {
        __tmp__CBB=TRUE__;
      } else {
        result__GX1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 't');
        if (result__GX1) {
          j__HW=(__INTEGER)(j__HW +  1);
          if ((j__HW > ((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.upper__TXD)) {
            print__1ZE((&__string_121));
            exit(( 1));
          };
          copy__BNK(string_tmp__RB,((void **)((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.storage__D2M)[j__HW]);
          to_upper__LWKB(string_tmp__RB);
          target__3B=get__QEC(string_tmp__RB);
        };
        __tmp__CBB=result__GX1;
      };
      if (__tmp__CBB) {
        __tmp__QBB=TRUE__;
      } else {
        result__YX1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'w');
        if (result__YX1) {
          is_warning__OBB=TRUE__;
        };
        __tmp__QBB=result__YX1;
      };
      if (__tmp__QBB) {
        __tmp__4BB=TRUE__;
      } else {
        result__KY1=(((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'W');
        if (result__KY1) {
          is_all_warning__2BB=TRUE__;
        };
        __tmp__4BB=result__KY1;
      };
      if ((! __tmp__4BB)) {
        if ((((__CHARACTER *)((__STRING *)cmd__GW)->storage__XNK)[ 1] == 'O')) {
          is_optimization__II=TRUE__;
        } else {
          print__1ZE((&__string_121));
          exit(( 1));
        };
      };
    } else {
      if (((void *)input_name__UB != (void *)NULL)) {
        print__1ZE((&__string_121));
        exit(( 1));
      };
      copy__BNK(string_tmp__RB,((void **)((__FAST_ARRAYoSTRINGo *)result__GZE)->parent_arrayed_collection__QXD.storage__D2M)[j__HW]);
      copy__BNK(string_tmp2__ADB,string_tmp__RB);
      replace_all__with__RZ1(string_tmp__RB,'\\','/');
      i__IW=last_index__L01(string_tmp__RB,'/');
      if ((i__IW <  1)) {
        copy__BNK(string_tmp__RB,(&__string_123));
      } else {
        remove_last__RLLB(string_tmp__RB,(__INTEGER)(((__STRING *)string_tmp__RB)->count__VF - i__IW));
        Self__M1UB=((__STRING *)string_tmp2__ADB);
        if ((i__IW > Self__M1UB->count__VF)) {
          Self__M1UB->count__VF= 0;
        } else {
          if ((i__IW >  0)) {
            remove_between__to__ZVCC(Self__M1UB, 1,i__IW);
          };
        };
      };
      i__IW=last_index__L01(string_tmp2__ADB,'.');
      if ((i__IW >  1)) {
        remove_last__RLLB(string_tmp2__ADB,(__INTEGER)((__INTEGER)(((__STRING *)string_tmp2__ADB)->count__VF - i__IW) +  1));
      };
      add_last__Z11(path_directory__EC,get__QEC(string_tmp__RB));
      to_upper__LWKB(string_tmp2__ADB);
      input_name__UB=get__QEC(string_tmp2__ADB);
    };
    j__HW=(__INTEGER)(j__HW +  1);
  };
  if (((void *)input_name__UB == (void *)NULL)) {
    print__1ZE((&__string_121));
    exit(( 1));
  };
  if (((debug_level_option__3C !=  0) & is_optimization__II)) {
    print__1ZE((&__string_124));
    is_optimization__II=FALSE__;
  };
  copy__BNK(string_tmp__RB,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)path_directory__EC)->first_link__5UK)->item__BVK);
  append__MOK(string_tmp__RB,input_name__UB);
  append__MOK(string_tmp__RB,(&__string_125));
  to_lower__LVK(string_tmp__RB);
  output_name_c__BF=get__QEC(string_tmp__RB);
  if (((void *)output_name_exe__ZB == (void *)NULL)) {
    copy__BNK(string_tmp__RB,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)path_directory__EC)->first_link__5UK)->item__BVK);
    append__MOK(string_tmp__RB,input_name__UB);
    to_lower__LVK(string_tmp__RB);
    output_name_exe__ZB=get__QEC(string_tmp__RB);
  };
  if (((void *)target__3B == (void *)NULL)) {
    target__3B=(&__string_31);
  };
  path__HGC=((__CHARACTER *)(LISAAC_DIRECTORY));
  __tmp__TGC=fast_first_index_of__until__PAD(path__HGC,'\0', 1024);
  result__RCD=clone__U1D();
  Self__1OL=((__STRING_CONSTANT *)result__RCD);
  Self__1OL->storage__C5K=path__HGC;
  Self__1OL->count__XHB=__tmp__TGC;
  copy__BNK(string_tmp__RB,result__RCD);
  Self__VY3Q=((__STRING_CONSTANT *)result__RCD);
  if ((((__CHARACTER *)Self__VY3Q->storage__C5K)[(__INTEGER)(Self__VY3Q->count__XHB -  1)] != '/')) {
    Self__XY3Q=((__STRING_CONSTANT *)result__RCD);
    __tmp__5GC=(((__CHARACTER *)Self__XY3Q->storage__C5K)[(__INTEGER)(Self__XY3Q->count__XHB -  1)] != '\\');
  } else {
    __tmp__5GC=FALSE__;
  };
  if (__tmp__5GC) {
    add_last__YPK(string_tmp__RB,'/');
  };
  __tmp__LHC=get__QEC(string_tmp__RB);
  __tmp__MHC=target__3B;
  __tmp__OHC=output_name_exe__ZB;
  ic__GDD=output_name_c__BF;
  result__Q3E=NULL;
  ptr__R3E=((__POINTER )(NULL));
  typ_id__W3E= 0;
  sz__T3E=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo));
  if ((sz__T3E ==  0)) {
    result__Q3E=HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__;
  } else {
    typ_id__W3E=__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__T3E);
    if ((typ_id__W3E == (__INTEGER)(-  1))) {
      a__2Y3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__0Y3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__T3E + a__2Y3Q) & (__UINTEGER_32)(~ a__2Y3Q));
      ptr__R3E=micro_alloc__table__lab__BOI(new_size__0Y3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0Y3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__0Y3Q);
    } else {
      t__AZ3Q=((__UINTEGER_32 )typ_id__W3E);
      a__CZ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__R3E=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__T3E + a__CZ3Q) & (__UINTEGER_32)(~ a__CZ3Q)),((__POINTER )(&(table_type[(t__AZ3Q)]))),(__UINTEGER_32)(t__AZ3Q |  1));
    };
    result__Q3E=((__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *)ptr__R3E);
    *(result__Q3E) = *(HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo__);
  };
  Self__3GM=((__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *)result__Q3E);
  new_capacity__JMP=prime_number_ceiling__A4Q( 193);
  Self__3GM->buckets__SPL=create__E1S(new_capacity__JMP);
  Self__3GM->capacity__NPL=new_capacity__JMP;
  Self__3GM->count__TQL= 0;
  variable__OED=result__Q3E;
  put__to__4OL(result__Q3E,__tmp__LHC,(&__string_61));
  put__to__4OL(variable__OED,ic__GDD,(&__string_62));
  put__to__4OL(variable__OED,__tmp__OHC,(&__string_63));
  put__to__4OL(variable__OED,__tmp__MHC,(&__string_64));
  copy__BNK(string_tmp__RB,__tmp__LHC);
  append__MOK(string_tmp__RB,(&__string_126));
  copy__BNK(string_tmp__4TB,string_tmp__RB);
  entry__IDD=((__POINTER )(fopen((char*)(to_external__4YK(string_tmp__4TB)),"rb")));
  if ((entry__IDD == (void *)NULL)) {
    print__1ZE((&__string_127));
    put_string__2EG(((__STRING *)string_tmp__RB));
    print__1ZE((&__string_128));
    exit(( 1));
  } else {
    fclose((FILE*)((entry__IDD)));
  };
  object__ODD=create__name__generic_count__TBE(get__QEC(string_tmp__RB),(&__string_93), 0);
  source__WFD=((__PROTOTYPE *)object__ODD)->source__UFD;
  position__ZFD= 1;
  pos_cur__2FD= 1;
  pos_line__3FD= 1;
  pos_col__4FD= 0;
  while (read_word__NWH((&__string_8))) {
    is_good_section__OCE=FALSE__;
    if ((! read_target__MWX())) {
      pos__TUGQ=current_position__EJG();
      put_error__text__0AH( 0,(&__string_129));
      put_position__ECH(pos__TUGQ);
      send_error__2FH();
    };
    while (read_character__EQ3(',')) {
      if ((! read_target__MWX())) {
        pos__VUGQ=current_position__EJG();
        put_error__text__0AH( 0,(&__string_129));
        put_position__ECH(pos__VUGQ);
        send_error__2FH();
      };
    };
    do {
      name__ER3=NULL;
      result__DR3=TRUE__;
      if (read_character__EQ3('+')) {
        if ((! read_identifier__OLEB())) {
          pos__XUGQ=current_position__EJG();
          put_error__text__0AH( 0,(&__string_130));
          put_position__ECH(pos__XUGQ);
          send_error__2FH();
        };
        name__ER3=last_string__V1G;
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__ZUGQ=current_position__EJG();
          put_error__text__0AH( 0,(&__string_131));
          put_position__ECH(pos__ZUGQ);
          send_error__2FH();
        };
        if (((void *)name__ER3 == (void *)(&__string_64))) {
          if ((! read_cap_identifier__Y45())) {
            pos__1UGQ=current_position__EJG();
            put_error__text__0AH( 0,(&__string_132));
            put_position__ECH(pos__1UGQ);
            send_error__2FH();
          };
        } else {
          if ((! read_path__1TGB())) {
            pos__3UGQ=current_position__EJG();
            put_error__text__0AH( 0,(&__string_133));
            put_position__ECH(pos__3UGQ);
            send_error__2FH();
          };
        };
        if (is_good_section__OCE) {
          put__to__4OL(variable__OED,last_string__V1G,name__ER3);
        };
        __tmp__UT3=TRUE__;
      } else {
        __tmp__UT3=FALSE__;
      };
      if (__tmp__UT3) {
        __tmp__OV3=TRUE__;
      } else {
        result__0CAB=read_character__EQ3('-');
        if (result__0CAB) {
          if ((! read_path__1TGB())) {
            pos__5UGQ=current_position__EJG();
            put_error__text__0AH( 0,(&__string_133));
            put_position__ECH(pos__5UGQ);
            send_error__2FH();
          };
          if (is_good_section__OCE) {
            Self__EZ3Q=((__STRING_CONSTANT *)last_string__V1G);
            if ((((__CHARACTER *)Self__EZ3Q->storage__C5K)[(__INTEGER)(Self__EZ3Q->count__XHB -  1)] != '\\')) {
              Self__X4K=((__STRING_CONSTANT *)last_string__V1G);
              __tmp__2U3=(((__CHARACTER *)Self__X4K->storage__C5K)[(__INTEGER)(Self__X4K->count__XHB -  1)] != '/');
            } else {
              __tmp__2U3=FALSE__;
            };
            if (__tmp__2U3) {
              copy__BNK(string_tmp__RB,last_string__V1G);
              add_last__YPK(string_tmp__RB,'/');
              last_string__V1G=get__QEC(string_tmp__RB);
            };
            add_last__Z11(path_directory__EC,last_string__V1G);
          };
        };
        __tmp__OV3=result__0CAB;
      };
      if ((! __tmp__OV3)) {
        if (read_character__EQ3('*')) {
          if ((! read_path__1TGB())) {
            pos__BVGQ=current_position__EJG();
            put_error__text__0AH( 0,(&__string_134));
            put_position__ECH(pos__BVGQ);
            send_error__2FH();
          };
          if (is_good_section__OCE) {
            add_last__Z11(command_list__VI,last_string__V1G);
          };
        } else {
          result__DR3=FALSE__;
        };
      };
      if ((result__DR3 && (! read_character__EQ3(';')))) {
        pos__DVGQ=current_position__EJG();
        put_error__text__0AH( 2,(&__string_135));
        put_position__ECH(pos__DVGQ);
        send_error__2FH();
      };
    } while (result__DR3);
  };
  read_space__UAF();
  if ((last_character__0OF() != ((__CHARACTER )(( 0))))) {
    pos__FVGQ=current_position__EJG();
    put_error__text__0AH( 0,(&__string_136));
    put_position__ECH(pos__FVGQ);
    send_error__2FH();
  };
  if ((! is_found__LGD)) {
    copy__BNK(string_tmp__RB,(&__string_137));
    append__MOK(string_tmp__RB,at__3WM(variable__OED,(&__string_64)));
    append__MOK(string_tmp__RB,(&__string_138));
    pos__KMG=current_position__EJG();
    put_error__text__0AH( 2,string_tmp__RB);
    put_position__ECH(pos__KMG);
    send_error__2FH();
  };
  object__ODD=NULL;
  if ((verbose_level__FX !=  0)) {
    copy__BNK(string_tmp__RB,(&__string_139));
    append__MOK(string_tmp__RB,input_name__UB);
    to_lower__LVK(string_tmp__RB);
    append__MOK(string_tmp__RB,(&__string_140));
    append__MOK(string_tmp__RB,output_name_exe__ZB);
    append__MOK(string_tmp__RB,(&__string_141));
    append__MOK(string_tmp__RB,target__3B);
    append__MOK(string_tmp__RB,(&__string_142));
    Self__NHD= 1;
    limit_up__OHD=((__LINKED_LISToSTRING_CONSTANTo *)path_directory__EC)->parent_linked_collection__DC.upper__JC;
    while ((Self__NHD <= limit_up__OHD)) {
      append__MOK(string_tmp__RB,(&__string_143));
      append__MOK(string_tmp__RB,item__EUU(path_directory__EC,Self__NHD));
      add_last__YPK(string_tmp__RB,'\n');
      Self__NHD=(__INTEGER)(Self__NHD +  1);
    };
    put_string__2EG(((__STRING *)string_tmp__RB));
  };
  copy__BNK(output_decl__1C,(&__string_144));
  if ((debug_level_option__3C !=  0)) {
    append__MOK(output_decl__1C,(&__string_145));
  };
  append__MOK(output_decl__1C,(&__string_146));
  title__in__NHB((&__string_147),output_decl__1C);
  TYPE_NULL__->parent_type__TIB.index__LJC=index_count__JJC;
  index_count__JJC=(__INTEGER)(index_count__JJC +  1);
  fast_put__to__SAL(result__JQF,TYPE_NULL__,(&__string_59));
  TYPE_NULL__->parent_type__TIB.slot_run__1JC=create_with_capacity__YID( 1);
  TYPE_NULL__->parent_type__TIB.default__AKC=create__with__VJD(TYPE_NULL__, 0);
  fast_put__to__SAL(result__JQF,TYPE_VOID__,(&__string_2));
  TYPE_VOID__->parent_type__UIB.default__AKC=create__with__VJD(TYPE_VOID__, 0);
  fast_put__to__SAL(result__JQF,TYPE_CONTEXT__,(&__string_44));
  TYPE_CONTEXT__->parent_type__VIB.default__AKC=create__with__VJD(TYPE_CONTEXT__, 1);
  result__RJE=NULL;
  ptr__SJE=((__POINTER )(NULL));
  typ_id__XJE= 0;
  sz__UJE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
  if ((sz__UJE ==  0)) {
    result__RJE=FAST_ARRAYoTYPE_IDo__;
  } else {
    typ_id__XJE=__FAST_ARRAYoTYPE_IDo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__UJE);
    if ((typ_id__XJE == (__INTEGER)(-  1))) {
      a__JZ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__HZ3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__UJE + a__JZ3Q) & (__UINTEGER_32)(~ a__JZ3Q));
      ptr__SJE=micro_alloc__table__lab__BOI(new_size__HZ3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HZ3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HZ3Q);
    } else {
      t__NZ3Q=((__UINTEGER_32 )typ_id__XJE);
      a__PZ3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__SJE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__UJE + a__PZ3Q) & (__UINTEGER_32)(~ a__PZ3Q)),((__POINTER )(&(table_type[(t__NZ3Q)]))),(__UINTEGER_32)(t__NZ3Q |  1));
    };
    result__RJE=((__FAST_ARRAYoTYPE_IDo *)ptr__SJE);
    *(result__RJE) = *(FAST_ARRAYoTYPE_IDo__);
  };
  Self__YTL=((__FAST_ARRAYoTYPE_IDo *)result__RJE);
  if ((Self__YTL->parent_arrayed_collection__WKC.capacity__ODL <  3)) {
    Self__YTL->parent_arrayed_collection__WKC.storage__KEL=create__WD2( 3);
    Self__YTL->parent_arrayed_collection__WKC.capacity__ODL= 3;
  };
  Self__YTL->parent_arrayed_collection__WKC.upper__MDL=(__INTEGER)(-  1);
  list_id__YKC=result__RJE;
  add_last__IDL(result__RJE,create__WKD( 0));
  add_last__IDL(list_id__YKC,create__WKD( 1));
  __tmp__ZIB=get__5KC(input_name__UB);
  if (((struct ___OBJ *)__tmp__ZIB)->__id==__ITM_TYPE_SIMPLE__) {
    if (((__ITM_TYPE_SIMPLE *)__tmp__ZIB)->to_run__2VK==0) {
      __tmp__1IB=((__ITM_TYPE_SIMPLE *)__tmp__ZIB)->to_run__1VK;
    } else {
      __tmp__1IB=to_run__XVK(__tmp__ZIB);
    };
  } else {
    __tmp__1IB=to_run__MPXD();
  };
  type_input__LD=((__TYPE_FULL *)__tmp__1IB)->parent_type__KTL;
  __tmp__CJB=get__style__VLC((&__string_41),(&__string_13));
  if (((__ITM_TYPE_STYLE *)__tmp__CJB)->to_run__V1IB==0) {
    __tmp__DJB=((__ITM_TYPE_STYLE *)__tmp__CJB)->to_run__U1IB;
  } else {
    Self__5VGQ=((__ITM_TYPE_STYLE *)__tmp__CJB);
    __tmp__AWGQ=get__XUN(Self__5VGQ);
    Self__5VGQ->to_run__U1IB=__tmp__AWGQ;
    Self__5VGQ->to_run__V1IB=0;
    __tmp__DJB=__tmp__AWGQ;
  };
  type_true__FJB=((__TYPE_FULL *)__tmp__DJB)->parent_type__KTL;
  __tmp__KJB=get__style__VLC((&__string_42),(&__string_13));
  if (((__ITM_TYPE_STYLE *)__tmp__KJB)->to_run__V1IB==0) {
    __tmp__LJB=((__ITM_TYPE_STYLE *)__tmp__KJB)->to_run__U1IB;
  } else {
    Self__BWGQ=((__ITM_TYPE_STYLE *)__tmp__KJB);
    __tmp__CWGQ=get__XUN(Self__BWGQ);
    Self__BWGQ->to_run__U1IB=__tmp__CWGQ;
    Self__BWGQ->to_run__V1IB=0;
    __tmp__LJB=__tmp__CWGQ;
  };
  type_false__NJB=((__TYPE_FULL *)__tmp__LJB)->parent_type__KTL;
  __tmp__SJB=get__style__VLC((&__string_40),(&__string_13));
  if (((__ITM_TYPE_STYLE *)__tmp__SJB)->to_run__V1IB==0) {
    __tmp__TJB=((__ITM_TYPE_STYLE *)__tmp__SJB)->to_run__U1IB;
  } else {
    Self__DWGQ=((__ITM_TYPE_STYLE *)__tmp__SJB);
    __tmp__EWGQ=get__XUN(Self__DWGQ);
    Self__DWGQ->to_run__U1IB=__tmp__EWGQ;
    Self__DWGQ->to_run__V1IB=0;
    __tmp__TJB=__tmp__EWGQ;
  };
  type_boolean__VJB=((__TYPE_FULL *)__tmp__TJB)->parent_type__KTL;
  __tmp__0JB=get__style__VLC((&__string_33),(&__string_13));
  if (((__ITM_TYPE_STYLE *)__tmp__0JB)->to_run__V1IB==0) {
    __tmp__1JB=((__ITM_TYPE_STYLE *)__tmp__0JB)->to_run__U1IB;
  } else {
    Self__FWGQ=((__ITM_TYPE_STYLE *)__tmp__0JB);
    __tmp__GWGQ=get__XUN(Self__FWGQ);
    Self__FWGQ->to_run__U1IB=__tmp__GWGQ;
    Self__FWGQ->to_run__V1IB=0;
    __tmp__1JB=__tmp__GWGQ;
  };
  type_integer__3JB=((__TYPE_FULL *)__tmp__1JB)->parent_type__KTL;
  __tmp__CKB=get__style__VLC((&__string_34),(&__string_13));
  if (((__ITM_TYPE_STYLE *)__tmp__CKB)->to_run__V1IB==0) {
    __tmp__DKB=((__ITM_TYPE_STYLE *)__tmp__CKB)->to_run__U1IB;
  } else {
    Self__HWGQ=((__ITM_TYPE_STYLE *)__tmp__CKB);
    __tmp__IWGQ=get__XUN(Self__HWGQ);
    Self__HWGQ->to_run__U1IB=__tmp__IWGQ;
    Self__HWGQ->to_run__V1IB=0;
    __tmp__DKB=__tmp__IWGQ;
  };
  type_real__FKB=((__TYPE_FULL *)__tmp__DKB)->parent_type__KTL;
  __tmp__KKB=get__style__VLC((&__string_52),(&__string_13));
  if (((__ITM_TYPE_STYLE *)__tmp__KKB)->to_run__V1IB==0) {
  } else {
    Self__JWGQ=((__ITM_TYPE_STYLE *)__tmp__KKB);
    Self__JWGQ->to_run__U1IB=get__XUN(Self__JWGQ);
    Self__JWGQ->to_run__V1IB=0;
  };
  __tmp__QKB=get__5KC((&__string_36));
  if (((struct ___OBJ *)__tmp__QKB)->__id==__ITM_TYPE_SIMPLE__) {
    if (((__ITM_TYPE_SIMPLE *)__tmp__QKB)->to_run__2VK==0) {
      __tmp__RKB=((__ITM_TYPE_SIMPLE *)__tmp__QKB)->to_run__1VK;
    } else {
      __tmp__RKB=to_run__XVK(__tmp__QKB);
    };
  } else {
    __tmp__RKB=to_run__MPXD();
  };
  type_string_constant__TKB=((__TYPE_FULL *)__tmp__RKB)->parent_type__KTL;
  itm_type_character__RIB=get__style__VLC((&__string_35),(&__string_13));
  if (((__ITM_TYPE_STYLE *)itm_type_character__RIB)->to_run__V1IB==0) {
    __tmp__ZKB=((__ITM_TYPE_STYLE *)itm_type_character__RIB)->to_run__U1IB;
  } else {
    Self__R1IB=((__ITM_TYPE_STYLE *)itm_type_character__RIB);
    __tmp__T1IB=get__XUN(Self__R1IB);
    Self__R1IB->to_run__U1IB=__tmp__T1IB;
    Self__R1IB->to_run__V1IB=0;
    __tmp__ZKB=__tmp__T1IB;
  };
  type_character__1KB=((__TYPE_FULL *)__tmp__ZKB)->parent_type__KTL;
  __tmp__4KB=get__5KC((&__string_39));
  if (((struct ___OBJ *)__tmp__4KB)->__id==__ITM_TYPE_SIMPLE__) {
    if (((__ITM_TYPE_SIMPLE *)__tmp__4KB)->to_run__2VK==0) {
      __tmp__5KB=((__ITM_TYPE_SIMPLE *)__tmp__4KB)->to_run__1VK;
    } else {
      __tmp__5KB=to_run__XVK(__tmp__4KB);
    };
  } else {
    __tmp__5KB=to_run__MPXD();
  };
  type_block__BLB=((__TYPE_FULL *)__tmp__5KB)->parent_type__KTL;
  __tmp__ELB=get__5KC((&__string_43));
  if (((struct ___OBJ *)__tmp__ELB)->__id==__ITM_TYPE_SIMPLE__) {
    if (((__ITM_TYPE_SIMPLE *)__tmp__ELB)->to_run__2VK==0) {
      __tmp__FLB=((__ITM_TYPE_SIMPLE *)__tmp__ELB)->to_run__1VK;
    } else {
      __tmp__FLB=to_run__XVK(__tmp__ELB);
    };
  } else {
    __tmp__FLB=to_run__MPXD();
  };
  type_pointer__HLB=((__TYPE_FULL *)__tmp__FLB)->parent_type__KTL;
  type_gen__QIB=new__JOC();
  add_last__3VK(type_gen__QIB,itm_type_character__RIB);
  type_gen__QIB=alias__EPC(type_gen__QIB);
  itm_type_n_a_character__SIB=get__style__with__1PC((&__string_37),NULL,type_gen__QIB);
  to_run__W1IB(itm_type_n_a_character__SIB);
  type_gen__QIB=new__JOC();
  add_last__3VK(type_gen__QIB,itm_type_n_a_character__SIB);
  type_gen__QIB=alias__EPC(type_gen__QIB);
  to_run__W1IB(get__style__with__1PC((&__string_37),NULL,type_gen__QIB));
  switch (((struct ___OBJ *)type_input__LD)->__id) {
  case __TYPE__: {
    __tmp__SD=((__TYPE *)type_input__LD)->prototype__RD;
  } break;
  case __TYPE_NULL__: {
    __tmp__SD=((__TYPE_NULL *)type_input__LD)->parent_type__TIB.prototype__RD;
  } break;
  case __TYPE_VOID__: {
    __tmp__SD=((__TYPE_VOID *)type_input__LD)->parent_type__UIB.prototype__RD;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__SD=((__TYPE_CONTEXT *)type_input__LD)->parent_type__VIB.prototype__RD;
  } break;
  case __TYPE_ID__: {
    __tmp__SD=((__TYPE_ID *)type_input__LD)->parent_type__WIB.prototype__RD;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__SD=((__TYPE_GENERIC *)type_input__LD)->parent_type__T2IB.prototype__RD;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__SD=prototype__IMEJ();
  } break;
  };
  Self__U1LC=((__PROTOTYPE *)__tmp__SD);
  cmd__11LC=NULL;
  context_main__D2LC=push_extern__profil__YGQC(Self__U1LC->parent_named__QD.parent_itm_object__PD.position__BJM,NULL);
  if ((debug_level_option__3C !=  0)) {
    cmd__11LC=(&__string_148);
  } else {
    cmd__11LC=(&__string_149);
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__text__access__persistant__type__2U0C(Self__U1LC->parent_named__QD.parent_itm_object__PD.position__BJM,cmd__11LC,NULL,TRUE__,TYPE_VOID__->parent_type__UIB.default__AKC));
  result__HIQC=NULL;
  s__IIQC=Self__U1LC->first_slot__5QMC;
  do {
    if ((((void *)((__SECTION_ *)((__ITM_SLOT *)s__IIQC)->id_section__EACC)->name__1I0D == (void *)(&__string_27)) && ((void *)((__ITM_SLOT *)s__IIQC)->parent_named__XIM.name__1QB == (void *)(&__string_83)))) {
      if (((void *)((__ITM_SLOT *)s__IIQC)->type__PD2D != (void *)type_void__NHEC)) {
        pos__PWGQ=((__ITM_SLOT *)s__IIQC)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        put_error__text__0AH( 1,(&__string_150));
        put_position__ECH(pos__PWGQ);
        send_error__2FH();
      };
      if ((argument_count__P0BG(s__IIQC) !=  1)) {
        pos__SWGQ=((__ITM_SLOT *)s__IIQC)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        put_error__text__0AH( 1,(&__string_151));
        put_position__ECH(pos__SWGQ);
        send_error__2FH();
      };
      __tmp__YJQC=type_input__LD;
      __tmp__0JQC=((__ITM_SLOT *)s__IIQC)->parent_named__XIM.name__1QB;
      switch (((struct ___OBJ *)type_input__LD)->__id) {
      case __TYPE__: {
        __tmp__1JQC=get_slot__U1BG(type_input__LD,__tmp__0JQC);
      } break;
      case __TYPE_NULL__: {
        __tmp__1JQC=get_slot__K3BG(__tmp__YJQC,__tmp__0JQC);
      } break;
      case __TYPE_VOID__: {
        __tmp__1JQC=get_slot__A5BG(__tmp__YJQC,__tmp__0JQC);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__1JQC=get_slot__WACG(__tmp__YJQC,__tmp__0JQC);
      } break;
      case __TYPE_ID__: {
        __tmp__1JQC=get_slot__MCCG(__tmp__YJQC,__tmp__0JQC);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__1JQC=get_slot__CECG(__tmp__YJQC,__tmp__0JQC);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__1JQC=get_slot__VXEJ(__tmp__0JQC);
      } break;
      };
      result__HIQC=__tmp__1JQC;
    };
    s__IIQC=((__ITM_SLOT *)s__IIQC)->next__YRMC;
  } while ((((void *)s__IIQC != (void *)NULL) && ((void *)result__HIQC == (void *)NULL)));
  if (((void *)result__HIQC == (void *)NULL)) {
    pos__RVCD=Self__U1LC->parent_named__QD.parent_itm_object__PD.position__BJM;
    put_error__text__0AH( 1,(&__string_152));
    put_position__ECH(pos__RVCD);
    send_error__2FH();
  };
  __tmp__F3LC=Self__U1LC->parent_named__QD.parent_itm_object__PD.position__BJM;
  switch (((struct ___OBJ *)type_input__LD)->__id) {
  case __TYPE__: {
    __tmp__H3LC=((__TYPE *)type_input__LD)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__H3LC=((__TYPE_NULL *)type_input__LD)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__H3LC=((__TYPE_VOID *)type_input__LD)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__H3LC=((__TYPE_CONTEXT *)type_input__LD)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__H3LC=((__TYPE_ID *)type_input__LD)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__H3LC=((__TYPE_GENERIC *)type_input__LD)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__H3LC=((__PROFIL_BLOCK *)type_input__LD)->parent_type__HHAG.default__AKC;
  } break;
  };
  self_main__W1LC=create__type__CLQC(__tmp__F3LC,__tmp__H3LC);
  if (((struct ___OBJ *)result__HIQC)->__id==__SLOT_DATA__) {
    __tmp__K3LC=((__SLOT_DATA *)result__HIQC)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
  } else {
    __tmp__K3LC=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)result__HIQC)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,new_read__slot__receiver__self__YLQC(__tmp__K3LC,result__HIQC,self_main__W1LC,self_main__W1LC));
  __tmp__Q3LC=Self__U1LC->parent_named__QD.parent_itm_object__PD.position__BJM;
  switch (((struct ___OBJ *)type_integer__3JB)->__id) {
  case __TYPE__: {
    __tmp__S3LC=((__TYPE *)type_integer__3JB)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__S3LC=((__TYPE_NULL *)type_integer__3JB)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__S3LC=((__TYPE_VOID *)type_integer__3JB)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__S3LC=((__TYPE_CONTEXT *)type_integer__3JB)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__S3LC=((__TYPE_ID *)type_integer__3JB)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__S3LC=((__TYPE_GENERIC *)type_integer__3JB)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__S3LC=((__PROFIL_BLOCK *)type_integer__3JB)->parent_type__HHAG.default__AKC;
  } break;
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__value__type__DNQC(__tmp__Q3LC, 0,__tmp__S3LC));
  list_main__WE=list_current__IF1;
  Self__LJ4F=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)result__QQCD)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
  pop_stack_until__DDAG(stack_local_lower__AI4F);
  stack_local_lower__AI4F=Self__LJ4F->local__CI4F;
  remove_since__ERPG(stack_result__WI4F,stack_result_lower__DI4F);
  stack_result_lower__DI4F=Self__LJ4F->result__FI4F;
  list_current__IF1=Self__LJ4F->list__HI4F;
  profil_second__3PQC=Self__LJ4F->profil__LI4F;
  profil_first__4PQC=Self__LJ4F->old_profil_first__JI4F;
  top__3GQC=(__INTEGER)(top__3GQC -  1);
  pass_count__Z3LC= 1;
  if ((! is_quiet_operation__UG)) {
    put_string__EQD((&__string_153));
  };
  while ((modify_count__F4LC !=  0)) {
    modify_count__F4LC= 0;
    if ((! is_quiet_operation__UG)) {
      put_string__EQD((&__string_154));
    };
    pass_count__Z3LC=(__INTEGER)(pass_count__Z3LC +  1);
    level_pass__QYUC=(__INTEGER)(level_pass__QYUC +  1);
    j__PCID= 1;
    while ((j__PCID <= ((__LINKED_LISToNODE_TYPEo *)node_list__PMQC)->parent_linked_collection__OMQC.upper__ZCID)) {
      Self__A04F=((__NODE_TYPE *)item__00SE(node_list__PMQC,j__PCID));
      if ((update_case__XGAG(Self__A04F) & update_depth__QNAG(Self__A04F,TRUE__))) {
        remove__50RG(node_list__PMQC,j__PCID);
      } else {
        j__PCID=(__INTEGER)(j__PCID +  1);
      };
    };
  };
  if ((! is_quiet_operation__UG)) {
    put_string__EQD((&__string_155));
    i__E15Q=pass_count__Z3LC;
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )i__E15Q),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    put_string__EQD((&__string_156));
  };
  create__AXB( 2000);
  if ((verbose_level__FX !=  0)) {
    display__Y10C();
  };
  if ((! is_quiet_operation__UG)) {
    put_string__EQD((&__string_157));
  };
  pass_count_depend__Z1LC=pass_count__Z3LC;
  is_executing_pass__Q5LC=TRUE__;
  if ((! is_quiet_operation__UG)) {
    put_string__EQD((&__string_158));
  };
  pass_count__Z3LC=(__INTEGER)(pass_count__Z3LC +  1);
  level_pass__QYUC=(__INTEGER)(level_pass__QYUC +  1);
  life_limit__2PQC= 0;
  mode_recursive__WYUC=TRUE__;
  profil_second__3PQC=NULL;
  profil_first__4PQC=NULL;
  list_current__IF1=NULL;
  execute_link__LUOG(list_main__WE);
  mode_recursive__WYUC=FALSE__;
  clean__2YUC();
  reduce_profil__BQQC=TRUE__;
  do {
    modify_count__F4LC= 0;
    if ((! is_quiet_operation__UG)) {
      put_string__EQD((&__string_154));
    };
    pass_count__Z3LC=(__INTEGER)(pass_count__Z3LC +  1);
    switch_new_pass__IAMC=FALSE__;
    level_pass__QYUC=(__INTEGER)(level_pass__QYUC +  1);
    life_limit__2PQC= 0;
    profil_second__3PQC=NULL;
    profil_first__4PQC=NULL;
    list_current__IF1=NULL;
    execute_link__LUOG(list_main__WE);
    current__X30C= 0;
    while ((current__X30C < life_limit__2PQC)) {
      __tmp__H40C=((void **)((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.storage__P1L)[current__X30C];
      __tmp__J40C=inline_level_current__I40C;
      if (((struct ___OBJ *)__tmp__H40C)->__id==__PROFIL_SLOT__) {
        execute__2LHM(__tmp__H40C,inline_level_current__I40C);
      } else {
        execute__OREJ(__tmp__H40C,__tmp__J40C);
      };
      current__X30C=(__INTEGER)(current__X30C +  1);
    };
    current__X30C= 0;
    clean__2YUC();
    if (((! reduce_profil__BQQC) && (inline_level_current__I40C < inline_level__20))) {
      inline_level_current__I40C=(__INTEGER)(inline_level_current__I40C +  3);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    };
    if (switch_new_pass__IAMC) {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    };
  } while ((modify_count__F4LC !=  0));
  if ((! is_quiet_operation__UG)) {
    put_string__EQD((&__string_155));
    i__F15Q=(__INTEGER)(pass_count__Z3LC - pass_count_depend__Z1LC);
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )i__F15Q),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    put_string__EQD((&__string_156));
  };
  if ((verbose_level__FX !=  0)) {
    Self__R0OG=((__LIST *)list_main__WE);
    voir__S0OG=create__AXB( 250);
    display__2QQG(Self__R0OG,voir__S0OG);
    put_string__2EG(((__STRING *)voir__S0OG));
    fputc((int)('\n'),stdout);
    display__Y10C();
  };
  title__in__NHB((&__string_159),output_decl__1C);
  append__MOK(output_decl__1C,(&__string_160));
  title__in__NHB((&__string_161),output_glob__VD);
  title__in__NHB((&__string_162),output_code__XD);
  append__MOK(output_code__XD,(&__string_163));
  append__MOK(output_code__XD,(&__string_164));
  if ((debug_level_option__3C !=  0)) {
    append__MOK(output_code__XD,(&__string_165));
    append__MOK(output_code__XD,(&__string_166));
  };
  append__MOK(output_code__XD,(&__string_167));
  Self__NTC= 0;
  limit_up__OTC=result__5NE->parent_arrayed_collection__DNB.upper__KNB;
  while ((Self__NTC <= limit_up__OTC)) {
    __tmp__TNB=((void **)((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.storage__P1L)[Self__NTC];
    if (((struct ___OBJ *)__tmp__TNB)->__id==__PROFIL_SLOT__) {
      genere_handler__PYIM(__tmp__TNB,output_code__XD);
    } else {
      genere_handler__NMEJ(__tmp__TNB,output_code__XD);
    };
    add_last__YPK(output_code__XD,';');
    add_last__YPK(output_code__XD,'\n');
    Self__NTC=(__INTEGER)(Self__NTC +  1);
  };
  title__in__NHB((&__string_168),output_code__XD);
  append__MOK(output_code__XD,(&__string_169));
  genere_extern__TQOG(list_main__WE,output_code__XD);
  add_last__YPK(output_code__XD,'\n');
  Self__2TC= 0;
  limit_up__3TC=result__5NE->parent_arrayed_collection__DNB.upper__KNB;
  while ((Self__2TC <= limit_up__3TC)) {
    __tmp__MOB=((void **)((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.storage__P1L)[Self__2TC];
    if (((struct ___OBJ *)__tmp__MOB)->__id==__PROFIL_SLOT__) {
      Self__U1IM=((__PROFIL_SLOT *)__tmp__MOB);
      add_last__YPK(output_code__XD,'\n');
      genere_handler__PYIM(Self__U1IM,output_code__XD);
      append__MOK(output_code__XD,(&__string_170));
      append_type__X0LM(Self__U1IM,output_code__XD);
      if (((__INTEGER_8)(Self__U1IM->parent_profil__51LC.stat__BNEJ &  2) ==  0)) {
        append__MOK(output_code__XD,(&__string_171));
      } else {
        append__MOK(output_code__XD,(&__string_172));
      };
      if (((__INTEGER_8)(Self__U1IM->parent_profil__51LC.stat__BNEJ &  1) ==  0)) {
        append__MOK(output_code__XD,(&__string_173));
      } else {
        append__MOK(output_code__XD,(&__string_174));
      };
      add_last__YPK(output_code__XD,'\n');
      genere_extern__TQOG(Self__U1IM->parent_profil__51LC.code__HZJH,output_code__XD);
      add_last__YPK(output_code__XD,'\n');
    } else {
      Self__5MEJ=((__PROFIL_BLOCK *)__tmp__MOB);
      add_last__YPK(output_code__XD,'\n');
      genere_handler__NMEJ(Self__5MEJ,output_code__XD);
      append__MOK(output_code__XD,(&__string_170));
      append_type__LMJJ(Self__5MEJ,output_code__XD);
      if (((__INTEGER_8)(Self__5MEJ->parent_profil__GHAG.stat__BNEJ &  2) ==  0)) {
        append__MOK(output_code__XD,(&__string_171));
      } else {
        append__MOK(output_code__XD,(&__string_172));
      };
      if (((__INTEGER_8)(Self__5MEJ->parent_profil__GHAG.stat__BNEJ &  1) ==  0)) {
        append__MOK(output_code__XD,(&__string_173));
      } else {
        append__MOK(output_code__XD,(&__string_174));
      };
      add_last__YPK(output_code__XD,'\n');
      genere_extern__TQOG(Self__5MEJ->parent_profil__GHAG.code__HZJH,output_code__XD);
      add_last__YPK(output_code__XD,'\n');
    };
    Self__2TC=(__INTEGER)(Self__2TC +  1);
  };
  append__MOK(output_decl__1C,(&__string_175));
  Self__QUC= 0;
  limit_up__RUC=((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB;
  while ((Self__QUC <= limit_up__RUC)) {
    __tmp__EPB=((void **)((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.storage__X2L)[Self__QUC];
    switch (((struct ___OBJ *)__tmp__EPB)->__id) {
    case __TYPE__: {
      genere_struct__U22G(__tmp__EPB);
    } break;
    case __TYPE_NULL__: {
      append__MOK(output_decl__1C,(&__string_175));
    } break;
    case __TYPE_VOID__: {
    } break;
    case __TYPE_CONTEXT__: {
      append__MOK(output_decl__1C,(&__string_176));
    } break;
    case __TYPE_ID__: {
    } break;
    case __TYPE_GENERIC__: {
      genere_struct__1P3G(__tmp__EPB);
    } break;
    case __PROFIL_BLOCK__: {
    } break;
    };
    Self__QUC=(__INTEGER)(Self__QUC +  1);
  };
  if ((debug_level_option__3C !=  0)) {
    append__MOK(output_decl__1C,(&__string_176));
  };
  append__MOK(output_decl__1C,(&__string_177));
  append_in__4VC(((__INTEGER_32 )id_counter_without_type__2E),output_decl__1C);
  append__MOK(output_decl__1C,(&__string_178));
  proto__0PB=NULL;
  title__in__NHB((&__string_179),output_code__XD);
  append__MOK(output_code__XD,(&__string_180));
  if ((debug_level_option__3C !=  0)) {
    append__MOK(output_code__XD,(&__string_181));
    Self__URE=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)result__FTG)->parent_arrayed_collection__FQB.upper__QQB +  1);
    result__WRE=create__AXB( 11);
    append_in__4VC(((__INTEGER_32 )Self__URE),result__WRE);
    append__MOK(output_code__XD,result__WRE);
    append__MOK(output_code__XD,(&__string_182));
    Self__1RE= 0;
    limit_up__2RE=(__INTEGER)(result__FTG->parent_arrayed_collection__FQB.upper__QQB -  1);
    while ((Self__1RE <= limit_up__2RE)) {
      proto__0PB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[Self__1RE];
      append__MOK(output_code__XD,(&__string_183));
      append__MOK(output_code__XD,((__PROTOTYPE *)proto__0PB)->parent_named__QD.name__1QB);
      append__MOK(output_code__XD,(&__string_155));
      append__MOK(output_code__XD,((__PROTOTYPE *)proto__0PB)->filename__4QB);
      append__MOK(output_code__XD,(&__string_184));
      Self__1RE=(__INTEGER)(Self__1RE +  1);
    };
    Self__Z4L=((__FAST_ARRAYoPROTOTYPEo *)result__FTG);
    proto__0PB=((void **)Self__Z4L->parent_arrayed_collection__FQB.storage__D0M)[Self__Z4L->parent_arrayed_collection__FQB.upper__QQB];
    append__MOK(output_code__XD,(&__string_183));
    append__MOK(output_code__XD,((__PROTOTYPE *)proto__0PB)->parent_named__QD.name__1QB);
    append__MOK(output_code__XD,(&__string_155));
    append__MOK(output_code__XD,((__PROTOTYPE *)proto__0PB)->filename__4QB);
    append__MOK(output_code__XD,(&__string_185));
    if (debug_with_code__R1) {
      append__MOK(output_decl__1C,(&__string_186));
      append__MOK(output_code__XD,(&__string_187));
      src__TRB=result__I2CD;
      append_in__4VC(((__INTEGER_32 )result__I2CD->count__1RB),output_code__XD);
      append__MOK(output_code__XD,(&__string_182));
      Self__T1UC= 1;
      limit_up__U1UC=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)result__I2CD)->count__1RB;
      while ((Self__T1UC <= limit_up__U1UC)) {
        Self__F10D=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)src__TRB);
        set_cache_user__C3BE(Self__F10D,Self__T1UC);
        Result__H10D=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)Self__F10D->cache_node__Q10D)->key__S10D;
        append__MOK(output_decl__1C,(&__string_188));
        append_in__Z4H(Result__H10D,output_decl__1C);
        add_last__YPK(output_decl__1C,' ');
        append_in__4VC(((__INTEGER_32 )(__INTEGER)(Self__T1UC -  1)),output_decl__1C);
        add_last__YPK(output_decl__1C,'\n');
        append__MOK(output_code__XD,(&__string_189));
        append_in__Z4H(Result__H10D,output_code__XD);
        append__MOK(output_code__XD,(&__string_190));
        Self__410D=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)src__TRB);
        set_cache_user__C3BE(Self__410D,Self__T1UC);
        append__MOK(output_code__XD,((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)Self__410D->cache_node__Q10D)->item__J20D);
        append__MOK(output_code__XD,(&__string_191));
        Self__T1UC=(__INTEGER)(Self__T1UC +  1);
      };
      __tmp__USB=(__INTEGER)(((__STRING *)output_code__XD)->count__VF -  1);
      remove_between__to__ZVCC(((__STRING *)output_code__XD),__tmp__USB,__tmp__USB);
      append__MOK(output_code__XD,(&__string_192));
    };
    append__MOK(output_code__XD,(&__string_193));
    append__MOK(output_code__XD,(&__string_194));
    if ((debug_level_option__3C ==  20)) {
      append__MOK(output_code__XD,(&__string_195));
    };
    append__MOK(output_code__XD,(&__string_196));
    if (debug_with_code__R1) {
      append__MOK(output_code__XD,(&__string_197));
    } else {
      append__MOK(output_code__XD,(&__string_198));
    };
    append__MOK(output_code__XD,(&__string_199));
  };
  copy__BNK(string_tmp__4TB,output_name_c__BF);
  stream__1TB=((__POINTER )(fopen((char*)(to_external__4YK(string_tmp__4TB)),"w+b")));
  result__3TB=(stream__1TB != (void *)NULL);
  if (result__3TB) {
    fclose((FILE*)((stream__1TB)));
  };
  if ((! result__3TB)) {
    put_string__EQD((&__string_200));
    put_string__EQD(output_name_c__BF);
    put_string__EQD((&__string_201));
    exit(( 1));
  };
  copy__BNK(string_tmp__4TB,output_name_c__BF);
  file_output__1=((__POINTER )(fopen((char*)(to_external__4YK(string_tmp__4TB)),"wb")));
  fwrite((void *)((to_external__4YK(output_decl__1C))),(size_t)(1), (size_t)((((__STRING *)output_decl__1C)->count__VF)),(FILE*)((file_output__1)));
  fwrite((void *)((to_external__4YK(output_glob__VD))),(size_t)(1), (size_t)((((__STRING *)output_glob__VD)->count__VF)),(FILE*)((file_output__1)));
  if ((output_count__AG !=  0)) {
    fwrite((void *)((to_external__4YK(result__PRD))),(size_t)(1), (size_t)((((__STRING *)result__PRD)->count__VF)),(FILE*)((file_output__1)));
  };
  fwrite((void *)((to_external__4YK(output_code__XD))),(size_t)(1), (size_t)((((__STRING *)output_code__XD)->count__VF)),(FILE*)((file_output__1)));
  fclose((FILE*)((file_output__1)));
  end_time__CB=((__UINTEGER_64 )((unsigned long long)time(NULL)));
  if ((! is_quiet_operation__UG)) {
    put_string__EQD((&__string_202));
    time__FB=((__INTEGER )(__UINTEGER_64)(end_time__CB - begin_time__5));
    if ((time__FB >=  120)) {
      i__G15Q=(__INTEGER)(time__FB /  60);
      ((__STRING *)tmp_string__PSD)->count__VF= 0;
      append_in__4VC(((__INTEGER_32 )i__G15Q),tmp_string__PSD);
      put_string__EQD(tmp_string__PSD);
      put_string__EQD((&__string_203));
      time__FB=(__INTEGER)(time__FB %  60);
    };
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )time__FB),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    put_string__EQD((&__string_204));
  };
  if (is_statistic__0H) {
    print__stat__for__J0UC((&__string_205), 0,late_binding_counter__DI);
    print__stat__for__J0UC((&__string_206),polymorphic_counter__FI,late_binding_counter__DI);
    if (is_optimization__II) {
      print__1ZE((&__string_207));
      print__Y0CD(count_invariant__PI);
      fputc((int)('\n'),stdout);
    };
  };
  Self__PWB= 1;
  limit_up__QWB=((__LINKED_LISToSTRING_CONSTANTo *)command_list__VI)->parent_linked_collection__DC.upper__JC;
  while ((Self__PWB <= limit_up__QWB)) {
    if ((! is_quiet_operation__UG)) {
      put_string__EQD((&__string_208));
      put_string__EQD(item__EUU(command_list__VI,Self__PWB));
      put_string__EQD((&__string_209));
    };
    Self__4QQC=((__STRING_CONSTANT *)item__EUU(command_list__VI,Self__PWB));
    new__ARQC=create__AXB(Self__4QQC->count__XHB);
    copy__BNK(new__ARQC,Self__4QQC);
    if ((((__INTEGER )(system(((char*)((to_external__4YK(new__ARQC))))))) ==  0)) {
      if ((! is_quiet_operation__UG)) {
        put_string__EQD((&__string_210));
      };
    } else {
      put_string__EQD((&__string_211));
    };
    Self__PWB=(__INTEGER)(Self__PWB +  1);
  };
  return( 0);
}

static __STRING* create__AXB(__INTEGER needed_capacity__CXB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __STRING *result__4ZC,*Self__Y0K;
  __POINTER ptr__5ZC;
  __INTEGER typ_id__E0C;
  __UINTEGER_32 sz__B0C,a__P03Q,new_size__N03Q,t__T03Q,a__V03Q;
  result__4ZC=NULL;
  ptr__5ZC=((__POINTER )(NULL));
  typ_id__E0C= 0;
  sz__B0C=((__UINTEGER_32 )sizeof(__STRING));
  if ((sz__B0C ==  0)) {
    result__4ZC=STRING__;
  } else {
    typ_id__E0C=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__B0C);
    if ((typ_id__E0C == (__INTEGER)(-  1))) {
      a__P03Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__N03Q=(__UINTEGER_32)((__UINTEGER_32)(sz__B0C + a__P03Q) & (__UINTEGER_32)(~ a__P03Q));
      ptr__5ZC=micro_alloc__table__lab__BOI(new_size__N03Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N03Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__N03Q);
    } else {
      t__T03Q=((__UINTEGER_32 )typ_id__E0C);
      a__V03Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__5ZC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__B0C + a__V03Q) & (__UINTEGER_32)(~ a__V03Q)),((__POINTER )(&(table_type[(t__T03Q)]))),(__UINTEGER_32)(t__T03Q |  1));
    };
    result__4ZC=((__STRING *)ptr__5ZC);
    *(result__4ZC) = *(STRING__);
  };
  Self__Y0K=((__STRING *)result__4ZC);
  if ((needed_capacity__CXB >  0)) {
    if ((Self__Y0K->capacity__MNK < needed_capacity__CXB)) {
      Self__Y0K->storage__XNK=create__5UX(needed_capacity__CXB);
      Self__Y0K->capacity__MNK=needed_capacity__CXB;
    };
  };
  Self__Y0K->count__VF= 0;
  return(result__4ZC);
}

static __FAST_ARRAYoSTRINGo* create_with_capacity__CEG(__INTEGER new_count__EEG)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__RWG;
  __INTEGER typ_id__WWG;
  __UINTEGER_32 sz__TWG,a__003Q,new_size__Y03Q,t__403Q,a__A13Q;
  __FAST_ARRAYoSTRINGo *result__QWG,*Self__P1M;
  result__QWG=NULL;
  ptr__RWG=((__POINTER )(NULL));
  typ_id__WWG= 0;
  sz__TWG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
  if ((sz__TWG ==  0)) {
    result__QWG=FAST_ARRAYoSTRINGo__;
  } else {
    typ_id__WWG=__FAST_ARRAYoSTRINGo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__TWG);
    if ((typ_id__WWG == (__INTEGER)(-  1))) {
      a__003Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__Y03Q=(__UINTEGER_32)((__UINTEGER_32)(sz__TWG + a__003Q) & (__UINTEGER_32)(~ a__003Q));
      ptr__RWG=micro_alloc__table__lab__BOI(new_size__Y03Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y03Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Y03Q);
    } else {
      t__403Q=((__UINTEGER_32 )typ_id__WWG);
      a__A13Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__RWG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__TWG + a__A13Q) & (__UINTEGER_32)(~ a__A13Q)),((__POINTER )(&(table_type[(t__403Q)]))),(__UINTEGER_32)(t__403Q |  1));
    };
    result__QWG=((__FAST_ARRAYoSTRINGo *)ptr__RWG);
    *(result__QWG) = *(FAST_ARRAYoSTRINGo__);
  };
  Self__P1M=((__FAST_ARRAYoSTRINGo *)result__QWG);
  if ((Self__P1M->parent_arrayed_collection__QXD.capacity__Y1M < new_count__EEG)) {
    Self__P1M->parent_arrayed_collection__QXD.storage__D2M=create__ITEB(new_count__EEG);
    Self__P1M->parent_arrayed_collection__QXD.capacity__Y1M=new_count__EEG;
  };
  Self__P1M->parent_arrayed_collection__QXD.upper__TXD=(__INTEGER)(-  1);
  return(result__QWG);
}

static __INTEGER fast_first_index_of__until__PAD(__CHARACTER *Self__QAD,__CHARACTER element__RAD,__INTEGER upper__SAD)
// ({NATIVE_ARRAYoExpanded_CHARACTERo},{CHARACTER},{INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER idx__2AD;
  idx__2AD= 0;
  while ((! ((idx__2AD > upper__SAD) || (element__RAD == Self__QAD[idx__2AD])))) {
    idx__2AD=(__INTEGER)(idx__2AD +  1);
  };
  return(idx__2AD);
}

static void add_last__YPK(__STRING *Self__ZPK,__CHARACTER ch__0PK)
// ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__1PK,old_nb_elts__D13Q;
  __CHARACTER *Self__C13Q,*new__F13Q;
  new_capacity__1PK= 0;
  if ((Self__ZPK->capacity__MNK <= Self__ZPK->count__VF)) {
    if ((Self__ZPK->capacity__MNK ==  0)) {
      Self__ZPK->capacity__MNK= 32;
      Self__ZPK->storage__XNK=create__5UX( 32);
    } else {
      new_capacity__1PK=(__INTEGER)(Self__ZPK->capacity__MNK <<  1);
      Self__C13Q=((__CHARACTER *)Self__ZPK->storage__XNK);
      old_nb_elts__D13Q=Self__ZPK->capacity__MNK;
      new__F13Q=((__CHARACTER *)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__C13Q),((__UINTEGER_32 )old_nb_elts__D13Q),((__UINTEGER_32 )new_capacity__1PK)));
      clear__to__SCNC(new__F13Q,old_nb_elts__D13Q,(__INTEGER)(new_capacity__1PK -  1));
      Self__ZPK->storage__XNK=new__F13Q;
      Self__ZPK->capacity__MNK=new_capacity__1PK;
    };
  };
  ((__CHARACTER *)Self__ZPK->storage__XNK)[Self__ZPK->count__VF]=ch__0PK;
  Self__ZPK->count__VF=(__INTEGER)(Self__ZPK->count__VF +  1);
}

static void add_last__00X(__FAST_ARRAYoSTRINGo *Self__10X,void *element__20X)
// ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__30X,__tmp__B2X,__tmp__LJMB,Self__DGRC;
  __BOOLEAN __tmp__L1X;
  void **__tmp__A2X,**new__YIMB;
  new_capacity__30X= 0;
  if (((__INTEGER)(Self__10X->parent_arrayed_collection__QXD.upper__TXD +  1) <= (__INTEGER)(Self__10X->parent_arrayed_collection__QXD.capacity__Y1M -  1))) {
    Self__10X->parent_arrayed_collection__QXD.upper__TXD=(__INTEGER)(Self__10X->parent_arrayed_collection__QXD.upper__TXD +  1);
    __tmp__L1X=TRUE__;
  } else {
    __tmp__L1X=FALSE__;
  };
  if ((! __tmp__L1X)) {
    if ((Self__10X->parent_arrayed_collection__QXD.capacity__Y1M ==  0)) {
      Self__10X->parent_arrayed_collection__QXD.storage__D2M=create__ITEB( 2);
      Self__10X->parent_arrayed_collection__QXD.capacity__Y1M= 2;
      Self__10X->parent_arrayed_collection__QXD.upper__TXD= 0;
    } else {
      new_capacity__30X=(__INTEGER)(Self__10X->parent_arrayed_collection__QXD.capacity__Y1M <<  1);
      __tmp__A2X=Self__10X->parent_arrayed_collection__QXD.storage__D2M;
      __tmp__B2X=Self__10X->parent_arrayed_collection__QXD.capacity__Y1M;
      new__YIMB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__A2X)),((__UINTEGER_32 )(__INTEGER)(__tmp__B2X * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__30X * ((__INTEGER )(sizeof(void *)))))));
      __tmp__LJMB=(__INTEGER)(new_capacity__30X -  1);
      Self__DGRC=__tmp__B2X;
      while ((Self__DGRC <= __tmp__LJMB)) {
        new__YIMB[Self__DGRC]=NULL;
        Self__DGRC=(__INTEGER)(Self__DGRC +  1);
      };
      Self__10X->parent_arrayed_collection__QXD.storage__D2M=new__YIMB;
      Self__10X->parent_arrayed_collection__QXD.capacity__Y1M=new_capacity__30X;
      Self__10X->parent_arrayed_collection__QXD.upper__TXD=(__INTEGER)(Self__10X->parent_arrayed_collection__QXD.upper__TXD +  1);
    };
  };
  ((void **)Self__10X->parent_arrayed_collection__QXD.storage__D2M)[Self__10X->parent_arrayed_collection__QXD.upper__TXD]=element__20X;
}

static __LINKED_LISToSTRING_CONSTANTo* create__CZC()
// () With resultNo recursive, No inlinable.
{
  __POINTER ptr__NTD;
  __INTEGER typ_id__STD;
  __UINTEGER_32 sz__PTD,a__Q13Q,new_size__ZPH,t__CRH,a__U13Q;
  __LINKED_LISToSTRING_CONSTANTo *result__MTD;
  result__MTD=NULL;
  ptr__NTD=((__POINTER )(NULL));
  typ_id__STD= 0;
  sz__PTD=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
  if ((sz__PTD ==  0)) {
    result__MTD=LINKED_LISToSTRING_CONSTANTo__;
  } else {
    typ_id__STD=__LINKED_LISToSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PTD);
    if ((typ_id__STD == (__INTEGER)(-  1))) {
      a__Q13Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__ZPH=(__UINTEGER_32)((__UINTEGER_32)(sz__PTD + a__Q13Q) & (__UINTEGER_32)(~ a__Q13Q));
      ptr__NTD=micro_alloc__table__lab__BOI(new_size__ZPH,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZPH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__ZPH);
    } else {
      t__CRH=((__UINTEGER_32 )typ_id__STD);
      a__U13Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__NTD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PTD + a__U13Q) & (__UINTEGER_32)(~ a__U13Q)),((__POINTER )(&(table_type[(t__CRH)]))),(__UINTEGER_32)(t__CRH |  1));
    };
    result__MTD=((__LINKED_LISToSTRING_CONSTANTo *)ptr__NTD);
    *(result__MTD) = *(LINKED_LISToSTRING_CONSTANTo__);
  };
  return(result__MTD);
}

static __POINTER micro_alloc__table__lab__BOI(__UINTEGER_32 new_size__DOI,__POINTER ptr_table__EOI,__UINTEGER_32 lab_type__FOI)
// ({UINTEGER_32},{POINTER},{UINTEGER_32}) With resultNo recursive, No inlinable.
{
  __POINTER next__JOI,result__HOI;
  next__JOI=((__POINTER )(NULL));
  result__HOI=((__POINTER *)ptr_table__EOI)[ 0];
  if ((result__HOI == (void *)NULL)) {
    result__HOI=new_lab__2PJ(lab_type__FOI);
    next__JOI=(void *)((unsigned long)result__HOI - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOI)));
    ((__POINTER *)next__JOI)[ 0]=NULL;
    ((__POINTER *)ptr_table__EOI)[ 0]=next__JOI;
  } else {
    next__JOI=((__POINTER *)result__HOI)[ 0];
    if ((next__JOI == (void *)NULL)) {
      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HOI - (unsigned long)begin_memory__4PI)))) &  4095) + (__UINTEGER_32)(new_size__DOI <<  1)) <=  4096)) {
        next__JOI=(void *)((unsigned long)result__HOI - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOI)));
      } else {
        next__JOI=new_lab__2PJ(lab_type__FOI);
      };
      ((__POINTER *)next__JOI)[ 0]=NULL;
      ((__POINTER *)ptr_table__EOI)[ 0]=next__JOI;
    } else {
      ((__POINTER *)result__HOI)[ 0]=(void *)((unsigned long)((__POINTER *)next__JOI)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
      result__HOI=next__JOI;
    };
  };
  return(result__HOI);
}

static __INTEGER prime_number_ceiling__A4Q(__INTEGER integer__C4Q)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER result__E4Q;
  __BOOLEAN __tmp__M4Q,__tmp__Z4Q,result__0WU,__tmp__G5Q,result__MXU;
  __BOOLEAN __tmp__T5Q,result__4XU,__tmp__AAR,result__QYU,__tmp__NAR;
  __BOOLEAN result__CZU,__tmp__0AR,result__UZU,__tmp__HBR,result__G0U;
  __BOOLEAN __tmp__UBR,result__Y0U,__tmp__BCR,result__K1U,__tmp__OCR;
  __BOOLEAN result__21U,__tmp__1CR,result__O2U,__tmp__IDR,result__A3U;
  __BOOLEAN __tmp__VDR,result__S3U,__tmp__CER,result__E4U,__tmp__PER;
  __BOOLEAN result__W4U,__tmp__2ER,result__I5U,__tmp__JFR,result__05U;
  __BOOLEAN __tmp__WFR,result__MAV,__tmp__DGR,result__4AV,__tmp__QGR;
  __BOOLEAN result__QBV,__tmp__3GR,result__CCV,__tmp__KHR,result__UCV;
  __BOOLEAN __tmp__XHR,result__GDV,__tmp__EIR,result__YDV,__tmp__RIR;
  __BOOLEAN result__KEV;
  result__E4Q= 0;
  if ((integer__C4Q <=  11)) {
    result__E4Q= 11;
    __tmp__M4Q=TRUE__;
  } else {
    __tmp__M4Q=FALSE__;
  };
  if (__tmp__M4Q) {
    __tmp__Z4Q=TRUE__;
  } else {
    result__0WU=(integer__C4Q <=  23);
    if (result__0WU) {
      result__E4Q= 23;
    };
    __tmp__Z4Q=result__0WU;
  };
  if (__tmp__Z4Q) {
    __tmp__G5Q=TRUE__;
  } else {
    result__MXU=(integer__C4Q <=  53);
    if (result__MXU) {
      result__E4Q= 53;
    };
    __tmp__G5Q=result__MXU;
  };
  if (__tmp__G5Q) {
    __tmp__T5Q=TRUE__;
  } else {
    result__4XU=(integer__C4Q <=  97);
    if (result__4XU) {
      result__E4Q= 97;
    };
    __tmp__T5Q=result__4XU;
  };
  if (__tmp__T5Q) {
    __tmp__AAR=TRUE__;
  } else {
    result__QYU=(integer__C4Q <=  193);
    if (result__QYU) {
      result__E4Q= 193;
    };
    __tmp__AAR=result__QYU;
  };
  if (__tmp__AAR) {
    __tmp__NAR=TRUE__;
  } else {
    result__CZU=(integer__C4Q <=  389);
    if (result__CZU) {
      result__E4Q= 389;
    };
    __tmp__NAR=result__CZU;
  };
  if (__tmp__NAR) {
    __tmp__0AR=TRUE__;
  } else {
    result__UZU=(integer__C4Q <=  769);
    if (result__UZU) {
      result__E4Q= 769;
    };
    __tmp__0AR=result__UZU;
  };
  if (__tmp__0AR) {
    __tmp__HBR=TRUE__;
  } else {
    result__G0U=(integer__C4Q <=  1543);
    if (result__G0U) {
      result__E4Q= 1543;
    };
    __tmp__HBR=result__G0U;
  };
  if (__tmp__HBR) {
    __tmp__UBR=TRUE__;
  } else {
    result__Y0U=(integer__C4Q <=  3079);
    if (result__Y0U) {
      result__E4Q= 3079;
    };
    __tmp__UBR=result__Y0U;
  };
  if (__tmp__UBR) {
    __tmp__BCR=TRUE__;
  } else {
    result__K1U=(integer__C4Q <=  6151);
    if (result__K1U) {
      result__E4Q= 6151;
    };
    __tmp__BCR=result__K1U;
  };
  if (__tmp__BCR) {
    __tmp__OCR=TRUE__;
  } else {
    result__21U=(integer__C4Q <=  12289);
    if (result__21U) {
      result__E4Q= 12289;
    };
    __tmp__OCR=result__21U;
  };
  if (__tmp__OCR) {
    __tmp__1CR=TRUE__;
  } else {
    result__O2U=(integer__C4Q <=  24593);
    if (result__O2U) {
      result__E4Q= 24593;
    };
    __tmp__1CR=result__O2U;
  };
  if (__tmp__1CR) {
    __tmp__IDR=TRUE__;
  } else {
    result__A3U=(integer__C4Q <=  49157);
    if (result__A3U) {
      result__E4Q= 49157;
    };
    __tmp__IDR=result__A3U;
  };
  if (__tmp__IDR) {
    __tmp__VDR=TRUE__;
  } else {
    result__S3U=(integer__C4Q <=  98317);
    if (result__S3U) {
      result__E4Q= 98317;
    };
    __tmp__VDR=result__S3U;
  };
  if (__tmp__VDR) {
    __tmp__CER=TRUE__;
  } else {
    result__E4U=(integer__C4Q <=  196613);
    if (result__E4U) {
      result__E4Q= 196613;
    };
    __tmp__CER=result__E4U;
  };
  if (__tmp__CER) {
    __tmp__PER=TRUE__;
  } else {
    result__W4U=(integer__C4Q <=  393241);
    if (result__W4U) {
      result__E4Q= 393241;
    };
    __tmp__PER=result__W4U;
  };
  if (__tmp__PER) {
    __tmp__2ER=TRUE__;
  } else {
    result__I5U=(integer__C4Q <=  786433);
    if (result__I5U) {
      result__E4Q= 786433;
    };
    __tmp__2ER=result__I5U;
  };
  if (__tmp__2ER) {
    __tmp__JFR=TRUE__;
  } else {
    result__05U=(integer__C4Q <=  1572869);
    if (result__05U) {
      result__E4Q= 1572869;
    };
    __tmp__JFR=result__05U;
  };
  if (__tmp__JFR) {
    __tmp__WFR=TRUE__;
  } else {
    result__MAV=(integer__C4Q <=  3145739);
    if (result__MAV) {
      result__E4Q= 3145739;
    };
    __tmp__WFR=result__MAV;
  };
  if (__tmp__WFR) {
    __tmp__DGR=TRUE__;
  } else {
    result__4AV=(integer__C4Q <=  6291469);
    if (result__4AV) {
      result__E4Q= 6291469;
    };
    __tmp__DGR=result__4AV;
  };
  if (__tmp__DGR) {
    __tmp__QGR=TRUE__;
  } else {
    result__QBV=(integer__C4Q <=  12582917);
    if (result__QBV) {
      result__E4Q= 12582917;
    };
    __tmp__QGR=result__QBV;
  };
  if (__tmp__QGR) {
    __tmp__3GR=TRUE__;
  } else {
    result__CCV=(integer__C4Q <=  25165843);
    if (result__CCV) {
      result__E4Q= 25165843;
    };
    __tmp__3GR=result__CCV;
  };
  if (__tmp__3GR) {
    __tmp__KHR=TRUE__;
  } else {
    result__UCV=(integer__C4Q <=  50331653);
    if (result__UCV) {
      result__E4Q= 50331653;
    };
    __tmp__KHR=result__UCV;
  };
  if (__tmp__KHR) {
    __tmp__XHR=TRUE__;
  } else {
    result__GDV=(integer__C4Q <=  100663319);
    if (result__GDV) {
      result__E4Q= 100663319;
    };
    __tmp__XHR=result__GDV;
  };
  if (__tmp__XHR) {
    __tmp__EIR=TRUE__;
  } else {
    result__YDV=(integer__C4Q <=  201326611);
    if (result__YDV) {
      result__E4Q= 201326611;
    };
    __tmp__EIR=result__YDV;
  };
  if (__tmp__EIR) {
    __tmp__RIR=TRUE__;
  } else {
    result__KEV=(integer__C4Q <=  402653189);
    if (result__KEV) {
      result__E4Q= 402653189;
    };
    __tmp__RIR=result__KEV;
  };
  if ((! __tmp__RIR)) {
    if ((integer__C4Q <=  805306457)) {
      result__E4Q= 805306457;
    } else {
      result__E4Q= 1610612741;
    };
  };
  return(result__E4Q);
}

static void** create__S2TB(__INTEGER nb_elements__U2TB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__Q3RC;
  void **Result__SUZB;
  Result__SUZB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__U2TB * ((__INTEGER )(sizeof(void *)))))));
  Self__Q3RC=(__INTEGER)(nb_elements__U2TB -  1);
  while ((Self__Q3RC >=  0)) {
    Result__SUZB[Self__Q3RC]=NULL;
    Self__Q3RC=(__INTEGER)(Self__Q3RC -  1);
  };
  return(Result__SUZB);
}

static void** create__KY5(__INTEGER nb_elements__MY5)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__5RQB;
  void **Result__EFCB;
  Result__EFCB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__MY5 * ((__INTEGER )(sizeof(void *)))))));
  Self__5RQB=(__INTEGER)(nb_elements__MY5 -  1);
  while ((Self__5RQB >=  0)) {
    Result__EFCB[Self__5RQB]=NULL;
    Self__5RQB=(__INTEGER)(Self__5RQB -  1);
  };
  return(Result__EFCB);
}

static void** create__GJT(__INTEGER nb_elements__IJT)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__5NOB;
  void **Result__HEX;
  Result__HEX=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__IJT * ((__INTEGER )(sizeof(void *)))))));
  Self__5NOB=(__INTEGER)(nb_elements__IJT -  1);
  while ((Self__5NOB >=  0)) {
    Result__HEX[Self__5NOB]=NULL;
    Self__5NOB=(__INTEGER)(Self__5NOB -  1);
  };
  return(Result__HEX);
}

static void** create__3MT(__INTEGER nb_elements__5MT)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__GPOB;
  void **Result__3IX;
  Result__3IX=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__5MT * ((__INTEGER )(sizeof(void *)))))));
  Self__GPOB=(__INTEGER)(nb_elements__5MT -  1);
  while ((Self__GPOB >=  0)) {
    Result__3IX[Self__GPOB]=NULL;
    Self__GPOB=(__INTEGER)(Self__GPOB -  1);
  };
  return(Result__3IX);
}

static void fast_put__to__BVL(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__CVL,void *v__DVL,void *k__EVL)
// ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxITM_TYPE_SIMPLExITM_TYPE_SELF},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER h__LVL,idx__MVL,idx__SV2,new_capacity__TV2,i__UV2;
  __INTEGER typ_id__CY2;
  __POINTER ptr__3X2;
  __UINTEGER_32 sz__5X2,a__D33Q,new_size__HOZQ,t__JOZQ,a__H33Q;
  void *node__NVL,*node1__WV2,*node2__XV2,*__tmp__1WL;
  void **old_buckets__VV2;
  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__2X2;
  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__O0KB;
  h__LVL=hash_code__WPN(k__EVL);
  idx__MVL=(__INTEGER)(h__LVL % Self__CVL->capacity__RGL);
  node__NVL=((void **)Self__CVL->buckets__WGL)[idx__MVL];
  while ((! (((void *)node__NVL == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__NVL)->key__CHL == (void *)k__EVL)))) {
    node__NVL=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__NVL)->next__NHL;
  };
  if (((void *)node__NVL == (void *)NULL)) {
    if ((Self__CVL->capacity__RGL == Self__CVL->count__OWL)) {
      idx__SV2= 0;
      node1__WV2=NULL;
      node2__XV2=NULL;
      old_buckets__VV2=Self__CVL->buckets__WGL;
      new_capacity__TV2=prime_number_ceiling__A4Q((__INTEGER)(Self__CVL->capacity__RGL +  1));
      Self__CVL->buckets__WGL=create__3MT(new_capacity__TV2);
      i__UV2=(__INTEGER)(Self__CVL->capacity__RGL -  1);
      Self__CVL->capacity__RGL=new_capacity__TV2;
      while ((i__UV2 >=  0)) {
        node1__WV2=((void **)old_buckets__VV2)[i__UV2];
        while (((void *)node1__WV2 != (void *)NULL)) {
          node2__XV2=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__WV2)->next__NHL;
          idx__SV2=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__WV2)->key__CHL) % Self__CVL->capacity__RGL);
          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__WV2)->next__NHL=((void **)Self__CVL->buckets__WGL)[idx__SV2];
          ((void **)Self__CVL->buckets__WGL)[idx__SV2]=node1__WV2;
          node1__WV2=node2__XV2;
        };
        i__UV2=(__INTEGER)(i__UV2 -  1);
      };
      idx__MVL=(__INTEGER)(h__LVL % Self__CVL->capacity__RGL);
    };
    __tmp__1WL=((void **)Self__CVL->buckets__WGL)[idx__MVL];
    result__2X2=NULL;
    ptr__3X2=((__POINTER )(NULL));
    typ_id__CY2= 0;
    sz__5X2=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
    if ((sz__5X2 ==  0)) {
      result__2X2=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
    } else {
      typ_id__CY2=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__5X2);
      if ((typ_id__CY2 == (__INTEGER)(-  1))) {
        a__D33Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__HOZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__5X2 + a__D33Q) & (__UINTEGER_32)(~ a__D33Q));
        ptr__3X2=micro_alloc__table__lab__BOI(new_size__HOZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HOZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HOZQ);
      } else {
        t__JOZQ=((__UINTEGER_32 )typ_id__CY2);
        a__H33Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__3X2=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__5X2 + a__H33Q) & (__UINTEGER_32)(~ a__H33Q)),((__POINTER )(&(table_type[(t__JOZQ)]))),(__UINTEGER_32)(t__JOZQ |  1));
      };
      result__2X2=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__3X2);
      *(result__2X2) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
    };
    Self__O0KB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__2X2);
    Self__O0KB->item__VHL=v__DVL;
    Self__O0KB->key__CHL=k__EVL;
    Self__O0KB->next__NHL=__tmp__1WL;
    node__NVL=result__2X2;
    ((void **)Self__CVL->buckets__WGL)[idx__MVL]=result__2X2;
    Self__CVL->count__OWL=(__INTEGER)(Self__CVL->count__OWL +  1);
  } else {
    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__NVL)->item__VHL=v__DVL;
  };
}

static void** create__G02(__INTEGER nb_elements__I02)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__T5PB;
  void **Result__0U5;
  Result__0U5=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__I02 * ((__INTEGER )(sizeof(void *)))))));
  Self__T5PB=(__INTEGER)(nb_elements__I02 -  1);
  while ((Self__T5PB >=  0)) {
    Result__0U5[Self__T5PB]=NULL;
    Self__T5PB=(__INTEGER)(Self__T5PB -  1);
  };
  return(Result__0U5);
}

static void** create__BVT(__INTEGER nb_elements__DVT)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__NQOB;
  void **Result__LNX;
  Result__LNX=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__DVT * ((__INTEGER )(sizeof(void *)))))));
  Self__NQOB=(__INTEGER)(nb_elements__DVT -  1);
  while ((Self__NQOB >=  0)) {
    Result__LNX[Self__NQOB]=NULL;
    Self__NQOB=(__INTEGER)(Self__NQOB -  1);
  };
  return(Result__LNX);
}

static void** create__TVBB(__INTEGER nb_elements__VVBB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__35QB;
  void **Result__0UDB;
  Result__0UDB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__VVBB * ((__INTEGER )(sizeof(void *)))))));
  Self__35QB=(__INTEGER)(nb_elements__VVBB -  1);
  while ((Self__35QB >=  0)) {
    Result__0UDB[Self__35QB]=NULL;
    Self__35QB=(__INTEGER)(Self__35QB -  1);
  };
  return(Result__0UDB);
}

static void** create__QMCD(__INTEGER nb_elements__SMCD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__5YAE;
  void **Result__GUHD;
  Result__GUHD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__SMCD * ((__INTEGER )(sizeof(void *)))))));
  Self__5YAE=(__INTEGER)(nb_elements__SMCD -  1);
  while ((Self__5YAE >=  0)) {
    Result__GUHD[Self__5YAE]=NULL;
    Self__5YAE=(__INTEGER)(Self__5YAE -  1);
  };
  return(Result__GUHD);
}

static __POINTER realloc_dynamic__old_size__new_size__K3OB(__POINTER p__M3OB,__UINTEGER_32 old_sz__N3OB,__UINTEGER_32 new_sz__O3OB)
// ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
{
  __MEMORY *mem__Z3OB,*Self__YD4B,*nxt__2D4B,*result__3D4B,*next__JMEC;
  __MEMORY *new_free__IMEC;
  __POINTER result__03OB,p__OC4B,last__WQAC;
  __UINTEGER_32 a__Q33Q,old_size__Q3OB,old_size2__T3OB,a__T33Q;
  __UINTEGER_32 new_size__W3OB,a__Z33Q,__tmp__L5OB,sz__BE4B;
  __UINTEGER_32 old_size__4D4B,prev__KMEC,new_size__NMEC;
  mem__Z3OB=NULL;
  result__03OB=((__POINTER )(NULL));
  a__Q33Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
  old_size__Q3OB=(__UINTEGER_32)((__UINTEGER_32)(old_sz__N3OB + a__Q33Q) & (__UINTEGER_32)(~ a__Q33Q));
  old_size2__T3OB=(__UINTEGER_32)(old_size__Q3OB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
  a__T33Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
  new_size__W3OB=(__UINTEGER_32)((__UINTEGER_32)(new_sz__O3OB + a__T33Q) & (__UINTEGER_32)(~ a__T33Q));
  if ((old_size2__T3OB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
    result__03OB=alloc_dynamic__J0Y(new_size__W3OB);
    copy__to__size__GB4B(p__M3OB,result__03OB,old_size__Q3OB);
    p__OC4B=(void *)((unsigned long)p__M3OB - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
    a__Z33Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
    last__WQAC=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__T3OB + a__Z33Q) & (__UINTEGER_32)(~ a__Z33Q)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
    ((__POINTER *)p__OC4B)[ 0]=(void *)((unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)(void *)((unsigned long)(void *)((unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER *)last__WQAC)[ 0]) - (unsigned long)((__POINTER ) 1)) & (unsigned long)(void *)((unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 3)) - (unsigned long)((__POINTER ) 1)))) - (unsigned long)((__POINTER ) 1));
    ((__POINTER *)last__WQAC)[ 0]=p__OC4B;
  } else {
    mem__Z3OB=((__MEMORY *)(void *)((unsigned long)p__M3OB - (unsigned long)((__POINTER ) 8)));
    __tmp__L5OB=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__M3OB - (unsigned long)begin_memory__4PI)))) >>  26);
    Self__YD4B=((__MEMORY *)mem__Z3OB);
    nxt__2D4B=NULL;
    result__3D4B=NULL;
    sz__BE4B= 0;
    old_size__4D4B=(__UINTEGER_32)(Self__YD4B->size_and_id__30C &  4294967292LU);
    if ((new_size__W3OB > old_size__4D4B)) {
      if ((! ((__UINTEGER_32)(Self__YD4B->size_and_id__30C &  2) !=  0))) {
        nxt__2D4B=((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__YD4B) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__YD4B->size_and_id__30C &  4294967292LU)))));
        sz__BE4B=(__UINTEGER_32)((__UINTEGER_32)(new_size__W3OB - old_size__4D4B) -  8);
        if ((((__UINTEGER_32)(((__MEMORY *)nxt__2D4B)->size_and_id__30C &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__2D4B)->size_and_id__30C &  4294967292LU) >= sz__BE4B))) {
          to_busy__index__OAMB(nxt__2D4B,sz__BE4B,__tmp__L5OB);
          Self__YD4B->size_and_id__30C=(__UINTEGER_32)((__UINTEGER_32)(Self__YD4B->size_and_id__30C + (__UINTEGER_32)(nxt__2D4B->size_and_id__30C &  4294967294LU)) +  8);
          if (((__UINTEGER_32)(Self__YD4B->size_and_id__30C &  2) !=  0)) {
            last_block[(__tmp__L5OB)] = (Self__YD4B);
          } else {
            nxt__2D4B=((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__YD4B) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__YD4B->size_and_id__30C &  4294967292LU)))));
            ((__MEMORY *)nxt__2D4B)->previous_linear__20C=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__YD4B) - (unsigned long)begin_memory__4PI))));
          };
          result__3D4B=Self__YD4B;
        };
      };
      if (((void *)result__3D4B == (void *)NULL)) {
        result__3D4B=search__X3AB(new_size__W3OB);
        copy__to__size__GB4B((void *)((unsigned long)((__POINTER )Self__YD4B) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))),(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3D4B)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))),old_size__4D4B);
        prev__KMEC=Self__YD4B->previous_linear__20C;
        next__JMEC=((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__YD4B) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__YD4B->size_and_id__30C &  4294967292LU)))));
        new_free__IMEC=((__MEMORY *)(void *)((unsigned long)begin_memory__4PI - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__KMEC))));
        new_size__NMEC=(__UINTEGER_32)(Self__YD4B->size_and_id__30C &  4294967294LU);
        if (((prev__KMEC ==  4294967295LU) || ((__UINTEGER_32)(new_free__IMEC->size_and_id__30C &  1) !=  0))) {
          new_free__IMEC=Self__YD4B;
          add_link_free__SDKB(Self__YD4B);
        } else {
          new_size__NMEC=(__UINTEGER_32)((__UINTEGER_32)(new_size__NMEC + new_free__IMEC->size_and_id__30C) +  8);
        };
        if (((! ((__UINTEGER_32)(Self__YD4B->size_and_id__30C &  2) !=  0)) && ((__UINTEGER_32)(next__JMEC->size_and_id__30C &  1) ==  0))) {
          new_size__NMEC=(__UINTEGER_32)((__UINTEGER_32)(new_size__NMEC + next__JMEC->size_and_id__30C) +  8);
          delete_link_free__W0QB(next__JMEC);
        };
        new_free__IMEC->size_and_id__30C=new_size__NMEC;
        if (((__UINTEGER_32)(new_free__IMEC->size_and_id__30C &  2) !=  0)) {
          last_block[(__tmp__L5OB)] = (new_free__IMEC);
        } else {
          next__JMEC=((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__YD4B) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__YD4B->size_and_id__30C &  4294967292LU)))));
          next__JMEC->previous_linear__20C=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__IMEC) - (unsigned long)begin_memory__4PI))));
        };
      };
    } else {
      result__3D4B=Self__YD4B;
    };
    result__03OB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3D4B)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
  };
  return(result__03OB);
}

static void** create__GRBB(__INTEGER nb_elements__IRBB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__W4QB;
  void **Result__XPDB;
  Result__XPDB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__IRBB * ((__INTEGER )(sizeof(void *)))))));
  Self__W4QB=(__INTEGER)(nb_elements__IRBB -  1);
  while ((Self__W4QB >=  0)) {
    Result__XPDB[Self__W4QB]=NULL;
    Self__W4QB=(__INTEGER)(Self__W4QB -  1);
  };
  return(Result__XPDB);
}

static void** create__YXOF(__INTEGER nb_elements__0XOF)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__1FBG;
  void **Result__IPWF;
  Result__IPWF=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__0XOF * ((__INTEGER )(sizeof(void *)))))));
  Self__1FBG=(__INTEGER)(nb_elements__0XOF -  1);
  while ((Self__1FBG >=  0)) {
    Result__IPWF[Self__1FBG]=NULL;
    Self__1FBG=(__INTEGER)(Self__1FBG -  1);
  };
  return(Result__IPWF);
}

static void** create__XKBD(__INTEGER nb_elements__ZKBD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__OQAE;
  void **Result__QOGD;
  Result__QOGD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__ZKBD * ((__INTEGER )(sizeof(void *)))))));
  Self__OQAE=(__INTEGER)(nb_elements__ZKBD -  1);
  while ((Self__OQAE >=  0)) {
    Result__QOGD[Self__OQAE]=NULL;
    Self__OQAE=(__INTEGER)(Self__OQAE -  1);
  };
  return(Result__QOGD);
}

static void** create__TIBD(__INTEGER nb_elements__VIBD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__HPAE;
  void **Result__EMGD;
  Result__EMGD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__VIBD * ((__INTEGER )(sizeof(void *)))))));
  Self__HPAE=(__INTEGER)(nb_elements__VIBD -  1);
  while ((Self__HPAE >=  0)) {
    Result__EMGD[Self__HPAE]=NULL;
    Self__HPAE=(__INTEGER)(Self__HPAE -  1);
  };
  return(Result__EMGD);
}

static void** create__Z1BD(__INTEGER nb_elements__11BD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__LXAE;
  void **Result__Q5GD;
  Result__Q5GD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__11BD * ((__INTEGER )(sizeof(void *)))))));
  Self__LXAE=(__INTEGER)(nb_elements__11BD -  1);
  while ((Self__LXAE >=  0)) {
    Result__Q5GD[Self__LXAE]=NULL;
    Self__LXAE=(__INTEGER)(Self__LXAE -  1);
  };
  return(Result__Q5GD);
}

static void** create__GJSE(__INTEGER nb_elements__IJSE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__3AKF;
  void **Result__ZHYE;
  Result__ZHYE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__IJSE * ((__INTEGER )(sizeof(void *)))))));
  Self__3AKF=(__INTEGER)(nb_elements__IJSE -  1);
  while ((Self__3AKF >=  0)) {
    Result__ZHYE[Self__3AKF]=NULL;
    Self__3AKF=(__INTEGER)(Self__3AKF -  1);
  };
  return(Result__ZHYE);
}

static void** create__FSKE(__INTEGER nb_elements__HSKE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__KQJF;
  void **Result__GDTE;
  Result__GDTE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__HSKE * ((__INTEGER )(sizeof(void *)))))));
  Self__KQJF=(__INTEGER)(nb_elements__HSKE -  1);
  while ((Self__KQJF >=  0)) {
    Result__GDTE[Self__KQJF]=NULL;
    Self__KQJF=(__INTEGER)(Self__KQJF -  1);
  };
  return(Result__GDTE);
}

static void* get__5KC(void *n__BLC)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__PGL,*result__DLC;
  __ITM_TYPE_SIMPLE *result__3NG;
  __POINTER ptr__4NG;
  __INTEGER typ_id__DOG;
  __UINTEGER_32 sz__AOG,a__L43Q,new_size__LOZQ,t__NOZQ,a__P43Q;
  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__DGL;
  void *node__OGL;
  Self__DGL=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)dico__ILC);
  result__PGL=NULL;
  node__OGL=((void **)Self__DGL->buckets__WGL)[(__INTEGER)(hash_code__WPN(n__BLC) % Self__DGL->capacity__RGL)];
  while ((! (((void *)node__OGL == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__OGL)->key__CHL == (void *)n__BLC)))) {
    node__OGL=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__OGL)->next__NHL;
  };
  if (((void *)node__OGL != (void *)NULL)) {
    result__PGL=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__OGL)->item__VHL;
  };
  result__DLC=result__PGL;
  if (((void *)result__PGL == (void *)NULL)) {
    result__3NG=NULL;
    ptr__4NG=((__POINTER )(NULL));
    typ_id__DOG= 0;
    sz__AOG=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
    if ((sz__AOG ==  0)) {
      result__3NG=ITM_TYPE_SIMPLE__;
    } else {
      typ_id__DOG=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__AOG);
      if ((typ_id__DOG == (__INTEGER)(-  1))) {
        a__L43Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__LOZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__AOG + a__L43Q) & (__UINTEGER_32)(~ a__L43Q));
        ptr__4NG=micro_alloc__table__lab__BOI(new_size__LOZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LOZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LOZQ);
      } else {
        t__NOZQ=((__UINTEGER_32 )typ_id__DOG);
        a__P43Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__4NG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__AOG + a__P43Q) & (__UINTEGER_32)(~ a__P43Q)),((__POINTER )(&(table_type[(t__NOZQ)]))),(__UINTEGER_32)(t__NOZQ |  1));
      };
      result__3NG=((__ITM_TYPE_SIMPLE *)ptr__4NG);
      *(result__3NG) = *(ITM_TYPE_SIMPLE__);
    };
    ((__ITM_TYPE_SIMPLE *)result__3NG)->name__UMC=n__BLC;
    result__DLC=result__3NG;
    fast_put__to__BVL(dico__ILC,result__3NG,n__BLC);
  };
  return(result__DLC);
}

static void** create__K2UE(__INTEGER nb_elements__M2UE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__AKKF;
  void **Result__F5ZE;
  Result__F5ZE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__M2UE * ((__INTEGER )(sizeof(void *)))))));
  Self__AKKF=(__INTEGER)(nb_elements__M2UE -  1);
  while ((Self__AKKF >=  0)) {
    Result__F5ZE[Self__AKKF]=NULL;
    Self__AKKF=(__INTEGER)(Self__AKKF -  1);
  };
  return(Result__F5ZE);
}

static void** create__54KE(__INTEGER nb_elements__B5KE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__TUJF;
  void **Result__WPTE;
  Result__WPTE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__B5KE * ((__INTEGER )(sizeof(void *)))))));
  Self__TUJF=(__INTEGER)(nb_elements__B5KE -  1);
  while ((Self__TUJF >=  0)) {
    Result__WPTE[Self__TUJF]=NULL;
    Self__TUJF=(__INTEGER)(Self__TUJF -  1);
  };
  return(Result__WPTE);
}

static void** create__CELE(__INTEGER nb_elements__EELE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__NYJF;
  void **Result__5UTE;
  Result__5UTE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__EELE * ((__INTEGER )(sizeof(void *)))))));
  Self__NYJF=(__INTEGER)(nb_elements__EELE -  1);
  while ((Self__NYJF >=  0)) {
    Result__5UTE[Self__NYJF]=NULL;
    Self__NYJF=(__INTEGER)(Self__NYJF -  1);
  };
  return(Result__5UTE);
}

static void** create__XQUE(__INTEGER nb_elements__ZQUE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__ZIKF;
  void **Result__XXZE;
  Result__XXZE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__ZQUE * ((__INTEGER )(sizeof(void *)))))));
  Self__ZIKF=(__INTEGER)(nb_elements__ZQUE -  1);
  while ((Self__ZIKF >=  0)) {
    Result__XXZE[Self__ZIKF]=NULL;
    Self__ZIKF=(__INTEGER)(Self__ZIKF -  1);
  };
  return(Result__XXZE);
}

static void** create__QP5C(__INTEGER nb_elements__SP5C)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__ZJAE;
  void **Result__JIFD;
  Result__JIFD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__SP5C * ((__INTEGER )(sizeof(void *)))))));
  Self__ZJAE=(__INTEGER)(nb_elements__SP5C -  1);
  while ((Self__ZJAE >=  0)) {
    Result__JIFD[Self__ZJAE]=NULL;
    Self__ZJAE=(__INTEGER)(Self__ZJAE -  1);
  };
  return(Result__JIFD);
}

static void** create__IWXC(__INTEGER nb_elements__KWXC)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__NV5D;
  void **Result__1R5C;
  Result__1R5C=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__KWXC * ((__INTEGER )(sizeof(void *)))))));
  Self__NV5D=(__INTEGER)(nb_elements__KWXC -  1);
  while ((Self__NV5D >=  0)) {
    Result__1R5C[Self__NV5D]=NULL;
    Self__NV5D=(__INTEGER)(Self__NV5D -  1);
  };
  return(Result__1R5C);
}

static void** create__04XC(__INTEGER nb_elements__24XC)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__PY5D;
  void **Result__105C;
  Result__105C=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__24XC * ((__INTEGER )(sizeof(void *)))))));
  Self__PY5D=(__INTEGER)(nb_elements__24XC -  1);
  while ((Self__PY5D >=  0)) {
    Result__105C[Self__PY5D]=NULL;
    Self__PY5D=(__INTEGER)(Self__PY5D -  1);
  };
  return(Result__105C);
}

static void** create__N0EH(__INTEGER nb_elements__P0EH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__HRII;
  void **Result__BXGH;
  Result__BXGH=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__P0EH * ((__INTEGER )(sizeof(void *)))))));
  Self__HRII=(__INTEGER)(nb_elements__P0EH -  1);
  while ((Self__HRII >=  0)) {
    Result__BXGH[Self__HRII]=NULL;
    Self__HRII=(__INTEGER)(Self__HRII -  1);
  };
  return(Result__BXGH);
}

static void** create__RLRK(__INTEGER nb_elements__TLRK)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__OJRL;
  void **Result__3PYK;
  Result__3PYK=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__TLRK * ((__INTEGER )(sizeof(void *)))))));
  Self__OJRL=(__INTEGER)(nb_elements__TLRK -  1);
  while ((Self__OJRL >=  0)) {
    Result__3PYK[Self__OJRL]=NULL;
    Self__OJRL=(__INTEGER)(Self__OJRL -  1);
  };
  return(Result__3PYK);
}

static void** create__TORE(__INTEGER nb_elements__VORE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__W5JF;
  void **Result__CVXE;
  Result__CVXE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__VORE * ((__INTEGER )(sizeof(void *)))))));
  Self__W5JF=(__INTEGER)(nb_elements__VORE -  1);
  while ((Self__W5JF >=  0)) {
    Result__CVXE[Self__W5JF]=NULL;
    Self__W5JF=(__INTEGER)(Self__W5JF -  1);
  };
  return(Result__CVXE);
}

static __FAST_ARRAYoLOCALo* create_with_capacity__NXBG(__INTEGER new_count__PXBG)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __FAST_ARRAYoLOCALo *result__RXBG,*Self__RWPG;
  result__RXBG=clone__VYEG();
  Self__RWPG=((__FAST_ARRAYoLOCALo *)result__RXBG);
  if ((Self__RWPG->parent_arrayed_collection__QI4F.capacity__0WPG < new_count__PXBG)) {
    Self__RWPG->parent_arrayed_collection__QI4F.storage__FXPG=create__OWWG(new_count__PXBG);
    Self__RWPG->parent_arrayed_collection__QI4F.capacity__0WPG=new_count__PXBG;
  };
  Self__RWPG->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(-  1);
  return(result__RXBG);
}

static __LINKED_LISToNODE_TYPEo* create__O00C()
// () With resultNo recursive, No inlinable.
{
  __POINTER ptr__HXCD;
  __INTEGER typ_id__MXCD;
  __UINTEGER_32 sz__JXCD,a__143Q,new_size__POZQ,t__ROZQ,a__543Q;
  __LINKED_LISToNODE_TYPEo *result__GXCD;
  result__GXCD=NULL;
  ptr__HXCD=((__POINTER )(NULL));
  typ_id__MXCD= 0;
  sz__JXCD=((__UINTEGER_32 )sizeof(__LINKED_LISToNODE_TYPEo));
  if ((sz__JXCD ==  0)) {
    result__GXCD=LINKED_LISToNODE_TYPEo__;
  } else {
    typ_id__MXCD=__LINKED_LISToNODE_TYPEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__JXCD);
    if ((typ_id__MXCD == (__INTEGER)(-  1))) {
      a__143Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__POZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__JXCD + a__143Q) & (__UINTEGER_32)(~ a__143Q));
      ptr__HXCD=micro_alloc__table__lab__BOI(new_size__POZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__POZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__POZQ);
    } else {
      t__ROZQ=((__UINTEGER_32 )typ_id__MXCD);
      a__543Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__HXCD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__JXCD + a__543Q) & (__UINTEGER_32)(~ a__543Q)),((__POINTER )(&(table_type[(t__ROZQ)]))),(__UINTEGER_32)(t__ROZQ |  1));
    };
    result__GXCD=((__LINKED_LISToNODE_TYPEo *)ptr__HXCD);
    *(result__GXCD) = *(LINKED_LISToNODE_TYPEo__);
  };
  return(result__GXCD);
}

static void** create__IUSB(__INTEGER nb_elements__KUSB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__IXRC;
  void **Result__0KYB;
  Result__0KYB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__KUSB * ((__INTEGER )(sizeof(void *)))))));
  Self__IXRC=(__INTEGER)(nb_elements__KUSB -  1);
  while ((Self__IXRC >=  0)) {
    Result__0KYB[Self__IXRC]=NULL;
    Self__IXRC=(__INTEGER)(Self__IXRC -  1);
  };
  return(Result__0KYB);
}

static void** create__WXXI(__INTEGER nb_elements__YXXI)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__VFLJ;
  void **Result__XB2I;
  Result__XB2I=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__YXXI * ((__INTEGER )(sizeof(void *)))))));
  Self__VFLJ=(__INTEGER)(nb_elements__YXXI -  1);
  while ((Self__VFLJ >=  0)) {
    Result__XB2I[Self__VFLJ]=NULL;
    Self__VFLJ=(__INTEGER)(Self__VFLJ -  1);
  };
  return(Result__XB2I);
}

static void** create__QYXI(__INTEGER nb_elements__SYXI)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__2GLJ;
  void **Result__DE2I;
  Result__DE2I=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__SYXI * ((__INTEGER )(sizeof(void *)))))));
  Self__2GLJ=(__INTEGER)(nb_elements__SYXI -  1);
  while ((Self__2GLJ >=  0)) {
    Result__DE2I[Self__2GLJ]=NULL;
    Self__2GLJ=(__INTEGER)(Self__2GLJ -  1);
  };
  return(Result__DE2I);
}

static __FAST_ARRAYoLOCALo* create__NTOH(__INTEGER new_count__PTOH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __FAST_ARRAYoLOCALo *result__RTOH,*Self__OOEI;
  __BOOLEAN __tmp__BPEI;
  result__RTOH=clone__VYEG();
  Self__OOEI=((__FAST_ARRAYoLOCALo *)result__RTOH);
  if ((new_count__PTOH > Self__OOEI->parent_arrayed_collection__QI4F.capacity__0WPG)) {
    Self__OOEI->parent_arrayed_collection__QI4F.storage__FXPG=create__OWWG(new_count__PTOH);
    Self__OOEI->parent_arrayed_collection__QI4F.capacity__0WPG=new_count__PTOH;
    __tmp__BPEI=TRUE__;
  } else {
    __tmp__BPEI=FALSE__;
  };
  if ((! __tmp__BPEI)) {
    if (((Self__OOEI->parent_arrayed_collection__QI4F.capacity__0WPG >  0) && (Self__OOEI->parent_arrayed_collection__QI4F.upper__TI4F >=  0))) {
      clear__to__TVEI(Self__OOEI->parent_arrayed_collection__QI4F.storage__FXPG, 0,Self__OOEI->parent_arrayed_collection__QI4F.upper__TI4F);
    };
  };
  Self__OOEI->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(new_count__PTOH -  1);
  return(result__RTOH);
}

static __FAST_ARRAYoTYPEo* create_with_capacity__3ND(__INTEGER new_count__5ND)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__QPE;
  __INTEGER typ_id__VPE;
  __UINTEGER_32 sz__SPE,a__C53Q,new_size__TOZQ,t__VOZQ,a__G53Q;
  __FAST_ARRAYoTYPEo *result__PPE,*Self__D2L;
  result__PPE=NULL;
  ptr__QPE=((__POINTER )(NULL));
  typ_id__VPE= 0;
  sz__SPE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPEo));
  if ((sz__SPE ==  0)) {
    result__PPE=FAST_ARRAYoTYPEo__;
  } else {
    typ_id__VPE=__FAST_ARRAYoTYPEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__SPE);
    if ((typ_id__VPE == (__INTEGER)(-  1))) {
      a__C53Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__TOZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__SPE + a__C53Q) & (__UINTEGER_32)(~ a__C53Q));
      ptr__QPE=micro_alloc__table__lab__BOI(new_size__TOZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TOZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__TOZQ);
    } else {
      t__VOZQ=((__UINTEGER_32 )typ_id__VPE);
      a__G53Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__QPE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__SPE + a__G53Q) & (__UINTEGER_32)(~ a__G53Q)),((__POINTER )(&(table_type[(t__VOZQ)]))),(__UINTEGER_32)(t__VOZQ |  1));
    };
    result__PPE=((__FAST_ARRAYoTYPEo *)ptr__QPE);
    *(result__PPE) = *(FAST_ARRAYoTYPEo__);
  };
  Self__D2L=((__FAST_ARRAYoTYPEo *)result__PPE);
  if ((Self__D2L->parent_arrayed_collection__UOB.capacity__M2L < new_count__5ND)) {
    Self__D2L->parent_arrayed_collection__UOB.storage__X2L=create__CVSB(new_count__5ND);
    Self__D2L->parent_arrayed_collection__UOB.capacity__M2L=new_count__5ND;
  };
  Self__D2L->parent_arrayed_collection__UOB.upper__1OB=(__INTEGER)(-  1);
  return(result__PPE);
}

static void** create__BZEH(__INTEGER nb_elements__DZEH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__AQII;
  void **Result__MUGH;
  Result__MUGH=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__DZEH * ((__INTEGER )(sizeof(void *)))))));
  Self__AQII=(__INTEGER)(nb_elements__DZEH -  1);
  while ((Self__AQII >=  0)) {
    Result__MUGH[Self__AQII]=NULL;
    Self__AQII=(__INTEGER)(Self__AQII -  1);
  };
  return(Result__MUGH);
}

static void** create__TCZK(__INTEGER nb_elements__VCZK)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__JWRL;
  void **Result__JA2K;
  Result__JA2K=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__VCZK * ((__INTEGER )(sizeof(void *)))))));
  Self__JWRL=(__INTEGER)(nb_elements__VCZK -  1);
  while ((Self__JWRL >=  0)) {
    Result__JA2K[Self__JWRL]=NULL;
    Self__JWRL=(__INTEGER)(Self__JWRL -  1);
  };
  return(Result__JA2K);
}

static void append__MOK(__STRING *Self__NOK,void *other__OOK)
// ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__XOK,needed_capacity__QOK,old_nb_elts__2OKB;
  __CHARACTER *Self__1OKB,*new__TPKB,*__tmp__UPK,*__tmp__VPK;
  if (((struct ___OBJ *)other__OOK)->__id==__STRING_CONSTANT__) {
    __tmp__XOK=((__STRING_CONSTANT *)other__OOK)->count__XHB;
  } else {
    __tmp__XOK=((__STRING *)other__OOK)->count__VF;
  };
  needed_capacity__QOK=(__INTEGER)(Self__NOK->count__VF + __tmp__XOK);
  if ((Self__NOK->capacity__MNK < needed_capacity__QOK)) {
    if ((Self__NOK->capacity__MNK ==  0)) {
      Self__NOK->capacity__MNK=needed_capacity__QOK;
      Self__NOK->storage__XNK=create__5UX(needed_capacity__QOK);
    } else {
      Self__1OKB=((__CHARACTER *)Self__NOK->storage__XNK);
      old_nb_elts__2OKB=Self__NOK->capacity__MNK;
      new__TPKB=((__CHARACTER *)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__1OKB),((__UINTEGER_32 )old_nb_elts__2OKB),((__UINTEGER_32 )needed_capacity__QOK)));
      clear__to__SCNC(new__TPKB,old_nb_elts__2OKB,(__INTEGER)(needed_capacity__QOK -  1));
      Self__NOK->storage__XNK=new__TPKB;
      Self__NOK->capacity__MNK=needed_capacity__QOK;
    };
  };
  __tmp__UPK=Self__NOK->storage__XNK;
  if (((struct ___OBJ *)other__OOK)->__id==__STRING_CONSTANT__) {
    __tmp__VPK=((__STRING_CONSTANT *)other__OOK)->storage__C5K;
  } else {
    __tmp__VPK=((__STRING *)other__OOK)->storage__XNK;
  };
  copy__to__until__FCJB(__tmp__UPK,__tmp__VPK,Self__NOK->count__VF,__tmp__XOK);
  Self__NOK->count__VF=needed_capacity__QOK;
}

static void** create__AOEH(__INTEGER nb_elements__COEH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__BOII;
  void **Result__ALGH;
  Result__ALGH=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__COEH * ((__INTEGER )(sizeof(void *)))))));
  Self__BOII=(__INTEGER)(nb_elements__COEH -  1);
  while ((Self__BOII >=  0)) {
    Result__ALGH[Self__BOII]=NULL;
    Self__BOII=(__INTEGER)(Self__BOII -  1);
  };
  return(Result__ALGH);
}

static void** create__5CIE(__INTEGER nb_elements__BDIE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__GMJF;
  void **Result__CURE;
  Result__CURE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__BDIE * ((__INTEGER )(sizeof(void *)))))));
  Self__GMJF=(__INTEGER)(nb_elements__BDIE -  1);
  while ((Self__GMJF >=  0)) {
    Result__CURE[Self__GMJF]=NULL;
    Self__GMJF=(__INTEGER)(Self__GMJF -  1);
  };
  return(Result__CURE);
}

static void** create__PGXJ(__INTEGER nb_elements__RGXJ)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__BQNK;
  void **Result__VL2J;
  Result__VL2J=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__RGXJ * ((__INTEGER )(sizeof(void *)))))));
  Self__BQNK=(__INTEGER)(nb_elements__RGXJ -  1);
  while ((Self__BQNK >=  0)) {
    Result__VL2J[Self__BQNK]=NULL;
    Self__BQNK=(__INTEGER)(Self__BQNK -  1);
  };
  return(Result__VL2J);
}

static __FAST_ARRAYoSLOT_DATAo* create_with_capacity__TB4F(__INTEGER new_count__VB4F)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__KC4F;
  __INTEGER typ_id__PC4F;
  __UINTEGER_32 sz__MC4F,a__J53Q,new_size__XOZQ,t__ZOZQ,a__N53Q;
  __FAST_ARRAYoSLOT_DATAo *result__JC4F,*Self__RAAG;
  result__JC4F=NULL;
  ptr__KC4F=((__POINTER )(NULL));
  typ_id__PC4F= 0;
  sz__MC4F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOT_DATAo));
  if ((sz__MC4F ==  0)) {
    result__JC4F=FAST_ARRAYoSLOT_DATAo__;
  } else {
    typ_id__PC4F=__FAST_ARRAYoSLOT_DATAo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MC4F);
    if ((typ_id__PC4F == (__INTEGER)(-  1))) {
      a__J53Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__XOZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__MC4F + a__J53Q) & (__UINTEGER_32)(~ a__J53Q));
      ptr__KC4F=micro_alloc__table__lab__BOI(new_size__XOZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XOZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__XOZQ);
    } else {
      t__ZOZQ=((__UINTEGER_32 )typ_id__PC4F);
      a__N53Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__KC4F=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MC4F + a__N53Q) & (__UINTEGER_32)(~ a__N53Q)),((__POINTER )(&(table_type[(t__ZOZQ)]))),(__UINTEGER_32)(t__ZOZQ |  1));
    };
    result__JC4F=((__FAST_ARRAYoSLOT_DATAo *)ptr__KC4F);
    *(result__JC4F) = *(FAST_ARRAYoSLOT_DATAo__);
  };
  Self__RAAG=((__FAST_ARRAYoSLOT_DATAo *)result__JC4F);
  if ((Self__RAAG->parent_arrayed_collection__3K3F.capacity__235F < new_count__VB4F)) {
    Self__RAAG->parent_arrayed_collection__3K3F.storage__Y45F=create__R4JG(new_count__VB4F);
    Self__RAAG->parent_arrayed_collection__3K3F.capacity__235F=new_count__VB4F;
  };
  Self__RAAG->parent_arrayed_collection__3K3F.upper__035F=(__INTEGER)(-  1);
  return(result__JC4F);
}

static void** create__KJR(__INTEGER nb_elements__MJR)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__Y2NB;
  void **Result__WGV;
  Result__WGV=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__MJR * ((__INTEGER )(sizeof(void *)))))));
  Self__Y2NB=(__INTEGER)(nb_elements__MJR -  1);
  while ((Self__Y2NB >=  0)) {
    Result__WGV[Self__Y2NB]=NULL;
    Self__Y2NB=(__INTEGER)(Self__Y2NB -  1);
  };
  return(Result__WGV);
}

static void add__CRK(__HASHED_SEToABSTRACT_STRINGo *Self__DRK,void *e__ERK)
// ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER h__LRK,idx__MRK;
  void *node__PRK;
  has__URN(Self__DRK,e__ERK);
  has__URN(Self__DRK,e__ERK);
  h__LRK=hash_code__WPN(e__ERK);
  idx__MRK=(__INTEGER)(h__LRK % Self__DRK->capacity__TRK);
  node__PRK=((void **)Self__DRK->buckets__YRK)[idx__MRK];
  while ((! (((void *)node__PRK == (void *)NULL) || __infix_equal_equal__TKW(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__PRK)->item__ESK,e__ERK)))) {
    node__PRK=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__PRK)->next__QSK;
  };
  if (((void *)node__PRK == (void *)NULL)) {
    if ((Self__DRK->capacity__TRK == Self__DRK->count__ZSK)) {
      increase_capacity__430(Self__DRK);
      idx__MRK=(__INTEGER)(h__LRK % Self__DRK->capacity__TRK);
    };
    node__PRK=create__next__RMU(e__ERK,((void **)Self__DRK->buckets__YRK)[idx__MRK]);
    ((void **)Self__DRK->buckets__YRK)[idx__MRK]=node__PRK;
    Self__DRK->count__ZSK=(__INTEGER)(Self__DRK->count__ZSK +  1);
  };
}

static void* operator_to_name__E1B(void *op__H1B)
// ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__O1B,Self__I3C;
  __CHARACTER c__J1B;
  __BOOLEAN __tmp__21B,__tmp__J2B,result__KBW,__tmp__W2B,result__2BW;
  __BOOLEAN __tmp__D3B,result__OCW,__tmp__Q3B,result__ADW,__tmp__33B;
  __BOOLEAN result__SDW,__tmp__K4B,result__EEW,__tmp__X4B,result__WEW;
  __BOOLEAN __tmp__E5B,result__IFW,__tmp__R5B,result__0FW,__tmp__45B;
  __BOOLEAN result__MGW,__tmp__LAC,result__4GW,__tmp__YAC,result__QHW;
  __BOOLEAN __tmp__FBC,result__CIW,__tmp__SBC,result__UIW,__tmp__5BC;
  __BOOLEAN result__GJW,__tmp__MCC,result__YJW;
  c__J1B='\0';
  copy__BNK(string_tmp__RB,(&__string_84));
  __tmp__O1B=((__STRING_CONSTANT *)op__H1B)->count__XHB;
  Self__I3C= 1;
  while ((Self__I3C <= __tmp__O1B)) {
    c__J1B=((__CHARACTER *)((__STRING_CONSTANT *)op__H1B)->storage__C5K)[(__INTEGER)(Self__I3C -  1)];
    if ((c__J1B == '+')) {
      append__MOK(string_tmp__RB,(&__string_212));
      __tmp__21B=TRUE__;
    } else {
      __tmp__21B=FALSE__;
    };
    if (__tmp__21B) {
      __tmp__J2B=TRUE__;
    } else {
      result__KBW=(c__J1B == '-');
      if (result__KBW) {
        append__MOK(string_tmp__RB,(&__string_213));
      };
      __tmp__J2B=result__KBW;
    };
    if (__tmp__J2B) {
      __tmp__W2B=TRUE__;
    } else {
      result__2BW=(c__J1B == '~');
      if (result__2BW) {
        append__MOK(string_tmp__RB,(&__string_214));
      };
      __tmp__W2B=result__2BW;
    };
    if (__tmp__W2B) {
      __tmp__D3B=TRUE__;
    } else {
      result__OCW=(c__J1B == '!');
      if (result__OCW) {
        append__MOK(string_tmp__RB,(&__string_215));
      };
      __tmp__D3B=result__OCW;
    };
    if (__tmp__D3B) {
      __tmp__Q3B=TRUE__;
    } else {
      result__ADW=(c__J1B == '/');
      if (result__ADW) {
        append__MOK(string_tmp__RB,(&__string_216));
      };
      __tmp__Q3B=result__ADW;
    };
    if (__tmp__Q3B) {
      __tmp__33B=TRUE__;
    } else {
      result__SDW=(c__J1B == '*');
      if (result__SDW) {
        append__MOK(string_tmp__RB,(&__string_217));
      };
      __tmp__33B=result__SDW;
    };
    if (__tmp__33B) {
      __tmp__K4B=TRUE__;
    } else {
      result__EEW=(c__J1B == '^');
      if (result__EEW) {
        append__MOK(string_tmp__RB,(&__string_218));
      };
      __tmp__K4B=result__EEW;
    };
    if (__tmp__K4B) {
      __tmp__X4B=TRUE__;
    } else {
      result__WEW=(c__J1B == '%');
      if (result__WEW) {
        append__MOK(string_tmp__RB,(&__string_219));
      };
      __tmp__X4B=result__WEW;
    };
    if (__tmp__X4B) {
      __tmp__E5B=TRUE__;
    } else {
      result__IFW=(c__J1B == '>');
      if (result__IFW) {
        append__MOK(string_tmp__RB,(&__string_220));
      };
      __tmp__E5B=result__IFW;
    };
    if (__tmp__E5B) {
      __tmp__R5B=TRUE__;
    } else {
      result__0FW=(c__J1B == '<');
      if (result__0FW) {
        append__MOK(string_tmp__RB,(&__string_221));
      };
      __tmp__R5B=result__0FW;
    };
    if (__tmp__R5B) {
      __tmp__45B=TRUE__;
    } else {
      result__MGW=(c__J1B == '=');
      if (result__MGW) {
        append__MOK(string_tmp__RB,(&__string_222));
      };
      __tmp__45B=result__MGW;
    };
    if (__tmp__45B) {
      __tmp__LAC=TRUE__;
    } else {
      result__4GW=(c__J1B == '\\');
      if (result__4GW) {
        append__MOK(string_tmp__RB,(&__string_223));
      };
      __tmp__LAC=result__4GW;
    };
    if (__tmp__LAC) {
      __tmp__YAC=TRUE__;
    } else {
      result__QHW=(c__J1B == '|');
      if (result__QHW) {
        append__MOK(string_tmp__RB,(&__string_224));
      };
      __tmp__YAC=result__QHW;
    };
    if (__tmp__YAC) {
      __tmp__FBC=TRUE__;
    } else {
      result__CIW=(c__J1B == '&');
      if (result__CIW) {
        append__MOK(string_tmp__RB,(&__string_225));
      };
      __tmp__FBC=result__CIW;
    };
    if (__tmp__FBC) {
      __tmp__SBC=TRUE__;
    } else {
      result__UIW=(c__J1B == '$');
      if (result__UIW) {
        append__MOK(string_tmp__RB,(&__string_226));
      };
      __tmp__SBC=result__UIW;
    };
    if (__tmp__SBC) {
      __tmp__5BC=TRUE__;
    } else {
      result__GJW=(c__J1B == '#');
      if (result__GJW) {
        append__MOK(string_tmp__RB,(&__string_227));
      };
      __tmp__5BC=result__GJW;
    };
    if (__tmp__5BC) {
      __tmp__MCC=TRUE__;
    } else {
      result__YJW=(c__J1B == '@');
      if (result__YJW) {
        append__MOK(string_tmp__RB,(&__string_228));
      };
      __tmp__MCC=result__YJW;
    };
    if ((! __tmp__MCC)) {
      if ((c__J1B == '?')) {
        append__MOK(string_tmp__RB,(&__string_229));
      };
    };
    Self__I3C=(__INTEGER)(Self__I3C +  1);
  };
  return(get__QEC(string_tmp__RB));
}

static __BOOLEAN is_digit__EWEB(__CHARACTER Self__FWEB)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__HWEB;
  result__HWEB=FALSE__;
  if ((((__INTEGER_8 )Self__FWEB) >= ((__INTEGER_8 )'0'))) {
    result__HWEB=(((__INTEGER_8 )Self__FWEB) <= ((__INTEGER_8 )'9'));
  };
  return(result__HWEB);
}

static void print__1ZE(__STRING_CONSTANT *Self__2ZE)
// ({STRING_CONSTANT}) VoidRecursive, No inlinable.
{
  put_string__2EG(Self__2ZE);
}

static __CHARACTER to_lower__OA1(__CHARACTER Self__PA1)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __CHARACTER result__RA1;
  result__RA1='\0';
  if (((((__INTEGER_8 )Self__PA1) <  65) || (((__INTEGER_8 )Self__PA1) >  90))) {
    result__RA1=Self__PA1;
  } else {
    result__RA1=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__PA1) +  32))));
  };
  return(result__RA1);
}

static void copy__BNK(__STRING *Self__CNK,void *other__DNK)
// ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__ENK;
  __CHARACTER *__tmp__1NK,*__tmp__3NK;
  if (((struct ___OBJ *)other__DNK)->__id==__STRING_CONSTANT__) {
    __tmp__ENK=((__STRING_CONSTANT *)other__DNK)->count__XHB;
  } else {
    __tmp__ENK=((__STRING *)other__DNK)->count__VF;
  };
  Self__CNK->count__VF=__tmp__ENK;
  if ((__tmp__ENK >  0)) {
    if ((Self__CNK->capacity__MNK < __tmp__ENK)) {
      Self__CNK->storage__XNK=create__5UX(__tmp__ENK);
      Self__CNK->capacity__MNK=Self__CNK->count__VF;
    };
    __tmp__1NK=Self__CNK->storage__XNK;
    if (((struct ___OBJ *)other__DNK)->__id==__STRING_CONSTANT__) {
      __tmp__3NK=((__STRING_CONSTANT *)other__DNK)->storage__C5K;
    } else {
      __tmp__3NK=((__STRING *)other__DNK)->storage__XNK;
    };
    copy_from__until__YVX(__tmp__1NK,__tmp__3NK,(__INTEGER)(Self__CNK->count__VF -  1));
  };
}

static __INTEGER last_index__L01(void *n__N01,__CHARACTER c__O01)
// ({NULLxSTRING},{CHARACTER}) With resultNo recursive, No inlinable.
{
  __INTEGER result__Q01;
  __CHARACTER *__tmp__Z53Q;
  result__Q01=((__STRING *)n__N01)->count__VF;
  __tmp__Z53Q=((__STRING *)n__N01)->storage__XNK;
  while ((! ((result__Q01 <  1) || (((__CHARACTER *)__tmp__Z53Q)[(__INTEGER)(result__Q01 -  1)] == c__O01)))) {
    result__Q01=(__INTEGER)(result__Q01 -  1);
  };
  return(result__Q01);
}

static void remove_last__RLLB(__STRING *Self__SLLB,__INTEGER n__TLLB)
// ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
{
  if ((n__TLLB > Self__SLLB->count__VF)) {
    Self__SLLB->count__VF= 0;
  } else {
    Self__SLLB->count__VF=(__INTEGER)(Self__SLLB->count__VF - n__TLLB);
  };
}

static void* get__QEC(void *str__SEC)
// ({NULLxSTRING}) With resultNo recursive, No inlinable.
{
  void *result__UEC,*__tmp__SFC;
  void *result__C3K;
  __STRING *Self__SBO;
  __INTEGER result__UBO,__tmp__VBO,Self__NOR;
  __HASHED_SEToABSTRACT_STRINGo *Self__P2K;
  __CHARACTER *__tmp__CPZQ;
  void *node__B3K;
  result__UEC=NULL;
  Self__P2K=((__HASHED_SEToABSTRACT_STRINGo *)list__TK);
  result__C3K=NULL;
  Self__SBO=((__STRING *)str__SEC);
  result__UBO= 0;
  __tmp__VBO=Self__SBO->count__VF;
  Self__NOR= 1;
  __tmp__CPZQ=Self__SBO->storage__XNK;
  while ((Self__NOR <= __tmp__VBO)) {
    result__UBO=(__INTEGER)((__INTEGER)( 5 * result__UBO) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)__tmp__CPZQ)[(__INTEGER)(Self__NOR -  1)])));
    Self__NOR=(__INTEGER)(Self__NOR +  1);
  };
  if ((result__UBO <  0)) {
    result__UBO=(__INTEGER)(~ result__UBO);
  };
  node__B3K=((void **)Self__P2K->buckets__YRK)[(__INTEGER)(result__UBO % Self__P2K->capacity__TRK)];
  while ((! (((void *)node__B3K == (void *)NULL) || __infix_equal_equal__TKW(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__B3K)->item__ESK,str__SEC)))) {
    node__B3K=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__B3K)->next__QSK;
  };
  if (((void *)node__B3K != (void *)NULL)) {
    result__C3K=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__B3K)->item__ESK;
  };
  if (((void *)result__C3K == (void *)NULL)) {
    result__UEC=create_copy__I0E(str__SEC);
    fast_add__GAM(list__TK,result__UEC);
  } else {
    if (result__C3K==NULL) {
      __tmp__SFC=NULL;
    } else {
      __tmp__SFC=((void *)result__C3K);
    };
    result__UEC=__tmp__SFC;
  };
  return(result__UEC);
}

static void to_upper__LWKB(__STRING *Self__MWKB)
// ({STRING}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__QGPB;
  __CHARACTER *__tmp__BA4Q,*__tmp__CA4Q;
  __CHARACTER Self__0VAC,result__2VAC;
  Self__QGPB=Self__MWKB->count__VF;
  __tmp__BA4Q=Self__MWKB->storage__XNK;
  __tmp__CA4Q=Self__MWKB->storage__XNK;
  while ((Self__QGPB >=  1)) {
    Self__0VAC=((__CHARACTER *)__tmp__BA4Q)[(__INTEGER)(Self__QGPB -  1)];
    result__2VAC='\0';
    if (((((__INTEGER_8 )Self__0VAC) <  97) || (((__INTEGER_8 )Self__0VAC) >  122))) {
      result__2VAC=Self__0VAC;
    } else {
      result__2VAC=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__0VAC) -  32))));
    };
    ((__CHARACTER *)__tmp__CA4Q)[(__INTEGER)(Self__QGPB -  1)]=result__2VAC;
    Self__QGPB=(__INTEGER)(Self__QGPB -  1);
  };
}

static void replace_all__with__RZ1(__STRING *Self__SZ1,__CHARACTER old_char__TZ1,__CHARACTER new_char__UZ1)
// ({STRING},{CHARACTER},{CHARACTER}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__0Z1,Self__F3PB;
  __CHARACTER *__tmp__XZ1,*Self__EFLB;
  __tmp__XZ1=Self__SZ1->storage__XNK;
  __tmp__0Z1=(__INTEGER)(Self__SZ1->count__VF -  1);
  Self__EFLB=((__CHARACTER *)__tmp__XZ1);
  Self__F3PB=__tmp__0Z1;
  while ((Self__F3PB >=  0)) {
    if ((old_char__TZ1 == Self__EFLB[Self__F3PB])) {
      Self__EFLB[Self__F3PB]=new_char__UZ1;
    };
    Self__F3PB=(__INTEGER)(Self__F3PB -  1);
  };
}

static void remove_between__to__ZVCC(__STRING *Self__0VCC,__INTEGER start__1VCC,__INTEGER end__2VCC)
// ({STRING},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER len__3VCC,__tmp__0WCC,__tmp__1WCC,Self__WZEC;
  __CHARACTER *__tmp__LA4Q,*__tmp__MA4Q;
  len__3VCC=(__INTEGER)((__INTEGER)(end__2VCC - start__1VCC) +  1);
  if ((len__3VCC >  0)) {
    __tmp__0WCC=(__INTEGER)(end__2VCC +  1);
    __tmp__1WCC=Self__0VCC->count__VF;
    Self__WZEC=__tmp__0WCC;
    __tmp__LA4Q=Self__0VCC->storage__XNK;
    __tmp__MA4Q=Self__0VCC->storage__XNK;
    while ((Self__WZEC <= __tmp__1WCC)) {
      ((__CHARACTER *)__tmp__MA4Q)[(__INTEGER)((__INTEGER)(Self__WZEC - len__3VCC) -  1)]=((__CHARACTER *)__tmp__LA4Q)[(__INTEGER)(Self__WZEC -  1)];
      Self__WZEC=(__INTEGER)(Self__WZEC +  1);
    };
    Self__0VCC->count__VF=(__INTEGER)(Self__0VCC->count__VF - len__3VCC);
  };
}

static void add_last__Z11(__LINKED_LISToSTRING_CONSTANTo *Self__011,void *element__111)
// ({LINKED_LISToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  void *lnk__211;
  lnk__211=NULL;
  if (((void *)Self__011->first_link__5UK == (void *)NULL)) {
    Self__011->first_link__5UK=create__next__PIDB(element__111);
    Self__011->parent_linked_collection__DC.upper__JC= 1;
    Self__011->last_link__F21=Self__011->first_link__5UK;
    Self__011->mem_idx__PUU= 1;
    Self__011->mem_lnk__YUU=Self__011->first_link__5UK;
  } else {
    lnk__211=create__next__PIDB(element__111);
    ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__011->last_link__F21)->next__AT4=lnk__211;
    Self__011->parent_linked_collection__DC.upper__JC=(__INTEGER)(Self__011->parent_linked_collection__DC.upper__JC +  1);
    Self__011->last_link__F21=lnk__211;
  };
}

static void to_lower__LVK(__STRING *Self__MVK)
// ({STRING}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__KUN;
  Self__KUN=Self__MVK->count__VF;
  while ((Self__KUN >=  1)) {
    ((__CHARACTER *)Self__MVK->storage__XNK)[(__INTEGER)(Self__KUN -  1)]=to_lower__OA1(((__CHARACTER *)Self__MVK->storage__XNK)[(__INTEGER)(Self__KUN -  1)]);
    Self__KUN=(__INTEGER)(Self__KUN -  1);
  };
}

static __STRING_CONSTANT* clone__U1D()
// () With resultNo recursive, No inlinable.
{
  __STRING_CONSTANT *result__X1D;
  __POINTER ptr__Y1D;
  __INTEGER typ_id__31D;
  __UINTEGER_32 sz__01D,a__TA4Q,new_size__PPZQ,t__RPZQ,a__XA4Q;
  result__X1D=NULL;
  ptr__Y1D=((__POINTER )(NULL));
  typ_id__31D= 0;
  sz__01D=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
  if ((sz__01D ==  0)) {
    result__X1D=STRING_CONSTANT__;
  } else {
    typ_id__31D=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__01D);
    if ((typ_id__31D == (__INTEGER)(-  1))) {
      a__TA4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__PPZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__01D + a__TA4Q) & (__UINTEGER_32)(~ a__TA4Q));
      ptr__Y1D=micro_alloc__table__lab__BOI(new_size__PPZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PPZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__PPZQ);
    } else {
      t__RPZQ=((__UINTEGER_32 )typ_id__31D);
      a__XA4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__Y1D=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__01D + a__XA4Q) & (__UINTEGER_32)(~ a__XA4Q)),((__POINTER )(&(table_type[(t__RPZQ)]))),(__UINTEGER_32)(t__RPZQ |  1));
    };
    result__X1D=((__STRING_CONSTANT *)ptr__Y1D);
    *(result__X1D) = *(STRING_CONSTANT__);
  };
  return(result__X1D);
}

static void** create__E1S(__INTEGER nb_elements__G1S)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__CLOB;
  void **Result__JXW;
  Result__JXW=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__G1S * ((__INTEGER )(sizeof(void *)))))));
  Self__CLOB=(__INTEGER)(nb_elements__G1S -  1);
  while ((Self__CLOB >=  0)) {
    Result__JXW[Self__CLOB]=NULL;
    Self__CLOB=(__INTEGER)(Self__CLOB -  1);
  };
  return(Result__JXW);
}

static void put__to__4OL(__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *Self__5OL,void *v__APL,void *k__BPL)
// ({HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER h__IPL,idx__JPL,idx__AQ2,new_capacity__BQ2,i__CQ2;
  __INTEGER typ_id__QS2;
  __POINTER ptr__LS2;
  __UINTEGER_32 sz__NS2,a__IB4Q,new_size__VPZQ,t__XPZQ,a__MB4Q;
  void *node__LPL,*node1__EQ2,*node2__FQ2,*__tmp__ARL;
  void **old_buckets__DQ2;
  __HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *result__KS2;
  __HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *Self__TZKB;
  h__IPL=hash_code__WPN(k__BPL);
  idx__JPL=(__INTEGER)(h__IPL % Self__5OL->capacity__NPL);
  node__LPL=((void **)Self__5OL->buckets__SPL)[idx__JPL];
  while ((! (((void *)node__LPL == (void *)NULL) || __infix_equal_equal__TKW(((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__LPL)->key__4PL,k__BPL)))) {
    node__LPL=((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__LPL)->next__KQL;
  };
  if (((void *)node__LPL == (void *)NULL)) {
    if ((Self__5OL->capacity__NPL == Self__5OL->count__TQL)) {
      idx__AQ2= 0;
      node1__EQ2=NULL;
      node2__FQ2=NULL;
      old_buckets__DQ2=Self__5OL->buckets__SPL;
      new_capacity__BQ2=prime_number_ceiling__A4Q((__INTEGER)(Self__5OL->capacity__NPL +  1));
      Self__5OL->buckets__SPL=create__E1S(new_capacity__BQ2);
      i__CQ2=(__INTEGER)(Self__5OL->capacity__NPL -  1);
      Self__5OL->capacity__NPL=new_capacity__BQ2;
      while ((i__CQ2 >=  0)) {
        node1__EQ2=((void **)old_buckets__DQ2)[i__CQ2];
        while (((void *)node1__EQ2 != (void *)NULL)) {
          node2__FQ2=((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node1__EQ2)->next__KQL;
          idx__AQ2=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node1__EQ2)->key__4PL) % Self__5OL->capacity__NPL);
          ((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node1__EQ2)->next__KQL=((void **)Self__5OL->buckets__SPL)[idx__AQ2];
          ((void **)Self__5OL->buckets__SPL)[idx__AQ2]=node1__EQ2;
          node1__EQ2=node2__FQ2;
        };
        i__CQ2=(__INTEGER)(i__CQ2 -  1);
      };
      idx__JPL=(__INTEGER)(h__IPL % Self__5OL->capacity__NPL);
    };
    __tmp__ARL=((void **)Self__5OL->buckets__SPL)[idx__JPL];
    result__KS2=NULL;
    ptr__LS2=((__POINTER )(NULL));
    typ_id__QS2= 0;
    sz__NS2=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo));
    if ((sz__NS2 ==  0)) {
      result__KS2=HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__;
    } else {
      typ_id__QS2=__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__NS2);
      if ((typ_id__QS2 == (__INTEGER)(-  1))) {
        a__IB4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__VPZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__NS2 + a__IB4Q) & (__UINTEGER_32)(~ a__IB4Q));
        ptr__LS2=micro_alloc__table__lab__BOI(new_size__VPZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VPZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__VPZQ);
      } else {
        t__XPZQ=((__UINTEGER_32 )typ_id__QS2);
        a__MB4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__LS2=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__NS2 + a__MB4Q) & (__UINTEGER_32)(~ a__MB4Q)),((__POINTER )(&(table_type[(t__XPZQ)]))),(__UINTEGER_32)(t__XPZQ |  1));
      };
      result__KS2=((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)ptr__LS2);
      *(result__KS2) = *(HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo__);
    };
    Self__TZKB=((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)result__KS2);
    Self__TZKB->item__3XM=v__APL;
    Self__TZKB->key__4PL=k__BPL;
    Self__TZKB->next__KQL=__tmp__ARL;
    node__LPL=result__KS2;
    ((void **)Self__5OL->buckets__SPL)[idx__JPL]=result__KS2;
    Self__5OL->count__TQL=(__INTEGER)(Self__5OL->count__TQL +  1);
  } else {
    ((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__LPL)->item__3XM=v__APL;
  };
}

static __CHARACTER* to_external__4YK(__STRING *Self__5YK)
// ({STRING}) With resultNo recursive, No inlinable.
{
  if ((Self__5YK->capacity__MNK > Self__5YK->count__VF)) {
    Self__5YK->count__VF=(__INTEGER)(Self__5YK->count__VF +  1);
    if ((((__CHARACTER *)Self__5YK->storage__XNK)[(__INTEGER)(Self__5YK->count__VF -  1)] != '\0')) {
      ((__CHARACTER *)Self__5YK->storage__XNK)[(__INTEGER)(Self__5YK->count__VF -  1)]='\0';
    };
  } else {
    add_last__YPK(Self__5YK,'\0');
  };
  Self__5YK->count__VF=(__INTEGER)(Self__5YK->count__VF -  1);
  return(Self__5YK->storage__XNK);
}

static void put_string__2EG(void *s__4EG)
// ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__PFG,Self__MZG,limit_up__NZG;
  __CHARACTER *__tmp__RB4Q,*__tmp__H15Q;
  __CHARACTER __tmp__WFG;
  if (((struct ___OBJ *)s__4EG)->__id==__STRING_CONSTANT__) {
  };
  if (((struct ___OBJ *)s__4EG)->__id==__STRING_CONSTANT__) {
    __tmp__PFG=((__STRING_CONSTANT *)s__4EG)->count__XHB;
  } else {
    __tmp__PFG=((__STRING *)s__4EG)->count__VF;
  };
  Self__MZG= 1;
  limit_up__NZG=__tmp__PFG;
  __tmp__RB4Q=((__STRING *)s__4EG)->storage__XNK;
  __tmp__H15Q=((__STRING_CONSTANT *)s__4EG)->storage__C5K;
  while ((Self__MZG <= limit_up__NZG)) {
    if (((struct ___OBJ *)s__4EG)->__id==__STRING_CONSTANT__) {
      __tmp__WFG=((__CHARACTER *)__tmp__H15Q)[(__INTEGER)(Self__MZG -  1)];
    } else {
      __tmp__WFG=((__CHARACTER *)__tmp__RB4Q)[(__INTEGER)(Self__MZG -  1)];
    };
    fputc((int)(__tmp__WFG),stdout);
    Self__MZG=(__INTEGER)(Self__MZG +  1);
  };
}

static __PROTOTYPE* create__name__generic_count__TBE(void *f__VBE,void *n__WBE,__INTEGER c__XBE)
// ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT},{INTEGER}) With resultNo recursive, No inlinable.
{
  __PROTOTYPE *result__C5E,*Self__JHM;
  __POINTER ptr__D5E,ptr__Y5S,ptr__AFAC,file__NHM,ptr__HHT;
  __INTEGER typ_id__I5E,typ_id__35S,new_capacity__OPP,__tmp__SQP;
  __INTEGER __tmp__0ILB,Self__GARC,h__BIJB,idx__CIJB,idx__VCAC;
  __INTEGER new_capacity__WCAC,i__XCAC,typ_id__FFAC,result__HSP;
  __INTEGER typ_id__MHT,new_capacity__SYNB;
  __UINTEGER_32 sz__F5E,a__TB4Q,new_size__5PZQ,t__BQZQ,a__XB4Q,sz__05S;
  __UINTEGER_32 a__0B4Q,new_size__DQZQ,t__FQZQ,a__4B4Q,sz__CFAC,a__OC4Q;
  __UINTEGER_32 new_size__HQZQ,t__JQZQ,a__SC4Q,sz__JHT,a__YC4Q;
  __UINTEGER_32 new_size__NQZQ,t__PQZQ,a__2C4Q;
  void *__tmp__PIM;
  void *__tmp__VIM;
  __STRING *Self__HFT;
  __FAST_ARRAYoExpanded_CHARACTERo *result__X5S,*Self__ATJB;
  __FAST_ARRAYoPROTOTYPEo *Self__MPP;
  __BOOLEAN __tmp__2PP;
  void **__tmp__RQP,**new__HILB;
  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__YHJB;
  void *node__EIJB,*node1__ZCAC,*node2__0CAC,*__tmp__YJJB;
  void **old_buckets__YCAC;
  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__5EAC;
  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__CNOC;
  __CHARACTER *ptr__QSP;
  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__GHT,*Self__ZUJB;
  result__C5E=NULL;
  ptr__D5E=((__POINTER )(NULL));
  typ_id__I5E= 0;
  sz__F5E=((__UINTEGER_32 )sizeof(__PROTOTYPE));
  if ((sz__F5E ==  0)) {
    result__C5E=PROTOTYPE__;
  } else {
    typ_id__I5E=__PROTOTYPE__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__F5E);
    if ((typ_id__I5E == (__INTEGER)(-  1))) {
      a__TB4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__5PZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__F5E + a__TB4Q) & (__UINTEGER_32)(~ a__TB4Q));
      ptr__D5E=micro_alloc__table__lab__BOI(new_size__5PZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5PZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__5PZQ);
    } else {
      t__BQZQ=((__UINTEGER_32 )typ_id__I5E);
      a__XB4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__D5E=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__F5E + a__XB4Q) & (__UINTEGER_32)(~ a__XB4Q)),((__POINTER )(&(table_type[(t__BQZQ)]))),(__UINTEGER_32)(t__BQZQ |  1));
    };
    result__C5E=((__PROTOTYPE *)ptr__D5E);
    *(result__C5E) = *(PROTOTYPE__);
  };
  Self__JHM=((__PROTOTYPE *)result__C5E);
  Self__JHM->filename__4QB=f__VBE;
  Self__JHM->parent_named__QD.name__1QB=n__WBE;
  Self__JHM->generic_count__DIM=c__XBE;
  result__X5S=NULL;
  ptr__Y5S=((__POINTER )(NULL));
  typ_id__35S= 0;
  sz__05S=((__UINTEGER_32 )sizeof(__FAST_ARRAYoExpanded_CHARACTERo));
  if ((sz__05S ==  0)) {
    result__X5S=FAST_ARRAYoExpanded_CHARACTERo__;
  } else {
    typ_id__35S=__FAST_ARRAYoExpanded_CHARACTERo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__05S);
    if ((typ_id__35S == (__INTEGER)(-  1))) {
      a__0B4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__DQZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__05S + a__0B4Q) & (__UINTEGER_32)(~ a__0B4Q));
      ptr__Y5S=micro_alloc__table__lab__BOI(new_size__DQZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DQZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__DQZQ);
    } else {
      t__FQZQ=((__UINTEGER_32 )typ_id__35S);
      a__4B4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__Y5S=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__05S + a__4B4Q) & (__UINTEGER_32)(~ a__4B4Q)),((__POINTER )(&(table_type[(t__FQZQ)]))),(__UINTEGER_32)(t__FQZQ |  1));
    };
    result__X5S=((__FAST_ARRAYoExpanded_CHARACTERo *)ptr__Y5S);
    *(result__X5S) = *(FAST_ARRAYoExpanded_CHARACTERo__);
  };
  Self__ATJB=((__FAST_ARRAYoExpanded_CHARACTERo *)result__X5S);
  if ((Self__ATJB->parent_arrayed_collection__IIM.capacity__JTJB < c__XBE)) {
    Self__ATJB->parent_arrayed_collection__IIM.storage__STJB=create__5UX(c__XBE);
    Self__ATJB->parent_arrayed_collection__IIM.capacity__JTJB=c__XBE;
  };
  Self__ATJB->parent_arrayed_collection__IIM.upper__WTJB=(__INTEGER)(-  1);
  Self__JHM->idf_generic_list__KIM=result__X5S;
  Self__JHM->index__GAH=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.upper__QQB +  1);
  Self__MPP=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB);
  new_capacity__OPP= 0;
  if (((__INTEGER)(Self__MPP->parent_arrayed_collection__FQB.upper__QQB +  1) <= (__INTEGER)(Self__MPP->parent_arrayed_collection__FQB.capacity__YZM -  1))) {
    Self__MPP->parent_arrayed_collection__FQB.upper__QQB=(__INTEGER)(Self__MPP->parent_arrayed_collection__FQB.upper__QQB +  1);
    __tmp__2PP=TRUE__;
  } else {
    __tmp__2PP=FALSE__;
  };
  if ((! __tmp__2PP)) {
    if ((Self__MPP->parent_arrayed_collection__FQB.capacity__YZM ==  0)) {
      Self__MPP->parent_arrayed_collection__FQB.storage__D0M=create__KY5( 2);
      Self__MPP->parent_arrayed_collection__FQB.capacity__YZM= 2;
      Self__MPP->parent_arrayed_collection__FQB.upper__QQB= 0;
    } else {
      new_capacity__OPP=(__INTEGER)(Self__MPP->parent_arrayed_collection__FQB.capacity__YZM <<  1);
      __tmp__RQP=Self__MPP->parent_arrayed_collection__FQB.storage__D0M;
      __tmp__SQP=Self__MPP->parent_arrayed_collection__FQB.capacity__YZM;
      new__HILB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__RQP)),((__UINTEGER_32 )(__INTEGER)(__tmp__SQP * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OPP * ((__INTEGER )(sizeof(void *)))))));
      __tmp__0ILB=(__INTEGER)(new_capacity__OPP -  1);
      Self__GARC=__tmp__SQP;
      while ((Self__GARC <= __tmp__0ILB)) {
        new__HILB[Self__GARC]=NULL;
        Self__GARC=(__INTEGER)(Self__GARC +  1);
      };
      Self__MPP->parent_arrayed_collection__FQB.storage__D0M=new__HILB;
      Self__MPP->parent_arrayed_collection__FQB.capacity__YZM=new_capacity__OPP;
      Self__MPP->parent_arrayed_collection__FQB.upper__QQB=(__INTEGER)(Self__MPP->parent_arrayed_collection__FQB.upper__QQB +  1);
    };
  };
  ((void **)Self__MPP->parent_arrayed_collection__FQB.storage__D0M)[Self__MPP->parent_arrayed_collection__FQB.upper__QQB]=Self__JHM;
  __tmp__PIM=Self__JHM->parent_named__QD.name__1QB;
  Self__YHJB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__XHM);
  h__BIJB=hash_code__WPN(__tmp__PIM);
  idx__CIJB=(__INTEGER)(h__BIJB % Self__YHJB->capacity__GIJB);
  node__EIJB=((void **)Self__YHJB->buckets__LIJB)[idx__CIJB];
  while ((! (((void *)node__EIJB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EIJB)->key__XIJB == (void *)__tmp__PIM)))) {
    node__EIJB=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EIJB)->next__CJJB;
  };
  if (((void *)node__EIJB == (void *)NULL)) {
    if ((Self__YHJB->capacity__GIJB == Self__YHJB->count__LJJB)) {
      idx__VCAC= 0;
      node1__ZCAC=NULL;
      node2__0CAC=NULL;
      old_buckets__YCAC=Self__YHJB->buckets__LIJB;
      new_capacity__WCAC=prime_number_ceiling__A4Q((__INTEGER)(Self__YHJB->capacity__GIJB +  1));
      Self__YHJB->buckets__LIJB=create__S2TB(new_capacity__WCAC);
      i__XCAC=(__INTEGER)(Self__YHJB->capacity__GIJB -  1);
      Self__YHJB->capacity__GIJB=new_capacity__WCAC;
      while ((i__XCAC >=  0)) {
        node1__ZCAC=((void **)old_buckets__YCAC)[i__XCAC];
        while (((void *)node1__ZCAC != (void *)NULL)) {
          node2__0CAC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__ZCAC)->next__CJJB;
          idx__VCAC=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__ZCAC)->key__XIJB) % Self__YHJB->capacity__GIJB);
          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__ZCAC)->next__CJJB=((void **)Self__YHJB->buckets__LIJB)[idx__VCAC];
          ((void **)Self__YHJB->buckets__LIJB)[idx__VCAC]=node1__ZCAC;
          node1__ZCAC=node2__0CAC;
        };
        i__XCAC=(__INTEGER)(i__XCAC -  1);
      };
      idx__CIJB=(__INTEGER)(h__BIJB % Self__YHJB->capacity__GIJB);
    };
    __tmp__YJJB=((void **)Self__YHJB->buckets__LIJB)[idx__CIJB];
    result__5EAC=NULL;
    ptr__AFAC=((__POINTER )(NULL));
    typ_id__FFAC= 0;
    sz__CFAC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
    if ((sz__CFAC ==  0)) {
      result__5EAC=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
    } else {
      typ_id__FFAC=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__CFAC);
      if ((typ_id__FFAC == (__INTEGER)(-  1))) {
        a__OC4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__HQZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__CFAC + a__OC4Q) & (__UINTEGER_32)(~ a__OC4Q));
        ptr__AFAC=micro_alloc__table__lab__BOI(new_size__HQZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HQZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HQZQ);
      } else {
        t__JQZQ=((__UINTEGER_32 )typ_id__FFAC);
        a__SC4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__AFAC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__CFAC + a__SC4Q) & (__UINTEGER_32)(~ a__SC4Q)),((__POINTER )(&(table_type[(t__JQZQ)]))),(__UINTEGER_32)(t__JQZQ |  1));
      };
      result__5EAC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__AFAC);
      *(result__5EAC) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
    };
    Self__CNOC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__5EAC);
    Self__CNOC->item__ZALB=Self__JHM;
    Self__CNOC->key__XIJB=__tmp__PIM;
    Self__CNOC->next__CJJB=__tmp__YJJB;
    node__EIJB=result__5EAC;
    ((void **)Self__YHJB->buckets__LIJB)[idx__CIJB]=result__5EAC;
    Self__YHJB->count__LJJB=(__INTEGER)(Self__YHJB->count__LJJB +  1);
  } else {
    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EIJB)->item__ZALB=Self__JHM;
  };
  copy__BNK(string_tmp__4TB,f__VBE);
  file__NHM=((__POINTER )(fopen((char*)(to_external__4YK(string_tmp__4TB)),"rb")));
  fseek((FILE*)((file__NHM)),0,SEEK_END);
  result__HSP=((__INTEGER )(ftell((FILE *)(file__NHM))));
  fseek((FILE*)((file__NHM)),0,SEEK_SET);
  Self__JHM->source__UFD=create__AXB((__INTEGER)(result__HSP +  1));
  __tmp__VIM=Self__JHM->source__UFD;
  ptr__QSP=to_external__4YK(__tmp__VIM);
  fread((void *)((ptr__QSP)),(size_t)(1), (size_t)((result__HSP)),(FILE*)((file__NHM)));
  ((__CHARACTER *)ptr__QSP)[result__HSP]='\0';
  Self__HFT=((__STRING *)__tmp__VIM);
  Self__HFT->count__VF= 0;
  while ((((__CHARACTER *)ptr__QSP)[Self__HFT->count__VF] != '\0')) {
    Self__HFT->count__VF=(__INTEGER)(Self__HFT->count__VF +  1);
  };
  if (((void *)Self__HFT->storage__XNK != (void *)ptr__QSP)) {
    Self__HFT->storage__XNK=ptr__QSP;
    Self__HFT->capacity__MNK=(__INTEGER)(Self__HFT->count__VF +  1);
  };
  fclose((FILE*)((file__NHM)));
  result__GHT=NULL;
  ptr__HHT=((__POINTER )(NULL));
  typ_id__MHT= 0;
  sz__JHT=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
  if ((sz__JHT ==  0)) {
    result__GHT=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
  } else {
    typ_id__MHT=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__JHT);
    if ((typ_id__MHT == (__INTEGER)(-  1))) {
      a__YC4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__NQZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__JHT + a__YC4Q) & (__UINTEGER_32)(~ a__YC4Q));
      ptr__HHT=micro_alloc__table__lab__BOI(new_size__NQZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NQZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NQZQ);
    } else {
      t__PQZQ=((__UINTEGER_32 )typ_id__MHT);
      a__2C4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__HHT=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__JHT + a__2C4Q) & (__UINTEGER_32)(~ a__2C4Q)),((__POINTER )(&(table_type[(t__PQZQ)]))),(__UINTEGER_32)(t__PQZQ |  1));
    };
    result__GHT=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__HHT);
    *(result__GHT) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
  };
  Self__ZUJB=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__GHT);
  new_capacity__SYNB=prime_number_ceiling__A4Q( 193);
  Self__ZUJB->buckets__YYNB=create__3DTB(new_capacity__SYNB);
  Self__ZUJB->capacity__AVJB=new_capacity__SYNB;
  Self__ZUJB->count__1YNB= 0;
  Self__JHM->slot_list__3IM=result__GHT;
  Self__JHM->parent_named__QD.parent_itm_object__PD.position__BJM=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__JHM->index__GAH) |  131072));
  return(result__C5E);
}

static __BOOLEAN read_word__NWH(void *st__PWH)
// ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER posold__RWH,idx__SWH;
  __BOOLEAN result__TWH;
  posold__RWH= 0;
  idx__SWH= 0;
  result__TWH=FALSE__;
  if ((! read_space__UAF())) {
    result__TWH=FALSE__;
  } else {
    posold__RWH=position__ZFD;
    idx__SWH= 1;
    while ((! ((idx__SWH > ((__STRING_CONSTANT *)st__PWH)->count__XHB) || (last_character__0OF() != ((__CHARACTER *)((__STRING_CONSTANT *)st__PWH)->storage__C5K)[(__INTEGER)(idx__SWH -  1)])))) {
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      idx__SWH=(__INTEGER)(idx__SWH +  1);
    };
    if ((idx__SWH > ((__STRING_CONSTANT *)st__PWH)->count__XHB)) {
      last_string__V1G=st__PWH;
      result__TWH=TRUE__;
    } else {
      position__ZFD=posold__RWH;
    };
  };
  return(result__TWH);
}

static __BOOLEAN read_target__MWX()
// () With resultNo recursive, No inlinable.
{
  __BOOLEAN result__PWX,__tmp__ZWX;
  result__PWX=FALSE__;
  if (read_word__NWH((&__string_32))) {
    is_good_section__OCE=TRUE__;
    result__PWX=TRUE__;
    __tmp__ZWX=TRUE__;
  } else {
    __tmp__ZWX=FALSE__;
  };
  if ((! __tmp__ZWX)) {
    if (read_cap_identifier__Y45()) {
      if (((void *)at__3WM(variable__OED,(&__string_64)) == (void *)last_string__V1G)) {
        is_good_section__OCE=TRUE__;
        is_found__LGD=TRUE__;
      };
      result__PWX=TRUE__;
    };
  };
  return(result__PWX);
}

static __POSITION current_position__EJG()
// () With resultNo recursive, No inlinable.
{
  __POSITION result__HJG;
  __CHARACTER *__tmp__I15Q;
  result__HJG=((__POSITION ) 0);
  __tmp__I15Q=((__STRING *)source__WFD)->storage__XNK;
  while ((pos_cur__2FD != position__ZFD)) {
    if ((((__CHARACTER *)__tmp__I15Q)[(__INTEGER)(pos_cur__2FD -  1)] == '\n')) {
      pos_col__4FD= 0;
      pos_line__3FD=(__INTEGER)(pos_line__3FD +  1);
    } else {
      pos_col__4FD=(__INTEGER)(pos_col__4FD +  1);
    };
    pos_cur__2FD=(__INTEGER)(pos_cur__2FD +  1);
  };
  if ((pos_line__3FD >  32767)) {
    result__HJG=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ODD)->index__GAH) | ((__UINTEGER_32 )(__INTEGER)(pos_col__4FD <<  9))) |  4294836224LU));
    put_error__text__0AH( 0,(&__string_230));
    put_position__ECH(result__HJG);
    send_error__2FH();
  };
  if ((pos_col__4FD >  255)) {
    result__HJG=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ODD)->index__GAH) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__3FD <<  17))));
    put_error__text__0AH( 0,(&__string_231));
    put_position__ECH(result__HJG);
    send_error__2FH();
  };
  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ODD)->index__GAH) | ((__UINTEGER_32 )(__INTEGER)(pos_col__4FD <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__3FD <<  17)))));
}

static void put_error__text__0AH(__INTEGER type__2AH,void *txt__3AH)
// ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
{
  type_error__4AH=type__2AH;
  ((__STRING *)msg_err__5AH)->count__VF= 0;
  if ((type__2AH ==  0)) {
    append__MOK(msg_err__5AH,(&__string_232));
  };
  if ((type__2AH ==  1)) {
    append__MOK(msg_err__5AH,(&__string_233));
  };
  if ((type__2AH ==  2)) {
    append__MOK(msg_err__5AH,(&__string_234));
  };
  if ((type__2AH ==  3)) {
    append__MOK(msg_err__5AH,(&__string_235));
  };
  append__MOK(msg_err__5AH,txt__3AH);
}

static void put_position__ECH(__POSITION Self__FCH)
// ({POSITION}) VoidNo recursive, No inlinable.
{
  __UINTEGER_32 c__HCH,__tmp__ODH,cols__KCH;
  void *src__NCH;
  __INTEGER pos__GCH,Self__XBI,limit_up__YBI;
  __CHARACTER char__OCH;
  __CHARACTER *__tmp__2D4Q;
  c__HCH= 0;
  char__OCH='\0';
  append__MOK(msg_err__5AH,(&__string_236));
  append_in__Z4H((__UINTEGER_32)(((__UINTEGER_32 )Self__FCH) >>  17),msg_err__5AH);
  append__MOK(msg_err__5AH,(&__string_237));
  append_in__Z4H((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FCH) >>  9) &  255),msg_err__5AH);
  append__MOK(msg_err__5AH,(&__string_238));
  append__MOK(msg_err__5AH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FCH)) &  511)])->parent_named__QD.name__1QB);
  add_last__YPK(msg_err__5AH,'(');
  append__MOK(msg_err__5AH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FCH)) &  511)])->filename__4QB);
  append__MOK(msg_err__5AH,(&__string_239));
  src__NCH=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FCH)) &  511)])->source__UFD;
  pos__GCH= 1;
  __tmp__ODH=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FCH) >>  17) -  1);
  Self__XBI= 1;
  limit_up__YBI=((__INTEGER )__tmp__ODH);
  __tmp__2D4Q=((__STRING *)src__NCH)->storage__XNK;
  while ((Self__XBI <= limit_up__YBI)) {
    while ((((__CHARACTER *)__tmp__2D4Q)[(__INTEGER)(pos__GCH -  1)] != '\n')) {
      pos__GCH=(__INTEGER)(pos__GCH +  1);
    };
    pos__GCH=(__INTEGER)(pos__GCH +  1);
    Self__XBI=(__INTEGER)(Self__XBI +  1);
  };
  ((__STRING *)string_tmp__RB)->count__VF= 0;
  cols__KCH=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FCH) >>  9) &  255);
  while ((! ((pos__GCH > ((__STRING *)src__NCH)->count__VF) || (((__CHARACTER *)((__STRING *)src__NCH)->storage__XNK)[(__INTEGER)(pos__GCH -  1)] == '\n')))) {
    char__OCH=((__CHARACTER *)((__STRING *)src__NCH)->storage__XNK)[(__INTEGER)(pos__GCH -  1)];
    add_last__YPK(msg_err__5AH,char__OCH);
    if ((c__HCH < cols__KCH)) {
      if ((char__OCH == '\t')) {
        add_last__YPK(string_tmp__RB,'\t');
      } else {
        add_last__YPK(string_tmp__RB,' ');
      };
    };
    c__HCH=(__UINTEGER_32)(c__HCH +  1);
    pos__GCH=(__INTEGER)(pos__GCH +  1);
  };
  add_last__YPK(msg_err__5AH,'\n');
  append__MOK(msg_err__5AH,string_tmp__RB);
  append__MOK(msg_err__5AH,(&__string_240));
}

static void send_error__2FH()
// () VoidNo recursive, No inlinable.
{
  put_string__EQD(msg_err__5AH);
  if ((verbose_level__FX !=  0)) {
    put_string__2EG(((__STRING *)msg_err__5AH));
  };
  if (((type_error__4AH !=  2) | is_warning__OBB)) {
    exit(( 1));
  };
}

static __BOOLEAN read_character__EQ3(__CHARACTER ch__GQ3)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__IQ3;
  result__IQ3=FALSE__;
  if ((! read_space__UAF())) {
    result__IQ3=FALSE__;
  } else {
    if ((last_character__0OF() == ch__GQ3)) {
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      result__IQ3=TRUE__;
    };
  };
  return(result__IQ3);
}

static __BOOLEAN read_identifier__OLEB()
// () With resultNo recursive, No inlinable.
{
  __INTEGER posold__SLEB,idx__TLEB;
  __POSITION pos__GQUP;
  __BOOLEAN result__RLEB;
  result__RLEB=FALSE__;
  posold__SLEB= 0;
  idx__TLEB= 0;
  if (((! read_space__UAF()) || (! is_lower__NKHB(last_character__0OF())))) {
    result__RLEB=FALSE__;
  } else {
    posold__SLEB=position__ZFD;
    ((__STRING *)string_tmp__RB)->count__VF= 0;
    while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || (((! is_lower__NKHB(last_character__0OF())) && (! is_digit__EWEB(last_character__0OF()))) && (last_character__0OF() != '_'))))) {
      add_last__YPK(string_tmp__RB,last_character__0OF());
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    };
    if ((((__STRING *)string_tmp__RB)->count__VF !=  0)) {
      idx__TLEB=first_substring_index__GKVE(string_tmp__RB);
      if ((idx__TLEB !=  0)) {
        position__ZFD=(__INTEGER)(posold__SLEB + idx__TLEB);
        pos__GQUP=current_position__EJG();
        put_error__text__0AH( 0,(&__string_241));
        put_position__ECH(pos__GQUP);
        send_error__2FH();
      };
      last_string__V1G=get__QEC(string_tmp__RB);
      result__RLEB=TRUE__;
    };
  };
  return(result__RLEB);
}

static __BOOLEAN read_symbol__5OEB(void *st__BPEB)
// ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER posold__DPEB,j__EPEB;
  __BOOLEAN result__FPEB;
  posold__DPEB= 0;
  j__EPEB= 0;
  result__FPEB=FALSE__;
  if ((! read_space__UAF())) {
    result__FPEB=FALSE__;
  } else {
    posold__DPEB=position__ZFD;
    j__EPEB= 1;
    while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || ((j__EPEB > ((__STRING_CONSTANT *)st__BPEB)->count__XHB) || (last_character__0OF() != ((__CHARACTER *)((__STRING_CONSTANT *)st__BPEB)->storage__C5K)[(__INTEGER)(j__EPEB -  1)]))))) {
      j__EPEB=(__INTEGER)(j__EPEB +  1);
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    };
    if ((j__EPEB > ((__STRING_CONSTANT *)st__BPEB)->count__XHB)) {
      result__FPEB=TRUE__;
    } else {
      position__ZFD=posold__DPEB;
      result__FPEB=FALSE__;
    };
  };
  return(result__FPEB);
}

static __BOOLEAN read_cap_identifier__Y45()
// () With resultNo recursive, No inlinable.
{
  __INTEGER posold__145,idx__245;
  __POSITION pos__WQUP;
  __BOOLEAN result__345;
  posold__145= 0;
  idx__245= 0;
  result__345=FALSE__;
  if (((! read_space__UAF()) || (! is_upper__HXFB(last_character__0OF())))) {
    result__345=FALSE__;
  } else {
    posold__145=position__ZFD;
    ((__STRING *)string_tmp__RB)->count__VF= 0;
    while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || (((! is_upper__HXFB(last_character__0OF())) && (! is_digit__EWEB(last_character__0OF()))) && (last_character__0OF() != '_'))))) {
      add_last__YPK(string_tmp__RB,last_character__0OF());
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    };
    if ((((__STRING *)string_tmp__RB)->count__VF !=  0)) {
      idx__245=first_substring_index__GKVE(string_tmp__RB);
      if ((idx__245 !=  0)) {
        position__ZFD=(__INTEGER)(posold__145 + idx__245);
        pos__WQUP=current_position__EJG();
        put_error__text__0AH( 0,(&__string_241));
        put_position__ECH(pos__WQUP);
        send_error__2FH();
      };
      last_string__V1G=get__QEC(string_tmp__RB);
      result__345=TRUE__;
    };
  };
  return(result__345);
}

static __BOOLEAN read_path__1TGB()
// () With resultNo recursive, No inlinable.
{
  __POSITION pos__YQUP;
  __BOOLEAN result__4TGB;
  result__4TGB=FALSE__;
  ((__STRING *)string_tmp2__ADB)->count__VF= 0;
  if (read_path_expr__TLHB()) {
    append__MOK(string_tmp2__ADB,last_string__V1G);
    while (read_character__EQ3('+')) {
      if ((! read_path_expr__TLHB())) {
        pos__YQUP=current_position__EJG();
        put_error__text__0AH( 0,(&__string_242));
        put_position__ECH(pos__YQUP);
        send_error__2FH();
      };
      append__MOK(string_tmp2__ADB,last_string__V1G);
    };
  };
  if ((((__STRING *)string_tmp2__ADB)->count__VF !=  0)) {
    last_string__V1G=get__QEC(string_tmp2__ADB);
    result__4TGB=TRUE__;
  };
  return(result__4TGB);
}

static __BOOLEAN read_space__UAF()
// () With resultNo recursive, No inlinable.
{
  __INTEGER pos2__ZAF,level_comment__2AF,pos__YAF,posold__XAF;
  __POSITION pos__ISUP;
  __BOOLEAN __tmp__0MF;
  pos2__ZAF= 0;
  level_comment__2AF= 0;
  pos__YAF=position__ZFD;
  posold__XAF=(__INTEGER)(-  1);
  while ((posold__XAF != position__ZFD)) {
    posold__XAF=position__ZFD;
    while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || (((__INTEGER_8 )last_character__0OF()) > ((__INTEGER_8 )' '))))) {
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    };
    if ((position__ZFD < ((__STRING *)source__WFD)->count__VF)) {
      if (((last_character__0OF() == '/') & (((__CHARACTER *)((__STRING *)source__WFD)->storage__XNK)[(__INTEGER)((__INTEGER)(position__ZFD +  1) -  1)] == '/'))) {
        position__ZFD=(__INTEGER)(position__ZFD +  2);
        pos2__ZAF=position__ZFD;
        while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || (last_character__0OF() == '\n')))) {
          position__ZFD=(__INTEGER)(position__ZFD +  1);
        };
      };
    };
    if ((position__ZFD < ((__STRING *)source__WFD)->count__VF)) {
      pos2__ZAF=position__ZFD;
      if (((last_character__0OF() == '/') && (((__CHARACTER *)((__STRING *)source__WFD)->storage__XNK)[(__INTEGER)((__INTEGER)(position__ZFD +  1) -  1)] == '*'))) {
        position__ZFD=(__INTEGER)(position__ZFD +  2);
        level_comment__2AF= 1;
        while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || (level_comment__2AF ==  0)))) {
          if (((last_character__0OF() == '/') && (((__CHARACTER *)((__STRING *)source__WFD)->storage__XNK)[(__INTEGER)((__INTEGER)(position__ZFD +  1) -  1)] == '*'))) {
            level_comment__2AF=(__INTEGER)(level_comment__2AF +  1);
            position__ZFD=(__INTEGER)(position__ZFD +  2);
            __tmp__0MF=TRUE__;
          } else {
            __tmp__0MF=FALSE__;
          };
          if ((! __tmp__0MF)) {
            if (((last_character__0OF() == '*') && (((__CHARACTER *)((__STRING *)source__WFD)->storage__XNK)[(__INTEGER)((__INTEGER)(position__ZFD +  1) -  1)] == '/'))) {
              level_comment__2AF=(__INTEGER)(level_comment__2AF -  1);
              position__ZFD=(__INTEGER)(position__ZFD +  2);
            } else {
              position__ZFD=(__INTEGER)(position__ZFD +  1);
            };
          };
        };
        if ((level_comment__2AF !=  0)) {
          position__ZFD=pos2__ZAF;
          pos__ISUP=current_position__EJG();
          put_error__text__0AH( 0,(&__string_243));
          put_position__ECH(pos__ISUP);
          send_error__2FH();
        };
      };
    };
  };
  begin_position__SOF=position__ZFD;
  return(((position__ZFD != pos__YAF) | (last_character__0OF() != ((__CHARACTER )(( 0))))));
}

static __CHARACTER last_character__0OF()
// () With resultNo recursive, No inlinable.
{
  __CHARACTER result__3OF;
  result__3OF='\0';
  if ((position__ZFD > ((__STRING *)source__WFD)->count__VF)) {
    result__3OF=((__CHARACTER )(( 0)));
  } else {
    result__3OF=((__CHARACTER *)((__STRING *)source__WFD)->storage__XNK)[(__INTEGER)(position__ZFD -  1)];
  };
  return(result__3OF);
}

static void* at__3WM(__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *Self__4WM,void *k__5WM)
// ({HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *node__JXM;
  node__JXM=((void **)Self__4WM->buckets__SPL)[(__INTEGER)(hash_code__WPN(k__5WM) % Self__4WM->capacity__NPL)];
  while ((! __infix_equal_equal__TKW(((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__JXM)->key__4PL,k__5WM))) {
    node__JXM=((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__JXM)->next__KQL;
  };
  return(((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__JXM)->item__3XM);
}

static void* item__EUU(__LINKED_LISToSTRING_CONSTANTo *Self__FUU,__INTEGER i__GUU)
// ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
{
  if ((i__GUU != Self__FUU->mem_idx__PUU)) {
    if ((Self__FUU->mem_idx__PUU > i__GUU)) {
      Self__FUU->mem_idx__PUU= 1;
      Self__FUU->mem_lnk__YUU=Self__FUU->first_link__5UK;
    };
    while ((i__GUU != Self__FUU->mem_idx__PUU)) {
      Self__FUU->mem_lnk__YUU=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__FUU->mem_lnk__YUU)->next__AT4;
      Self__FUU->mem_idx__PUU=(__INTEGER)(Self__FUU->mem_idx__PUU +  1);
    };
  };
  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__FUU->mem_lnk__YUU)->item__BVK);
}

static void title__in__NHB(void *txt__PHB,void *buf__QHB)
// ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__THC,Self__LIC,Self__0IC;
  append__MOK(buf__QHB,(&__string_3));
  Self__THC= 3;
  while ((Self__THC <=  28)) {
    add_last__YPK(buf__QHB,'=');
    Self__THC=(__INTEGER)(Self__THC +  1);
  };
  append__MOK(buf__QHB,(&__string_4));
  append__MOK(buf__QHB,txt__PHB);
  Self__LIC=(__INTEGER)(((__STRING_CONSTANT *)txt__PHB)->count__XHB +  5);
  while ((Self__LIC <=  28)) {
    add_last__YPK(buf__QHB,' ');
    Self__LIC=(__INTEGER)(Self__LIC +  1);
  };
  append__MOK(buf__QHB,(&__string_6));
  Self__0IC= 3;
  while ((Self__0IC <=  28)) {
    add_last__YPK(buf__QHB,'=');
    Self__0IC=(__INTEGER)(Self__0IC +  1);
  };
  append__MOK(buf__QHB,(&__string_7));
}

static void fast_put__to__SAL(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__TAL,void *v__UAL,void *k__VAL)
// ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXT},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER h__2AL,idx__3AL,idx__C51,new_capacity__D51,i__E51;
  __INTEGER typ_id__TB2;
  __POINTER ptr__OB2;
  __UINTEGER_32 sz__QB2,a__ME4Q,new_size__RRZQ,t__TRZQ,a__QE4Q;
  void *node__ABL,*node1__G51,*node2__H51,*__tmp__UCL;
  void **old_buckets__F51;
  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__NB2;
  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__ZWKB;
  h__2AL=hash_code__WPN(k__VAL);
  idx__3AL=(__INTEGER)(h__2AL % Self__TAL->capacity__CBL);
  node__ABL=((void **)Self__TAL->buckets__HBL)[idx__3AL];
  while ((! (((void *)node__ABL == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__ABL)->key__TBL == (void *)k__VAL)))) {
    node__ABL=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__ABL)->next__4BL;
  };
  if (((void *)node__ABL == (void *)NULL)) {
    if ((Self__TAL->capacity__CBL == Self__TAL->count__HCL)) {
      idx__C51= 0;
      node1__G51=NULL;
      node2__H51=NULL;
      old_buckets__F51=Self__TAL->buckets__HBL;
      new_capacity__D51=prime_number_ceiling__A4Q((__INTEGER)(Self__TAL->capacity__CBL +  1));
      Self__TAL->buckets__HBL=create__GJT(new_capacity__D51);
      i__E51=(__INTEGER)(Self__TAL->capacity__CBL -  1);
      Self__TAL->capacity__CBL=new_capacity__D51;
      while ((i__E51 >=  0)) {
        node1__G51=((void **)old_buckets__F51)[i__E51];
        while (((void *)node1__G51 != (void *)NULL)) {
          node2__H51=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__G51)->next__4BL;
          idx__C51=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__G51)->key__TBL) % Self__TAL->capacity__CBL);
          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__G51)->next__4BL=((void **)Self__TAL->buckets__HBL)[idx__C51];
          ((void **)Self__TAL->buckets__HBL)[idx__C51]=node1__G51;
          node1__G51=node2__H51;
        };
        i__E51=(__INTEGER)(i__E51 -  1);
      };
      idx__3AL=(__INTEGER)(h__2AL % Self__TAL->capacity__CBL);
    };
    __tmp__UCL=((void **)Self__TAL->buckets__HBL)[idx__3AL];
    result__NB2=NULL;
    ptr__OB2=((__POINTER )(NULL));
    typ_id__TB2= 0;
    sz__QB2=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
    if ((sz__QB2 ==  0)) {
      result__NB2=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
    } else {
      typ_id__TB2=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__QB2);
      if ((typ_id__TB2 == (__INTEGER)(-  1))) {
        a__ME4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__RRZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__QB2 + a__ME4Q) & (__UINTEGER_32)(~ a__ME4Q));
        ptr__OB2=micro_alloc__table__lab__BOI(new_size__RRZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RRZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__RRZQ);
      } else {
        t__TRZQ=((__UINTEGER_32 )typ_id__TB2);
        a__QE4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__OB2=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__QB2 + a__QE4Q) & (__UINTEGER_32)(~ a__QE4Q)),((__POINTER )(&(table_type[(t__TRZQ)]))),(__UINTEGER_32)(t__TRZQ |  1));
      };
      result__NB2=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__OB2);
      *(result__NB2) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
    };
    Self__ZWKB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__NB2);
    Self__ZWKB->item__AXQ=v__UAL;
    Self__ZWKB->key__TBL=k__VAL;
    Self__ZWKB->next__4BL=__tmp__UCL;
    node__ABL=result__NB2;
    ((void **)Self__TAL->buckets__HBL)[idx__3AL]=result__NB2;
    Self__TAL->count__HCL=(__INTEGER)(Self__TAL->count__HCL +  1);
  } else {
    ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__ABL)->item__AXQ=v__UAL;
  };
}

static __FAST_ARRAYoSLOTo* create_with_capacity__YID(__INTEGER new_count__0ID)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__VFE;
  __INTEGER typ_id__0FE;
  __UINTEGER_32 sz__XFE,a__TE4Q,new_size__VRZQ,t__XRZQ,a__XE4Q;
  __FAST_ARRAYoSLOTo *result__UFE,*Self__4RL;
  result__UFE=NULL;
  ptr__VFE=((__POINTER )(NULL));
  typ_id__0FE= 0;
  sz__XFE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
  if ((sz__XFE ==  0)) {
    result__UFE=FAST_ARRAYoSLOTo__;
  } else {
    typ_id__0FE=__FAST_ARRAYoSLOTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__XFE);
    if ((typ_id__0FE == (__INTEGER)(-  1))) {
      a__TE4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__VRZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__XFE + a__TE4Q) & (__UINTEGER_32)(~ a__TE4Q));
      ptr__VFE=micro_alloc__table__lab__BOI(new_size__VRZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VRZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__VRZQ);
    } else {
      t__XRZQ=((__UINTEGER_32 )typ_id__0FE);
      a__XE4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__VFE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__XFE + a__XE4Q) & (__UINTEGER_32)(~ a__XE4Q)),((__POINTER )(&(table_type[(t__XRZQ)]))),(__UINTEGER_32)(t__XRZQ |  1));
    };
    result__UFE=((__FAST_ARRAYoSLOTo *)ptr__VFE);
    *(result__UFE) = *(FAST_ARRAYoSLOTo__);
  };
  Self__4RL=((__FAST_ARRAYoSLOTo *)result__UFE);
  if ((Self__4RL->parent_arrayed_collection__ZJC.capacity__HSL < new_count__0ID)) {
    Self__4RL->parent_arrayed_collection__ZJC.storage__SSL=create__IRSB(new_count__0ID);
    Self__4RL->parent_arrayed_collection__ZJC.capacity__HSL=new_count__0ID;
  };
  Self__4RL->parent_arrayed_collection__ZJC.upper__WSL=(__INTEGER)(-  1);
  return(result__UFE);
}

static __TYPE_FULL* create__with__VJD(void *typ__XJD,__UINTEGER_8 code__YJD)
// ({TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{UINTEGER_8}) With resultNo recursive, No inlinable.
{
  __TYPE_FULL *result__AIE,*Self__HTL;
  __POINTER ptr__BIE;
  __INTEGER typ_id__GIE;
  __UINTEGER_32 sz__DIE,a__0E4Q,new_size__ZRZQ,t__1RZQ,a__4E4Q;
  result__AIE=NULL;
  ptr__BIE=((__POINTER )(NULL));
  typ_id__GIE= 0;
  sz__DIE=((__UINTEGER_32 )sizeof(__TYPE_FULL));
  if ((sz__DIE ==  0)) {
    result__AIE=TYPE_FULL__;
  } else {
    typ_id__GIE=__TYPE_FULL__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__DIE);
    if ((typ_id__GIE == (__INTEGER)(-  1))) {
      a__0E4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__ZRZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__DIE + a__0E4Q) & (__UINTEGER_32)(~ a__0E4Q));
      ptr__BIE=micro_alloc__table__lab__BOI(new_size__ZRZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZRZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__ZRZQ);
    } else {
      t__1RZQ=((__UINTEGER_32 )typ_id__GIE);
      a__4E4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__BIE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__DIE + a__4E4Q) & (__UINTEGER_32)(~ a__4E4Q)),((__POINTER )(&(table_type[(t__1RZQ)]))),(__UINTEGER_32)(t__1RZQ |  1));
    };
    result__AIE=((__TYPE_FULL *)ptr__BIE);
    *(result__AIE) = *(TYPE_FULL__);
  };
  Self__HTL=((__TYPE_FULL *)result__AIE);
  Self__HTL->parent_type__KTL=typ__XJD;
  Self__HTL->flag__LTL=code__YJD;
  return(result__AIE);
}

static void** create__WD2(__INTEGER nb_elements__YD2)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__M4PB;
  void **Result__JB5;
  Result__JB5=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__YD2 * ((__INTEGER )(sizeof(void *)))))));
  Self__M4PB=(__INTEGER)(nb_elements__YD2 -  1);
  while ((Self__M4PB >=  0)) {
    Result__JB5[Self__M4PB]=NULL;
    Self__M4PB=(__INTEGER)(Self__M4PB -  1);
  };
  return(Result__JB5);
}

static __TYPE_ID* create__WKD(__INTEGER i__YKD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __TYPE_ID *result__BLE,*Self__2UL;
  __POINTER ptr__CLE;
  __INTEGER typ_id__HLE;
  __UINTEGER_32 sz__ELE,a__EF4Q,new_size__3RZQ,t__5RZQ,a__IF4Q;
  result__BLE=NULL;
  ptr__CLE=((__POINTER )(NULL));
  typ_id__HLE= 0;
  sz__ELE=((__UINTEGER_32 )sizeof(__TYPE_ID));
  if ((sz__ELE ==  0)) {
    result__BLE=TYPE_ID__;
  } else {
    typ_id__HLE=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ELE);
    if ((typ_id__HLE == (__INTEGER)(-  1))) {
      a__EF4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__3RZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__ELE + a__EF4Q) & (__UINTEGER_32)(~ a__EF4Q));
      ptr__CLE=micro_alloc__table__lab__BOI(new_size__3RZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3RZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3RZQ);
    } else {
      t__5RZQ=((__UINTEGER_32 )typ_id__HLE);
      a__IF4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__CLE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ELE + a__IF4Q) & (__UINTEGER_32)(~ a__IF4Q)),((__POINTER )(&(table_type[(t__5RZQ)]))),(__UINTEGER_32)(t__5RZQ |  1));
    };
    result__BLE=((__TYPE_ID *)ptr__CLE);
    *(result__BLE) = *(TYPE_ID__);
  };
  Self__2UL=((__TYPE_ID *)result__BLE);
  Self__2UL->parent_type__WIB.index__LJC=i__YKD;
  Self__2UL->parent_type__WIB.default__AKC=create__with__VJD(Self__2UL, 0);
  return(result__BLE);
}

static void add_last__IDL(__FAST_ARRAYoTYPE_IDo *Self__JDL,void *element__KDL)
// ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__LDL,__tmp__UEL,__tmp__4YKB,Self__I2QC;
  __BOOLEAN __tmp__1DL;
  void **__tmp__TEL,**new__LYKB;
  new_capacity__LDL= 0;
  if (((__INTEGER)(Self__JDL->parent_arrayed_collection__WKC.upper__MDL +  1) <= (__INTEGER)(Self__JDL->parent_arrayed_collection__WKC.capacity__ODL -  1))) {
    Self__JDL->parent_arrayed_collection__WKC.upper__MDL=(__INTEGER)(Self__JDL->parent_arrayed_collection__WKC.upper__MDL +  1);
    __tmp__1DL=TRUE__;
  } else {
    __tmp__1DL=FALSE__;
  };
  if ((! __tmp__1DL)) {
    if ((Self__JDL->parent_arrayed_collection__WKC.capacity__ODL ==  0)) {
      Self__JDL->parent_arrayed_collection__WKC.storage__KEL=create__WD2( 2);
      Self__JDL->parent_arrayed_collection__WKC.capacity__ODL= 2;
      Self__JDL->parent_arrayed_collection__WKC.upper__MDL= 0;
    } else {
      new_capacity__LDL=(__INTEGER)(Self__JDL->parent_arrayed_collection__WKC.capacity__ODL <<  1);
      __tmp__TEL=Self__JDL->parent_arrayed_collection__WKC.storage__KEL;
      __tmp__UEL=Self__JDL->parent_arrayed_collection__WKC.capacity__ODL;
      new__LYKB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__TEL)),((__UINTEGER_32 )(__INTEGER)(__tmp__UEL * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__LDL * ((__INTEGER )(sizeof(void *)))))));
      __tmp__4YKB=(__INTEGER)(new_capacity__LDL -  1);
      Self__I2QC=__tmp__UEL;
      while ((Self__I2QC <= __tmp__4YKB)) {
        new__LYKB[Self__I2QC]=NULL;
        Self__I2QC=(__INTEGER)(Self__I2QC +  1);
      };
      Self__JDL->parent_arrayed_collection__WKC.storage__KEL=new__LYKB;
      Self__JDL->parent_arrayed_collection__WKC.capacity__ODL=new_capacity__LDL;
      Self__JDL->parent_arrayed_collection__WKC.upper__MDL=(__INTEGER)(Self__JDL->parent_arrayed_collection__WKC.upper__MDL +  1);
    };
  };
  ((void **)Self__JDL->parent_arrayed_collection__WKC.storage__KEL)[Self__JDL->parent_arrayed_collection__WKC.upper__MDL]=element__KDL;
}

static void* to_run__XVK(__ITM_TYPE_SIMPLE *Self__YVK)
// ({ITM_TYPE_SIMPLE}) With resultRecursive, No inlinable.
{
  void *__tmp__0VK;
  __tmp__0VK=get__XUN(Self__YVK);
  Self__YVK->to_run__1VK=__tmp__0VK;
  Self__YVK->to_run__2VK=0;
  return(__tmp__0VK);
}

static void* to_run__MPXD()
// () With resultNo recursive, No inlinable.
{
  __POSITION pos__52ME;
  if (((void *)run_value__FMQC == (void *)NULL)) {
    pos__52ME=last_position__GG1;
    put_error__text__0AH( 1,(&__string_244));
    put_position__ECH(pos__52ME);
    send_error__2FH();
  };
  return(run_value__FMQC);
}

static void* get__style__VLC(void *n__XLC,void *s__YLC)
// ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__0LC;
  __INTEGER idx__1LC,__tmp__RF4Q,typ_id__5NV,new_capacity__YXR;
  __INTEGER __tmp__2YR,__tmp__4PLB,Self__FCRC;
  __ITM_TYPE_STYLE *result__ZNV,*Self__SZJB;
  __POINTER ptr__0NV;
  __UINTEGER_32 sz__2NV,a__TF4Q,new_size__BSZQ,t__DSZQ,a__XF4Q;
  void **__tmp__J15Q,**__tmp__K15Q,**__tmp__1YR,**new__LPLB;
  __FAST_ARRAYoITM_TYPE_STYLEo *Self__WXR;
  __BOOLEAN __tmp__GYR;
  result__0LC=NULL;
  idx__1LC= 0;
  __tmp__RF4Q=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BMC)->parent_arrayed_collection__AMC.upper__KMC;
  __tmp__J15Q=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BMC)->parent_arrayed_collection__AMC.storage__2KM;
  __tmp__K15Q=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BMC)->parent_arrayed_collection__AMC.storage__2KM;
  while (((idx__1LC <= __tmp__RF4Q) && (((void *)((__ITM_TYPE_STYLE *)((void **)__tmp__J15Q)[idx__1LC])->parent_itm_type_simple__3IB.name__UMC != (void *)n__XLC) || ((void *)((__ITM_TYPE_STYLE *)((void **)__tmp__K15Q)[idx__1LC])->style__3MC != (void *)s__YLC)))) {
    idx__1LC=(__INTEGER)(idx__1LC +  1);
  };
  if ((idx__1LC <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BMC)->parent_arrayed_collection__AMC.upper__KMC)) {
    result__0LC=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BMC)->parent_arrayed_collection__AMC.storage__2KM)[idx__1LC];
  } else {
    result__ZNV=NULL;
    ptr__0NV=((__POINTER )(NULL));
    typ_id__5NV= 0;
    sz__2NV=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
    if ((sz__2NV ==  0)) {
      result__ZNV=ITM_TYPE_STYLE__;
    } else {
      typ_id__5NV=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__2NV);
      if ((typ_id__5NV == (__INTEGER)(-  1))) {
        a__TF4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__BSZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__2NV + a__TF4Q) & (__UINTEGER_32)(~ a__TF4Q));
        ptr__0NV=micro_alloc__table__lab__BOI(new_size__BSZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BSZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__BSZQ);
      } else {
        t__DSZQ=((__UINTEGER_32 )typ_id__5NV);
        a__XF4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__0NV=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__2NV + a__XF4Q) & (__UINTEGER_32)(~ a__XF4Q)),((__POINTER )(&(table_type[(t__DSZQ)]))),(__UINTEGER_32)(t__DSZQ |  1));
      };
      result__ZNV=((__ITM_TYPE_STYLE *)ptr__0NV);
      *(result__ZNV) = *(ITM_TYPE_STYLE__);
    };
    Self__SZJB=((__ITM_TYPE_STYLE *)result__ZNV);
    Self__SZJB->parent_itm_type_simple__3IB.name__UMC=n__XLC;
    Self__SZJB->style__3MC=s__YLC;
    result__0LC=result__ZNV;
    Self__WXR=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BMC);
    new_capacity__YXR= 0;
    if (((__INTEGER)(Self__WXR->parent_arrayed_collection__AMC.upper__KMC +  1) <= (__INTEGER)(Self__WXR->parent_arrayed_collection__AMC.capacity__RKM -  1))) {
      Self__WXR->parent_arrayed_collection__AMC.upper__KMC=(__INTEGER)(Self__WXR->parent_arrayed_collection__AMC.upper__KMC +  1);
      __tmp__GYR=TRUE__;
    } else {
      __tmp__GYR=FALSE__;
    };
    if ((! __tmp__GYR)) {
      if ((Self__WXR->parent_arrayed_collection__AMC.capacity__RKM ==  0)) {
        Self__WXR->parent_arrayed_collection__AMC.storage__2KM=create__GRBB( 2);
        Self__WXR->parent_arrayed_collection__AMC.capacity__RKM= 2;
        Self__WXR->parent_arrayed_collection__AMC.upper__KMC= 0;
      } else {
        new_capacity__YXR=(__INTEGER)(Self__WXR->parent_arrayed_collection__AMC.capacity__RKM <<  1);
        __tmp__1YR=Self__WXR->parent_arrayed_collection__AMC.storage__2KM;
        __tmp__2YR=Self__WXR->parent_arrayed_collection__AMC.capacity__RKM;
        new__LPLB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__1YR)),((__UINTEGER_32 )(__INTEGER)(__tmp__2YR * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__YXR * ((__INTEGER )(sizeof(void *)))))));
        __tmp__4PLB=(__INTEGER)(new_capacity__YXR -  1);
        Self__FCRC=__tmp__2YR;
        while ((Self__FCRC <= __tmp__4PLB)) {
          new__LPLB[Self__FCRC]=NULL;
          Self__FCRC=(__INTEGER)(Self__FCRC +  1);
        };
        Self__WXR->parent_arrayed_collection__AMC.storage__2KM=new__LPLB;
        Self__WXR->parent_arrayed_collection__AMC.capacity__RKM=new_capacity__YXR;
        Self__WXR->parent_arrayed_collection__AMC.upper__KMC=(__INTEGER)(Self__WXR->parent_arrayed_collection__AMC.upper__KMC +  1);
      };
    };
    ((void **)Self__WXR->parent_arrayed_collection__AMC.storage__2KM)[Self__WXR->parent_arrayed_collection__AMC.upper__KMC]=result__ZNV;
  };
  return(result__0LC);
}

static void* get__XUN(void *itm_typ__ZUN)
// ({ITM_TYPE_SIMPLExITM_TYPE_STYLE}) With resultRecursive, No inlinable.
{
  void *result__1UN,*__tmp__UVN,*__tmp__AWN,*__tmp__IWN;
  void *__tmp__5UN,*k__WVQ,*__tmp__JVN,*__tmp__TNY,*n__PC1,*__tmp__OVN;
  void *result__AWQ,*base__2UN;
  __TYPE *result__CMY,*Self__LNY;
  __POINTER ptr__DMY,entry__TC1;
  __INTEGER typ_id__IMY,j__SC1,__tmp__2D1,Self__GX1B;
  __UINTEGER_32 sz__FMY,a__3F4Q,new_size__FSZQ,t__HSZQ,a__BG4Q;
  void *result__VC1;
  __STRING_CONSTANT *Self__T2XD;
  __TYPE_FULL *Self__5CHQ,*Self__BDHQ;
  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__VVQ;
  void *node__5VQ;
  __UINTEGER_8 mask_bit__NNY;
  __BOOLEAN __tmp__GOY;
  result__1UN=NULL;
  if (((struct ___OBJ *)itm_typ__ZUN)->__id==__ITM_TYPE_SIMPLE__) {
    __tmp__5UN=((__ITM_TYPE_SIMPLE *)itm_typ__ZUN)->name__UMC;
  } else {
    __tmp__5UN=((__ITM_TYPE_STYLE *)itm_typ__ZUN)->parent_itm_type_simple__3IB.name__UMC;
  };
  Self__VVQ=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)dico_type__RJC);
  k__WVQ=__tmp__5UN;
  result__AWQ=NULL;
  node__5VQ=((void **)Self__VVQ->buckets__HBL)[(__INTEGER)(hash_code__WPN(__tmp__5UN) % Self__VVQ->capacity__CBL)];
  while ((! (((void *)node__5VQ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__5VQ)->key__TBL == (void *)k__WVQ)))) {
    node__5VQ=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__5VQ)->next__4BL;
  };
  if (((void *)node__5VQ != (void *)NULL)) {
    result__AWQ=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__5VQ)->item__AXQ;
  };
  base__2UN=result__AWQ;
  if (((void *)result__AWQ == (void *)NULL)) {
    result__CMY=NULL;
    ptr__DMY=((__POINTER )(NULL));
    typ_id__IMY= 0;
    sz__FMY=((__UINTEGER_32 )sizeof(__TYPE));
    if ((sz__FMY ==  0)) {
      result__CMY=TYPE__;
    } else {
      typ_id__IMY=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__FMY);
      if ((typ_id__IMY == (__INTEGER)(-  1))) {
        a__3F4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__FSZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__FMY + a__3F4Q) & (__UINTEGER_32)(~ a__3F4Q));
        ptr__DMY=micro_alloc__table__lab__BOI(new_size__FSZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FSZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__FSZQ);
      } else {
        t__HSZQ=((__UINTEGER_32 )typ_id__IMY);
        a__BG4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__DMY=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__FMY + a__BG4Q) & (__UINTEGER_32)(~ a__BG4Q)),((__POINTER )(&(table_type[(t__HSZQ)]))),(__UINTEGER_32)(t__HSZQ |  1));
      };
      result__CMY=((__TYPE *)ptr__DMY);
      *(result__CMY) = *(TYPE__);
    };
    base__2UN=result__CMY;
    if (((struct ___OBJ *)itm_typ__ZUN)->__id==__ITM_TYPE_SIMPLE__) {
      __tmp__JVN=((__ITM_TYPE_SIMPLE *)itm_typ__ZUN)->name__UMC;
    } else {
      __tmp__JVN=((__ITM_TYPE_STYLE *)itm_typ__ZUN)->parent_itm_type_simple__3IB.name__UMC;
    };
    fast_put__to__SAL(dico_type__RJC,result__CMY,__tmp__JVN);
    Self__LNY=((__TYPE *)result__CMY);
    mask_bit__NNY= 0;
    Self__LNY->index__LJC=index_count__JJC;
    index_count__JJC=(__INTEGER)(index_count__JJC +  1);
    if (((struct ___OBJ *)itm_typ__ZUN)->__id==__ITM_TYPE_SIMPLE__) {
      __tmp__TNY=((__ITM_TYPE_SIMPLE *)itm_typ__ZUN)->name__UMC;
    } else {
      __tmp__TNY=((__ITM_TYPE_STYLE *)itm_typ__ZUN)->parent_itm_type_simple__3IB.name__UMC;
    };
    n__PC1=__tmp__TNY;
    j__SC1= 0;
    entry__TC1=((__POINTER )(NULL));
    result__VC1=fast_reference_at__N5KB(prototype_dico__XHM,__tmp__TNY);
    if (((void *)result__VC1 == (void *)NULL)) {
      j__SC1= 1;
      ((__STRING *)string_tmp2__ADB)->count__VF= 0;
      while ((! ((j__SC1 > ((__LINKED_LISToSTRING_CONSTANTo *)path_directory__EC)->parent_linked_collection__DC.upper__JC) || ((void *)result__VC1 != (void *)NULL)))) {
        copy__BNK(string_tmp__RB,item__EUU(path_directory__EC,j__SC1));
        __tmp__2D1=((__STRING_CONSTANT *)n__PC1)->count__XHB;
        Self__GX1B= 1;
        while ((Self__GX1B <= __tmp__2D1)) {
          add_last__YPK(string_tmp__RB,to_lower__OA1(((__CHARACTER *)((__STRING_CONSTANT *)n__PC1)->storage__C5K)[(__INTEGER)(Self__GX1B -  1)]));
          Self__GX1B=(__INTEGER)(Self__GX1B +  1);
        };
        append__MOK(string_tmp__RB,(&__string_245));
        append__MOK(string_tmp2__ADB,string_tmp__RB);
        add_last__YPK(string_tmp2__ADB,'\n');
        copy__BNK(string_tmp__4TB,string_tmp__RB);
        entry__TC1=((__POINTER )(fopen((char*)(to_external__4YK(string_tmp__4TB)),"rb")));
        if ((entry__TC1 != (void *)NULL)) {
          fclose((FILE*)((entry__TC1)));
          result__VC1=create__name__generic_count__TBE(get__QEC(string_tmp__RB),n__PC1, 0);
          go_on__55AC(result__VC1);
        };
        j__SC1=(__INTEGER)(j__SC1 +  1);
      };
      if (((void *)result__VC1 == (void *)NULL)) {
        copy__BNK(string_tmp__RB,__tmp__TNY);
        append__MOK(string_tmp__RB,(&__string_246));
        append__MOK(string_tmp__RB,string_tmp2__ADB);
        put_error__text__0AH( 1,string_tmp__RB);
        if (((void *)list_current__IF1 != (void *)NULL)) {
          put_position__ECH(((__LIST *)list_current__IF1)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
        };
        send_error__2FH();
      };
    } else {
      if ((((__PROTOTYPE *)result__VC1)->generic_count__DIM !=  0)) {
        put_error__text__0AH( 1,(&__string_247));
        put_position__ECH(((__PROTOTYPE *)result__VC1)->parent_named__QD.parent_itm_object__PD.position__BJM);
        if ((((__UINTEGER_32 )last_position__GG1) !=  0)) {
          put_position__ECH(last_position__GG1);
        };
        send_error__2FH();
      };
    };
    Self__LNY->prototype__RD=result__VC1;
    Self__LNY->slot_run__1JC=create_with_capacity__YID( 10);
    if (((void *)((__PROTOTYPE *)Self__LNY->prototype__RD)->type_style__ZNY == (void *)(&__string_13))) {
      mask_bit__NNY= 3;
      __tmp__GOY=TRUE__;
    } else {
      __tmp__GOY=FALSE__;
    };
    if ((! __tmp__GOY)) {
      if (((void *)((__PROTOTYPE *)Self__LNY->prototype__RD)->type_style__ZNY == (void *)(&__string_14))) {
        mask_bit__NNY= 12;
      };
    };
    Self__LNY->default__AKC=create__with__VJD(Self__LNY,mask_bit__NNY);
    init_slot_for__1QMC(Self__LNY->prototype__RD,Self__LNY);
    Self__LNY->subtype_list__APY=create__1H1();
    fast_add__OQKB(Self__LNY->subtype_list__APY,TYPE_NULL__);
    add_subtype__BI1(Self__LNY,Self__LNY);
    if ((((__INTEGER )(sizeof(void *))) ==  4)) {
      Self__LNY->size__JPY= 2;
    } else {
      Self__LNY->size__JPY= 3;
    };
    Self__T2XD=((__STRING_CONSTANT *)((__PROTOTYPE *)Self__LNY->prototype__RD)->parent_named__QD.name__1QB);
    if (((void *)Self__T2XD == (void *)(&__string_33))) {
      Self__LNY->size__JPY= 2;
    };
    if ((((void *)Self__T2XD == (void *)(&__string_54)) || ((void *)Self__T2XD == (void *)(&__string_50)))) {
      Self__LNY->size__JPY= 0;
    };
    if ((((void *)Self__T2XD == (void *)(&__string_35)) || ((void *)Self__T2XD == (void *)(&__string_40)))) {
      Self__LNY->size__JPY= 0;
    };
    if ((((void *)Self__T2XD == (void *)(&__string_53)) || ((void *)Self__T2XD == (void *)(&__string_49)))) {
      Self__LNY->size__JPY= 1;
    };
    if ((((void *)Self__T2XD == (void *)(&__string_52)) || ((void *)Self__T2XD == (void *)(&__string_48)))) {
      Self__LNY->size__JPY= 2;
    };
    if ((((void *)Self__T2XD == (void *)(&__string_51)) || ((void *)Self__T2XD == (void *)(&__string_47)))) {
      Self__LNY->size__JPY= 3;
    };
  };
  if (((struct ___OBJ *)itm_typ__ZUN)->__id==__ITM_TYPE_SIMPLE__) {
    __tmp__OVN=NULL;
  } else {
    __tmp__OVN=((__ITM_TYPE_STYLE *)itm_typ__ZUN)->style__3MC;
  };
  if (((void *)__tmp__OVN == (void *)NULL)) {
    switch (((struct ___OBJ *)base__2UN)->__id) {
    case __TYPE__: {
      __tmp__UVN=((__TYPE *)base__2UN)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__UVN=((__TYPE_NULL *)base__2UN)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__UVN=((__TYPE_VOID *)base__2UN)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__UVN=((__TYPE_CONTEXT *)base__2UN)->parent_type__VIB.default__AKC;
    } break;
    };
    result__1UN=__tmp__UVN;
  } else {
    if (((void *)__tmp__OVN == (void *)(&__string_13))) {
      switch (((struct ___OBJ *)base__2UN)->__id) {
      case __TYPE__: {
        __tmp__AWN=((__TYPE *)base__2UN)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__AWN=((__TYPE_NULL *)base__2UN)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__AWN=((__TYPE_VOID *)base__2UN)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__AWN=((__TYPE_CONTEXT *)base__2UN)->parent_type__VIB.default__AKC;
      } break;
      };
      Self__5CHQ=((__TYPE_FULL *)__tmp__AWN);
      result__1UN=get_with__HSAB(Self__5CHQ,(__UINTEGER_8)(Self__5CHQ->flag__LTL |  1));
    } else {
      switch (((struct ___OBJ *)base__2UN)->__id) {
      case __TYPE__: {
        __tmp__IWN=((__TYPE *)base__2UN)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__IWN=((__TYPE_NULL *)base__2UN)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__IWN=((__TYPE_VOID *)base__2UN)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__IWN=((__TYPE_CONTEXT *)base__2UN)->parent_type__VIB.default__AKC;
      } break;
      };
      Self__BDHQ=((__TYPE_FULL *)__tmp__IWN);
      result__1UN=get_with__HSAB(Self__BDHQ,(__UINTEGER_8)(Self__BDHQ->flag__LTL |  4));
    };
  };
  return(result__1UN);
}

static void* new__JOC()
// () With resultNo recursive, No inlinable.
{
  void *result__MOC;
  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__E1R,*Self__01R;
  result__MOC=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SOC)->parent_arrayed_collection__ROC.upper__WIL <  0)) {
    result__MOC=create_with_capacity__L0F( 16);
  } else {
    Self__E1R=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SOC);
    result__MOC=((void **)Self__E1R->parent_arrayed_collection__ROC.storage__CZL)[Self__E1R->parent_arrayed_collection__ROC.upper__WIL];
    Self__01R=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SOC);
    Self__01R->parent_arrayed_collection__ROC.upper__WIL=(__INTEGER)(Self__01R->parent_arrayed_collection__ROC.upper__WIL -  1);
  };
  return(result__MOC);
}

static void add_last__3VK(__FAST_ARRAYoITM_TYPE_MONOo *Self__4VK,void *element__5VK)
// ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_SIMPLExITM_TYPE_STYLExITM_TYPE_GENERICxITM_TYPE_SELFxITM_TYPE_GENERIC_ELT}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__AWK,__tmp__JXK,__tmp__IVKB,Self__J0QC;
  __BOOLEAN __tmp__QWK;
  void **__tmp__IXK,**new__VUKB;
  new_capacity__AWK= 0;
  if (((__INTEGER)(Self__4VK->parent_arrayed_collection__PIB.upper__BWK +  1) <= (__INTEGER)(Self__4VK->parent_arrayed_collection__PIB.capacity__DWK -  1))) {
    Self__4VK->parent_arrayed_collection__PIB.upper__BWK=(__INTEGER)(Self__4VK->parent_arrayed_collection__PIB.upper__BWK +  1);
    __tmp__QWK=TRUE__;
  } else {
    __tmp__QWK=FALSE__;
  };
  if ((! __tmp__QWK)) {
    if ((Self__4VK->parent_arrayed_collection__PIB.capacity__DWK ==  0)) {
      Self__4VK->parent_arrayed_collection__PIB.storage__5WK=create__LK1( 2);
      Self__4VK->parent_arrayed_collection__PIB.capacity__DWK= 2;
      Self__4VK->parent_arrayed_collection__PIB.upper__BWK= 0;
    } else {
      new_capacity__AWK=(__INTEGER)(Self__4VK->parent_arrayed_collection__PIB.capacity__DWK <<  1);
      __tmp__IXK=Self__4VK->parent_arrayed_collection__PIB.storage__5WK;
      __tmp__JXK=Self__4VK->parent_arrayed_collection__PIB.capacity__DWK;
      new__VUKB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__IXK)),((__UINTEGER_32 )(__INTEGER)(__tmp__JXK * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__AWK * ((__INTEGER )(sizeof(void *)))))));
      __tmp__IVKB=(__INTEGER)(new_capacity__AWK -  1);
      Self__J0QC=__tmp__JXK;
      while ((Self__J0QC <= __tmp__IVKB)) {
        new__VUKB[Self__J0QC]=NULL;
        Self__J0QC=(__INTEGER)(Self__J0QC +  1);
      };
      Self__4VK->parent_arrayed_collection__PIB.storage__5WK=new__VUKB;
      Self__4VK->parent_arrayed_collection__PIB.capacity__DWK=new_capacity__AWK;
      Self__4VK->parent_arrayed_collection__PIB.upper__BWK=(__INTEGER)(Self__4VK->parent_arrayed_collection__PIB.upper__BWK +  1);
    };
  };
  ((void **)Self__4VK->parent_arrayed_collection__PIB.storage__5WK)[Self__4VK->parent_arrayed_collection__PIB.upper__BWK]=element__5VK;
}

static void* alias__EPC(void *tmp__GPC)
// ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__1UMC,i__BNHE,new_capacity__EOM,other_upper__DOM;
  __INTEGER Self__UROB,h__FPM,idx__GPM,idx__XI3,new_capacity__YI3;
  __INTEGER i__WI3,typ_id__SG0;
  __POINTER ptr__NG0;
  __UINTEGER_32 sz__PG0,a__AH4Q,new_size__KSZQ,t__MSZQ,a__EH4Q;
  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__GJL,*Self__3OM;
  void *result__0JL,*result__IPC,*e__4OM;
  void *node__ZJL,*node__HPM,*node1__0I3,*node2__1I3,*__tmp__XQM;
  __BOOLEAN __tmp__SKL,result__ZTMC;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__WTMC,*o__0TMC,*__tmp__GUMC;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__BOM;
  void **__tmp__WUMC,**__tmp__YUMC,**Self__NMHE,**__tmp__XOM,**__tmp__ZOM;
  void **Self__OBKB;
  void **old_buckets__ZI3;
  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__MG0,*Self__MMKB;
  Self__GJL=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__NPC);
  result__0JL=NULL;
  node__ZJL=((void **)Self__GJL->buckets__BKL)[(__INTEGER)(hash_code__GQO(tmp__GPC) % Self__GJL->capacity__2JL)];
  until_do__ORO:
  {
    if (((void *)node__ZJL == (void *)NULL)) {
      __tmp__SKL=TRUE__;
    } else {
      Self__WTMC=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__ZJL)->item__NKL);
      result__ZTMC=FALSE__;
      o__0TMC=NULL;
      if (((void *)Self__WTMC == (void *)tmp__GPC)) {
        result__ZTMC=TRUE__;
      } else {
        if (tmp__GPC==NULL) {
          __tmp__GUMC=NULL;
        } else {
          __tmp__GUMC=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__GPC);
        };
        o__0TMC=__tmp__GUMC;
        if ((((void *)__tmp__GUMC != (void *)NULL) && (Self__WTMC->parent_arrayed_collection__PIB.upper__BWK == __tmp__GUMC->parent_arrayed_collection__PIB.upper__BWK))) {
          __tmp__WUMC=Self__WTMC->parent_arrayed_collection__PIB.storage__5WK;
          __tmp__YUMC=__tmp__GUMC->parent_arrayed_collection__PIB.storage__5WK;
          __tmp__1UMC=(__INTEGER)(Self__WTMC->parent_arrayed_collection__PIB.upper__BWK +  1);
          Self__NMHE=((void **)__tmp__WUMC);
          i__BNHE=(__INTEGER)(__tmp__1UMC -  1);
          while (((i__BNHE >=  0) && ((void *)Self__NMHE[i__BNHE] == (void *)((void **)__tmp__YUMC)[i__BNHE]))) {
            i__BNHE=(__INTEGER)(i__BNHE -  1);
          };
          result__ZTMC=(i__BNHE <  0);
        };
      };
      __tmp__SKL=result__ZTMC;
    };
    if ((! __tmp__SKL)) {
      node__ZJL=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__ZJL)->next__ZKL;
      goto until_do__ORO;
    };
  };
  if (((void *)node__ZJL != (void *)NULL)) {
    result__0JL=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__ZJL)->item__NKL;
  };
  result__IPC=result__0JL;
  if (((void *)result__0JL == (void *)NULL)) {
    result__IPC=create_with_capacity__L0F((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__GPC)->parent_arrayed_collection__PIB.upper__BWK +  1));
    Self__BOM=((__FAST_ARRAYoITM_TYPE_MONOo *)result__IPC);
    new_capacity__EOM= 0;
    other_upper__DOM=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__GPC)->parent_arrayed_collection__PIB.upper__BWK;
    if ((other_upper__DOM >=  0)) {
      new_capacity__EOM=(__INTEGER)(other_upper__DOM +  1);
      if ((Self__BOM->parent_arrayed_collection__PIB.capacity__DWK < new_capacity__EOM)) {
        Self__BOM->parent_arrayed_collection__PIB.storage__5WK=create__LK1(new_capacity__EOM);
        Self__BOM->parent_arrayed_collection__PIB.capacity__DWK=new_capacity__EOM;
      };
      __tmp__XOM=Self__BOM->parent_arrayed_collection__PIB.storage__5WK;
      __tmp__ZOM=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__GPC)->parent_arrayed_collection__PIB.storage__5WK;
      Self__OBKB=((void **)__tmp__XOM);
      Self__UROB=other_upper__DOM;
      while ((Self__UROB >=  0)) {
        Self__OBKB[Self__UROB]=((void **)__tmp__ZOM)[Self__UROB];
        Self__UROB=(__INTEGER)(Self__UROB -  1);
      };
    };
    Self__BOM->parent_arrayed_collection__PIB.upper__BWK=other_upper__DOM;
    Self__3OM=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__NPC);
    e__4OM=result__IPC;
    fast_has__O5P(Self__3OM,result__IPC);
    fast_has__O5P(Self__3OM,result__IPC);
    h__FPM=hash_code__GQO(result__IPC);
    idx__GPM=(__INTEGER)(h__FPM % Self__3OM->capacity__2JL);
    node__HPM=((void **)Self__3OM->buckets__BKL)[idx__GPM];
    while ((! (((void *)node__HPM == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__HPM)->item__NKL == (void *)e__4OM)))) {
      node__HPM=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__HPM)->next__ZKL;
    };
    if (((void *)node__HPM == (void *)NULL)) {
      if ((Self__3OM->capacity__2JL == Self__3OM->count__KQM)) {
        idx__XI3= 0;
        node1__0I3=NULL;
        node2__1I3=NULL;
        new_capacity__YI3=prime_number_ceiling__A4Q((__INTEGER)(Self__3OM->capacity__2JL +  1));
        old_buckets__ZI3=Self__3OM->buckets__BKL;
        Self__3OM->buckets__BKL=create__BVT(new_capacity__YI3);
        i__WI3=(__INTEGER)(Self__3OM->capacity__2JL -  1);
        Self__3OM->capacity__2JL=new_capacity__YI3;
        while ((i__WI3 >=  0)) {
          node1__0I3=((void **)old_buckets__ZI3)[i__WI3];
          while (((void *)node1__0I3 != (void *)NULL)) {
            node2__1I3=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__0I3)->next__ZKL;
            idx__XI3=(__INTEGER)(hash_code__GQO(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__0I3)->item__NKL) % Self__3OM->capacity__2JL);
            ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__0I3)->next__ZKL=((void **)Self__3OM->buckets__BKL)[idx__XI3];
            ((void **)Self__3OM->buckets__BKL)[idx__XI3]=node1__0I3;
            node1__0I3=node2__1I3;
          };
          i__WI3=(__INTEGER)(i__WI3 -  1);
        };
        idx__GPM=(__INTEGER)(h__FPM % Self__3OM->capacity__2JL);
      };
      __tmp__XQM=((void **)Self__3OM->buckets__BKL)[idx__GPM];
      result__MG0=NULL;
      ptr__NG0=((__POINTER )(NULL));
      typ_id__SG0= 0;
      sz__PG0=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
      if ((sz__PG0 ==  0)) {
        result__MG0=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
      } else {
        typ_id__SG0=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PG0);
        if ((typ_id__SG0 == (__INTEGER)(-  1))) {
          a__AH4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__KSZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__PG0 + a__AH4Q) & (__UINTEGER_32)(~ a__AH4Q));
          ptr__NG0=micro_alloc__table__lab__BOI(new_size__KSZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KSZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__KSZQ);
        } else {
          t__MSZQ=((__UINTEGER_32 )typ_id__SG0);
          a__EH4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__NG0=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PG0 + a__EH4Q) & (__UINTEGER_32)(~ a__EH4Q)),((__POINTER )(&(table_type[(t__MSZQ)]))),(__UINTEGER_32)(t__MSZQ |  1));
        };
        result__MG0=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__NG0);
        *(result__MG0) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
      };
      Self__MMKB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__MG0);
      Self__MMKB->item__NKL=result__IPC;
      Self__MMKB->next__ZKL=__tmp__XQM;
      node__HPM=result__MG0;
      ((void **)Self__3OM->buckets__BKL)[idx__GPM]=result__MG0;
      Self__3OM->count__KQM=(__INTEGER)(Self__3OM->count__KQM +  1);
    };
  };
  free__EMD(tmp__GPC);
  return(result__IPC);
}

static void* get__style__with__1PC(void *n__3PC,void *s__4PC,void *lt__5PC)
// ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT},{NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
{
  void *result__BQC;
  __INTEGER idx__CQC,__tmp__MH4Q,typ_id__ZZV,new_capacity__AAS;
  __INTEGER __tmp__EBS,__tmp__3RLB,Self__EERC;
  __ITM_TYPE_GENERIC *result__TZV,*Self__X0JB;
  __POINTER ptr__UZV;
  __UINTEGER_32 sz__WZV,a__OH4Q,new_size__OSZQ,t__QSZQ,a__SH4Q;
  void **__tmp__L15Q,**__tmp__M15Q,**__tmp__N15Q,**__tmp__DBS,**new__KRLB;
  __FAST_ARRAYoITM_TYPE_GENERICo *Self__45R;
  __BOOLEAN __tmp__OAS;
  result__BQC=NULL;
  idx__CQC= 0;
  __tmp__MH4Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC)->parent_arrayed_collection__HQC.upper__RQC;
  __tmp__L15Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC)->parent_arrayed_collection__HQC.storage__YSM;
  __tmp__M15Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC)->parent_arrayed_collection__HQC.storage__YSM;
  __tmp__N15Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC)->parent_arrayed_collection__HQC.storage__YSM;
  while (((idx__CQC <= __tmp__MH4Q) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)__tmp__L15Q)[idx__CQC])->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC != (void *)n__3PC) || ((void *)((__ITM_TYPE_GENERIC *)((void **)__tmp__M15Q)[idx__CQC])->parent_itm_type_style__LLB.style__3MC != (void *)s__4PC)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)__tmp__N15Q)[idx__CQC])->list_type__MRC != (void *)lt__5PC)))) {
    idx__CQC=(__INTEGER)(idx__CQC +  1);
  };
  if ((idx__CQC <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC)->parent_arrayed_collection__HQC.upper__RQC)) {
    result__BQC=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC)->parent_arrayed_collection__HQC.storage__YSM)[idx__CQC];
  } else {
    result__TZV=NULL;
    ptr__UZV=((__POINTER )(NULL));
    typ_id__ZZV= 0;
    sz__WZV=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
    if ((sz__WZV ==  0)) {
      result__TZV=ITM_TYPE_GENERIC__;
    } else {
      typ_id__ZZV=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__WZV);
      if ((typ_id__ZZV == (__INTEGER)(-  1))) {
        a__OH4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__OSZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__WZV + a__OH4Q) & (__UINTEGER_32)(~ a__OH4Q));
        ptr__UZV=micro_alloc__table__lab__BOI(new_size__OSZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OSZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__OSZQ);
      } else {
        t__QSZQ=((__UINTEGER_32 )typ_id__ZZV);
        a__SH4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__UZV=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__WZV + a__SH4Q) & (__UINTEGER_32)(~ a__SH4Q)),((__POINTER )(&(table_type[(t__QSZQ)]))),(__UINTEGER_32)(t__QSZQ |  1));
      };
      result__TZV=((__ITM_TYPE_GENERIC *)ptr__UZV);
      *(result__TZV) = *(ITM_TYPE_GENERIC__);
    };
    Self__X0JB=((__ITM_TYPE_GENERIC *)result__TZV);
    Self__X0JB->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC=n__3PC;
    Self__X0JB->parent_itm_type_style__LLB.style__3MC=s__4PC;
    Self__X0JB->list_type__MRC=lt__5PC;
    result__BQC=result__TZV;
    Self__45R=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__IQC);
    new_capacity__AAS= 0;
    if (((__INTEGER)(Self__45R->parent_arrayed_collection__HQC.upper__RQC +  1) <= (__INTEGER)(Self__45R->parent_arrayed_collection__HQC.capacity__NSM -  1))) {
      Self__45R->parent_arrayed_collection__HQC.upper__RQC=(__INTEGER)(Self__45R->parent_arrayed_collection__HQC.upper__RQC +  1);
      __tmp__OAS=TRUE__;
    } else {
      __tmp__OAS=FALSE__;
    };
    if ((! __tmp__OAS)) {
      if ((Self__45R->parent_arrayed_collection__HQC.capacity__NSM ==  0)) {
        Self__45R->parent_arrayed_collection__HQC.storage__YSM=create__TVBB( 2);
        Self__45R->parent_arrayed_collection__HQC.capacity__NSM= 2;
        Self__45R->parent_arrayed_collection__HQC.upper__RQC= 0;
      } else {
        new_capacity__AAS=(__INTEGER)(Self__45R->parent_arrayed_collection__HQC.capacity__NSM <<  1);
        __tmp__DBS=Self__45R->parent_arrayed_collection__HQC.storage__YSM;
        __tmp__EBS=Self__45R->parent_arrayed_collection__HQC.capacity__NSM;
        new__KRLB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__DBS)),((__UINTEGER_32 )(__INTEGER)(__tmp__EBS * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__AAS * ((__INTEGER )(sizeof(void *)))))));
        __tmp__3RLB=(__INTEGER)(new_capacity__AAS -  1);
        Self__EERC=__tmp__EBS;
        while ((Self__EERC <= __tmp__3RLB)) {
          new__KRLB[Self__EERC]=NULL;
          Self__EERC=(__INTEGER)(Self__EERC +  1);
        };
        Self__45R->parent_arrayed_collection__HQC.storage__YSM=new__KRLB;
        Self__45R->parent_arrayed_collection__HQC.capacity__NSM=new_capacity__AAS;
        Self__45R->parent_arrayed_collection__HQC.upper__RQC=(__INTEGER)(Self__45R->parent_arrayed_collection__HQC.upper__RQC +  1);
      };
    };
    ((void **)Self__45R->parent_arrayed_collection__HQC.storage__YSM)[Self__45R->parent_arrayed_collection__HQC.upper__RQC]=result__TZV;
  };
  return(result__BQC);
}

static void* to_run__W1IB(__ITM_TYPE_GENERIC *Self__X1IB)
// ({ITM_TYPE_GENERIC}) With resultRecursive, No inlinable.
{
  __INTEGER __tmp__C2IB,Self__WBNB,__tmp__20EF,i__MDEG;
  __INTEGER new_capacity__MDOC,other_upper__LDOC,Self__JOFD,h__NEOC;
  __INTEGER idx__OEOC,idx__UWID,new_capacity__VWID,i__TWID,typ_id__CPFD;
  __INTEGER new_capacity__UZNC,__tmp__10NC,__tmp__NH0D,Self__JQIF;
  __INTEGER __tmp__JDNB,Self__RASB,limit_up__SASB,typ_id__PQ2B,h__BIOC;
  __INTEGER idx__CIOC,idx__Y0ID,new_capacity__Z0ID,i__00ID,typ_id__H3ID;
  __INTEGER __tmp__JS2B,j__5U5B,__tmp__JW5B,Self__SSAD;
  void *__tmp__J2IB;
  void *__tmp__K2IB,*__tmp__R5UP,*result__BDNB;
  __ITM_TYPE_STYLE *Self__Q5UP;
  __POINTER ptr__3OFD,ptr__KQ2B,ptr__C3ID,entry__AV5B;
  __UINTEGER_32 sz__5OFD,a__MI4Q,new_size__SSZQ,t__USZQ,a__QI4Q;
  __UINTEGER_32 sz__MQ2B,a__5I4Q,new_size__WSZQ,t__YSZQ,a__DJ4Q;
  __UINTEGER_32 sz__E3ID,a__PJ4Q,new_size__0SZQ,t__2SZQ,a__TJ4Q;
  void *key__ADNB,*__tmp__HS2B,*styl__CDNB;
  void *result__YNNC,*base__5CNB;
  __TYPE_GENERIC *result__JQ2B,*Self__SR2B;
  void *result__CV5B;
  __TYPE_FULL *Self__WFHQ,*Self__LN4;
  void *result__1ANB,*lst__Z1IB,*e__3KNC,*result__QLNC,*result__HCNB;
  void *e__GEOC,*gen__3CNB;
  __FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *Self__CSWC,*Self__YSWC;
  __FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *Self__SZNC;
  __HASHED_SEToFAST_ARRAYoTYPE_FULLoo *Self__2KNC,*Self__FEOC;
  void *node__PLNC,*node__PEOC,*node1__XWID,*node2__YWID,*__tmp__5FOC;
  __BOOLEAN __tmp__IMNC,result__0ZEF,__tmp__D0NC,__tmp__YS2B;
  __FAST_ARRAYoTYPE_FULLo *Self__XZEF,*o__1ZEF,*__tmp__H0EF,*Self__JDOC;
  __FAST_ARRAYoTYPE_FULLo *Self__ZI4Q;
  void **__tmp__X0EF,**__tmp__Z0EF,**Self__YCEG,**__tmp__5DOC;
  void **__tmp__BEOC,**Self__GV5C;
  void **old_buckets__WWID;
  __HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *result__2OFD,*Self__B0ZD;
  void **__tmp__00NC,**new__0G0D;
  __HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *Self__MNNC;
  __HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *Self__YHOC;
  void *node__XNNC,*node__DIOC,*node1__20ID,*node2__30ID,*__tmp__RJOC;
  void **old_buckets__10ID;
  __HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *result__B3ID;
  __HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *Self__5H0D;
  __UINTEGER_8 mask_bit__WR2B;
  result__1ANB=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *)free_list__BBNB)->parent_arrayed_collection__ABNB.upper__MKNC <  0)) {
    result__1ANB=create_with_capacity__B1HB( 16);
  } else {
    Self__CSWC=((__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *)free_list__BBNB);
    result__1ANB=((void **)Self__CSWC->parent_arrayed_collection__ABNB.storage__R0NC)[Self__CSWC->parent_arrayed_collection__ABNB.upper__MKNC];
    Self__YSWC=((__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *)free_list__BBNB);
    Self__YSWC->parent_arrayed_collection__ABNB.upper__MKNC=(__INTEGER)(Self__YSWC->parent_arrayed_collection__ABNB.upper__MKNC -  1);
  };
  lst__Z1IB=result__1ANB;
  __tmp__C2IB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__X1IB->list_type__MRC)->parent_arrayed_collection__PIB.upper__BWK;
  Self__WBNB= 0;
  while ((Self__WBNB <= __tmp__C2IB)) {
    __tmp__J2IB=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__X1IB->list_type__MRC)->parent_arrayed_collection__PIB.storage__5WK)[Self__WBNB];
    switch (((struct ___OBJ *)__tmp__J2IB)->__id) {
    case __ITM_TYPE_SIMPLE__: {
      if (((__ITM_TYPE_SIMPLE *)__tmp__J2IB)->to_run__2VK==0) {
        __tmp__K2IB=((__ITM_TYPE_SIMPLE *)__tmp__J2IB)->to_run__1VK;
      } else {
        __tmp__K2IB=to_run__XVK(__tmp__J2IB);
      };
    } break;
    case __ITM_TYPE_STYLE__: {
      if (((__ITM_TYPE_STYLE *)__tmp__J2IB)->to_run__V1IB==0) {
        __tmp__K2IB=((__ITM_TYPE_STYLE *)__tmp__J2IB)->to_run__U1IB;
      } else {
        Self__Q5UP=((__ITM_TYPE_STYLE *)__tmp__J2IB);
        __tmp__R5UP=get__XUN(Self__Q5UP);
        Self__Q5UP->to_run__U1IB=__tmp__R5UP;
        Self__Q5UP->to_run__V1IB=0;
        __tmp__K2IB=__tmp__R5UP;
      };
    } break;
    case __ITM_TYPE_GENERIC__: {
      __tmp__K2IB=to_run__W1IB(__tmp__J2IB);
    } break;
    case __ITM_TYPE_SELF__: {
      __tmp__K2IB=to_run__MPXD();
    } break;
    case __ITM_TYPE_GENERIC_ELT__: {
      __tmp__K2IB=to_run__DKEF(__tmp__J2IB);
    } break;
    };
    add_last__KYMB(lst__Z1IB,__tmp__K2IB);
    Self__WBNB=(__INTEGER)(Self__WBNB +  1);
  };
  Self__2KNC=((__HASHED_SEToFAST_ARRAYoTYPE_FULLoo *)bucket__MCNB);
  e__3KNC=result__1ANB;
  result__QLNC=NULL;
  node__PLNC=((void **)Self__2KNC->buckets__XLNC)[(__INTEGER)(hash_code__ZKRC(result__1ANB) % Self__2KNC->capacity__SLNC)];
  until_do__BMRC:
  {
    if (((void *)node__PLNC == (void *)NULL)) {
      __tmp__IMNC=TRUE__;
    } else {
      Self__XZEF=((__FAST_ARRAYoTYPE_FULLo *)((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__PLNC)->item__DMNC);
      result__0ZEF=FALSE__;
      o__1ZEF=NULL;
      if (((void *)Self__XZEF == (void *)e__3KNC)) {
        result__0ZEF=TRUE__;
      } else {
        if (e__3KNC==NULL) {
          __tmp__H0EF=NULL;
        } else {
          __tmp__H0EF=((__FAST_ARRAYoTYPE_FULLo *)e__3KNC);
        };
        o__1ZEF=__tmp__H0EF;
        if ((((void *)__tmp__H0EF != (void *)NULL) && (Self__XZEF->parent_arrayed_collection__UUCB.upper__JVCB == __tmp__H0EF->parent_arrayed_collection__UUCB.upper__JVCB))) {
          __tmp__X0EF=Self__XZEF->parent_arrayed_collection__UUCB.storage__LZMB;
          __tmp__Z0EF=__tmp__H0EF->parent_arrayed_collection__UUCB.storage__LZMB;
          __tmp__20EF=(__INTEGER)(Self__XZEF->parent_arrayed_collection__UUCB.upper__JVCB +  1);
          Self__YCEG=((void **)__tmp__X0EF);
          i__MDEG=(__INTEGER)(__tmp__20EF -  1);
          while (((i__MDEG >=  0) && ((void *)Self__YCEG[i__MDEG] == (void *)((void **)__tmp__Z0EF)[i__MDEG]))) {
            i__MDEG=(__INTEGER)(i__MDEG -  1);
          };
          result__0ZEF=(i__MDEG <  0);
        };
      };
      __tmp__IMNC=result__0ZEF;
    };
    if ((! __tmp__IMNC)) {
      node__PLNC=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__PLNC)->next__PMNC;
      goto until_do__BMRC;
    };
  };
  if (((void *)node__PLNC != (void *)NULL)) {
    result__QLNC=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__PLNC)->item__DMNC;
  };
  result__HCNB=result__QLNC;
  if (((void *)result__QLNC == (void *)NULL)) {
    result__HCNB=create_with_capacity__B1HB((__INTEGER)(((__FAST_ARRAYoTYPE_FULLo *)result__1ANB)->parent_arrayed_collection__UUCB.upper__JVCB +  1));
    Self__JDOC=((__FAST_ARRAYoTYPE_FULLo *)result__HCNB);
    new_capacity__MDOC= 0;
    other_upper__LDOC=((__FAST_ARRAYoTYPE_FULLo *)result__1ANB)->parent_arrayed_collection__UUCB.upper__JVCB;
    if ((other_upper__LDOC >=  0)) {
      new_capacity__MDOC=(__INTEGER)(other_upper__LDOC +  1);
      if ((Self__JDOC->parent_arrayed_collection__UUCB.capacity__PYMB < new_capacity__MDOC)) {
        Self__JDOC->parent_arrayed_collection__UUCB.storage__LZMB=create__JG2B(new_capacity__MDOC);
        Self__JDOC->parent_arrayed_collection__UUCB.capacity__PYMB=new_capacity__MDOC;
      };
      __tmp__5DOC=Self__JDOC->parent_arrayed_collection__UUCB.storage__LZMB;
      __tmp__BEOC=((__FAST_ARRAYoTYPE_FULLo *)result__1ANB)->parent_arrayed_collection__UUCB.storage__LZMB;
      Self__GV5C=((void **)__tmp__5DOC);
      Self__JOFD=other_upper__LDOC;
      while ((Self__JOFD >=  0)) {
        Self__GV5C[Self__JOFD]=((void **)__tmp__BEOC)[Self__JOFD];
        Self__JOFD=(__INTEGER)(Self__JOFD -  1);
      };
    };
    Self__JDOC->parent_arrayed_collection__UUCB.upper__JVCB=other_upper__LDOC;
    Self__FEOC=((__HASHED_SEToFAST_ARRAYoTYPE_FULLoo *)bucket__MCNB);
    e__GEOC=result__HCNB;
    fast_has__2HSC(Self__FEOC,result__HCNB);
    fast_has__2HSC(Self__FEOC,result__HCNB);
    h__NEOC=hash_code__ZKRC(result__HCNB);
    idx__OEOC=(__INTEGER)(h__NEOC % Self__FEOC->capacity__SLNC);
    node__PEOC=((void **)Self__FEOC->buckets__XLNC)[idx__OEOC];
    while ((! (((void *)node__PEOC == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__PEOC)->item__DMNC == (void *)e__GEOC)))) {
      node__PEOC=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__PEOC)->next__PMNC;
    };
    if (((void *)node__PEOC == (void *)NULL)) {
      if ((Self__FEOC->capacity__SLNC == Self__FEOC->count__SFOC)) {
        idx__UWID= 0;
        node1__XWID=NULL;
        node2__YWID=NULL;
        new_capacity__VWID=prime_number_ceiling__A4Q((__INTEGER)(Self__FEOC->capacity__SLNC +  1));
        old_buckets__WWID=Self__FEOC->buckets__XLNC;
        Self__FEOC->buckets__XLNC=create__IWXC(new_capacity__VWID);
        i__TWID=(__INTEGER)(Self__FEOC->capacity__SLNC -  1);
        Self__FEOC->capacity__SLNC=new_capacity__VWID;
        while ((i__TWID >=  0)) {
          node1__XWID=((void **)old_buckets__WWID)[i__TWID];
          while (((void *)node1__XWID != (void *)NULL)) {
            node2__YWID=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node1__XWID)->next__PMNC;
            idx__UWID=(__INTEGER)(hash_code__ZKRC(((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node1__XWID)->item__DMNC) % Self__FEOC->capacity__SLNC);
            ((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node1__XWID)->next__PMNC=((void **)Self__FEOC->buckets__XLNC)[idx__UWID];
            ((void **)Self__FEOC->buckets__XLNC)[idx__UWID]=node1__XWID;
            node1__XWID=node2__YWID;
          };
          i__TWID=(__INTEGER)(i__TWID -  1);
        };
        idx__OEOC=(__INTEGER)(h__NEOC % Self__FEOC->capacity__SLNC);
      };
      __tmp__5FOC=((void **)Self__FEOC->buckets__XLNC)[idx__OEOC];
      result__2OFD=NULL;
      ptr__3OFD=((__POINTER )(NULL));
      typ_id__CPFD= 0;
      sz__5OFD=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo));
      if ((sz__5OFD ==  0)) {
        result__2OFD=HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__;
      } else {
        typ_id__CPFD=__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__5OFD);
        if ((typ_id__CPFD == (__INTEGER)(-  1))) {
          a__MI4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__SSZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__5OFD + a__MI4Q) & (__UINTEGER_32)(~ a__MI4Q));
          ptr__3OFD=micro_alloc__table__lab__BOI(new_size__SSZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SSZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SSZQ);
        } else {
          t__USZQ=((__UINTEGER_32 )typ_id__CPFD);
          a__QI4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__3OFD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__5OFD + a__QI4Q) & (__UINTEGER_32)(~ a__QI4Q)),((__POINTER )(&(table_type[(t__USZQ)]))),(__UINTEGER_32)(t__USZQ |  1));
        };
        result__2OFD=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)ptr__3OFD);
        *(result__2OFD) = *(HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo__);
      };
      Self__B0ZD=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)result__2OFD);
      Self__B0ZD->item__DMNC=result__HCNB;
      Self__B0ZD->next__PMNC=__tmp__5FOC;
      node__PEOC=result__2OFD;
      ((void **)Self__FEOC->buckets__XLNC)[idx__OEOC]=result__2OFD;
      Self__FEOC->count__SFOC=(__INTEGER)(Self__FEOC->count__SFOC +  1);
    };
  };
  ((__FAST_ARRAYoTYPE_FULLo *)result__1ANB)->parent_arrayed_collection__UUCB.upper__JVCB=(__INTEGER)(-  1);
  Self__SZNC=((__FAST_ARRAYoFAST_ARRAYoTYPE_FULLoo *)free_list__BBNB);
  new_capacity__UZNC= 0;
  if (((__INTEGER)(Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC +  1) <= (__INTEGER)(Self__SZNC->parent_arrayed_collection__ABNB.capacity__WZNC -  1))) {
    Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC=(__INTEGER)(Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC +  1);
    __tmp__D0NC=TRUE__;
  } else {
    __tmp__D0NC=FALSE__;
  };
  if ((! __tmp__D0NC)) {
    if ((Self__SZNC->parent_arrayed_collection__ABNB.capacity__WZNC ==  0)) {
      Self__SZNC->parent_arrayed_collection__ABNB.storage__R0NC=create__QP5C( 2);
      Self__SZNC->parent_arrayed_collection__ABNB.capacity__WZNC= 2;
      Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC= 0;
    } else {
      new_capacity__UZNC=(__INTEGER)(Self__SZNC->parent_arrayed_collection__ABNB.capacity__WZNC <<  1);
      __tmp__00NC=Self__SZNC->parent_arrayed_collection__ABNB.storage__R0NC;
      __tmp__10NC=Self__SZNC->parent_arrayed_collection__ABNB.capacity__WZNC;
      new__0G0D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__00NC)),((__UINTEGER_32 )(__INTEGER)(__tmp__10NC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UZNC * ((__INTEGER )(sizeof(void *)))))));
      __tmp__NH0D=(__INTEGER)(new_capacity__UZNC -  1);
      Self__JQIF=__tmp__10NC;
      while ((Self__JQIF <= __tmp__NH0D)) {
        new__0G0D[Self__JQIF]=NULL;
        Self__JQIF=(__INTEGER)(Self__JQIF +  1);
      };
      Self__SZNC->parent_arrayed_collection__ABNB.storage__R0NC=new__0G0D;
      Self__SZNC->parent_arrayed_collection__ABNB.capacity__WZNC=new_capacity__UZNC;
      Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC=(__INTEGER)(Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC +  1);
    };
  };
  ((void **)Self__SZNC->parent_arrayed_collection__ABNB.storage__R0NC)[Self__SZNC->parent_arrayed_collection__ABNB.upper__MKNC]=result__1ANB;
  lst__Z1IB=result__HCNB;
  gen__3CNB=result__HCNB;
  result__BDNB=NULL;
  copy__BNK(string_tmp__RB,Self__X1IB->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC);
  add_last__YPK(string_tmp__RB,'[');
  __tmp__JDNB=((__FAST_ARRAYoTYPE_FULLo *)result__HCNB)->parent_arrayed_collection__UUCB.upper__JVCB;
  Self__RASB= 0;
  limit_up__SASB=(__INTEGER)(__tmp__JDNB -  1);
  while ((Self__RASB <= limit_up__SASB)) {
    append_name_in__FBYD(((void **)((__FAST_ARRAYoTYPE_FULLo *)gen__3CNB)->parent_arrayed_collection__UUCB.storage__LZMB)[Self__RASB],string_tmp__RB);
    add_last__YPK(string_tmp__RB,',');
    Self__RASB=(__INTEGER)(Self__RASB +  1);
  };
  Self__ZI4Q=((__FAST_ARRAYoTYPE_FULLo *)result__HCNB);
  append_name_in__FBYD(((void **)Self__ZI4Q->parent_arrayed_collection__UUCB.storage__LZMB)[Self__ZI4Q->parent_arrayed_collection__UUCB.upper__JVCB],string_tmp__RB);
  add_last__YPK(string_tmp__RB,']');
  key__ADNB=get__QEC(string_tmp__RB);
  Self__MNNC=((__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *)dicog_type__4DNB);
  result__YNNC=NULL;
  node__XNNC=((void **)Self__MNNC->buckets__5NNC)[(__INTEGER)(hash_code__WPN(key__ADNB) % Self__MNNC->capacity__0NNC)];
  while ((! (((void *)node__XNNC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node__XNNC)->key__LONC == (void *)key__ADNB)))) {
    node__XNNC=((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node__XNNC)->next__WONC;
  };
  if (((void *)node__XNNC != (void *)NULL)) {
    result__YNNC=((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node__XNNC)->item__4ONC;
  };
  base__5CNB=result__YNNC;
  if (((void *)result__YNNC == (void *)NULL)) {
    result__JQ2B=NULL;
    ptr__KQ2B=((__POINTER )(NULL));
    typ_id__PQ2B= 0;
    sz__MQ2B=((__UINTEGER_32 )sizeof(__TYPE_GENERIC));
    if ((sz__MQ2B ==  0)) {
      result__JQ2B=TYPE_GENERIC__;
    } else {
      typ_id__PQ2B=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MQ2B);
      if ((typ_id__PQ2B == (__INTEGER)(-  1))) {
        a__5I4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__WSZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__MQ2B + a__5I4Q) & (__UINTEGER_32)(~ a__5I4Q));
        ptr__KQ2B=micro_alloc__table__lab__BOI(new_size__WSZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WSZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__WSZQ);
      } else {
        t__YSZQ=((__UINTEGER_32 )typ_id__PQ2B);
        a__DJ4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__KQ2B=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MQ2B + a__DJ4Q) & (__UINTEGER_32)(~ a__DJ4Q)),((__POINTER )(&(table_type[(t__YSZQ)]))),(__UINTEGER_32)(t__YSZQ |  1));
      };
      result__JQ2B=((__TYPE_GENERIC *)ptr__KQ2B);
      *(result__JQ2B) = *(TYPE_GENERIC__);
    };
    base__5CNB=result__JQ2B;
    Self__YHOC=((__HASHED_DICTIONARYoTYPE_GENERICxSTRING_CONSTANTo *)dicog_type__4DNB);
    h__BIOC=hash_code__WPN(key__ADNB);
    idx__CIOC=(__INTEGER)(h__BIOC % Self__YHOC->capacity__0NNC);
    node__DIOC=((void **)Self__YHOC->buckets__5NNC)[idx__CIOC];
    while ((! (((void *)node__DIOC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node__DIOC)->key__LONC == (void *)key__ADNB)))) {
      node__DIOC=((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node__DIOC)->next__WONC;
    };
    if (((void *)node__DIOC == (void *)NULL)) {
      if ((Self__YHOC->capacity__0NNC == Self__YHOC->count__EJOC)) {
        idx__Y0ID= 0;
        node1__20ID=NULL;
        node2__30ID=NULL;
        old_buckets__10ID=Self__YHOC->buckets__5NNC;
        new_capacity__Z0ID=prime_number_ceiling__A4Q((__INTEGER)(Self__YHOC->capacity__0NNC +  1));
        Self__YHOC->buckets__5NNC=create__04XC(new_capacity__Z0ID);
        i__00ID=(__INTEGER)(Self__YHOC->capacity__0NNC -  1);
        Self__YHOC->capacity__0NNC=new_capacity__Z0ID;
        while ((i__00ID >=  0)) {
          node1__20ID=((void **)old_buckets__10ID)[i__00ID];
          while (((void *)node1__20ID != (void *)NULL)) {
            node2__30ID=((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node1__20ID)->next__WONC;
            idx__Y0ID=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node1__20ID)->key__LONC) % Self__YHOC->capacity__0NNC);
            ((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node1__20ID)->next__WONC=((void **)Self__YHOC->buckets__5NNC)[idx__Y0ID];
            ((void **)Self__YHOC->buckets__5NNC)[idx__Y0ID]=node1__20ID;
            node1__20ID=node2__30ID;
          };
          i__00ID=(__INTEGER)(i__00ID -  1);
        };
        idx__CIOC=(__INTEGER)(h__BIOC % Self__YHOC->capacity__0NNC);
      };
      __tmp__RJOC=((void **)Self__YHOC->buckets__5NNC)[idx__CIOC];
      result__B3ID=NULL;
      ptr__C3ID=((__POINTER )(NULL));
      typ_id__H3ID= 0;
      sz__E3ID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo));
      if ((sz__E3ID ==  0)) {
        result__B3ID=HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__;
      } else {
        typ_id__H3ID=__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__E3ID);
        if ((typ_id__H3ID == (__INTEGER)(-  1))) {
          a__PJ4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__0SZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__E3ID + a__PJ4Q) & (__UINTEGER_32)(~ a__PJ4Q));
          ptr__C3ID=micro_alloc__table__lab__BOI(new_size__0SZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0SZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__0SZQ);
        } else {
          t__2SZQ=((__UINTEGER_32 )typ_id__H3ID);
          a__TJ4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__C3ID=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__E3ID + a__TJ4Q) & (__UINTEGER_32)(~ a__TJ4Q)),((__POINTER )(&(table_type[(t__2SZQ)]))),(__UINTEGER_32)(t__2SZQ |  1));
        };
        result__B3ID=((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)ptr__C3ID);
        *(result__B3ID) = *(HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo__);
      };
      Self__5H0D=((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)result__B3ID);
      Self__5H0D->item__4ONC=result__JQ2B;
      Self__5H0D->key__LONC=key__ADNB;
      Self__5H0D->next__WONC=__tmp__RJOC;
      node__DIOC=result__B3ID;
      ((void **)Self__YHOC->buckets__5NNC)[idx__CIOC]=result__B3ID;
      Self__YHOC->count__EJOC=(__INTEGER)(Self__YHOC->count__EJOC +  1);
    } else {
      ((__HASHED_DICTIONARY_NODEoTYPE_GENERICxSTRING_CONSTANTo *)node__DIOC)->item__4ONC=result__JQ2B;
    };
    Self__SR2B=((__TYPE_GENERIC *)result__JQ2B);
    mask_bit__WR2B= 0;
    Self__SR2B->parent_type__T2IB.index__LJC=index_count__JJC;
    index_count__JJC=(__INTEGER)(index_count__JJC +  1);
    Self__SR2B->name__2R2B=key__ADNB;
    Self__SR2B->generic_list__3R2B=result__HCNB;
    copy__BNK(string_tmp__RB,key__ADNB);
    replace_all__with__RZ1(string_tmp__RB,',','x');
    replace_all__with__RZ1(string_tmp__RB,'[','o');
    replace_all__with__RZ1(string_tmp__RB,']','o');
    replace_all__with__RZ1(string_tmp__RB,' ','_');
    Self__SR2B->intern_name__FS2B=get__QEC(string_tmp__RB);
    __tmp__HS2B=Self__X1IB->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC;
    __tmp__JS2B=(__INTEGER)(((__FAST_ARRAYoTYPE_FULLo *)result__HCNB)->parent_arrayed_collection__UUCB.upper__JVCB +  1);
    j__5U5B= 0;
    entry__AV5B=((__POINTER )(NULL));
    result__CV5B=fast_reference_at__N5KB(prototype_dico__XHM,__tmp__HS2B);
    if (((void *)result__CV5B == (void *)NULL)) {
      j__5U5B= 1;
      ((__STRING *)string_tmp2__ADB)->count__VF= 0;
      while ((! ((j__5U5B > ((__LINKED_LISToSTRING_CONSTANTo *)path_directory__EC)->parent_linked_collection__DC.upper__JC) || ((void *)result__CV5B != (void *)NULL)))) {
        copy__BNK(string_tmp__RB,item__EUU(path_directory__EC,j__5U5B));
        __tmp__JW5B=((__STRING_CONSTANT *)__tmp__HS2B)->count__XHB;
        Self__SSAD= 1;
        while ((Self__SSAD <= __tmp__JW5B)) {
          add_last__YPK(string_tmp__RB,to_lower__OA1(((__CHARACTER *)((__STRING_CONSTANT *)__tmp__HS2B)->storage__C5K)[(__INTEGER)(Self__SSAD -  1)]));
          Self__SSAD=(__INTEGER)(Self__SSAD +  1);
        };
        append__MOK(string_tmp__RB,(&__string_245));
        append__MOK(string_tmp2__ADB,string_tmp__RB);
        add_last__YPK(string_tmp2__ADB,'\n');
        copy__BNK(string_tmp__4TB,string_tmp__RB);
        entry__AV5B=((__POINTER )(fopen((char*)(to_external__4YK(string_tmp__4TB)),"rb")));
        if ((entry__AV5B != (void *)NULL)) {
          fclose((FILE*)((entry__AV5B)));
          result__CV5B=create__name__generic_count__TBE(get__QEC(string_tmp__RB),__tmp__HS2B,__tmp__JS2B);
          go_on__55AC(result__CV5B);
        };
        j__5U5B=(__INTEGER)(j__5U5B +  1);
      };
      if (((void *)result__CV5B == (void *)NULL)) {
        copy__BNK(string_tmp__RB,__tmp__HS2B);
        append__MOK(string_tmp__RB,(&__string_246));
        append__MOK(string_tmp__RB,string_tmp2__ADB);
        put_error__text__0AH( 1,string_tmp__RB);
        if (((void *)list_current__IF1 != (void *)NULL)) {
          put_position__ECH(((__LIST *)list_current__IF1)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
        };
        send_error__2FH();
      };
    } else {
      if ((((__PROTOTYPE *)result__CV5B)->generic_count__DIM != __tmp__JS2B)) {
        put_error__text__0AH( 1,(&__string_247));
        put_position__ECH(((__PROTOTYPE *)result__CV5B)->parent_named__QD.parent_itm_object__PD.position__BJM);
        if ((((__UINTEGER_32 )last_position__GG1) !=  0)) {
          put_position__ECH(last_position__GG1);
        };
        send_error__2FH();
      };
    };
    Self__SR2B->parent_type__T2IB.prototype__RD=result__CV5B;
    Self__SR2B->parent_type__T2IB.slot_run__1JC=create_with_capacity__YID( 10);
    if (((void *)((__PROTOTYPE *)Self__SR2B->parent_type__T2IB.prototype__RD)->type_style__ZNY == (void *)(&__string_13))) {
      mask_bit__WR2B= 3;
      __tmp__YS2B=TRUE__;
    } else {
      __tmp__YS2B=FALSE__;
    };
    if ((! __tmp__YS2B)) {
      if (((void *)((__PROTOTYPE *)Self__SR2B->parent_type__T2IB.prototype__RD)->type_style__ZNY == (void *)(&__string_14))) {
        mask_bit__WR2B= 12;
      };
    };
    Self__SR2B->parent_type__T2IB.default__AKC=create__with__VJD(Self__SR2B,mask_bit__WR2B);
    init_slot_for__1QMC(Self__SR2B->parent_type__T2IB.prototype__RD,Self__SR2B);
    Self__SR2B->parent_type__T2IB.subtype_list__APY=create__1H1();
    fast_add__OQKB(Self__SR2B->parent_type__T2IB.subtype_list__APY,TYPE_NULL__);
    add_subtype__O05B(Self__SR2B,Self__SR2B);
  };
  styl__CDNB=Self__X1IB->parent_itm_type_style__LLB.style__3MC;
  if (((void *)styl__CDNB == (void *)NULL)) {
    result__BDNB=((__TYPE_GENERIC *)base__5CNB)->parent_type__T2IB.default__AKC;
  } else {
    if (((void *)styl__CDNB == (void *)(&__string_13))) {
      Self__WFHQ=((__TYPE_FULL *)((__TYPE_GENERIC *)base__5CNB)->parent_type__T2IB.default__AKC);
      result__BDNB=get_with__HSAB(Self__WFHQ,(__UINTEGER_8)(Self__WFHQ->flag__LTL |  1));
    } else {
      Self__LN4=((__TYPE_FULL *)((__TYPE_GENERIC *)base__5CNB)->parent_type__T2IB.default__AKC);
      result__BDNB=get_with__HSAB(Self__LN4,(__UINTEGER_8)(Self__LN4->flag__LTL |  4));
    };
  };
  return(result__BDNB);
}

static void* prototype__IMEJ()
// () With resultRecursive, No inlinable.
{
  void *__tmp__LMEJ;
  void *__tmp__MMEJ;
  __tmp__LMEJ=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__LMEJ)->__id) {
  case __TYPE__: {
    __tmp__MMEJ=((__TYPE *)__tmp__LMEJ)->prototype__RD;
  } break;
  case __TYPE_NULL__: {
    __tmp__MMEJ=((__TYPE_NULL *)__tmp__LMEJ)->parent_type__TIB.prototype__RD;
  } break;
  case __TYPE_VOID__: {
    __tmp__MMEJ=((__TYPE_VOID *)__tmp__LMEJ)->parent_type__UIB.prototype__RD;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__MMEJ=((__TYPE_CONTEXT *)__tmp__LMEJ)->parent_type__VIB.prototype__RD;
  } break;
  case __TYPE_ID__: {
    __tmp__MMEJ=((__TYPE_ID *)__tmp__LMEJ)->parent_type__WIB.prototype__RD;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__MMEJ=((__TYPE_GENERIC *)__tmp__LMEJ)->parent_type__T2IB.prototype__RD;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__MMEJ=prototype__IMEJ();
  } break;
  };
  return(__tmp__MMEJ);
}

static void* push_extern__profil__YGQC(__POSITION pos__0GQC,void *prof__1GQC)
// ({POSITION},{NULLxPROFIL_SLOT}) With resultNo recursive, No inlinable.
{
  __CONTEXT *Self__1H4F;
  void *res__5H4F;
  top__3GQC=(__INTEGER)(top__3GQC +  1);
  if ((top__3GQC > ((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.upper__IHQC)) {
    add_last__YUZD(stack__GHQC,clone__2RCD());
  };
  Self__1H4F=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
  res__5H4F=NULL;
  Self__1H4F->local__CI4F=stack_local_lower__AI4F;
  Self__1H4F->result__FI4F=stack_result_lower__DI4F;
  Self__1H4F->list__HI4F=list_current__IF1;
  Self__1H4F->old_profil_first__JI4F=profil_first__4PQC;
  Self__1H4F->profil__LI4F=profil_second__3PQC;
  stack_local_lower__AI4F=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
  stack_result_lower__DI4F=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
  list_current__IF1=create__QCAG(pos__0GQC);
  profil_first__4PQC=prof__1GQC;
  profil_second__3PQC=prof__1GQC;
  if ((debug_level_option__3C !=  0)) {
    res__5H4F=create__name__style__type__25JG(pos__0GQC,(&__string_58),'+',((__TYPE_FULL *)TYPE_CONTEXT__->parent_type__VIB.default__AKC));
    ((__LOCAL *)res__5H4F)->parent_variable__B2LC.ensure_count__QEAG= 1;
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__context__first__20EG(PUSH__,pos__0GQC,res__5H4F,TRUE__));
  };
  return(res__5H4F);
}

static __EXTERNAL_C* create__text__access__persistant__type__2U0C(__POSITION p__4U0C,void *c__5U0C,void *ac__AV0C,__BOOLEAN per__BV0C,void *t__CV0C)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxFAST_ARRAYoEXPRo},{TRUExFALSE},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  __EXTERNAL_C *result__RTCD,*Self__OXZD;
  __POINTER ptr__STCD;
  __INTEGER typ_id__XTCD;
  __UINTEGER_32 sz__UTCD,a__0J4Q,new_size__5SZQ,t__BTZQ,a__4J4Q;
  result__RTCD=NULL;
  ptr__STCD=((__POINTER )(NULL));
  typ_id__XTCD= 0;
  sz__UTCD=((__UINTEGER_32 )sizeof(__EXTERNAL_C));
  if ((sz__UTCD ==  0)) {
    result__RTCD=EXTERNAL_C__;
  } else {
    typ_id__XTCD=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__UTCD);
    if ((typ_id__XTCD == (__INTEGER)(-  1))) {
      a__0J4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__5SZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__UTCD + a__0J4Q) & (__UINTEGER_32)(~ a__0J4Q));
      ptr__STCD=micro_alloc__table__lab__BOI(new_size__5SZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5SZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__5SZQ);
    } else {
      t__BTZQ=((__UINTEGER_32 )typ_id__XTCD);
      a__4J4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__STCD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__UTCD + a__4J4Q) & (__UINTEGER_32)(~ a__4J4Q)),((__POINTER )(&(table_type[(t__BTZQ)]))),(__UINTEGER_32)(t__BTZQ |  1));
    };
    result__RTCD=((__EXTERNAL_C *)ptr__STCD);
    *(result__RTCD) = *(EXTERNAL_C__);
  };
  Self__OXZD=((__EXTERNAL_C *)result__RTCD);
  Self__OXZD->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=p__4U0C;
  Self__OXZD->static_type__UXZD=t__CV0C;
  Self__OXZD->is_persistant__VXZD=per__BV0C;
  Self__OXZD->code__WXZD=c__5U0C;
  Self__OXZD->access_list__XXZD=ac__AV0C;
  return(result__RTCD);
}

static void add_last__AL4G(__FAST_ARRAYoINSTRo *Self__BL4G,void *element__CL4G)
// ({FAST_ARRAYoINSTRo},{NULLxLISTxSTRING_CSTxPUSHxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxSWITCHxNODE_TYPExREAD_LOCALxEXPR_MULTIPLExNODE_STYLExWRITE_GLOBALxWRITE_SLOTxEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxNOPxREAD_SLOTxWRITE_LOCALxREAD_GLOBALxEXPR_NOT_LOGICxLOOPxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxLOOP_ENDxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__DL4G,__tmp__LM4G,__tmp__5GDI,Self__FFKJ;
  __BOOLEAN __tmp__SL4G;
  void **__tmp__KM4G,**new__MGDI;
  new_capacity__DL4G= 0;
  if (((__INTEGER)(Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG +  1) <= (__INTEGER)(Self__BL4G->parent_arrayed_collection__IUOG.capacity__FL4G -  1))) {
    Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG=(__INTEGER)(Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG +  1);
    __tmp__SL4G=TRUE__;
  } else {
    __tmp__SL4G=FALSE__;
  };
  if ((! __tmp__SL4G)) {
    if ((Self__BL4G->parent_arrayed_collection__IUOG.capacity__FL4G ==  0)) {
      Self__BL4G->parent_arrayed_collection__IUOG.storage__BM4G=create__2FEH();
      Self__BL4G->parent_arrayed_collection__IUOG.capacity__FL4G= 2;
      Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG= 0;
    } else {
      new_capacity__DL4G=(__INTEGER)(Self__BL4G->parent_arrayed_collection__IUOG.capacity__FL4G <<  1);
      __tmp__KM4G=Self__BL4G->parent_arrayed_collection__IUOG.storage__BM4G;
      __tmp__LM4G=Self__BL4G->parent_arrayed_collection__IUOG.capacity__FL4G;
      new__MGDI=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__KM4G)),((__UINTEGER_32 )(__INTEGER)(__tmp__LM4G * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__DL4G * ((__INTEGER )(sizeof(void *)))))));
      __tmp__5GDI=(__INTEGER)(new_capacity__DL4G -  1);
      Self__FFKJ=__tmp__LM4G;
      while ((Self__FFKJ <= __tmp__5GDI)) {
        new__MGDI[Self__FFKJ]=NULL;
        Self__FFKJ=(__INTEGER)(Self__FFKJ +  1);
      };
      Self__BL4G->parent_arrayed_collection__IUOG.storage__BM4G=new__MGDI;
      Self__BL4G->parent_arrayed_collection__IUOG.capacity__FL4G=new_capacity__DL4G;
      Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG=(__INTEGER)(Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG +  1);
    };
  };
  ((void **)Self__BL4G->parent_arrayed_collection__IUOG.storage__BM4G)[Self__BL4G->parent_arrayed_collection__IUOG.upper__THQG]=element__CL4G;
}

static __INTEGER argument_count__P0BG(__ITM_SLOT *Self__Q0BG)
// ({ITM_SLOT}) With resultNo recursive, No inlinable.
{
  __INTEGER result__S0BG,__tmp__Y0BG,Self__03EG,__tmp__A1BG;
  void *__tmp__50BG;
  void **__tmp__O15Q;
  result__S0BG= 0;
  __tmp__Y0BG=((__FAST_ARRAYoITM_ARGUMENTo *)Self__Q0BG->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D;
  Self__03EG= 0;
  __tmp__O15Q=((__FAST_ARRAYoITM_ARGUMENTo *)Self__Q0BG->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D;
  while ((Self__03EG <= __tmp__Y0BG)) {
    __tmp__50BG=((void **)__tmp__O15Q)[Self__03EG];
    if (((struct ___OBJ *)__tmp__50BG)->__id==__ITM_ARG__) {
      __tmp__A1BG= 1;
    } else {
      __tmp__A1BG=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__50BG)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
    };
    result__S0BG=(__INTEGER)(result__S0BG + __tmp__A1BG);
    Self__03EG=(__INTEGER)(Self__03EG +  1);
  };
  return(result__S0BG);
}

static void* get_slot__U1BG(__TYPE *Self__V1BG,void *n__W1BG)
// ({TYPE},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER j__Z1BG;
  void *result__Y1BG,*__tmp__P2BG,*__tmp__D3BG;
  void *__tmp__Q2BG;
  __SECTION_ *Self__33NQ;
  void *__tmp__E3BG;
  __BOOLEAN __tmp__02BG;
  j__Z1BG= 0;
  result__Y1BG=get_local_slot__H4EG(Self__V1BG,n__W1BG);
  if (((void *)result__Y1BG == (void *)NULL)) {
    j__Z1BG= 0;
    while_do__H0MG:
    {
      if ((j__Z1BG <= ((__FAST_ARRAYoSLOTo *)Self__V1BG->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__P2BG=((void **)((__FAST_ARRAYoSLOTo *)Self__V1BG->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__Z1BG];
        if (((struct ___OBJ *)__tmp__P2BG)->__id==__SLOT_DATA__) {
          __tmp__Q2BG=id_section__UG4F(__tmp__P2BG);
        } else {
          __tmp__Q2BG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__P2BG)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__33NQ=((__SECTION_ *)__tmp__Q2BG);
        __tmp__02BG=(((void *)Self__33NQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__33NQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__02BG=FALSE__;
      };
      if ((__tmp__02BG && ((void *)result__Y1BG == (void *)NULL))) {
        __tmp__D3BG=((void **)((__FAST_ARRAYoSLOTo *)Self__V1BG->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__Z1BG];
        if (((struct ___OBJ *)__tmp__D3BG)->__id==__SLOT_DATA__) {
          __tmp__E3BG=get_type_result__PG2G(__tmp__D3BG);
        } else {
          __tmp__E3BG=get_type_result__ZH2G(__tmp__D3BG);
        };
        result__Y1BG=get_slot__AP5G(__tmp__E3BG,n__W1BG);
        j__Z1BG=(__INTEGER)(j__Z1BG +  1);
        goto while_do__H0MG;
      };
    };
  };
  return(result__Y1BG);
}

static void* get_slot__K3BG(__TYPE_NULL *Self__L3BG,void *n__M3BG)
// ({TYPE_NULL},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__O3BG,*__tmp__F4BG,*__tmp__Z4BG;
  __INTEGER j__P3BG;
  void *__tmp__G4BG;
  __SECTION_ *Self__43NQ;
  void *__tmp__04BG;
  __BOOLEAN __tmp__Q4BG;
  result__O3BG=NULL;
  j__P3BG= 0;
  while_do__S0MG:
  {
    if ((j__P3BG <= ((__FAST_ARRAYoSLOTo *)Self__L3BG->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__F4BG=((void **)((__FAST_ARRAYoSLOTo *)Self__L3BG->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__P3BG];
      if (((struct ___OBJ *)__tmp__F4BG)->__id==__SLOT_DATA__) {
        __tmp__G4BG=id_section__UG4F(__tmp__F4BG);
      } else {
        __tmp__G4BG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__F4BG)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__43NQ=((__SECTION_ *)__tmp__G4BG);
      __tmp__Q4BG=(((void *)Self__43NQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__43NQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__Q4BG=FALSE__;
    };
    if ((__tmp__Q4BG && ((void *)result__O3BG == (void *)NULL))) {
      __tmp__Z4BG=((void **)((__FAST_ARRAYoSLOTo *)Self__L3BG->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__P3BG];
      if (((struct ___OBJ *)__tmp__Z4BG)->__id==__SLOT_DATA__) {
        __tmp__04BG=get_type_result__PG2G(__tmp__Z4BG);
      } else {
        __tmp__04BG=get_type_result__ZH2G(__tmp__Z4BG);
      };
      result__O3BG=get_slot__AP5G(__tmp__04BG,n__M3BG);
      j__P3BG=(__INTEGER)(j__P3BG +  1);
      goto while_do__S0MG;
    };
  };
  return(result__O3BG);
}

static void* get_slot__A5BG(__TYPE_VOID *Self__B5BG,void *n__C5BG)
// ({TYPE_VOID},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER j__F5BG;
  void *result__E5BG,*__tmp__15BG,*__tmp__PACG;
  void *__tmp__25BG;
  __SECTION_ *Self__53NQ;
  void *__tmp__QACG;
  __BOOLEAN __tmp__GACG;
  j__F5BG= 0;
  result__E5BG=get_local_slot__1AFG(Self__B5BG,n__C5BG);
  if (((void *)result__E5BG == (void *)NULL)) {
    j__F5BG= 0;
    while_do__30MG:
    {
      if ((j__F5BG <= ((__FAST_ARRAYoSLOTo *)Self__B5BG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__15BG=((void **)((__FAST_ARRAYoSLOTo *)Self__B5BG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__F5BG];
        if (((struct ___OBJ *)__tmp__15BG)->__id==__SLOT_DATA__) {
          __tmp__25BG=id_section__UG4F(__tmp__15BG);
        } else {
          __tmp__25BG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__15BG)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__53NQ=((__SECTION_ *)__tmp__25BG);
        __tmp__GACG=(((void *)Self__53NQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__53NQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__GACG=FALSE__;
      };
      if ((__tmp__GACG && ((void *)result__E5BG == (void *)NULL))) {
        __tmp__PACG=((void **)((__FAST_ARRAYoSLOTo *)Self__B5BG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__F5BG];
        if (((struct ___OBJ *)__tmp__PACG)->__id==__SLOT_DATA__) {
          __tmp__QACG=get_type_result__PG2G(__tmp__PACG);
        } else {
          __tmp__QACG=get_type_result__ZH2G(__tmp__PACG);
        };
        result__E5BG=get_slot__AP5G(__tmp__QACG,n__C5BG);
        j__F5BG=(__INTEGER)(j__F5BG +  1);
        goto while_do__30MG;
      };
    };
  };
  return(result__E5BG);
}

static void* get_slot__WACG(__TYPE_CONTEXT *Self__XACG,void *n__YACG)
// ({TYPE_CONTEXT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER j__1ACG;
  void *result__0ACG,*__tmp__RBCG,*__tmp__FCCG;
  void *__tmp__SBCG;
  __SECTION_ *Self__A4NQ;
  void *__tmp__GCCG;
  __BOOLEAN __tmp__2BCG;
  j__1ACG= 0;
  result__0ACG=get_local_slot__DDFG(Self__XACG,n__YACG);
  if (((void *)result__0ACG == (void *)NULL)) {
    j__1ACG= 0;
    while_do__I1MG:
    {
      if ((j__1ACG <= ((__FAST_ARRAYoSLOTo *)Self__XACG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__RBCG=((void **)((__FAST_ARRAYoSLOTo *)Self__XACG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__1ACG];
        if (((struct ___OBJ *)__tmp__RBCG)->__id==__SLOT_DATA__) {
          __tmp__SBCG=id_section__UG4F(__tmp__RBCG);
        } else {
          __tmp__SBCG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__RBCG)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__A4NQ=((__SECTION_ *)__tmp__SBCG);
        __tmp__2BCG=(((void *)Self__A4NQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__A4NQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__2BCG=FALSE__;
      };
      if ((__tmp__2BCG && ((void *)result__0ACG == (void *)NULL))) {
        __tmp__FCCG=((void **)((__FAST_ARRAYoSLOTo *)Self__XACG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__1ACG];
        if (((struct ___OBJ *)__tmp__FCCG)->__id==__SLOT_DATA__) {
          __tmp__GCCG=get_type_result__PG2G(__tmp__FCCG);
        } else {
          __tmp__GCCG=get_type_result__ZH2G(__tmp__FCCG);
        };
        result__0ACG=get_slot__AP5G(__tmp__GCCG,n__YACG);
        j__1ACG=(__INTEGER)(j__1ACG +  1);
        goto while_do__I1MG;
      };
    };
  };
  return(result__0ACG);
}

static void* get_slot__MCCG(__TYPE_ID *Self__NCCG,void *n__OCCG)
// ({TYPE_ID},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER j__RCCG;
  void *result__QCCG,*__tmp__HDCG,*__tmp__1DCG;
  void *__tmp__IDCG;
  __SECTION_ *Self__B4NQ;
  void *__tmp__2DCG;
  __BOOLEAN __tmp__SDCG;
  j__RCCG= 0;
  result__QCCG=get_local_slot__LFFG(Self__NCCG,n__OCCG);
  if (((void *)result__QCCG == (void *)NULL)) {
    j__RCCG= 0;
    while_do__T1MG:
    {
      if ((j__RCCG <= ((__FAST_ARRAYoSLOTo *)Self__NCCG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__HDCG=((void **)((__FAST_ARRAYoSLOTo *)Self__NCCG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__RCCG];
        if (((struct ___OBJ *)__tmp__HDCG)->__id==__SLOT_DATA__) {
          __tmp__IDCG=id_section__UG4F(__tmp__HDCG);
        } else {
          __tmp__IDCG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__HDCG)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__B4NQ=((__SECTION_ *)__tmp__IDCG);
        __tmp__SDCG=(((void *)Self__B4NQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__B4NQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__SDCG=FALSE__;
      };
      if ((__tmp__SDCG && ((void *)result__QCCG == (void *)NULL))) {
        __tmp__1DCG=((void **)((__FAST_ARRAYoSLOTo *)Self__NCCG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__RCCG];
        if (((struct ___OBJ *)__tmp__1DCG)->__id==__SLOT_DATA__) {
          __tmp__2DCG=get_type_result__PG2G(__tmp__1DCG);
        } else {
          __tmp__2DCG=get_type_result__ZH2G(__tmp__1DCG);
        };
        result__QCCG=get_slot__AP5G(__tmp__2DCG,n__OCCG);
        j__RCCG=(__INTEGER)(j__RCCG +  1);
        goto while_do__T1MG;
      };
    };
  };
  return(result__QCCG);
}

static void* get_slot__CECG(__TYPE_GENERIC *Self__DECG,void *n__EECG)
// ({TYPE_GENERIC},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER j__HECG;
  void *result__GECG,*__tmp__3ECG,*__tmp__RFCG;
  void *__tmp__4ECG;
  __SECTION_ *Self__C4NQ;
  void *__tmp__SFCG;
  __BOOLEAN __tmp__IFCG;
  j__HECG= 0;
  result__GECG=get_local_slot__THFG(Self__DECG,n__EECG);
  if (((void *)result__GECG == (void *)NULL)) {
    j__HECG= 0;
    while_do__41MG:
    {
      if ((j__HECG <= ((__FAST_ARRAYoSLOTo *)Self__DECG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__3ECG=((void **)((__FAST_ARRAYoSLOTo *)Self__DECG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__HECG];
        if (((struct ___OBJ *)__tmp__3ECG)->__id==__SLOT_DATA__) {
          __tmp__4ECG=id_section__UG4F(__tmp__3ECG);
        } else {
          __tmp__4ECG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__3ECG)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__C4NQ=((__SECTION_ *)__tmp__4ECG);
        __tmp__IFCG=(((void *)Self__C4NQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__C4NQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__IFCG=FALSE__;
      };
      if ((__tmp__IFCG && ((void *)result__GECG == (void *)NULL))) {
        __tmp__RFCG=((void **)((__FAST_ARRAYoSLOTo *)Self__DECG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__HECG];
        if (((struct ___OBJ *)__tmp__RFCG)->__id==__SLOT_DATA__) {
          __tmp__SFCG=get_type_result__PG2G(__tmp__RFCG);
        } else {
          __tmp__SFCG=get_type_result__ZH2G(__tmp__RFCG);
        };
        result__GECG=get_slot__AP5G(__tmp__SFCG,n__EECG);
        j__HECG=(__INTEGER)(j__HECG +  1);
        goto while_do__41MG;
      };
    };
  };
  return(result__GECG);
}

static void* get_slot__VXEJ(void *n__XXEJ)
// ({NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *__tmp__ZXEJ;
  void *__tmp__0XEJ;
  __tmp__ZXEJ=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__ZXEJ)->__id) {
  case __TYPE__: {
    __tmp__0XEJ=get_slot__U1BG(__tmp__ZXEJ,n__XXEJ);
  } break;
  case __TYPE_NULL__: {
    __tmp__0XEJ=get_slot__K3BG(__tmp__ZXEJ,n__XXEJ);
  } break;
  case __TYPE_VOID__: {
    __tmp__0XEJ=get_slot__A5BG(__tmp__ZXEJ,n__XXEJ);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__0XEJ=get_slot__WACG(__tmp__ZXEJ,n__XXEJ);
  } break;
  case __TYPE_ID__: {
    __tmp__0XEJ=get_slot__MCCG(__tmp__ZXEJ,n__XXEJ);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__0XEJ=get_slot__CECG(__tmp__ZXEJ,n__XXEJ);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__0XEJ=get_slot__VXEJ(n__XXEJ);
  } break;
  };
  return(__tmp__0XEJ);
}

static __PROTOTYPE_CST* create__type__CLQC(__POSITION p__ELQC,void *t__FLQC)
// ({POSITION},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  __PROTOTYPE_CST *result__QUUC,*Self__B4YD;
  __POINTER ptr__RUUC;
  __INTEGER typ_id__WUUC;
  __UINTEGER_32 sz__TUUC,a__0L4Q,new_size__DTZQ,t__FTZQ,a__4L4Q;
  result__QUUC=NULL;
  ptr__RUUC=((__POINTER )(NULL));
  typ_id__WUUC= 0;
  sz__TUUC=((__UINTEGER_32 )sizeof(__PROTOTYPE_CST));
  if ((sz__TUUC ==  0)) {
    result__QUUC=PROTOTYPE_CST__;
  } else {
    typ_id__WUUC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__TUUC);
    if ((typ_id__WUUC == (__INTEGER)(-  1))) {
      a__0L4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__DTZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__TUUC + a__0L4Q) & (__UINTEGER_32)(~ a__0L4Q));
      ptr__RUUC=micro_alloc__table__lab__BOI(new_size__DTZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DTZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__DTZQ);
    } else {
      t__FTZQ=((__UINTEGER_32 )typ_id__WUUC);
      a__4L4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__RUUC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__TUUC + a__4L4Q) & (__UINTEGER_32)(~ a__4L4Q)),((__POINTER )(&(table_type[(t__FTZQ)]))),(__UINTEGER_32)(t__FTZQ |  1));
    };
    result__QUUC=((__PROTOTYPE_CST *)ptr__RUUC);
    *(result__QUUC) = *(PROTOTYPE_CST__);
  };
  Self__B4YD=((__PROTOTYPE_CST *)result__QUUC);
  Self__B4YD->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=p__ELQC;
  Self__B4YD->parent_constant__E3LC.static_type__F4YD=to_strict__LE5D(t__FLQC);
  return(result__QUUC);
}

static void* new_read__slot__receiver__self__YLQC(__POSITION p__0LQC,void *s__1LQC,void *rec__2LQC,void *my_self__3LQC)
// ({POSITION},{NULLxSLOT_DATAxSLOT_CODE},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  void *old_self__CMQC,*__tmp__HMQC,*__tmp__TJZD;
  __DTA_RD *result__TX0C,*Self__1IZD;
  __POINTER ptr__UX0C;
  __INTEGER typ_id__ZX0C;
  __UINTEGER_32 sz__WX0C,a__BM4Q,new_size__HTZQ,t__JTZQ,a__FM4Q;
  void *__tmp__EWUC,*__tmp__SJZD,*__tmp__4KZD;
  void *rd__GJZD,*__tmp__5KZD;
  void *__tmp__2JZD,*__tmp__FKZD;
  __POSITION __tmp__ZKZD;
  void *result__EMQC;
  __BOOLEAN __tmp__5JZD;
  old_self__CMQC=run_value__FMQC;
  switch (((struct ___OBJ *)my_self__3LQC)->__id) {
  case __LIST__: {
    __tmp__HMQC=static_type__GIQG(my_self__3LQC);
  } break;
  case __STRING_CST__: {
    __tmp__HMQC=((__STRING_CST *)my_self__3LQC)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__HMQC=((__EXTERNAL_C *)my_self__3LQC)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__HMQC=((__PROTOTYPE_CST *)my_self__3LQC)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__HMQC=((__INTEGER_CST *)my_self__3LQC)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__HMQC=((__LOCAL *)((__READ_LOCAL *)my_self__3LQC)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HMQC=static_type__0N1H(my_self__3LQC);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HMQC=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HMQC=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__HMQC=((__REAL_CST *)my_self__3LQC)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__HMQC=((__CHARACTER_CST *)my_self__3LQC)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__HMQC=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__HMQC=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__HMQC=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__HMQC=static_type__MP1H(my_self__3LQC);
  } break;
  case __EXPR_MUL__: {
    __tmp__HMQC=static_type__SP1H(my_self__3LQC);
  } break;
  case __EXPR_DIV__: {
    __tmp__HMQC=static_type__XP1H(my_self__3LQC);
  } break;
  case __EXPR_AND__: {
    __tmp__HMQC=static_type__2P1H(my_self__3LQC);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HMQC=static_type__BQ1H(my_self__3LQC);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HMQC=static_type__GQ1H(my_self__3LQC);
  } break;
  case __PUT_TO__: {
    __tmp__HMQC=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__HMQC=static_type__PQ1H(my_self__3LQC);
  } break;
  case __SIZE_OF__: {
    __tmp__HMQC=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__HMQC=((__CAST *)my_self__3LQC)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__HMQC=static_type__GIKL(my_self__3LQC);
  } break;
  case __READ_SLOT__: {
    __tmp__HMQC=((__SLOT_DATA *)((__READ_SLOT *)my_self__3LQC)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__HMQC=((__SLOT_DATA *)((__READ_GLOBAL *)my_self__3LQC)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HMQC=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HMQC=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HMQC=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HMQC=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HMQC=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__HMQC=static_type__Z2IM(my_self__3LQC);
  } break;
  case __EXPR_ADD__: {
    __tmp__HMQC=static_type__IXML(my_self__3LQC);
  } break;
  case __EXPR_NOT__: {
    __tmp__HMQC=static_type__BTXM(my_self__3LQC);
  } break;
  case __EXPR_MOD__: {
    __tmp__HMQC=static_type__5LEO(my_self__3LQC);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HMQC=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__HMQC=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HMQC=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__HMQC=static_type__NOPN(my_self__3LQC);
  } break;
  case __EXPR_XOR__: {
    __tmp__HMQC=static_type__XCSO(my_self__3LQC);
  } break;
  };
  run_value__FMQC=__tmp__HMQC;
  result__TX0C=NULL;
  ptr__UX0C=((__POINTER )(NULL));
  typ_id__ZX0C= 0;
  sz__WX0C=((__UINTEGER_32 )sizeof(__DTA_RD));
  if ((sz__WX0C ==  0)) {
    result__TX0C=DTA_RD__;
  } else {
    typ_id__ZX0C=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__WX0C);
    if ((typ_id__ZX0C == (__INTEGER)(-  1))) {
      a__BM4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__HTZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__WX0C + a__BM4Q) & (__UINTEGER_32)(~ a__BM4Q));
      ptr__UX0C=micro_alloc__table__lab__BOI(new_size__HTZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HTZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HTZQ);
    } else {
      t__JTZQ=((__UINTEGER_32 )typ_id__ZX0C);
      a__FM4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__UX0C=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__WX0C + a__FM4Q) & (__UINTEGER_32)(~ a__FM4Q)),((__POINTER )(&(table_type[(t__JTZQ)]))),(__UINTEGER_32)(t__JTZQ |  1));
    };
    result__TX0C=((__DTA_RD *)ptr__UX0C);
    *(result__TX0C) = *(DTA_RD__);
  };
  if (((struct ___OBJ *)s__1LQC)->__id==__SLOT_DATA__) {
    __tmp__EWUC=get_expr_result__RUOG(s__1LQC);
  } else {
    __tmp__EWUC=get_expr_result__QXOG(s__1LQC);
  };
  Self__1IZD=((__DTA_RD *)result__TX0C);
  rd__GJZD=NULL;
  Self__1IZD->parent_dta__AMQC.parent_itm_object__5LQC.position__BJM=p__0LQC;
  Self__1IZD->parent_dta__AMQC.context__OJZD=profil_second__3PQC;
  Self__1IZD->parent_dta__AMQC.slot__PJZD=s__1LQC;
  Self__1IZD->parent_dta__AMQC.self_arg__QJZD=my_self__3LQC;
  Self__1IZD->parent_dta__AMQC.result_expr__RJZD=__tmp__EWUC;
  __tmp__SJZD=Self__1IZD->parent_dta__AMQC.result_expr__RJZD;
  switch (((struct ___OBJ *)__tmp__SJZD)->__id) {
  case __LIST__: {
    __tmp__TJZD=static_type__GIQG(__tmp__SJZD);
  } break;
  case __STRING_CST__: {
    __tmp__TJZD=((__STRING_CST *)__tmp__SJZD)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__TJZD=((__EXTERNAL_C *)__tmp__SJZD)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__TJZD=((__PROTOTYPE_CST *)__tmp__SJZD)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__TJZD=((__INTEGER_CST *)__tmp__SJZD)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__TJZD=((__LOCAL *)((__READ_LOCAL *)__tmp__SJZD)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TJZD=static_type__0N1H(__tmp__SJZD);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TJZD=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TJZD=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__TJZD=((__REAL_CST *)__tmp__SJZD)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__TJZD=((__CHARACTER_CST *)__tmp__SJZD)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__TJZD=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TJZD=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__TJZD=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__TJZD=static_type__MP1H(__tmp__SJZD);
  } break;
  case __EXPR_MUL__: {
    __tmp__TJZD=static_type__SP1H(__tmp__SJZD);
  } break;
  case __EXPR_DIV__: {
    __tmp__TJZD=static_type__XP1H(__tmp__SJZD);
  } break;
  case __EXPR_AND__: {
    __tmp__TJZD=static_type__2P1H(__tmp__SJZD);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TJZD=static_type__BQ1H(__tmp__SJZD);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TJZD=static_type__GQ1H(__tmp__SJZD);
  } break;
  case __PUT_TO__: {
    __tmp__TJZD=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__TJZD=static_type__PQ1H(__tmp__SJZD);
  } break;
  case __SIZE_OF__: {
    __tmp__TJZD=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__TJZD=((__CAST *)__tmp__SJZD)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__TJZD=static_type__GIKL(__tmp__SJZD);
  } break;
  case __READ_SLOT__: {
    __tmp__TJZD=((__SLOT_DATA *)((__READ_SLOT *)__tmp__SJZD)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__TJZD=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__SJZD)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TJZD=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TJZD=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TJZD=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TJZD=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TJZD=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__TJZD=static_type__Z2IM(__tmp__SJZD);
  } break;
  case __EXPR_ADD__: {
    __tmp__TJZD=static_type__IXML(__tmp__SJZD);
  } break;
  case __EXPR_NOT__: {
    __tmp__TJZD=static_type__BTXM(__tmp__SJZD);
  } break;
  case __EXPR_MOD__: {
    __tmp__TJZD=static_type__5LEO(__tmp__SJZD);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TJZD=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__TJZD=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TJZD=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__TJZD=static_type__NOPN(__tmp__SJZD);
  } break;
  case __EXPR_XOR__: {
    __tmp__TJZD=static_type__XCSO(__tmp__SJZD);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__TJZD)->parent_type__KTL == (void *)type_block__BLB)) {
    if (((struct ___OBJ *)s__1LQC)->__id==__SLOT_DATA__) {
      __tmp__2JZD=((__SLOT *)((__SLOT_DATA *)s__1LQC)->parent_slot__BJZD)->slot_data_intern__1JZD;
    } else {
      __tmp__2JZD=((__SLOT *)((__SLOT_CODE *)s__1LQC)->parent_slot__Y22F)->slot_data_intern__1JZD;
    };
    __tmp__5JZD=((void *)__tmp__2JZD != (void *)NULL);
  } else {
    __tmp__5JZD=FALSE__;
  };
  if (__tmp__5JZD) {
    if (((struct ___OBJ *)s__1LQC)->__id==__SLOT_DATA__) {
      __tmp__FKZD=((__SLOT *)((__SLOT_DATA *)s__1LQC)->parent_slot__BJZD)->slot_data_intern__1JZD;
    } else {
      __tmp__FKZD=((__SLOT *)((__SLOT_CODE *)s__1LQC)->parent_slot__Y22F)->slot_data_intern__1JZD;
    };
    init__C4OG(__tmp__FKZD);
    if ((((void *)((__SLOT_DATA *)__tmp__FKZD)->parent_variable__AJZD.type_list__HKZD == (void *)NULL) || (((__TYPES *)((__SLOT_DATA *)__tmp__FKZD)->parent_variable__AJZD.type_list__HKZD)->upper__4LAG == (__INTEGER)(-  1)))) {
      __tmp__ZKZD=Self__1IZD->parent_dta__AMQC.parent_itm_object__5LQC.position__BJM;
      put_error__text__0AH( 1,(&__string_248));
      put_position__ECH(__tmp__ZKZD);
      send_error__2FH();
    };
    __tmp__4KZD=Self__1IZD->parent_dta__AMQC.result_expr__RJZD;
    if (__tmp__4KZD==NULL) {
      __tmp__5KZD=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__4KZD)->__id) {
      case __LIST__: {
        __tmp__5KZD=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__5KZD=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__5KZD=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__5KZD=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__5KZD=((void *)__tmp__4KZD);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__5KZD=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__5KZD=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__5KZD=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__5KZD=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__5KZD=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__5KZD=NULL;
      } break;
      case __ITEM__: {
        __tmp__5KZD=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__5KZD=NULL;
      } break;
      case __CAST__: {
        __tmp__5KZD=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__5KZD=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__5KZD=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__5KZD=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__5KZD=NULL;
      } break;
      }
    };
    rd__GJZD=__tmp__5KZD;
    ((__LOCAL *)((__READ_LOCAL *)__tmp__5KZD)->local__ALZD)->parent_variable__B2LC.type_list__HKZD=((__SLOT_DATA *)__tmp__FKZD)->parent_variable__AJZD.type_list__HKZD;
  };
  result__EMQC=create__with__GWUC(rec__2LQC,result__TX0C);
  run_value__FMQC=old_self__CMQC;
  add_last__I4YD(node_list__PMQC,result__EMQC);
  return(result__EMQC);
}

static __INTEGER_CST* create__value__type__DNQC(__POSITION p__FNQC,__INTEGER_64 v__GNQC,void *t__HNQC)
// ({POSITION},{INTEGER_64},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  __INTEGER_CST *result__0WUC,*Self__LAZD;
  __POINTER ptr__1WUC;
  __INTEGER typ_id__AXUC;
  __UINTEGER_32 sz__3WUC,a__IM4Q,new_size__LTZQ,t__NTZQ,a__BMI;
  result__0WUC=NULL;
  ptr__1WUC=((__POINTER )(NULL));
  typ_id__AXUC= 0;
  sz__3WUC=((__UINTEGER_32 )sizeof(__INTEGER_CST));
  if ((sz__3WUC ==  0)) {
    result__0WUC=INTEGER_CST__;
  } else {
    typ_id__AXUC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__3WUC);
    if ((typ_id__AXUC == (__INTEGER)(-  1))) {
      a__IM4Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__LTZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__3WUC + a__IM4Q) & (__UINTEGER_32)(~ a__IM4Q));
      ptr__1WUC=micro_alloc__table__lab__BOI(new_size__LTZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LTZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LTZQ);
    } else {
      t__NTZQ=((__UINTEGER_32 )typ_id__AXUC);
      a__BMI=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__1WUC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__3WUC + a__BMI) & (__UINTEGER_32)(~ a__BMI)),((__POINTER )(&(table_type[(t__NTZQ)]))),(__UINTEGER_32)(t__NTZQ |  1));
    };
    result__0WUC=((__INTEGER_CST *)ptr__1WUC);
    *(result__0WUC) = *(INTEGER_CST__);
  };
  Self__LAZD=((__INTEGER_CST *)result__0WUC);
  Self__LAZD->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=p__FNQC;
  Self__LAZD->value__PAZD=v__GNQC;
  Self__LAZD->parent_constant__P3LC.static_type__F4YD=t__HNQC;
  check_type__RI5D(Self__LAZD);
  return(result__0WUC);
}

static void pop_stack_until__DDAG(__INTEGER stack_top__FDAG)
// ({INTEGER}) VoidNo recursive, No inlinable.
{
  void *var__GDAG,*result__YDJN;
  void *n__IDAG,*n__WDJN;
  __POSITION __tmp__HFAG;
  __INTEGER j__ZDJN;
  __FAST_ARRAYoLOCALo *Self__I1PH,*Self__LU5M;
  void **__tmp__P15Q;
  __BOOLEAN __tmp__YFJN;
  var__GDAG=NULL;
  n__IDAG=NULL;
  if (verify__JDAG) {
    while ((((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F >= stack_top__FDAG)) {
      Self__I1PH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F);
      var__GDAG=((void **)Self__I1PH->parent_arrayed_collection__QI4F.storage__FXPG)[Self__I1PH->parent_arrayed_collection__QI4F.upper__TI4F];
      Self__LU5M=((__FAST_ARRAYoLOCALo *)stack_local__RI4F);
      Self__LU5M->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(Self__LU5M->parent_arrayed_collection__QI4F.upper__TI4F -  1);
      n__IDAG=((__LOCAL *)var__GDAG)->parent_variable__B2LC.parent_named__A2LC.name__1QB;
      if ((((void *)n__IDAG != (void *)(&__string_57)) && ((void *)n__IDAG != (void *)(&__string_60)))) {
        if (((((__LOCAL *)var__GDAG)->parent_variable__B2LC.ensure_count__QEAG ==  0) && (((__LOCAL *)var__GDAG)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != ' '))) {
          copy__BNK(string_tmp__RB,(&__string_249));
          append__MOK(string_tmp__RB,((__LOCAL *)var__GDAG)->parent_variable__B2LC.parent_named__A2LC.name__1QB);
          append__MOK(string_tmp__RB,(&__string_250));
          __tmp__HFAG=((__LOCAL *)var__GDAG)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          put_error__text__0AH( 2,string_tmp__RB);
          put_position__ECH(__tmp__HFAG);
          send_error__2FH();
        };
        n__WDJN=((__LOCAL *)var__GDAG)->parent_variable__B2LC.parent_named__A2LC.name__1QB;
        result__YDJN=NULL;
        j__ZDJN=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
        __tmp__P15Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
        while ((! ((j__ZDJN < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__P15Q)[j__ZDJN])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__WDJN)))) {
          j__ZDJN=(__INTEGER)(j__ZDJN -  1);
        };
        if ((j__ZDJN >= stack_local_lower__AI4F)) {
          result__YDJN=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__ZDJN];
          if (((j__ZDJN < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__YDJN)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
            context_extern__1OLH=result__YDJN;
          };
          __tmp__YFJN=TRUE__;
        } else {
          __tmp__YFJN=FALSE__;
        };
        if ((! __tmp__YFJN)) {
          if (((void *)profil_first__4PQC != (void *)NULL)) {
            result__YDJN=lookup__LLJM(profil_first__4PQC,n__WDJN);
            if ((((void *)result__YDJN != (void *)NULL) && ((void *)((__LOCAL *)result__YDJN)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
              context_extern__1OLH=result__YDJN;
            };
          };
        };
        if (((void *)result__YDJN != (void *)NULL)) {
          copy__BNK(string_tmp__RB,(&__string_251));
          append__MOK(string_tmp__RB,n__IDAG);
          append__MOK(string_tmp__RB,(&__string_252));
          put_error__text__0AH( 2,string_tmp__RB);
          put_position__ECH(((__LOCAL *)result__YDJN)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
          put_position__ECH(((__LOCAL *)var__GDAG)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
      };
    };
  } else {
    remove_since__ERPG(stack_local__RI4F,stack_top__FDAG);
  };
}

static void remove_since__ERPG(__FAST_ARRAYoLOCALo *Self__FRPG,__INTEGER beg__GRPG)
// ({FAST_ARRAYoLOCALo},{INTEGER}) VoidNo recursive, No inlinable.
{
  if ((beg__GRPG <= Self__FRPG->parent_arrayed_collection__QI4F.upper__TI4F)) {
    Self__FRPG->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(beg__GRPG -  1);
  };
}

static void put_string__EQD(void *s__GQD)
// ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__VQD,__tmp__YQD,Self__WUE,limit_up__XUE;
  __CHARACTER *__tmp__0M4Q,*__tmp__Q15Q;
  __CHARACTER __tmp__5QD;
  if (((struct ___OBJ *)s__GQD)->__id==__STRING_CONSTANT__) {
    __tmp__VQD= 1;
  } else {
    __tmp__VQD= 1;
  };
  if (((struct ___OBJ *)s__GQD)->__id==__STRING_CONSTANT__) {
    __tmp__YQD=((__STRING_CONSTANT *)s__GQD)->count__XHB;
  } else {
    __tmp__YQD=((__STRING *)s__GQD)->count__VF;
  };
  Self__WUE=__tmp__VQD;
  limit_up__XUE=__tmp__YQD;
  __tmp__0M4Q=((__STRING *)s__GQD)->storage__XNK;
  __tmp__Q15Q=((__STRING_CONSTANT *)s__GQD)->storage__C5K;
  while ((Self__WUE <= limit_up__XUE)) {
    if (((struct ___OBJ *)s__GQD)->__id==__STRING_CONSTANT__) {
      __tmp__5QD=((__CHARACTER *)__tmp__Q15Q)[(__INTEGER)(Self__WUE -  1)];
    } else {
      __tmp__5QD=((__CHARACTER *)__tmp__0M4Q)[(__INTEGER)(Self__WUE -  1)];
    };
    fputc((int)(__tmp__5QD),stderr);
    Self__WUE=(__INTEGER)(Self__WUE +  1);
  };
}

static void* item__00SE(__LINKED_LISToNODE_TYPEo *Self__10SE,__INTEGER i__20SE)
// ({LINKED_LISToNODE_TYPEo},{INTEGER}) With resultNo recursive, No inlinable.
{
  if ((i__20SE != Self__10SE->mem_idx__X4YD)) {
    go_item__QV4E(Self__10SE,i__20SE);
  };
  return(((__LINKED_LIST_NODEoNODE_TYPEo *)Self__10SE->mem_lnk__Z4YD)->item__O1SE);
}

static __BOOLEAN update_case__XGAG(__NODE_TYPE *Self__YGAG)
// ({NODE_TYPE}) With resultNo recursive, No inlinable.
{
  void *typ__1GAG,*__tmp__MHAG,*__tmp__PIAG,*__tmp__XJAG,*__tmp__0KAG;
  void *lst_typ__2GAG;
  void *__tmp__JHAG,*__tmp__QIAG,*__tmp__EKAG,*__tmp__1KAG,*__tmp__1MAG;
  void *__tmp__KHAG;
  void *__tmp__NHAG,*tb__IHAG;
  void *__tmp__OIAG,*__tmp__ZKAG,*__tmp__0MAG;
  void *__tmp__RIAG,*__tmp__2KAG,*__tmp__2MAG;
  __INTEGER __tmp__AMAG,Self__KKVH;
  void *list__DHAG;
  __BOOLEAN result__FHAG,__tmp__VIAG,__tmp__3JAG;
  void *__tmp__YJAG;
  __FAST_ARRAYoTYPEo *Self__EN4Q;
  typ__1GAG=NULL;
  lst_typ__2GAG=NULL;
  list__DHAG=NULL;
  result__FHAG=FALSE__;
  __tmp__JHAG=Self__YGAG->parent_node__DMQC.expr__KLZD;
  switch (((struct ___OBJ *)__tmp__JHAG)->__id) {
  case __LIST__: {
    __tmp__KHAG=static_type__GIQG(__tmp__JHAG);
  } break;
  case __STRING_CST__: {
    __tmp__KHAG=((__STRING_CST *)__tmp__JHAG)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__KHAG=((__EXTERNAL_C *)__tmp__JHAG)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__KHAG=((__PROTOTYPE_CST *)__tmp__JHAG)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__KHAG=((__INTEGER_CST *)__tmp__JHAG)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__KHAG=((__LOCAL *)((__READ_LOCAL *)__tmp__JHAG)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KHAG=static_type__0N1H(__tmp__JHAG);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KHAG=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KHAG=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__KHAG=((__REAL_CST *)__tmp__JHAG)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__KHAG=((__CHARACTER_CST *)__tmp__JHAG)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__KHAG=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__KHAG=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__KHAG=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__KHAG=static_type__MP1H(__tmp__JHAG);
  } break;
  case __EXPR_MUL__: {
    __tmp__KHAG=static_type__SP1H(__tmp__JHAG);
  } break;
  case __EXPR_DIV__: {
    __tmp__KHAG=static_type__XP1H(__tmp__JHAG);
  } break;
  case __EXPR_AND__: {
    __tmp__KHAG=static_type__2P1H(__tmp__JHAG);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KHAG=static_type__BQ1H(__tmp__JHAG);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KHAG=static_type__GQ1H(__tmp__JHAG);
  } break;
  case __PUT_TO__: {
    __tmp__KHAG=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__KHAG=static_type__PQ1H(__tmp__JHAG);
  } break;
  case __SIZE_OF__: {
    __tmp__KHAG=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__KHAG=((__CAST *)__tmp__JHAG)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__KHAG=static_type__GIKL(__tmp__JHAG);
  } break;
  case __READ_SLOT__: {
    __tmp__KHAG=((__SLOT_DATA *)((__READ_SLOT *)__tmp__JHAG)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__KHAG=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JHAG)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KHAG=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KHAG=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KHAG=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KHAG=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KHAG=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__KHAG=static_type__Z2IM(__tmp__JHAG);
  } break;
  case __EXPR_ADD__: {
    __tmp__KHAG=static_type__IXML(__tmp__JHAG);
  } break;
  case __EXPR_NOT__: {
    __tmp__KHAG=static_type__BTXM(__tmp__JHAG);
  } break;
  case __EXPR_MOD__: {
    __tmp__KHAG=static_type__5LEO(__tmp__JHAG);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KHAG=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__KHAG=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KHAG=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__KHAG=static_type__NOPN(__tmp__JHAG);
  } break;
  case __EXPR_XOR__: {
    __tmp__KHAG=static_type__XCSO(__tmp__JHAG);
  } break;
  };
  __tmp__MHAG=((__TYPE_FULL *)__tmp__KHAG)->parent_type__KTL;
  if (__tmp__MHAG==NULL) {
    __tmp__NHAG=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__MHAG)->__id) {
    case __TYPE__: {
      __tmp__NHAG=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__NHAG=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__NHAG=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__NHAG=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__NHAG=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__NHAG=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__NHAG=((void *)__tmp__MHAG);
    } break;
    }
  };
  tb__IHAG=__tmp__NHAG;
  if (((((__UINTEGER_8)(((__TYPE_FULL *)__tmp__KHAG)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)__tmp__KHAG)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)__tmp__NHAG != (void *)NULL))) {
    if (((void *)Self__YGAG->parent_node__DMQC.first_code__FIAG == (void *)NULL)) {
      Self__YGAG->parent_node__DMQC.first_type__NIAG=((__TYPE_FULL *)__tmp__KHAG)->parent_type__KTL;
      __tmp__OIAG=Self__YGAG->parent_node__DMQC.data__LLZD;
      __tmp__PIAG=Self__YGAG->parent_node__DMQC.first_type__NIAG;
      __tmp__QIAG=Self__YGAG->parent_node__DMQC.expr__KLZD;
      switch (((struct ___OBJ *)__tmp__OIAG)->__id) {
      case __DTA_RD__: {
        __tmp__RIAG=product__with__WMYG(__tmp__OIAG,__tmp__PIAG,__tmp__QIAG);
      } break;
      case __DTA_CAST__: {
        __tmp__RIAG=product__with__S01H(__tmp__OIAG,__tmp__PIAG,__tmp__QIAG);
      } break;
      case __DTA_WR_CODE__: {
        __tmp__RIAG=product__with__O31H(__tmp__OIAG,__tmp__PIAG,__tmp__QIAG);
      } break;
      case __DTA_BLOCK__: {
        __tmp__RIAG=product__with__F41H(__tmp__OIAG,__tmp__PIAG,__tmp__QIAG);
      } break;
      case __DTA_WR_VALUE__: {
        __tmp__RIAG=product__with__CC2H(__tmp__OIAG,__tmp__PIAG,__tmp__QIAG);
      } break;
      case __DTA_RD_ARGS__: {
        __tmp__RIAG=product__with__YC2H(__tmp__OIAG,__tmp__PIAG,__tmp__QIAG);
      } break;
      };
      Self__YGAG->parent_node__DMQC.first_code__FIAG=__tmp__RIAG;
    };
    result__FHAG=TRUE__;
    __tmp__VIAG=TRUE__;
  } else {
    __tmp__VIAG=FALSE__;
  };
  if ((! __tmp__VIAG)) {
    if ((((void *)((__TYPE_FULL *)__tmp__KHAG)->parent_type__KTL == (void *)type_boolean__VJB) && (count__PNYG(Self__YGAG) ==  2))) {
      result__FHAG=TRUE__;
    } else {
      if (((void *)((__TYPE_FULL *)__tmp__KHAG)->parent_type__KTL == (void *)type_block__BLB)) {
        __tmp__3JAG=TRUE__;
      } else {
        __tmp__XJAG=((__TYPE_FULL *)__tmp__KHAG)->parent_type__KTL;
        switch (((struct ___OBJ *)__tmp__XJAG)->__id) {
        case __TYPE__: {
          __tmp__YJAG=((__TYPE *)__tmp__XJAG)->subtype_list__APY;
        } break;
        case __TYPE_NULL__: {
          __tmp__YJAG=((__TYPE_NULL *)__tmp__XJAG)->parent_type__TIB.subtype_list__APY;
        } break;
        case __TYPE_VOID__: {
          __tmp__YJAG=((__TYPE_VOID *)__tmp__XJAG)->parent_type__UIB.subtype_list__APY;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__YJAG=((__TYPE_CONTEXT *)__tmp__XJAG)->parent_type__VIB.subtype_list__APY;
        } break;
        case __TYPE_ID__: {
          __tmp__YJAG=((__TYPE_ID *)__tmp__XJAG)->parent_type__WIB.subtype_list__APY;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__YJAG=((__TYPE_GENERIC *)__tmp__XJAG)->parent_type__T2IB.subtype_list__APY;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__YJAG=subtype_list__0NFJ();
        } break;
        };
        __tmp__3JAG=(((__HASHED_SEToTYPEo *)__tmp__YJAG)->count__DSKB != count__PNYG(Self__YGAG));
      };
      if (__tmp__3JAG) {
        lst_typ__2GAG=new__XWSG();
        __tmp__EKAG=Self__YGAG->parent_node__DMQC.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__EKAG)->__id) {
        case __LIST__: {
          get_type__EYMJ(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __STRING_CST__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)((__STRING_CST *)__tmp__EKAG)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
        } break;
        case __EXTERNAL_C__: {
          get_type__ZHDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __PROTOTYPE_CST__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__EKAG)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
        } break;
        case __INTEGER_CST__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__EKAG)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
        } break;
        case __READ_LOCAL__: {
          get_type__AOFJ(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_MULTIPLE__: {
          print__1ZE((&__string_253));
          fputc((int)('\n'),stdout);
          exit(( 1));
        } break;
        case __EXPR_EQUAL__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_NOT_EQUAL__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __REAL_CST__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)((__REAL_CST *)__tmp__EKAG)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
        } break;
        case __CHARACTER_CST__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__EKAG)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
        } break;
        case __IS_EXPANDED__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __GET_TYPE_ID__: {
          add__R2EJ(lst_typ__2GAG,type_integer__3JB);
        } break;
        case __EXPR_SUP__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_SUB__: {
          get_type__ZJDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_MUL__: {
          get_type__3JDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_DIV__: {
          get_type__BKDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_AND__: {
          get_type__FKDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_SHIFT_R__: {
          get_type__JKDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_SHIFT_L__: {
          get_type__NKDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __PUT_TO__: {
          add__R2EJ(lst_typ__2GAG,TYPE_VOID__);
        } break;
        case __ITEM__: {
          get_type__UKDI(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __SIZE_OF__: {
          add__R2EJ(lst_typ__2GAG,type_integer__3JB);
        } break;
        case __CAST__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)((__CAST *)__tmp__EKAG)->static_type__SO1H)->parent_type__KTL);
        } break;
        case __CALL_SLOT__: {
          get_type__DAML(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __READ_SLOT__: {
          get_type__OD0K(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __READ_GLOBAL__: {
          get_type__ZJOL(((__READ_GLOBAL *)__tmp__EKAG)->global__RHJK,lst_typ__2GAG);
        } break;
        case __EXPR_NOT_LOGIC__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_OR_LOGIC__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_AND_LOGIC__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_NEG__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__EKAG)))->parent_type__KTL);
        } break;
        case __EXPR_ADD__: {
          get_type__YEOL(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_NOT__: {
          add__R2EJ(lst_typ__2GAG,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__EKAG)))->parent_type__KTL);
        } break;
        case __EXPR_MOD__: {
          get_type__FSEO(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_SUP_EQ__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_INF__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_INF_EQ__: {
          add__R2EJ(lst_typ__2GAG,type_true__FJB);
          add__R2EJ(lst_typ__2GAG,type_false__NJB);
        } break;
        case __EXPR_OR__: {
          get_type__CVPN(__tmp__EKAG,lst_typ__2GAG);
        } break;
        case __EXPR_XOR__: {
          get_type__FNTO(__tmp__EKAG,lst_typ__2GAG);
        } break;
        };
        if ((((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.upper__4LAG != (__INTEGER)(-  1))) {
          if (((__INTEGER)(((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.upper__4LAG +  1) ==  1)) {
            if (((void *)Self__YGAG->parent_node__DMQC.first_code__FIAG == (void *)NULL)) {
              Self__YGAG->parent_node__DMQC.first_type__NIAG=((void **)((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.storage__WWFJ)[ 0];
              __tmp__ZKAG=Self__YGAG->parent_node__DMQC.data__LLZD;
              __tmp__0KAG=Self__YGAG->parent_node__DMQC.first_type__NIAG;
              __tmp__1KAG=Self__YGAG->parent_node__DMQC.expr__KLZD;
              switch (((struct ___OBJ *)__tmp__ZKAG)->__id) {
              case __DTA_RD__: {
                __tmp__2KAG=product__with__WMYG(__tmp__ZKAG,__tmp__0KAG,__tmp__1KAG);
              } break;
              case __DTA_CAST__: {
                __tmp__2KAG=product__with__S01H(__tmp__ZKAG,__tmp__0KAG,__tmp__1KAG);
              } break;
              case __DTA_WR_CODE__: {
                __tmp__2KAG=product__with__O31H(__tmp__ZKAG,__tmp__0KAG,__tmp__1KAG);
              } break;
              case __DTA_BLOCK__: {
                __tmp__2KAG=product__with__F41H(__tmp__ZKAG,__tmp__0KAG,__tmp__1KAG);
              } break;
              case __DTA_WR_VALUE__: {
                __tmp__2KAG=product__with__CC2H(__tmp__ZKAG,__tmp__0KAG,__tmp__1KAG);
              } break;
              case __DTA_RD_ARGS__: {
                __tmp__2KAG=product__with__YC2H(__tmp__ZKAG,__tmp__0KAG,__tmp__1KAG);
              } break;
              };
              Self__YGAG->parent_node__DMQC.first_code__FIAG=__tmp__2KAG;
            };
          } else {
            if (((void *)Self__YGAG->parent_node__DMQC.switch__ELAG == (void *)NULL)) {
              Self__YGAG->parent_node__DMQC.switch__ELAG=create__with__size__5JVH(Self__YGAG,Self__YGAG->parent_node__DMQC.expr__KLZD,(__INTEGER)(((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.upper__4LAG +  1));
            };
            list__DHAG=((__SWITCH *)Self__YGAG->parent_node__DMQC.switch__ELAG)->list__SLAG;
            if (((__INTEGER)(((__FAST_ARRAYoCASEo *)list__DHAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) != (__INTEGER)(((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.upper__4LAG +  1))) {
              __tmp__AMAG=((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.upper__4LAG;
              Self__KKVH= 0;
              while ((Self__KKVH <= __tmp__AMAG)) {
                typ__1GAG=((void **)((__TYPES_TMP *)lst_typ__2GAG)->parent_types__W25F.storage__WWFJ)[Self__KKVH];
                if (((Self__KKVH > ((__FAST_ARRAYoCASEo *)list__DHAG)->parent_arrayed_collection__CHAG.upper__HMAG) || ((void *)typ__1GAG != (void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)list__DHAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__KKVH])->id__QMAG))) {
                  add_stack_type__2JNG(Self__YGAG,typ__1GAG);
                  __tmp__0MAG=Self__YGAG->parent_node__DMQC.data__LLZD;
                  __tmp__1MAG=Self__YGAG->parent_node__DMQC.expr__KLZD;
                  switch (((struct ___OBJ *)__tmp__0MAG)->__id) {
                  case __DTA_RD__: {
                    __tmp__2MAG=product__with__WMYG(__tmp__0MAG,typ__1GAG,__tmp__1MAG);
                  } break;
                  case __DTA_CAST__: {
                    __tmp__2MAG=product__with__S01H(__tmp__0MAG,typ__1GAG,__tmp__1MAG);
                  } break;
                  case __DTA_WR_CODE__: {
                    __tmp__2MAG=product__with__O31H(__tmp__0MAG,typ__1GAG,__tmp__1MAG);
                  } break;
                  case __DTA_BLOCK__: {
                    __tmp__2MAG=product__with__F41H(__tmp__0MAG,typ__1GAG,__tmp__1MAG);
                  } break;
                  case __DTA_WR_VALUE__: {
                    __tmp__2MAG=product__with__CC2H(__tmp__0MAG,typ__1GAG,__tmp__1MAG);
                  } break;
                  case __DTA_RD_ARGS__: {
                    __tmp__2MAG=product__with__YC2H(__tmp__0MAG,typ__1GAG,__tmp__1MAG);
                  } break;
                  };
                  add__to__IDGJ(list__DHAG,create__with__NC1H(typ__1GAG,__tmp__2MAG),Self__KKVH);
                  Self__EN4Q=((__FAST_ARRAYoTYPEo *)stack_type__5MAG);
                  Self__EN4Q->parent_arrayed_collection__UOB.upper__1OB=(__INTEGER)(Self__EN4Q->parent_arrayed_collection__UOB.upper__1OB -  1);
                };
                Self__KKVH=(__INTEGER)(Self__KKVH +  1);
              };
            };
          };
        };
        free__OOFJ(lst_typ__2GAG);
      };
    };
  };
  return(result__FHAG);
}

static __BOOLEAN update_depth__QNAG(__NODE_TYPE *Self__RNAG,__BOOLEAN is_first__SNAG)
// ({NODE_TYPE},{TRUExFALSE}) With resultRecursive, No inlinable.
{
  void *typ__WNAG,*__tmp__JOAG,*__tmp__SOAG,*__tmp__XPAG;
  void *__tmp__IOAG;
  void *__tmp__ROAG,*__tmp__WPAG;
  void *__tmp__ZOAG,*__tmp__5PAG;
  void *__tmp__0OAG,*__tmp__DQAG;
  __INTEGER __tmp__KPAG,Self__OJLG;
  __BOOLEAN result__UNAG,__tmp__1OAG;
  void *list__VNAG;
  __FAST_ARRAYoTYPEo *Self__GN4Q,*Self__V5PG;
  result__UNAG=FALSE__;
  list__VNAG=NULL;
  typ__WNAG=NULL;
  if (((void *)Self__RNAG->parent_node__DMQC.switch__ELAG == (void *)NULL)) {
    if (((void *)Self__RNAG->parent_node__DMQC.first_code__FIAG != (void *)NULL)) {
      if (is_first__SNAG) {
        __tmp__IOAG=Self__RNAG->parent_node__DMQC.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__IOAG)->__id) {
        case __LIST__: {
          __tmp__JOAG=static_type__GIQG(__tmp__IOAG);
        } break;
        case __STRING_CST__: {
          __tmp__JOAG=((__STRING_CST *)__tmp__IOAG)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__JOAG=((__EXTERNAL_C *)__tmp__IOAG)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__JOAG=((__PROTOTYPE_CST *)__tmp__IOAG)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__JOAG=((__INTEGER_CST *)__tmp__IOAG)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__JOAG=((__LOCAL *)((__READ_LOCAL *)__tmp__IOAG)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__JOAG=static_type__0N1H(__tmp__IOAG);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__JOAG=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__JOAG=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__JOAG=((__REAL_CST *)__tmp__IOAG)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__JOAG=((__CHARACTER_CST *)__tmp__IOAG)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__JOAG=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__JOAG=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__JOAG=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__JOAG=static_type__MP1H(__tmp__IOAG);
        } break;
        case __EXPR_MUL__: {
          __tmp__JOAG=static_type__SP1H(__tmp__IOAG);
        } break;
        case __EXPR_DIV__: {
          __tmp__JOAG=static_type__XP1H(__tmp__IOAG);
        } break;
        case __EXPR_AND__: {
          __tmp__JOAG=static_type__2P1H(__tmp__IOAG);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__JOAG=static_type__BQ1H(__tmp__IOAG);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__JOAG=static_type__GQ1H(__tmp__IOAG);
        } break;
        case __PUT_TO__: {
          __tmp__JOAG=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__JOAG=static_type__PQ1H(__tmp__IOAG);
        } break;
        case __SIZE_OF__: {
          __tmp__JOAG=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__JOAG=((__CAST *)__tmp__IOAG)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__JOAG=static_type__GIKL(__tmp__IOAG);
        } break;
        case __READ_SLOT__: {
          __tmp__JOAG=((__SLOT_DATA *)((__READ_SLOT *)__tmp__IOAG)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__JOAG=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__IOAG)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__JOAG=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__JOAG=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__JOAG=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__JOAG=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__JOAG=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__JOAG=static_type__Z2IM(__tmp__IOAG);
        } break;
        case __EXPR_ADD__: {
          __tmp__JOAG=static_type__IXML(__tmp__IOAG);
        } break;
        case __EXPR_NOT__: {
          __tmp__JOAG=static_type__BTXM(__tmp__IOAG);
        } break;
        case __EXPR_MOD__: {
          __tmp__JOAG=static_type__5LEO(__tmp__IOAG);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__JOAG=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__JOAG=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__JOAG=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__JOAG=static_type__NOPN(__tmp__IOAG);
        } break;
        case __EXPR_XOR__: {
          __tmp__JOAG=static_type__XCSO(__tmp__IOAG);
        } break;
        };
        typ__WNAG=__tmp__JOAG;
        if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__JOAG)->flag__LTL &  1) !=  0))) {
          __tmp__ROAG=Self__RNAG->parent_node__DMQC.first_type__NIAG;
          switch (((struct ___OBJ *)__tmp__ROAG)->__id) {
          case __TYPE__: {
            __tmp__SOAG=((__TYPE *)__tmp__ROAG)->default__AKC;
          } break;
          case __TYPE_NULL__: {
            __tmp__SOAG=((__TYPE_NULL *)__tmp__ROAG)->parent_type__TIB.default__AKC;
          } break;
          case __TYPE_VOID__: {
            __tmp__SOAG=((__TYPE_VOID *)__tmp__ROAG)->parent_type__UIB.default__AKC;
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__SOAG=((__TYPE_CONTEXT *)__tmp__ROAG)->parent_type__VIB.default__AKC;
          } break;
          case __TYPE_ID__: {
            __tmp__SOAG=((__TYPE_ID *)__tmp__ROAG)->parent_type__WIB.default__AKC;
          } break;
          case __TYPE_GENERIC__: {
            __tmp__SOAG=((__TYPE_GENERIC *)__tmp__ROAG)->parent_type__T2IB.default__AKC;
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__SOAG=((__PROFIL_BLOCK *)__tmp__ROAG)->parent_type__HHAG.default__AKC;
          } break;
          };
          typ__WNAG=to_strict__LE5D(__tmp__SOAG);
        };
        run_value__FMQC=typ__WNAG;
      };
      add_stack_type__2JNG(Self__RNAG,Self__RNAG->parent_node__DMQC.first_type__NIAG);
      __tmp__ZOAG=Self__RNAG->parent_node__DMQC.data__LLZD;
      __tmp__0OAG=Self__RNAG->parent_node__DMQC.first_code__FIAG;
      switch (((struct ___OBJ *)__tmp__ZOAG)->__id) {
      case __DTA_RD__: {
        __tmp__1OAG=update_branch__PLNG(__tmp__0OAG);
      } break;
      case __DTA_CAST__: {
        __tmp__1OAG=TRUE__;
      } break;
      case __DTA_WR_CODE__: {
        __tmp__1OAG=update_branch__AS1H(__tmp__0OAG);
      } break;
      case __DTA_BLOCK__: {
        __tmp__1OAG=TRUE__;
      } break;
      case __DTA_WR_VALUE__: {
        __tmp__1OAG=update_branch__ET1H(__tmp__0OAG);
      } break;
      case __DTA_RD_ARGS__: {
        __tmp__1OAG=update_branch__TV1H(__tmp__0OAG);
      } break;
      };
      result__UNAG=__tmp__1OAG;
      Self__GN4Q=((__FAST_ARRAYoTYPEo *)stack_type__5MAG);
      Self__GN4Q->parent_arrayed_collection__UOB.upper__1OB=(__INTEGER)(Self__GN4Q->parent_arrayed_collection__UOB.upper__1OB -  1);
    };
  } else {
    list__VNAG=((__SWITCH *)Self__RNAG->parent_node__DMQC.switch__ELAG)->list__SLAG;
    __tmp__KPAG=((__FAST_ARRAYoCASEo *)list__VNAG)->parent_arrayed_collection__CHAG.upper__HMAG;
    Self__OJLG= 0;
    while ((Self__OJLG <= __tmp__KPAG)) {
      if (is_first__SNAG) {
        __tmp__WPAG=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)list__VNAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__OJLG])->id__QMAG;
        switch (((struct ___OBJ *)__tmp__WPAG)->__id) {
        case __TYPE__: {
          __tmp__XPAG=((__TYPE *)__tmp__WPAG)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__XPAG=((__TYPE_NULL *)__tmp__WPAG)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__XPAG=((__TYPE_VOID *)__tmp__WPAG)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__XPAG=((__TYPE_CONTEXT *)__tmp__WPAG)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__XPAG=((__TYPE_ID *)__tmp__WPAG)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__XPAG=((__TYPE_GENERIC *)__tmp__WPAG)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__XPAG=((__PROFIL_BLOCK *)__tmp__WPAG)->parent_type__HHAG.default__AKC;
        } break;
        };
        run_value__FMQC=to_strict__LE5D(__tmp__XPAG);
      };
      add_stack_type__2JNG(Self__RNAG,((__CASE *)((void **)((__FAST_ARRAYoCASEo *)list__VNAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__OJLG])->id__QMAG);
      __tmp__5PAG=Self__RNAG->parent_node__DMQC.data__LLZD;
      __tmp__DQAG=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)list__VNAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__OJLG])->code__BQAG;
      switch (((struct ___OBJ *)__tmp__5PAG)->__id) {
      case __DTA_RD__: {
        update_branch__PLNG(__tmp__DQAG);
      } break;
      case __DTA_CAST__: {
      } break;
      case __DTA_WR_CODE__: {
        update_branch__AS1H(__tmp__DQAG);
      } break;
      case __DTA_BLOCK__: {
      } break;
      case __DTA_WR_VALUE__: {
        update_branch__ET1H(__tmp__DQAG);
      } break;
      case __DTA_RD_ARGS__: {
        update_branch__TV1H(__tmp__DQAG);
      } break;
      };
      Self__V5PG=((__FAST_ARRAYoTYPEo *)stack_type__5MAG);
      Self__V5PG->parent_arrayed_collection__UOB.upper__1OB=(__INTEGER)(Self__V5PG->parent_arrayed_collection__UOB.upper__1OB -  1);
      Self__OJLG=(__INTEGER)(Self__OJLG +  1);
    };
  };
  return(result__UNAG);
}

static void remove__50RG(__LINKED_LISToNODE_TYPEo *Self__A1RG,__INTEGER index__B1RG)
// ({LINKED_LISToNODE_TYPEo},{INTEGER}) VoidNo recursive, No inlinable.
{
  __BOOLEAN __tmp__Q1RG;
  if ((index__B1RG ==  1)) {
    if ((Self__A1RG->parent_linked_collection__OMQC.upper__ZCID ==  1)) {
      Self__A1RG->first_link__N4YD=NULL;
      Self__A1RG->last_link__W4YD=NULL;
      Self__A1RG->mem_lnk__Z4YD=NULL;
      Self__A1RG->mem_idx__X4YD= 0;
      Self__A1RG->parent_linked_collection__OMQC.upper__ZCID= 0;
    } else {
      Self__A1RG->first_link__N4YD=((__LINKED_LIST_NODEoNODE_TYPEo *)Self__A1RG->first_link__N4YD)->next__GX4E;
      if ((Self__A1RG->mem_idx__X4YD ==  1)) {
        Self__A1RG->mem_lnk__Z4YD=Self__A1RG->first_link__N4YD;
      } else {
        Self__A1RG->mem_idx__X4YD=(__INTEGER)(Self__A1RG->mem_idx__X4YD -  1);
      };
      Self__A1RG->parent_linked_collection__OMQC.upper__ZCID=(__INTEGER)(Self__A1RG->parent_linked_collection__OMQC.upper__ZCID -  1);
    };
    __tmp__Q1RG=TRUE__;
  } else {
    __tmp__Q1RG=FALSE__;
  };
  if ((! __tmp__Q1RG)) {
    if ((index__B1RG == Self__A1RG->parent_linked_collection__OMQC.upper__ZCID)) {
      if ((Self__A1RG->parent_linked_collection__OMQC.upper__ZCID ==  1)) {
        Self__A1RG->first_link__N4YD=NULL;
        Self__A1RG->last_link__W4YD=NULL;
        Self__A1RG->mem_lnk__Z4YD=NULL;
        Self__A1RG->mem_idx__X4YD= 0;
        Self__A1RG->parent_linked_collection__OMQC.upper__ZCID= 0;
      } else {
        if (((__INTEGER)(Self__A1RG->parent_linked_collection__OMQC.upper__ZCID -  1) != Self__A1RG->mem_idx__X4YD)) {
          go_item__QV4E(Self__A1RG,(__INTEGER)(Self__A1RG->parent_linked_collection__OMQC.upper__ZCID -  1));
        };
        Self__A1RG->parent_linked_collection__OMQC.upper__ZCID=(__INTEGER)(Self__A1RG->parent_linked_collection__OMQC.upper__ZCID -  1);
        Self__A1RG->last_link__W4YD=Self__A1RG->mem_lnk__Z4YD;
        ((__LINKED_LIST_NODEoNODE_TYPEo *)Self__A1RG->last_link__W4YD)->next__GX4E=NULL;
      };
    } else {
      if (((__INTEGER)(index__B1RG -  1) != Self__A1RG->mem_idx__X4YD)) {
        go_item__QV4E(Self__A1RG,(__INTEGER)(index__B1RG -  1));
      };
      ((__LINKED_LIST_NODEoNODE_TYPEo *)Self__A1RG->mem_lnk__Z4YD)->next__GX4E=((__LINKED_LIST_NODEoNODE_TYPEo *)((__LINKED_LIST_NODEoNODE_TYPEo *)Self__A1RG->mem_lnk__Z4YD)->next__GX4E)->next__GX4E;
      Self__A1RG->parent_linked_collection__OMQC.upper__ZCID=(__INTEGER)(Self__A1RG->parent_linked_collection__OMQC.upper__ZCID -  1);
    };
  };
}

static void append_in__4VC(__INTEGER_32 Self__5VC,void *buffer__AWC)
// ({INTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER_32 val__HWC;
  __INTEGER i__KWC,j__LWC;
  __STRING *Self__R15Q;
  __CHARACTER tmp__T15Q;
  val__HWC= 0;
  i__KWC= 0;
  j__LWC= 0;
  if ((Self__5VC ==  0)) {
    add_last__YPK(((__STRING *)buffer__AWC),'0');
  } else {
    if ((Self__5VC >  0)) {
      val__HWC=Self__5VC;
    } else {
      val__HWC=(__INTEGER_32)(- Self__5VC);
      add_last__YPK(((__STRING *)buffer__AWC),'-');
    };
    i__KWC=(__INTEGER)(((__STRING *)buffer__AWC)->count__VF +  1);
    while ((val__HWC !=  0)) {
      add_last__YPK(((__STRING *)buffer__AWC),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__HWC %  10)) + ((__INTEGER_8 )'0'))))));
      val__HWC=(__INTEGER_32)(val__HWC /  10);
    };
    j__LWC=((__STRING *)buffer__AWC)->count__VF;
    while ((i__KWC < j__LWC)) {
      Self__R15Q=((__STRING *)buffer__AWC);
      tmp__T15Q=((__CHARACTER *)Self__R15Q->storage__XNK)[(__INTEGER)(i__KWC -  1)];
      ((__CHARACTER *)Self__R15Q->storage__XNK)[(__INTEGER)(i__KWC -  1)]=((__CHARACTER *)Self__R15Q->storage__XNK)[(__INTEGER)(j__LWC -  1)];
      ((__CHARACTER *)Self__R15Q->storage__XNK)[(__INTEGER)(j__LWC -  1)]=tmp__T15Q;
      j__LWC=(__INTEGER)(j__LWC -  1);
      i__KWC=(__INTEGER)(i__KWC +  1);
    };
  };
}

static void display__Y10C()
// () VoidNo recursive, No inlinable.
{
  __INTEGER Self__KZCD;
  void *__tmp__H20C;
  __PROFIL_SLOT *Self__A3IM;
  __PROFIL_BLOCK *Self__2QEJ;
  ((__STRING *)string_tmp__RB)->count__VF= 0;
  Self__KZCD=((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.upper__KNB;
  while ((Self__KZCD >=  0)) {
    __tmp__H20C=((void **)((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.storage__P1L)[Self__KZCD];
    if (((struct ___OBJ *)__tmp__H20C)->__id==__PROFIL_SLOT__) {
      Self__A3IM=((__PROFIL_SLOT *)__tmp__H20C);
      append__MOK(string_tmp__RB,((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)Self__A3IM->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB);
      append_type__X0LM(Self__A3IM,string_tmp__RB);
      display__2QQG(Self__A3IM->parent_profil__51LC.code__HZJH,string_tmp__RB);
      append__MOK(string_tmp__RB,(&__string_254));
    } else {
      Self__2QEJ=((__PROFIL_BLOCK *)__tmp__H20C);
      append__MOK(string_tmp__RB,(&__string_255));
      append_type__LMJJ(Self__2QEJ,string_tmp__RB);
      display__2QQG(Self__2QEJ->parent_profil__GHAG.code__HZJH,string_tmp__RB);
      append__MOK(string_tmp__RB,(&__string_254));
    };
    Self__KZCD=(__INTEGER)(Self__KZCD -  1);
  };
  put_string__2EG(((__STRING *)string_tmp__RB));
}

static void* execute_link__LUOG(__LIST *Self__MUOG)
// ({LIST}) With resultRecursive, No inlinable.
{
  return(execute_list__EOQG(Self__MUOG));
}

static void clean__2YUC()
// () VoidNo recursive, No inlinable.
{
  void *__tmp__RZUC;
  __PROFIL_SLOT *Self__E3IM;
  __FAST_ARRAYoPROFILo *Self__MQRE,*Self__NRRE;
  reduce_profil__BQQC=(((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.upper__KNB >= life_limit__2PQC);
  while ((((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.upper__KNB >= life_limit__2PQC)) {
    Self__MQRE=((__FAST_ARRAYoPROFILo *)profil_list__ENB);
    __tmp__RZUC=((void **)Self__MQRE->parent_arrayed_collection__DNB.storage__P1L)[Self__MQRE->parent_arrayed_collection__DNB.upper__KNB];
    if (((struct ___OBJ *)__tmp__RZUC)->__id==__PROFIL_SLOT__) {
      Self__E3IM=((__PROFIL_SLOT *)__tmp__RZUC);
      remove__KPJJ(Self__E3IM->parent_profil__51LC.code__HZJH);
      remove_profil__3FAM(Self__E3IM->slot_code__X4NL,Self__E3IM);
    } else {
      remove__KPJJ(((__PROFIL_BLOCK *)__tmp__RZUC)->parent_profil__GHAG.code__HZJH);
    };
    Self__NRRE=((__FAST_ARRAYoPROFILo *)profil_list__ENB);
    Self__NRRE->parent_arrayed_collection__DNB.upper__KNB=(__INTEGER)(Self__NRRE->parent_arrayed_collection__DNB.upper__KNB -  1);
  };
}

static void execute__2LHM(__PROFIL_SLOT *Self__3LHM,__INTEGER inline_lev__4LHM)
// ({PROFIL_SLOT},{INTEGER}) VoidNo recursive, No inlinable.
{
  __UINTEGER_32 old_seq_inline__5LHM;
  void *__tmp__PMHM;
  void *__tmp__QMHM,*__tmp__0MHM;
  void *__tmp__ZMHM;
  list_current__IF1=NULL;
  old_seq_inline__5LHM=seq_inline__FXRG;
  count_context_sensitive__VSEJ= 0;
  seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ +  1);
  if (((void *)Self__3LHM->parent_profil__51LC.result_last__XGKH == (void *)NULL)) {
    __tmp__PMHM=execute_unlink__0SRJ(Self__3LHM->parent_profil__51LC.code__HZJH);
    if (__tmp__PMHM==NULL) {
      __tmp__QMHM=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__PMHM)->__id) {
      case __LIST__: {
        __tmp__QMHM=((void *)__tmp__PMHM);
      } break;
      case __STRING_CST__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__QMHM=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__QMHM=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__QMHM=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__QMHM=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__QMHM=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__QMHM=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__QMHM=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__QMHM=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__QMHM=NULL;
      } break;
      case __ITEM__: {
        __tmp__QMHM=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__QMHM=NULL;
      } break;
      case __CAST__: {
        __tmp__QMHM=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__QMHM=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__QMHM=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__QMHM=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__QMHM=NULL;
      } break;
      }
    };
    Self__3LHM->parent_profil__51LC.code__HZJH=__tmp__QMHM;
  } else {
    __tmp__ZMHM=execute_link__LUOG(Self__3LHM->parent_profil__51LC.code__HZJH);
    if (__tmp__ZMHM==NULL) {
      __tmp__0MHM=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__ZMHM)->__id) {
      case __LIST__: {
        __tmp__0MHM=((void *)__tmp__ZMHM);
      } break;
      case __STRING_CST__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__0MHM=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__0MHM=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__0MHM=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__0MHM=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__0MHM=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__0MHM=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__0MHM=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__0MHM=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__0MHM=NULL;
      } break;
      case __ITEM__: {
        __tmp__0MHM=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__0MHM=NULL;
      } break;
      case __CAST__: {
        __tmp__0MHM=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__0MHM=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__0MHM=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__0MHM=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__0MHM=NULL;
      } break;
      }
    };
    Self__3LHM->parent_profil__51LC.code__HZJH=__tmp__0MHM;
  };
  clear__TQJJ();
  seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ +  1);
  if (((((count_context_sensitive__VSEJ ==  0) && (! mode_recursive__WYUC)) && (Self__3LHM->parent_profil__51LC.stat__BNEJ ==  0)) && (Self__3LHM->is_context_sensitive__5POL || ((__UINTEGER_32)(seq_inline__FXRG - old_seq_inline__5LHM) < ((__UINTEGER_32 )inline_lev__4LHM))))) {
    Self__3LHM->parent_profil__51LC.stat__BNEJ=(__INTEGER_8)(~ (__INTEGER_8)((__INTEGER_8)(~ Self__3LHM->parent_profil__51LC.stat__BNEJ) &  -2));
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
}

static void execute__OREJ(__PROFIL_BLOCK *Self__PREJ,__INTEGER inline_lev__QREJ)
// ({PROFIL_BLOCK},{INTEGER}) VoidNo recursive, No inlinable.
{
  __UINTEGER_32 old_seq_inline__RREJ;
  void *__tmp__CSEJ;
  void *__tmp__DSEJ,*__tmp__NSEJ;
  void *__tmp__MSEJ;
  list_current__IF1=NULL;
  old_seq_inline__RREJ=seq_inline__FXRG;
  count_context_sensitive__VSEJ= 0;
  seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ +  1);
  if (((void *)Self__PREJ->parent_profil__GHAG.result_last__XGKH == (void *)NULL)) {
    __tmp__CSEJ=execute_unlink__0SRJ(Self__PREJ->parent_profil__GHAG.code__HZJH);
    if (__tmp__CSEJ==NULL) {
      __tmp__DSEJ=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__CSEJ)->__id) {
      case __LIST__: {
        __tmp__DSEJ=((void *)__tmp__CSEJ);
      } break;
      case __STRING_CST__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__DSEJ=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__DSEJ=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__DSEJ=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__DSEJ=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__DSEJ=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__DSEJ=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__DSEJ=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__DSEJ=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__DSEJ=NULL;
      } break;
      case __ITEM__: {
        __tmp__DSEJ=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__DSEJ=NULL;
      } break;
      case __CAST__: {
        __tmp__DSEJ=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__DSEJ=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__DSEJ=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__DSEJ=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__DSEJ=NULL;
      } break;
      }
    };
    Self__PREJ->parent_profil__GHAG.code__HZJH=__tmp__DSEJ;
  } else {
    __tmp__MSEJ=execute_link__LUOG(Self__PREJ->parent_profil__GHAG.code__HZJH);
    if (__tmp__MSEJ==NULL) {
      __tmp__NSEJ=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__MSEJ)->__id) {
      case __LIST__: {
        __tmp__NSEJ=((void *)__tmp__MSEJ);
      } break;
      case __STRING_CST__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__NSEJ=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__NSEJ=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__NSEJ=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__NSEJ=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__NSEJ=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__NSEJ=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__NSEJ=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__NSEJ=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__NSEJ=NULL;
      } break;
      case __ITEM__: {
        __tmp__NSEJ=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__NSEJ=NULL;
      } break;
      case __CAST__: {
        __tmp__NSEJ=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__NSEJ=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__NSEJ=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__NSEJ=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__NSEJ=NULL;
      } break;
      }
    };
    Self__PREJ->parent_profil__GHAG.code__HZJH=__tmp__NSEJ;
  };
  clear__TQJJ();
  seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ +  1);
  if (((((count_context_sensitive__VSEJ ==  0) && (! mode_recursive__WYUC)) && (Self__PREJ->parent_profil__GHAG.stat__BNEJ ==  0)) && (((void *)Self__PREJ->context_extern__OMXH != (void *)NULL) || ((__UINTEGER_32)(seq_inline__FXRG - old_seq_inline__RREJ) < ((__UINTEGER_32 )inline_lev__QREJ))))) {
    Self__PREJ->parent_profil__GHAG.stat__BNEJ=(__INTEGER_8)(~ (__INTEGER_8)((__INTEGER_8)(~ Self__PREJ->parent_profil__GHAG.stat__BNEJ) &  -2));
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
}

static void display__2QQG(__LIST *Self__3QQG,void *buffer__4QQG)
// ({LIST},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__DRQG,Self__RZRG,__tmp__4ULK,result__YDOQ,__tmp__WAPK;
  __INTEGER result__ZDOQ,__tmp__21LK,result__0DOQ,__tmp__GF1M;
  __INTEGER result__IEAN,__tmp__DPGN,result__KDLN,__tmp__Q0RG;
  __INTEGER result__QAZG;
  void *__tmp__KRQG;
  __PUSH *Self__XUFK;
  __WRITE_GLOBAL *Self__L0FK;
  void *result__I5HQ,*result__O5HQ,*result__V5HQ;
  void *__tmp__30FK,*__tmp__C1FK,*__tmp__KWLK,*__tmp__D5FK;
  __IS_EXPANDED *Self__L5HQ,*Self__N5HQ,*Self__R5HQ,*Self__T5HQ;
  __IS_EXPANDED *Self__Y5HQ;
  __WRITE_SLOT *Self__A1FK;
  __WRITE_LOCAL *Self__R4FK;
  __LOOP *Self__QUXM;
  __LOOP_END *Self__32CN;
  add_last__YPK(buffer__4QQG,'(');
  add_last__YPK(buffer__4QQG,'\n');
  append__MOK(indent__ZQOG,(&__string_143));
  __tmp__DRQG=(__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__3QQG->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1);
  Self__RZRG= 1;
  while ((Self__RZRG <= __tmp__DRQG)) {
    append__MOK(buffer__4QQG,indent__ZQOG);
    __tmp__KRQG=((void **)((__FAST_ARRAYoINSTRo *)Self__3QQG->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__RZRG -  1)];
    switch (((struct ___OBJ *)__tmp__KRQG)->__id) {
    case __LIST__: {
      display__2QQG(__tmp__KRQG,buffer__4QQG);
    } break;
    case __STRING_CST__: {
      display__SUFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __PUSH__: {
      Self__XUFK=((__PUSH *)__tmp__KRQG);
      append__MOK(buffer__4QQG,(&__string_256));
      append__MOK(buffer__4QQG,((__LOCAL *)Self__XUFK->context__ZYPG)->parent_variable__B2LC.intern_name__025F);
      add_last__YPK(buffer__4QQG,')');
    } break;
    case __EXTERNAL_C__: {
      display__2UFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __PROTOTYPE_CST__: {
      display__BXFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __INTEGER_CST__: {
      display__FXFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __SWITCH__: {
      display__5VTK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __NODE_TYPE__: {
      display__KXFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __READ_LOCAL__: {
      display__MYFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __NODE_STYLE__: {
      display__IZFK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __WRITE_GLOBAL__: {
      Self__L0FK=((__WRITE_GLOBAL *)__tmp__KRQG);
      append__MOK(buffer__4QQG,((__SLOT_DATA *)Self__L0FK->global__4U1H)->parent_variable__AJZD.intern_name__025F);
      add_last__YPK(buffer__4QQG,'[');
      append_name_in__FBYD(((__SLOT_DATA *)Self__L0FK->global__4U1H)->parent_variable__AJZD.type__125F,buffer__4QQG);
      add_last__YPK(buffer__4QQG,']');
      append__MOK(buffer__4QQG,(&__string_257));
      if ((verbose_level__FX !=  0)) {
        add_last__YPK(buffer__4QQG,'<');
        if (ANY__->object_id__XAZG==0) {
          __tmp__4ULK=ANY__->object_id__WAZG;
        } else {
          result__YDOQ=object_counter__RAZG__SAZG;
          object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
          ANY__->object_id__WAZG=result__YDOQ;
          ANY__->object_id__XAZG=0;
          __tmp__4ULK=result__YDOQ;
        };
        result__I5HQ=create__AXB( 11);
        append_in__4VC(((__INTEGER_32 )__tmp__4ULK),result__I5HQ);
        append__MOK(buffer__4QQG,result__I5HQ);
        add_last__YPK(buffer__4QQG,'/');
        append_in__4VC(((__INTEGER_32 )((__SLOT_DATA *)Self__L0FK->global__4U1H)->parent_variable__AJZD.ensure_count__QEAG),buffer__4QQG);
        add_last__YPK(buffer__4QQG,'>');
      };
      add_last__YPK(buffer__4QQG,' ');
      if (((void *)Self__L0FK->parent_write__QBGH.value__HBEH == (void *)NULL)) {
        append__MOK(buffer__4QQG,(&__string_258));
      } else {
        __tmp__30FK=Self__L0FK->parent_write__QBGH.value__HBEH;
        switch (((struct ___OBJ *)__tmp__30FK)->__id) {
        case __LIST__: {
          display__2QQG(__tmp__30FK,buffer__4QQG);
        } break;
        case __STRING_CST__: {
          display__SUFK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXTERNAL_C__: {
          display__2UFK(__tmp__30FK,buffer__4QQG);
        } break;
        case __PROTOTYPE_CST__: {
          display__BXFK(__tmp__30FK,buffer__4QQG);
        } break;
        case __INTEGER_CST__: {
          display__FXFK(__tmp__30FK,buffer__4QQG);
        } break;
        case __READ_LOCAL__: {
          display__MYFK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_EQUAL__: {
          display__E1FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_NOT_EQUAL__: {
          display__M1FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __REAL_CST__: {
          display__U1FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __CHARACTER_CST__: {
          display__Z1FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __IS_EXPANDED__: {
          Self__L5HQ=((__IS_EXPANDED *)__tmp__30FK);
          append__MOK(buffer__4QQG,(&__string_259));
          display__MYFK(Self__L5HQ->receiver__OO2H,buffer__4QQG);
          add_last__YPK(buffer__4QQG,')');
        } break;
        case __GET_TYPE_ID__: {
          display__B2FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_SUP__: {
          display__F2FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_SUB__: {
          display__N2FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_MUL__: {
          display__T2FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_DIV__: {
          display__Z2FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_AND__: {
          display__52FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_SHIFT_R__: {
          display__F3FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_SHIFT_L__: {
          display__L3FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __PUT_TO__: {
          display__R3FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __ITEM__: {
          display__X3FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __SIZE_OF__: {
          display__23FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __CAST__: {
          display__A4FK(__tmp__30FK,buffer__4QQG);
        } break;
        case __CALL_SLOT__: {
          display__VNKL(__tmp__30FK,buffer__4QQG);
        } break;
        case __READ_SLOT__: {
          display__N1ZK(__tmp__30FK,buffer__4QQG);
        } break;
        case __READ_GLOBAL__: {
          display__S1ZK(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_NOT_LOGIC__: {
          display__2PZM(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_OR_LOGIC__: {
          display__NZEO(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          display__F4KO(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_AND_LOGIC__: {
          display__TZEO(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          display__M4KO(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_NEG__: {
          display__VXJM(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_ADD__: {
          display__52ML(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_NOT__: {
          display__LKZM(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_MOD__: {
          display__ZZEO(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_SUP_EQ__: {
          display__VHEP(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_INF__: {
          display__ZNQN(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_INF_EQ__: {
          display__COQN(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_OR__: {
          display__R5PN(__tmp__30FK,buffer__4QQG);
        } break;
        case __EXPR_XOR__: {
          display__SHUO(__tmp__30FK,buffer__4QQG);
        } break;
        };
      };
    } break;
    case __WRITE_SLOT__: {
      Self__A1FK=((__WRITE_SLOT *)__tmp__KRQG);
      __tmp__C1FK=Self__A1FK->receiver__HU1H;
      switch (((struct ___OBJ *)__tmp__C1FK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__C1FK,buffer__4QQG);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __IS_EXPANDED__: {
        Self__N5HQ=((__IS_EXPANDED *)__tmp__C1FK);
        append__MOK(buffer__4QQG,(&__string_259));
        display__MYFK(Self__N5HQ->receiver__OO2H,buffer__4QQG);
        add_last__YPK(buffer__4QQG,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__C1FK,buffer__4QQG);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__C1FK,buffer__4QQG);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__C1FK,buffer__4QQG);
      } break;
      };
      append__MOK(buffer__4QQG,(&__string_19));
      append__MOK(buffer__4QQG,((__SLOT_DATA *)Self__A1FK->slot__5T1H)->parent_variable__AJZD.intern_name__025F);
      add_last__YPK(buffer__4QQG,'[');
      append_name_in__FBYD(((__SLOT_DATA *)Self__A1FK->slot__5T1H)->parent_variable__AJZD.type__125F,buffer__4QQG);
      add_last__YPK(buffer__4QQG,']');
      append__MOK(buffer__4QQG,(&__string_257));
      if ((verbose_level__FX !=  0)) {
        add_last__YPK(buffer__4QQG,'<');
        if (ANY__->object_id__XAZG==0) {
          __tmp__WAPK=ANY__->object_id__WAZG;
        } else {
          result__ZDOQ=object_counter__RAZG__SAZG;
          object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
          ANY__->object_id__WAZG=result__ZDOQ;
          ANY__->object_id__XAZG=0;
          __tmp__WAPK=result__ZDOQ;
        };
        result__O5HQ=create__AXB( 11);
        append_in__4VC(((__INTEGER_32 )__tmp__WAPK),result__O5HQ);
        append__MOK(buffer__4QQG,result__O5HQ);
        add_last__YPK(buffer__4QQG,'/');
        append_in__4VC(((__INTEGER_32 )((__SLOT_DATA *)Self__A1FK->slot__5T1H)->parent_variable__AJZD.ensure_count__QEAG),buffer__4QQG);
        add_last__YPK(buffer__4QQG,'>');
      };
      add_last__YPK(buffer__4QQG,' ');
      if (((void *)Self__A1FK->parent_write__3BGH.value__HBEH == (void *)NULL)) {
        append__MOK(buffer__4QQG,(&__string_258));
      } else {
        __tmp__KWLK=Self__A1FK->parent_write__3BGH.value__HBEH;
        switch (((struct ___OBJ *)__tmp__KWLK)->__id) {
        case __LIST__: {
          display__2QQG(__tmp__KWLK,buffer__4QQG);
        } break;
        case __STRING_CST__: {
          display__SUFK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXTERNAL_C__: {
          display__2UFK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __PROTOTYPE_CST__: {
          display__BXFK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __INTEGER_CST__: {
          display__FXFK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __READ_LOCAL__: {
          display__MYFK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_EQUAL__: {
          display__E1FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_NOT_EQUAL__: {
          display__M1FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __REAL_CST__: {
          display__U1FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __CHARACTER_CST__: {
          display__Z1FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __IS_EXPANDED__: {
          Self__R5HQ=((__IS_EXPANDED *)__tmp__KWLK);
          append__MOK(buffer__4QQG,(&__string_259));
          display__MYFK(Self__R5HQ->receiver__OO2H,buffer__4QQG);
          add_last__YPK(buffer__4QQG,')');
        } break;
        case __GET_TYPE_ID__: {
          display__B2FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_SUP__: {
          display__F2FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_SUB__: {
          display__N2FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_MUL__: {
          display__T2FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_DIV__: {
          display__Z2FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_AND__: {
          display__52FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_SHIFT_R__: {
          display__F3FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_SHIFT_L__: {
          display__L3FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __PUT_TO__: {
          display__R3FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __ITEM__: {
          display__X3FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __SIZE_OF__: {
          display__23FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __CAST__: {
          display__A4FK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __CALL_SLOT__: {
          display__VNKL(__tmp__KWLK,buffer__4QQG);
        } break;
        case __READ_SLOT__: {
          display__N1ZK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __READ_GLOBAL__: {
          display__S1ZK(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_NOT_LOGIC__: {
          display__2PZM(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_OR_LOGIC__: {
          display__NZEO(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          display__F4KO(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_AND_LOGIC__: {
          display__TZEO(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          display__M4KO(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_NEG__: {
          display__VXJM(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_ADD__: {
          display__52ML(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_NOT__: {
          display__LKZM(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_MOD__: {
          display__ZZEO(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_SUP_EQ__: {
          display__VHEP(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_INF__: {
          display__ZNQN(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_INF_EQ__: {
          display__COQN(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_OR__: {
          display__R5PN(__tmp__KWLK,buffer__4QQG);
        } break;
        case __EXPR_XOR__: {
          display__SHUO(__tmp__KWLK,buffer__4QQG);
        } break;
        };
      };
    } break;
    case __EXPR_EQUAL__: {
      display__E1FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_NOT_EQUAL__: {
      display__M1FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __REAL_CST__: {
      display__U1FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __CHARACTER_CST__: {
      display__Z1FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __IS_EXPANDED__: {
      Self__T5HQ=((__IS_EXPANDED *)__tmp__KRQG);
      append__MOK(buffer__4QQG,(&__string_259));
      display__MYFK(Self__T5HQ->receiver__OO2H,buffer__4QQG);
      add_last__YPK(buffer__4QQG,')');
    } break;
    case __GET_TYPE_ID__: {
      display__B2FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_SUP__: {
      display__F2FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_SUB__: {
      display__N2FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_MUL__: {
      display__T2FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_DIV__: {
      display__Z2FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_AND__: {
      display__52FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_SHIFT_R__: {
      display__F3FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_SHIFT_L__: {
      display__L3FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __PUT_TO__: {
      display__R3FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __ITEM__: {
      display__X3FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __SIZE_OF__: {
      display__23FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __CAST__: {
      display__A4FK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __CALL_SLOT__: {
      display__VNKL(__tmp__KRQG,buffer__4QQG);
    } break;
    case __NOP__: {
      append__MOK(buffer__4QQG,(&__string_260));
    } break;
    case __READ_SLOT__: {
      display__N1ZK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __WRITE_LOCAL__: {
      Self__R4FK=((__WRITE_LOCAL *)__tmp__KRQG);
      append__MOK(buffer__4QQG,((__LOCAL *)Self__R4FK->local__2RIJ)->parent_variable__B2LC.intern_name__025F);
      add_last__YPK(buffer__4QQG,'[');
      append_name_in__FBYD(((__LOCAL *)Self__R4FK->local__2RIJ)->parent_variable__B2LC.type__125F,buffer__4QQG);
      add_last__YPK(buffer__4QQG,']');
      append__MOK(buffer__4QQG,(&__string_257));
      if ((verbose_level__FX !=  0)) {
        add_last__YPK(buffer__4QQG,'<');
        if (ANY__->object_id__XAZG==0) {
          __tmp__21LK=ANY__->object_id__WAZG;
        } else {
          result__0DOQ=object_counter__RAZG__SAZG;
          object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
          ANY__->object_id__WAZG=result__0DOQ;
          ANY__->object_id__XAZG=0;
          __tmp__21LK=result__0DOQ;
        };
        result__V5HQ=create__AXB( 11);
        append_in__4VC(((__INTEGER_32 )__tmp__21LK),result__V5HQ);
        append__MOK(buffer__4QQG,result__V5HQ);
        add_last__YPK(buffer__4QQG,'/');
        append_in__4VC(((__INTEGER_32 )((__LOCAL *)Self__R4FK->local__2RIJ)->parent_variable__B2LC.ensure_count__QEAG),buffer__4QQG);
        add_last__YPK(buffer__4QQG,'>');
      };
      add_last__YPK(buffer__4QQG,' ');
      if (((void *)Self__R4FK->parent_write__X50I.value__HBEH == (void *)NULL)) {
        append__MOK(buffer__4QQG,(&__string_258));
      } else {
        __tmp__D5FK=Self__R4FK->parent_write__X50I.value__HBEH;
        switch (((struct ___OBJ *)__tmp__D5FK)->__id) {
        case __LIST__: {
          display__2QQG(__tmp__D5FK,buffer__4QQG);
        } break;
        case __STRING_CST__: {
          display__SUFK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXTERNAL_C__: {
          display__2UFK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __PROTOTYPE_CST__: {
          display__BXFK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __INTEGER_CST__: {
          display__FXFK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __READ_LOCAL__: {
          display__MYFK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_EQUAL__: {
          display__E1FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_NOT_EQUAL__: {
          display__M1FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __REAL_CST__: {
          display__U1FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __CHARACTER_CST__: {
          display__Z1FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __IS_EXPANDED__: {
          Self__Y5HQ=((__IS_EXPANDED *)__tmp__D5FK);
          append__MOK(buffer__4QQG,(&__string_259));
          display__MYFK(Self__Y5HQ->receiver__OO2H,buffer__4QQG);
          add_last__YPK(buffer__4QQG,')');
        } break;
        case __GET_TYPE_ID__: {
          display__B2FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_SUP__: {
          display__F2FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_SUB__: {
          display__N2FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_MUL__: {
          display__T2FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_DIV__: {
          display__Z2FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_AND__: {
          display__52FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_SHIFT_R__: {
          display__F3FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_SHIFT_L__: {
          display__L3FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __PUT_TO__: {
          display__R3FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __ITEM__: {
          display__X3FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __SIZE_OF__: {
          display__23FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __CAST__: {
          display__A4FK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __CALL_SLOT__: {
          display__VNKL(__tmp__D5FK,buffer__4QQG);
        } break;
        case __READ_SLOT__: {
          display__N1ZK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __READ_GLOBAL__: {
          display__S1ZK(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_NOT_LOGIC__: {
          display__2PZM(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_OR_LOGIC__: {
          display__NZEO(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          display__F4KO(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_AND_LOGIC__: {
          display__TZEO(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          display__M4KO(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_NEG__: {
          display__VXJM(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_ADD__: {
          display__52ML(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_NOT__: {
          display__LKZM(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_MOD__: {
          display__ZZEO(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_SUP_EQ__: {
          display__VHEP(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_INF__: {
          display__ZNQN(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_INF_EQ__: {
          display__COQN(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_OR__: {
          display__R5PN(__tmp__D5FK,buffer__4QQG);
        } break;
        case __EXPR_XOR__: {
          display__SHUO(__tmp__D5FK,buffer__4QQG);
        } break;
        };
      };
    } break;
    case __READ_GLOBAL__: {
      display__S1ZK(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_NOT_LOGIC__: {
      display__2PZM(__tmp__KRQG,buffer__4QQG);
    } break;
    case __LOOP__: {
      Self__QUXM=((__LOOP *)__tmp__KRQG);
      append__MOK(buffer__4QQG,Self__QUXM->name__DILM);
      if ((verbose_level__FX !=  0)) {
        append__MOK(buffer__4QQG,(&__string_261));
        if (ANY__->object_id__XAZG==0) {
          __tmp__GF1M=ANY__->object_id__WAZG;
        } else {
          result__IEAN=object_counter__RAZG__SAZG;
          object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
          ANY__->object_id__WAZG=result__IEAN;
          ANY__->object_id__XAZG=0;
          __tmp__GF1M=result__IEAN;
        };
        append_in__4VC(((__INTEGER_32 )__tmp__GF1M),buffer__4QQG);
        append__MOK(buffer__4QQG,(&__string_262));
      };
      append__MOK(buffer__4QQG,(&__string_263));
      append__MOK(buffer__4QQG,indent__ZQOG);
      display__2QQG(Self__QUXM->body__5ALM,buffer__4QQG);
    } break;
    case __EXPR_OR_LOGIC__: {
      display__NZEO(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      display__F4KO(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_AND_LOGIC__: {
      display__TZEO(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      display__M4KO(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_NEG__: {
      display__VXJM(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_ADD__: {
      display__52ML(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_NOT__: {
      display__LKZM(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_MOD__: {
      display__ZZEO(__tmp__KRQG,buffer__4QQG);
    } break;
    case __LOOP_END__: {
      Self__32CN=((__LOOP_END *)__tmp__KRQG);
      append__MOK(buffer__4QQG,(&__string_264));
      append__MOK(buffer__4QQG,((__LOOP *)Self__32CN->loop__5WLM)->name__DILM);
      if ((verbose_level__FX !=  0)) {
        append__MOK(buffer__4QQG,(&__string_261));
        if (ANY__->object_id__XAZG==0) {
          __tmp__DPGN=ANY__->object_id__WAZG;
        } else {
          result__KDLN=object_counter__RAZG__SAZG;
          object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
          ANY__->object_id__WAZG=result__KDLN;
          ANY__->object_id__XAZG=0;
          __tmp__DPGN=result__KDLN;
        };
        append_in__4VC(((__INTEGER_32 )__tmp__DPGN),buffer__4QQG);
        append__MOK(buffer__4QQG,(&__string_262));
      };
    } break;
    case __EXPR_SUP_EQ__: {
      display__VHEP(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_INF__: {
      display__ZNQN(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_INF_EQ__: {
      display__COQN(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_OR__: {
      display__R5PN(__tmp__KRQG,buffer__4QQG);
    } break;
    case __EXPR_XOR__: {
      display__SHUO(__tmp__KRQG,buffer__4QQG);
    } break;
    };
    add_last__YPK(buffer__4QQG,'\n');
    Self__RZRG=(__INTEGER)(Self__RZRG +  1);
  };
  remove_last__RLLB(indent__ZQOG, 2);
  append__MOK(buffer__4QQG,indent__ZQOG);
  add_last__YPK(buffer__4QQG,')');
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__4QQG,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__Q0RG=ANY__->object_id__WAZG;
    } else {
      result__QAZG=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__QAZG;
      ANY__->object_id__XAZG=0;
      __tmp__Q0RG=result__QAZG;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__Q0RG),buffer__4QQG);
    append__MOK(buffer__4QQG,(&__string_262));
  };
}

static void genere_handler__PYIM(__PROFIL_SLOT *Self__QYIM,void *buffer__RYIM)
// ({PROFIL_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *ts__SYIM;
  void *v__TYIM;
  __INTEGER __tmp__QZIM,Self__WZLM,__tmp__30IM,Self__MIPM;
  __POSITION pos__O20L;
  __STRING *Self__GO4Q;
  ts__SYIM=NULL;
  v__TYIM=NULL;
  if ((((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)Self__QYIM->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D != (void *)(&__string_25)) && ((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)Self__QYIM->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D != (void *)(&__string_30)))) {
    append__MOK(buffer__RYIM,(&__string_265));
  };
  if (((void *)Self__QYIM->parent_profil__51LC.result_last__XGKH == (void *)NULL)) {
    append__MOK(buffer__RYIM,(&__string_266));
  } else {
    ts__SYIM=((__LOCAL *)Self__QYIM->parent_profil__51LC.result_last__XGKH)->parent_variable__B2LC.type__125F;
    genere_declaration__Q2NI(ts__SYIM,buffer__RYIM);
    genere_star_declaration__Q3NI(ts__SYIM,buffer__RYIM);
    add_last__YPK(buffer__RYIM,' ');
  };
  append__MOK(buffer__RYIM,Self__QYIM->parent_profil__51LC.name__XJEI);
  add_last__YPK(buffer__RYIM,'(');
  __tmp__QZIM=((__FAST_ARRAYoLOCALo *)Self__QYIM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
  Self__WZLM= 0;
  while ((Self__WZLM <= __tmp__QZIM)) {
    v__TYIM=((void **)((__FAST_ARRAYoLOCALo *)Self__QYIM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__WZLM];
    if (((void *)v__TYIM != (void *)NULL)) {
      if ((((__LOCAL *)v__TYIM)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != ' ')) {
        pos__O20L=((__LOCAL *)v__TYIM)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        put_error__text__0AH( 1,(&__string_267));
        put_position__ECH(pos__O20L);
        send_error__2FH();
      };
      genere__result__in__ESWM(v__TYIM,FALSE__,buffer__RYIM);
      add_last__YPK(buffer__RYIM,',');
    };
    Self__WZLM=(__INTEGER)(Self__WZLM +  1);
  };
  if (((void *)Self__QYIM->parent_profil__51LC.result_list__SA2H != (void *)NULL)) {
    __tmp__30IM=((__FAST_ARRAYoLOCALo *)Self__QYIM->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F;
    Self__MIPM= 0;
    while ((Self__MIPM <= __tmp__30IM)) {
      v__TYIM=((void **)((__FAST_ARRAYoLOCALo *)Self__QYIM->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__MIPM];
      ((__LOCAL *)v__TYIM)->parent_variable__B2LC.ensure_count__QEAG=(__INTEGER)(-  1);
      genere__result__in__ESWM(v__TYIM,TRUE__,buffer__RYIM);
      add_last__YPK(buffer__RYIM,',');
      Self__MIPM=(__INTEGER)(Self__MIPM +  1);
    };
  };
  Self__GO4Q=((__STRING *)buffer__RYIM);
  if ((((__CHARACTER *)Self__GO4Q->storage__XNK)[(__INTEGER)(Self__GO4Q->count__VF -  1)] == ',')) {
    remove_last__RLLB(buffer__RYIM, 1);
  };
  add_last__YPK(buffer__RYIM,')');
}

static void genere_handler__NMEJ(__PROFIL_BLOCK *Self__OMEJ,void *buffer__PMEJ)
// ({PROFIL_BLOCK},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __POSITION __tmp__YMEJ,pos__KJHQ;
  void *ts__KJJJ;
  void *v__LJJJ;
  __INTEGER __tmp__IKJJ,Self__LLMJ,__tmp__VLJJ,Self__QNXJ;
  __STRING *Self__QO4Q;
  if (((void *)Self__OMEJ->context_extern__OMXH != (void *)NULL)) {
    __tmp__YMEJ=((__LIST *)Self__OMEJ->parent_profil__GHAG.code__HZJH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    put_error__text__0AH( 2,(&__string_268));
    put_position__ECH(__tmp__YMEJ);
    send_error__2FH();
  };
  ts__KJJJ=NULL;
  v__LJJJ=NULL;
  append__MOK(buffer__PMEJ,(&__string_265));
  if (((void *)Self__OMEJ->parent_profil__GHAG.result_last__XGKH == (void *)NULL)) {
    append__MOK(buffer__PMEJ,(&__string_266));
  } else {
    ts__KJJJ=((__LOCAL *)Self__OMEJ->parent_profil__GHAG.result_last__XGKH)->parent_variable__B2LC.type__125F;
    genere_declaration__Q2NI(ts__KJJJ,buffer__PMEJ);
    genere_star_declaration__Q3NI(ts__KJJJ,buffer__PMEJ);
    add_last__YPK(buffer__PMEJ,' ');
  };
  append__MOK(buffer__PMEJ,Self__OMEJ->parent_profil__GHAG.name__XJEI);
  add_last__YPK(buffer__PMEJ,'(');
  __tmp__IKJJ=((__FAST_ARRAYoLOCALo *)Self__OMEJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
  Self__LLMJ= 0;
  while ((Self__LLMJ <= __tmp__IKJJ)) {
    v__LJJJ=((void **)((__FAST_ARRAYoLOCALo *)Self__OMEJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__LLMJ];
    if (((void *)v__LJJJ != (void *)NULL)) {
      if ((((__LOCAL *)v__LJJJ)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != ' ')) {
        pos__KJHQ=((__LOCAL *)v__LJJJ)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        put_error__text__0AH( 1,(&__string_267));
        put_position__ECH(pos__KJHQ);
        send_error__2FH();
      };
      genere__result__in__IQBK(v__LJJJ,FALSE__,buffer__PMEJ);
      add_last__YPK(buffer__PMEJ,',');
    };
    Self__LLMJ=(__INTEGER)(Self__LLMJ +  1);
  };
  if (((void *)Self__OMEJ->parent_profil__GHAG.result_list__SA2H != (void *)NULL)) {
    __tmp__VLJJ=((__FAST_ARRAYoLOCALo *)Self__OMEJ->parent_profil__GHAG.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F;
    Self__QNXJ= 0;
    while ((Self__QNXJ <= __tmp__VLJJ)) {
      v__LJJJ=((void **)((__FAST_ARRAYoLOCALo *)Self__OMEJ->parent_profil__GHAG.result_list__SA2H)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__QNXJ];
      ((__LOCAL *)v__LJJJ)->parent_variable__B2LC.ensure_count__QEAG=(__INTEGER)(-  1);
      genere__result__in__IQBK(v__LJJJ,TRUE__,buffer__PMEJ);
      add_last__YPK(buffer__PMEJ,',');
      Self__QNXJ=(__INTEGER)(Self__QNXJ +  1);
    };
  };
  Self__QO4Q=((__STRING *)buffer__PMEJ);
  if ((((__CHARACTER *)Self__QO4Q->storage__XNK)[(__INTEGER)(Self__QO4Q->count__VF -  1)] == ',')) {
    remove_last__RLLB(buffer__PMEJ, 1);
  };
  add_last__YPK(buffer__PMEJ,')');
}

static void genere_extern__TQOG(__LIST *Self__UQOG,void *buffer__VQOG)
// ({LIST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *last_expr__XQOG,*__tmp__VROG;
  __INTEGER pos_local__WQOG,__tmp__CROG,Self__ZHQG;
  void *__tmp__JROG,*__tmp__UROG;
  __CHARACTER_CST *Self__XJHQ,*Self__UKHQ;
  __LOOP_END *Self__AKHQ;
  void *__tmp__WROG;
  __FAST_ARRAYoINSTRo *Self__FZ4G;
  last_expr__XQOG=NULL;
  append__MOK(buffer__VQOG,(&__string_269));
  append__MOK(indent__ZQOG,(&__string_143));
  pos_local__WQOG=(__INTEGER)(((__STRING *)buffer__VQOG)->count__VF +  1);
  ((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(-  1);
  __tmp__CROG=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__UQOG->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1);
  Self__ZHQG= 1;
  while ((Self__ZHQG <= __tmp__CROG)) {
    append__MOK(buffer__VQOG,indent__ZQOG);
    __tmp__JROG=((void **)((__FAST_ARRAYoINSTRo *)Self__UQOG->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__ZHQG -  1)];
    switch (((struct ___OBJ *)__tmp__JROG)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __PUSH__: {
      genere__JNFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __SWITCH__: {
      genere__T3IM(__tmp__JROG,buffer__VQOG);
    } break;
    case __NODE_TYPE__: {
      display__KXFK(((__NODE_TYPE *)__tmp__JROG),buffer__VQOG);
      append__MOK(buffer__VQOG,(&__string_270));
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__JROG),buffer__VQOG);
      append__MOK(buffer__VQOG,(&__string_270));
    } break;
    case __NODE_STYLE__: {
      display__IZFK(((__NODE_STYLE *)__tmp__JROG),buffer__VQOG);
      append__MOK(buffer__VQOG,(&__string_270));
    } break;
    case __WRITE_GLOBAL__: {
      genere__GPFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __WRITE_SLOT__: {
      genere__IQFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__VQOG,((__REAL_CST *)__tmp__JROG)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__XJHQ=((__CHARACTER_CST *)__tmp__JROG);
      add_last__YPK(buffer__VQOG,'\'');
      append__MOK(buffer__VQOG,Self__XJHQ->text__HO2H);
      add_last__YPK(buffer__VQOG,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__JROG,buffer__VQOG);
    } break;
    case __NOP__: {
      append__MOK(buffer__VQOG,(&__string_260));
      append__MOK(buffer__VQOG,(&__string_270));
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__JROG,buffer__VQOG);
    } break;
    case __WRITE_LOCAL__: {
      genere__ZSFK(__tmp__JROG,buffer__VQOG);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__VQOG,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JROG)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__JROG,buffer__VQOG);
    } break;
    case __LOOP__: {
      genere__WTXM(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__JROG,buffer__VQOG);
    } break;
    case __LOOP_END__: {
      Self__AKHQ=((__LOOP_END *)__tmp__JROG);
      append__MOK(buffer__VQOG,(&__string_264));
      append__MOK(buffer__VQOG,((__LOOP *)Self__AKHQ->loop__5WLM)->name__DILM);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__JROG,buffer__VQOG);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__JROG,buffer__VQOG);
    } break;
    };
    append__MOK(buffer__VQOG,(&__string_272));
    Self__ZHQG=(__INTEGER)(Self__ZHQG +  1);
  };
  if (((void *)((__TYPE_FULL *)static_type__GIQG(Self__UQOG))->parent_type__KTL != (void *)TYPE_VOID__)) {
    append__MOK(buffer__VQOG,indent__ZQOG);
    append__MOK(buffer__VQOG,(&__string_273));
    Self__FZ4G=((__FAST_ARRAYoINSTRo *)Self__UQOG->expr_list__JUOG);
    __tmp__UROG=((void **)Self__FZ4G->parent_arrayed_collection__IUOG.storage__BM4G)[Self__FZ4G->parent_arrayed_collection__IUOG.upper__THQG];
    if (__tmp__UROG==NULL) {
      __tmp__VROG=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__UROG)->__id) {
      case __LIST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __STRING_CST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __PUSH__: {
        __tmp__VROG=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __INTEGER_CST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __SWITCH__: {
        __tmp__VROG=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__VROG=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __NODE_STYLE__: {
        __tmp__VROG=NULL;
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__VROG=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__VROG=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __REAL_CST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __CHARACTER_CST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __IS_EXPANDED__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_SUP__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_SUB__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_MUL__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_DIV__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_AND__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __PUT_TO__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __ITEM__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __SIZE_OF__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __CAST__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __CALL_SLOT__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __NOP__: {
        __tmp__VROG=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __WRITE_LOCAL__: {
        __tmp__VROG=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __LOOP__: {
        __tmp__VROG=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_NEG__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_ADD__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_NOT__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_MOD__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __LOOP_END__: {
        __tmp__VROG=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_INF__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_OR__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      case __EXPR_XOR__: {
        __tmp__VROG=((void *)__tmp__UROG);
      } break;
      }
    };
    last_expr__XQOG=__tmp__VROG;
    switch (((struct ___OBJ *)__tmp__VROG)->__id) {
    case __LIST__: {
      __tmp__WROG=static_type__GIQG(__tmp__VROG);
    } break;
    case __STRING_CST__: {
      __tmp__WROG=((__STRING_CST *)__tmp__VROG)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WROG=((__EXTERNAL_C *)__tmp__VROG)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WROG=((__PROTOTYPE_CST *)__tmp__VROG)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__WROG=((__INTEGER_CST *)__tmp__VROG)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__WROG=((__LOCAL *)((__READ_LOCAL *)__tmp__VROG)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WROG=static_type__0N1H(__tmp__VROG);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WROG=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WROG=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__WROG=((__REAL_CST *)__tmp__VROG)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WROG=((__CHARACTER_CST *)__tmp__VROG)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WROG=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WROG=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__WROG=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__WROG=static_type__MP1H(__tmp__VROG);
    } break;
    case __EXPR_MUL__: {
      __tmp__WROG=static_type__SP1H(__tmp__VROG);
    } break;
    case __EXPR_DIV__: {
      __tmp__WROG=static_type__XP1H(__tmp__VROG);
    } break;
    case __EXPR_AND__: {
      __tmp__WROG=static_type__2P1H(__tmp__VROG);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WROG=static_type__BQ1H(__tmp__VROG);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WROG=static_type__GQ1H(__tmp__VROG);
    } break;
    case __PUT_TO__: {
      __tmp__WROG=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__WROG=static_type__PQ1H(__tmp__VROG);
    } break;
    case __SIZE_OF__: {
      __tmp__WROG=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__WROG=((__CAST *)__tmp__VROG)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__WROG=static_type__GIKL(__tmp__VROG);
    } break;
    case __READ_SLOT__: {
      __tmp__WROG=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VROG)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WROG=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VROG)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WROG=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WROG=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WROG=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WROG=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WROG=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__WROG=static_type__Z2IM(__tmp__VROG);
    } break;
    case __EXPR_ADD__: {
      __tmp__WROG=static_type__IXML(__tmp__VROG);
    } break;
    case __EXPR_NOT__: {
      __tmp__WROG=static_type__BTXM(__tmp__VROG);
    } break;
    case __EXPR_MOD__: {
      __tmp__WROG=static_type__5LEO(__tmp__VROG);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WROG=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__WROG=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WROG=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__WROG=static_type__NOPN(__tmp__VROG);
    } break;
    case __EXPR_XOR__: {
      __tmp__WROG=static_type__XCSO(__tmp__VROG);
    } break;
    };
    if (((((__UINTEGER_8)(((__TYPE_FULL *)__tmp__WROG)->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__WROG)->flag__LTL &  16) !=  0))) && (! is_expanded_c__0ZWG(__tmp__WROG)))) {
      add_last__YPK(buffer__VQOG,'&');
    };
    switch (((struct ___OBJ *)__tmp__VROG)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__VROG),buffer__VQOG);
      append__MOK(buffer__VQOG,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__VQOG,((__REAL_CST *)__tmp__VROG)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__UKHQ=((__CHARACTER_CST *)__tmp__VROG);
      add_last__YPK(buffer__VQOG,'\'');
      append__MOK(buffer__VQOG,Self__UKHQ->text__HO2H);
      add_last__YPK(buffer__VQOG,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__VROG,buffer__VQOG);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__VROG,buffer__VQOG);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__VROG,buffer__VQOG);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__VQOG,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VROG)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__VROG,buffer__VQOG);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__VROG,buffer__VQOG);
    } break;
    };
    add_last__YPK(buffer__VQOG,')');
    append__MOK(buffer__VQOG,(&__string_272));
  };
  ((__STRING *)string_tmp__RB)->count__VF= 0;
  add_local__in__LJQG(((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[ 3],string_tmp__RB);
  add_local__in__LJQG(((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[ 2],string_tmp__RB);
  add_local__in__LJQG(((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[ 1],string_tmp__RB);
  add_local__in__LJQG(((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[ 0],string_tmp__RB);
  insert_string__to__KMQG(buffer__VQOG,string_tmp__RB,pos_local__WQOG);
  remove_last__RLLB(indent__ZQOG, 2);
  append__MOK(buffer__VQOG,indent__ZQOG);
  add_last__YPK(buffer__VQOG,'}');
}

static void append_type__X0LM(__PROFIL_SLOT *Self__Y0LM,void *buffer__Z0LM)
// ({PROFIL_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *v__00LM;
  __INTEGER __tmp__A1LM,Self__LKMM;
  __STRING *Self__FP4Q;
  v__00LM=NULL;
  add_last__YPK(buffer__Z0LM,'(');
  __tmp__A1LM=((__FAST_ARRAYoLOCALo *)Self__Y0LM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
  Self__LKMM= 0;
  while ((Self__LKMM <= __tmp__A1LM)) {
    v__00LM=((void **)((__FAST_ARRAYoLOCALo *)Self__Y0LM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__LKMM];
    if (((void *)v__00LM != (void *)NULL)) {
      display_type__3QBK(v__00LM,buffer__Z0LM);
      add_last__YPK(buffer__Z0LM,',');
    };
    Self__LKMM=(__INTEGER)(Self__LKMM +  1);
  };
  Self__FP4Q=((__STRING *)buffer__Z0LM);
  if ((((__CHARACTER *)Self__FP4Q->storage__XNK)[(__INTEGER)(Self__FP4Q->count__VF -  1)] == ',')) {
    remove_last__RLLB(buffer__Z0LM, 1);
  };
  add_last__YPK(buffer__Z0LM,')');
  if (((void *)Self__Y0LM->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
    append__MOK(buffer__Z0LM,(&__string_274));
  } else {
    append__MOK(buffer__Z0LM,(&__string_275));
  };
}

static void append_type__LMJJ(__PROFIL_BLOCK *Self__MMJJ,void *buffer__NMJJ)
// ({PROFIL_BLOCK},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *v__OMJJ;
  __INTEGER __tmp__UMJJ,Self__PMMJ;
  __STRING *Self__MOHD;
  v__OMJJ=NULL;
  add_last__YPK(buffer__NMJJ,'(');
  __tmp__UMJJ=((__FAST_ARRAYoLOCALo *)Self__MMJJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
  Self__PMMJ= 0;
  while ((Self__PMMJ <= __tmp__UMJJ)) {
    v__OMJJ=((void **)((__FAST_ARRAYoLOCALo *)Self__MMJJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__PMMJ];
    if (((void *)v__OMJJ != (void *)NULL)) {
      display_type__3QBK(v__OMJJ,buffer__NMJJ);
      add_last__YPK(buffer__NMJJ,',');
    };
    Self__PMMJ=(__INTEGER)(Self__PMMJ +  1);
  };
  Self__MOHD=((__STRING *)buffer__NMJJ);
  if ((((__CHARACTER *)Self__MOHD->storage__XNK)[(__INTEGER)(Self__MOHD->count__VF -  1)] == ',')) {
    remove_last__RLLB(buffer__NMJJ, 1);
  };
  add_last__YPK(buffer__NMJJ,')');
  if (((void *)Self__MMJJ->parent_profil__GHAG.result_last__XGKH != (void *)NULL)) {
    append__MOK(buffer__NMJJ,(&__string_274));
  } else {
    append__MOK(buffer__NMJJ,(&__string_275));
  };
}

static void genere_struct__U22G(__TYPE *Self__V22G)
// ({TYPE}) VoidRecursive, No inlinable.
{
  void *slot_data__W22G,*__tmp__3A3G,*__tmp__BB3G,*__tmp__LD3G;
  void *__tmp__PD3G,*__tmp__TD3G,*__tmp__TF3G,*__tmp__XF3G,*__tmp__1F3G;
  void *slot__X22G;
  __BLOCK action__Z22G;
  void *tg__022G;
  __INTEGER __tmp__R32G,Self__3BDH,__tmp__532G,Self__B40I;
  __INTEGER limit_up__C40I,__tmp__N42G,__tmp__LC3G,__tmp__VE3G;
  __INTEGER __tmp__LB3G,Self__NCDH,__tmp__ZB3G,Self__FEXH;
  __INTEGER limit_up__GEXH,__tmp__KE3G,Self__ZEXH,limit_up__0EXH;
  __INTEGER Self__SWZI,Self__FZZI,__tmp__HM3G,Self__IECJ;
  __TYPE *Self__YLVP,*Self__1LVP,*Self__GEQP,*Self__IEQP,*Self__NEQP;
  __TYPE *Self__PEQP;
  void *__tmp__U42G,*__tmp__EC3G;
  void *__tmp__442G,*__tmp__V52G,*__tmp__FA3G;
  void *__tmp__W52G,*__tmp__GA3G;
  __POSITION pos__4LHQ,pos__BMHQ,pos__HMHQ;
  void *tab__Y22G,*__tmp__KA3G,*__tmp__TA3G,*__tmp__1A3G,*__tmp__YC3G;
  void *__tmp__BD3G,*__tmp__JD3G,*__tmp__AF3G,*__tmp__JF3G,*__tmp__RF3G;
  __CHARACTER __tmp__Z32G,__tmp__TB3G;
  __BOOLEAN __tmp__C42G,__tmp__Y42G,__tmp__452G,__tmp__I52G,__tmp__052G;
  __BOOLEAN __tmp__152G,__tmp__552G,__tmp__PC3G,__tmp__XE3G,__tmp__3I3G;
  __BOOLEAN __tmp__MJ3G,result__UXZI;
  __BLOCK __tmp__JA3G;
  __BLOCK __tmp__XC3G;
  __BLOCK __tmp__5E3G;
  slot_data__W22G=NULL;
  slot__X22G=NULL;
  tab__Y22G=NULL;
  action__Z22G.__id=0;
  tg__022G=NULL;
  if (((((__FAST_ARRAYoSLOTo *)Self__V22G->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__V22G->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL))) {
    __tmp__R32G=((__FAST_ARRAYoSLOTo *)Self__V22G->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
    Self__3BDH= 0;
    while ((Self__3BDH <= __tmp__R32G)) {
      slot__X22G=((void **)((__FAST_ARRAYoSLOTo *)Self__V22G->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[Self__3BDH];
      if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
        __tmp__Z32G=((__SLOT_DATA *)slot__X22G)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
      } else {
        __tmp__Z32G=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      };
      if ((__tmp__Z32G == '+')) {
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__532G=lower_style__DSPH(slot__X22G);
        } else {
          __tmp__532G=lower_style__PSPH(slot__X22G);
        };
        __tmp__C42G=(__tmp__532G ==  0);
      } else {
        __tmp__C42G=FALSE__;
      };
      if (__tmp__C42G) {
        __tmp__JA3G.__id=10822;
        __tmp__JA3G.self=Self__V22G;
        action__Z22G=__tmp__JA3G;
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__KA3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
        } else {
          __tmp__KA3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
        };
        if (((void *)__tmp__KA3G != (void *)NULL)) {
          if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          };
          if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            __tmp__TA3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__TA3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          Self__B40I= 0;
          limit_up__C40I=((__FAST_ARRAYoSLOT_DATAo *)__tmp__TA3G)->parent_arrayed_collection__3K3F.upper__035F;
          while ((Self__B40I <= limit_up__C40I)) {
            if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
              __tmp__1A3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
            } else {
              __tmp__1A3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
            };
            __tmp__3A3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__1A3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__B40I];
            switch (action__Z22G.__id) {
            case 10822: {
              Self__YLVP=((__TYPE *)action__Z22G.self);
              __tmp__N42G=((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.ensure_count__QEAG;
              if ((__tmp__N42G >  0)) {
                __tmp__Y42G=TRUE__;
              } else {
                __tmp__U42G=id_section__UG4F(__tmp__3A3G);
                __tmp__Y42G=((void *)((__SECTION_ *)__tmp__U42G)->name__1I0D == (void *)(&__string_28));
              };
              if (__tmp__Y42G) {
                __tmp__442G=((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.type__125F;
                __tmp__452G=((void *)((__TYPE_FULL *)__tmp__442G)->parent_type__KTL != (void *)Self__YLVP);
              } else {
                __tmp__452G=FALSE__;
              };
              if (__tmp__452G) {
                __tmp__I52G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
                __tmp__052G=(__tmp__I52G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
                if (__tmp__052G) {
                  __tmp__152G=TRUE__;
                } else {
                  __tmp__V52G=((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.type__125F;
                  __tmp__W52G=((__TYPE_FULL *)__tmp__V52G)->parent_type__KTL;
                  __tmp__152G=((void *)__tmp__W52G == (void *)type_block__BLB);
                };
                __tmp__552G=__tmp__152G;
              } else {
                __tmp__552G=FALSE__;
              };
              if (__tmp__552G) {
                __tmp__FA3G=((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.type__125F;
                __tmp__GA3G=((__TYPE_FULL *)__tmp__FA3G)->parent_type__KTL;
                switch (((struct ___OBJ *)__tmp__GA3G)->__id) {
                case __TYPE__: {
                  genere_struct__U22G(__tmp__GA3G);
                } break;
                case __TYPE_NULL__: {
                  append__MOK(output_decl__1C,(&__string_175));
                } break;
                case __TYPE_VOID__: {
                } break;
                case __TYPE_CONTEXT__: {
                  append__MOK(output_decl__1C,(&__string_176));
                } break;
                case __TYPE_ID__: {
                } break;
                case __TYPE_GENERIC__: {
                  genere_struct__1P3G(__tmp__GA3G);
                } break;
                case __PROFIL_BLOCK__: {
                } break;
                };
              };
            } break;
            case 10834: {
              Self__1LVP=((__TYPE *)action__Z22G.self);
              __tmp__EC3G=id_section__UG4F(__tmp__3A3G);
              if (((void *)((__SECTION_ *)__tmp__EC3G)->name__1I0D == (void *)(&__string_28))) {
                __tmp__PC3G=TRUE__;
              } else {
                __tmp__LC3G=((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.ensure_count__QEAG;
                __tmp__PC3G=(__tmp__LC3G >  0);
              };
              if (__tmp__PC3G) {
                add_slot_struct__TURI(Self__1LVP,__tmp__3A3G);
              };
            } break;
            case 10843: {
              __tmp__VE3G=((__SLOT_DATA *)__tmp__3A3G)->parent_variable__AJZD.ensure_count__QEAG;
              __tmp__XE3G=(__tmp__VE3G >  0);
              if (__tmp__XE3G) {
                genere__KRFI(__tmp__3A3G,output_glob__VD);
              };
            } break;
            };
            Self__B40I=(__INTEGER)(Self__B40I +  1);
          };
        };
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__BB3G=slot_data__Z4TH(slot__X22G);
        } else {
          __tmp__BB3G=slot_data__T5TH(slot__X22G);
        };
        __tmp__N42G=((__SLOT_DATA *)__tmp__BB3G)->parent_variable__AJZD.ensure_count__QEAG;
        if ((__tmp__N42G >  0)) {
          __tmp__Y42G=TRUE__;
        } else {
          __tmp__U42G=id_section__UG4F(__tmp__BB3G);
          __tmp__Y42G=((void *)((__SECTION_ *)__tmp__U42G)->name__1I0D == (void *)(&__string_28));
        };
        if (__tmp__Y42G) {
          __tmp__442G=((__SLOT_DATA *)__tmp__BB3G)->parent_variable__AJZD.type__125F;
          __tmp__452G=((void *)((__TYPE_FULL *)__tmp__442G)->parent_type__KTL != (void *)Self__V22G);
        } else {
          __tmp__452G=FALSE__;
        };
        if (__tmp__452G) {
          __tmp__I52G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__BB3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
          __tmp__052G=(__tmp__I52G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__BB3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
          if (__tmp__052G) {
            __tmp__152G=TRUE__;
          } else {
            __tmp__V52G=((__SLOT_DATA *)__tmp__BB3G)->parent_variable__AJZD.type__125F;
            __tmp__W52G=((__TYPE_FULL *)__tmp__V52G)->parent_type__KTL;
            __tmp__152G=((void *)__tmp__W52G == (void *)type_block__BLB);
          };
          __tmp__552G=__tmp__152G;
        } else {
          __tmp__552G=FALSE__;
        };
        if (__tmp__552G) {
          __tmp__FA3G=((__SLOT_DATA *)__tmp__BB3G)->parent_variable__AJZD.type__125F;
          __tmp__GA3G=((__TYPE_FULL *)__tmp__FA3G)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__GA3G)->__id) {
          case __TYPE__: {
            genere_struct__U22G(__tmp__GA3G);
          } break;
          case __TYPE_NULL__: {
            append__MOK(output_decl__1C,(&__string_175));
          } break;
          case __TYPE_VOID__: {
          } break;
          case __TYPE_CONTEXT__: {
            append__MOK(output_decl__1C,(&__string_176));
          } break;
          case __TYPE_ID__: {
          } break;
          case __TYPE_GENERIC__: {
            genere_struct__1P3G(__tmp__GA3G);
          } break;
          case __PROFIL_BLOCK__: {
          } break;
          };
        };
      };
      Self__3BDH=(__INTEGER)(Self__3BDH +  1);
    };
    __tmp__LB3G=((__FAST_ARRAYoSLOTo *)Self__V22G->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
    Self__NCDH= 0;
    while ((Self__NCDH <= __tmp__LB3G)) {
      slot__X22G=((void **)((__FAST_ARRAYoSLOTo *)Self__V22G->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[Self__NCDH];
      if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
        __tmp__TB3G=((__SLOT_DATA *)slot__X22G)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
      } else {
        __tmp__TB3G=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      };
      if ((__tmp__TB3G == '+')) {
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__ZB3G=lower_style__DSPH(slot__X22G);
        } else {
          __tmp__ZB3G=lower_style__PSPH(slot__X22G);
        };
        if ((__tmp__ZB3G ==  0)) {
          __tmp__XC3G.__id=10834;
          __tmp__XC3G.self=Self__V22G;
          action__Z22G=__tmp__XC3G;
          if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            __tmp__YC3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__YC3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          if (((void *)__tmp__YC3G != (void *)NULL)) {
            if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            };
            if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
              __tmp__BD3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
            } else {
              __tmp__BD3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
            };
            Self__FEXH= 0;
            limit_up__GEXH=((__FAST_ARRAYoSLOT_DATAo *)__tmp__BD3G)->parent_arrayed_collection__3K3F.upper__035F;
            while ((Self__FEXH <= limit_up__GEXH)) {
              if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
                __tmp__JD3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
              } else {
                __tmp__JD3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
              };
              __tmp__LD3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__JD3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__FEXH];
              switch (action__Z22G.__id) {
              case 10822: {
                Self__GEQP=((__TYPE *)action__Z22G.self);
                __tmp__N42G=((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.ensure_count__QEAG;
                if ((__tmp__N42G >  0)) {
                  __tmp__Y42G=TRUE__;
                } else {
                  __tmp__U42G=id_section__UG4F(__tmp__LD3G);
                  __tmp__Y42G=((void *)((__SECTION_ *)__tmp__U42G)->name__1I0D == (void *)(&__string_28));
                };
                if (__tmp__Y42G) {
                  __tmp__442G=((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.type__125F;
                  __tmp__452G=((void *)((__TYPE_FULL *)__tmp__442G)->parent_type__KTL != (void *)Self__GEQP);
                } else {
                  __tmp__452G=FALSE__;
                };
                if (__tmp__452G) {
                  __tmp__I52G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
                  __tmp__052G=(__tmp__I52G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
                  if (__tmp__052G) {
                    __tmp__152G=TRUE__;
                  } else {
                    __tmp__V52G=((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.type__125F;
                    __tmp__W52G=((__TYPE_FULL *)__tmp__V52G)->parent_type__KTL;
                    __tmp__152G=((void *)__tmp__W52G == (void *)type_block__BLB);
                  };
                  __tmp__552G=__tmp__152G;
                } else {
                  __tmp__552G=FALSE__;
                };
                if (__tmp__552G) {
                  __tmp__FA3G=((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.type__125F;
                  __tmp__GA3G=((__TYPE_FULL *)__tmp__FA3G)->parent_type__KTL;
                  switch (((struct ___OBJ *)__tmp__GA3G)->__id) {
                  case __TYPE__: {
                    genere_struct__U22G(__tmp__GA3G);
                  } break;
                  case __TYPE_NULL__: {
                    append__MOK(output_decl__1C,(&__string_175));
                  } break;
                  case __TYPE_VOID__: {
                  } break;
                  case __TYPE_CONTEXT__: {
                    append__MOK(output_decl__1C,(&__string_176));
                  } break;
                  case __TYPE_ID__: {
                  } break;
                  case __TYPE_GENERIC__: {
                    genere_struct__1P3G(__tmp__GA3G);
                  } break;
                  case __PROFIL_BLOCK__: {
                  } break;
                  };
                };
              } break;
              case 10834: {
                Self__IEQP=((__TYPE *)action__Z22G.self);
                __tmp__EC3G=id_section__UG4F(__tmp__LD3G);
                if (((void *)((__SECTION_ *)__tmp__EC3G)->name__1I0D == (void *)(&__string_28))) {
                  __tmp__PC3G=TRUE__;
                } else {
                  __tmp__LC3G=((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.ensure_count__QEAG;
                  __tmp__PC3G=(__tmp__LC3G >  0);
                };
                if (__tmp__PC3G) {
                  add_slot_struct__TURI(Self__IEQP,__tmp__LD3G);
                };
              } break;
              case 10843: {
                __tmp__VE3G=((__SLOT_DATA *)__tmp__LD3G)->parent_variable__AJZD.ensure_count__QEAG;
                __tmp__XE3G=(__tmp__VE3G >  0);
                if (__tmp__XE3G) {
                  genere__KRFI(__tmp__LD3G,output_glob__VD);
                };
              } break;
              };
              Self__FEXH=(__INTEGER)(Self__FEXH +  1);
            };
          };
          if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            __tmp__PD3G=slot_data__Z4TH(slot__X22G);
          } else {
            __tmp__PD3G=slot_data__T5TH(slot__X22G);
          };
          __tmp__EC3G=id_section__UG4F(__tmp__PD3G);
          if (((void *)((__SECTION_ *)__tmp__EC3G)->name__1I0D == (void *)(&__string_28))) {
            __tmp__PC3G=TRUE__;
          } else {
            __tmp__LC3G=((__SLOT_DATA *)__tmp__PD3G)->parent_variable__AJZD.ensure_count__QEAG;
            __tmp__PC3G=(__tmp__LC3G >  0);
          };
          if (__tmp__PC3G) {
            add_slot_struct__TURI(Self__V22G,__tmp__PD3G);
          };
        };
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__TD3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__TD3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_id__04OG;
        };
        slot_data__W22G=__tmp__TD3G;
        if ((((void *)__tmp__TD3G != (void *)NULL) && (((__SLOT_DATA *)__tmp__TD3G)->parent_variable__AJZD.ensure_count__QEAG >  0))) {
          add_slot_struct__TURI(Self__V22G,__tmp__TD3G);
        };
      } else {
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__KE3G=lower_style__DSPH(slot__X22G);
        } else {
          __tmp__KE3G=lower_style__PSPH(slot__X22G);
        };
        if ((__tmp__KE3G ==  0)) {
          __tmp__5E3G.__id=10843;
          action__Z22G=__tmp__5E3G;
          if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            __tmp__AF3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__AF3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          if (((void *)__tmp__AF3G != (void *)NULL)) {
            if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            };
            if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
              __tmp__JF3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
            } else {
              __tmp__JF3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
            };
            Self__ZEXH= 0;
            limit_up__0EXH=((__FAST_ARRAYoSLOT_DATAo *)__tmp__JF3G)->parent_arrayed_collection__3K3F.upper__035F;
            while ((Self__ZEXH <= limit_up__0EXH)) {
              if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
                __tmp__RF3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_data_list__CL3F;
              } else {
                __tmp__RF3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_data_list__CL3F;
              };
              __tmp__TF3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__RF3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__ZEXH];
              switch (action__Z22G.__id) {
              case 10822: {
                Self__NEQP=((__TYPE *)action__Z22G.self);
                __tmp__N42G=((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.ensure_count__QEAG;
                if ((__tmp__N42G >  0)) {
                  __tmp__Y42G=TRUE__;
                } else {
                  __tmp__U42G=id_section__UG4F(__tmp__TF3G);
                  __tmp__Y42G=((void *)((__SECTION_ *)__tmp__U42G)->name__1I0D == (void *)(&__string_28));
                };
                if (__tmp__Y42G) {
                  __tmp__442G=((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.type__125F;
                  __tmp__452G=((void *)((__TYPE_FULL *)__tmp__442G)->parent_type__KTL != (void *)Self__NEQP);
                } else {
                  __tmp__452G=FALSE__;
                };
                if (__tmp__452G) {
                  __tmp__I52G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
                  __tmp__052G=(__tmp__I52G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
                  if (__tmp__052G) {
                    __tmp__152G=TRUE__;
                  } else {
                    __tmp__V52G=((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.type__125F;
                    __tmp__W52G=((__TYPE_FULL *)__tmp__V52G)->parent_type__KTL;
                    __tmp__152G=((void *)__tmp__W52G == (void *)type_block__BLB);
                  };
                  __tmp__552G=__tmp__152G;
                } else {
                  __tmp__552G=FALSE__;
                };
                if (__tmp__552G) {
                  __tmp__FA3G=((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.type__125F;
                  __tmp__GA3G=((__TYPE_FULL *)__tmp__FA3G)->parent_type__KTL;
                  switch (((struct ___OBJ *)__tmp__GA3G)->__id) {
                  case __TYPE__: {
                    genere_struct__U22G(__tmp__GA3G);
                  } break;
                  case __TYPE_NULL__: {
                    append__MOK(output_decl__1C,(&__string_175));
                  } break;
                  case __TYPE_VOID__: {
                  } break;
                  case __TYPE_CONTEXT__: {
                    append__MOK(output_decl__1C,(&__string_176));
                  } break;
                  case __TYPE_ID__: {
                  } break;
                  case __TYPE_GENERIC__: {
                    genere_struct__1P3G(__tmp__GA3G);
                  } break;
                  case __PROFIL_BLOCK__: {
                  } break;
                  };
                };
              } break;
              case 10834: {
                Self__PEQP=((__TYPE *)action__Z22G.self);
                __tmp__EC3G=id_section__UG4F(__tmp__TF3G);
                if (((void *)((__SECTION_ *)__tmp__EC3G)->name__1I0D == (void *)(&__string_28))) {
                  __tmp__PC3G=TRUE__;
                } else {
                  __tmp__LC3G=((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.ensure_count__QEAG;
                  __tmp__PC3G=(__tmp__LC3G >  0);
                };
                if (__tmp__PC3G) {
                  add_slot_struct__TURI(Self__PEQP,__tmp__TF3G);
                };
              } break;
              case 10843: {
                __tmp__VE3G=((__SLOT_DATA *)__tmp__TF3G)->parent_variable__AJZD.ensure_count__QEAG;
                __tmp__XE3G=(__tmp__VE3G >  0);
                if (__tmp__XE3G) {
                  genere__KRFI(__tmp__TF3G,output_glob__VD);
                };
              } break;
              };
              Self__ZEXH=(__INTEGER)(Self__ZEXH +  1);
            };
          };
          if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
            __tmp__XF3G=slot_data__Z4TH(slot__X22G);
          } else {
            __tmp__XF3G=slot_data__T5TH(slot__X22G);
          };
          __tmp__VE3G=((__SLOT_DATA *)__tmp__XF3G)->parent_variable__AJZD.ensure_count__QEAG;
          __tmp__XE3G=(__tmp__VE3G >  0);
          if (__tmp__XE3G) {
            genere__KRFI(__tmp__XF3G,output_glob__VD);
          };
        };
        if (((struct ___OBJ *)slot__X22G)->__id==__SLOT_DATA__) {
          __tmp__1F3G=((__SLOT *)((__SLOT_DATA *)slot__X22G)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__1F3G=((__SLOT *)((__SLOT_CODE *)slot__X22G)->parent_slot__Y22F)->slot_id__04OG;
        };
        slot_data__W22G=__tmp__1F3G;
        if ((((void *)__tmp__1F3G != (void *)NULL) && (((__SLOT_DATA *)__tmp__1F3G)->parent_variable__AJZD.ensure_count__QEAG >  0))) {
          genere__KRFI(((__SLOT *)((__SLOT_DATA *)__tmp__1F3G)->parent_slot__BJZD)->slot_id__04OG,output_glob__VD);
        };
      };
      Self__NCDH=(__INTEGER)(Self__NCDH +  1);
    };
    if ((((void *)((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_37)) || ((void *)((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_38)))) {
      tg__022G=NULL;
      print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
      print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
      print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
      print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
    } else {
      if (((void *)((__PROTOTYPE *)Self__V22G->prototype__RD)->type_c__EPDC != (void *)NULL)) {
        Self__SWZI= 0;
        while ((Self__SWZI <=  4)) {
          tab__Y22G=((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[Self__SWZI];
          if ((! (((__FAST_ARRAYoSLOT_DATAo *)tab__Y22G)->parent_arrayed_collection__3K3F.upper__035F <  0))) {
            pos__4LHQ=((__SLOT_DATA *)((void **)((__FAST_ARRAYoSLOT_DATAo *)tab__Y22G)->parent_arrayed_collection__3K3F.storage__Y45F)[ 0])->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_276));
            put_position__ECH(pos__4LHQ);
            send_error__2FH();
          };
          Self__SWZI=(__INTEGER)(Self__SWZI +  1);
        };
        append__MOK(output_decl__1C,(&__string_277));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        add_last__YPK(output_decl__1C,'\n');
        if (((void *)((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_41))) {
          append__MOK(output_decl__1C,(&__string_278));
          __tmp__3I3G=TRUE__;
        } else {
          __tmp__3I3G=FALSE__;
        };
        if (__tmp__3I3G) {
          __tmp__MJ3G=TRUE__;
        } else {
          result__UXZI=((void *)((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_42));
          if (result__UXZI) {
            append__MOK(output_decl__1C,(&__string_279));
          };
          __tmp__MJ3G=result__UXZI;
        };
        if ((! __tmp__MJ3G)) {
          if ((pass_count__Z3LC == Self__V22G->last_pass_binding__YYZI)) {
            pos__BMHQ=((__SLOT_DATA *)((void **)((__FAST_ARRAYoSLOT_DATAo *)tab__Y22G)->parent_arrayed_collection__3K3F.storage__Y45F)[ 0])->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_280));
            put_position__ECH(pos__BMHQ);
            send_error__2FH();
          } else {
            append__MOK(output_decl__1C,(&__string_281));
            append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->type_c__EPDC);
            append__MOK(output_decl__1C,(&__string_282));
            append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
            append__MOK(output_decl__1C,(&__string_272));
          };
        };
        add_last__YPK(output_decl__1C,'\n');
      } else {
        append__MOK(output_decl__1C,(&__string_277));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_283));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_284));
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        if ((pass_count__Z3LC == Self__V22G->last_pass_binding__YYZI)) {
          append_in__4VC(((__INTEGER_32 )id_counter_with_type__4K3G),output_decl__1C);
          id_counter_with_type__4K3G=(__INTEGER)(id_counter_with_type__4K3G +  1);
          append__MOK(string_tmp__RB,(&__string_285));
          if (((__PROTOTYPE *)Self__V22G->prototype__RD)->is_mapping__1RMC) {
            pos__HMHQ=((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_286));
            put_position__ECH(pos__HMHQ);
            send_error__2FH();
          };
        } else {
          append_in__4VC(((__INTEGER_32 )id_counter_without_type__2E),output_decl__1C);
          id_counter_without_type__2E=(__INTEGER)(id_counter_without_type__2E +  1);
        };
        add_last__YPK(output_decl__1C,'\n');
        Self__FZZI= 4;
        while ((Self__FZZI >=  0)) {
          tab__Y22G=((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[Self__FZZI];
          __tmp__HM3G=((__FAST_ARRAYoSLOT_DATAo *)tab__Y22G)->parent_arrayed_collection__3K3F.upper__035F;
          Self__IECJ= 0;
          while ((Self__IECJ <= __tmp__HM3G)) {
            slot_data__W22G=((void **)((__FAST_ARRAYoSLOT_DATAo *)tab__Y22G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__IECJ];
            if ((((__PROTOTYPE *)Self__V22G->prototype__RD)->is_mapping__1RMC && is_expanded_c__0ZWG(((__SLOT_DATA *)slot_data__W22G)->parent_variable__AJZD.type__125F))) {
              append__MOK(string_tmp__RB,(&__string_287));
            } else {
              append__MOK(string_tmp__RB,(&__string_143));
            };
            genere__KRFI(slot_data__W22G,string_tmp__RB);
            Self__IECJ=(__INTEGER)(Self__IECJ +  1);
          };
          ((__FAST_ARRAYoSLOT_DATAo *)tab__Y22G)->parent_arrayed_collection__3K3F.upper__035F=(__INTEGER)(-  1);
          Self__FZZI=(__INTEGER)(Self__FZZI -  1);
        };
        if (((void *)Self__V22G == (void *)type_block__BLB)) {
          append__MOK(string_tmp__RB,(&__string_288));
        };
        if ((((__STRING *)string_tmp__RB)->count__VF ==  0)) {
          append__MOK(string_tmp__RB,(&__string_289));
        };
        append__MOK(output_decl__1C,(&__string_290));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_291));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_292));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_293));
        append__MOK(output_decl__1C,string_tmp__RB);
        if (((__PROTOTYPE *)Self__V22G->prototype__RD)->is_mapping__1RMC) {
          append__MOK(output_decl__1C,(&__string_294));
        } else {
          append__MOK(output_decl__1C,(&__string_295));
        };
        append__MOK(output_decl__1C,(&__string_92));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        add_last__YPK(output_decl__1C,' ');
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        add_last__YPK(output_decl__1C,'_');
        if ((pass_count__Z3LC == Self__V22G->last_pass_binding__YYZI)) {
          append__MOK(output_decl__1C,(&__string_296));
          append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
          append__MOK(output_decl__1C,(&__string_297));
        };
        append__MOK(output_decl__1C,(&__string_272));
        append__MOK(output_decl__1C,(&__string_298));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_299));
        append__MOK(output_decl__1C,((__PROTOTYPE *)Self__V22G->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(output_decl__1C,(&__string_300));
      };
    };
    force__to__IDDH(Self__V22G->slot_run__1JC);
  };
}

static void genere_struct__1P3G(__TYPE_GENERIC *Self__2P3G)
// ({TYPE_GENERIC}) VoidRecursive, No inlinable.
{
  void *slot_data__3P3G,*__tmp__EU3G,*__tmp__IU3G,*__tmp__SW3G;
  void *__tmp__WW3G,*__tmp__0W3G,*__tmp__0Y3G,*__tmp__4Y3G,*__tmp__CZ3G;
  void *slot__4P3G;
  __BLOCK action__AQ3G;
  void *tg__BQ3G;
  __INTEGER __tmp__YQ3G,Self__NFDH,__tmp__GR3G,Self__V40I;
  __INTEGER limit_up__W40I,__tmp__UR3G,__tmp__SV3G,__tmp__2X3G;
  __INTEGER __tmp__SU3G,Self__5FDH,__tmp__AV3G,Self__UFXH;
  __INTEGER limit_up__VFXH,__tmp__RX3G,Self__IGXH,limit_up__JGXH;
  __INTEGER Self__L1ZI,Self__J4ZI,__tmp__H53G,Self__EFCJ;
  __TYPE_GENERIC *Self__GOVP,*Self__KOVP,*Self__WFQP,*Self__YFQP;
  __TYPE_GENERIC *Self__3FQP,*Self__5FQP;
  void *__tmp__1R3G,*__tmp__LV3G;
  void *__tmp__FS3G,*__tmp__2S3G,*__tmp__MT3G;
  void *__tmp__3S3G,*__tmp__NT3G,*__tmp__P03G;
  __POSITION pos__MNHQ,pos__PNHQ,pos__UNHQ;
  void *tab__5P3G,*__tmp__RT3G,*__tmp__0T3G,*__tmp__CU3G,*__tmp__5V3G;
  void *__tmp__IW3G,*__tmp__QW3G,*__tmp__HY3G,*__tmp__QY3G,*__tmp__YY3G;
  __CHARACTER __tmp__AR3G,__tmp__0U3G;
  __BOOLEAN __tmp__JR3G,__tmp__5R3G,__tmp__FT3G,__tmp__PS3G,__tmp__BT3G;
  __BOOLEAN __tmp__CT3G,__tmp__GT3G,__tmp__WV3G,__tmp__4X3G,__tmp__413G;
  __BOOLEAN __tmp__N23G,result__Q2ZI;
  __BLOCK __tmp__QT3G;
  __BLOCK __tmp__4V3G;
  __BLOCK __tmp__GY3G;
  slot_data__3P3G=NULL;
  slot__4P3G=NULL;
  tab__5P3G=NULL;
  action__AQ3G.__id=0;
  tg__BQ3G=NULL;
  if (((((__FAST_ARRAYoSLOTo *)Self__2P3G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__2P3G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL))) {
    __tmp__YQ3G=((__FAST_ARRAYoSLOTo *)Self__2P3G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
    Self__NFDH= 0;
    while ((Self__NFDH <= __tmp__YQ3G)) {
      slot__4P3G=((void **)((__FAST_ARRAYoSLOTo *)Self__2P3G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[Self__NFDH];
      if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
        __tmp__AR3G=((__SLOT_DATA *)slot__4P3G)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
      } else {
        __tmp__AR3G=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      };
      if ((__tmp__AR3G == '+')) {
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__GR3G=lower_style__DSPH(slot__4P3G);
        } else {
          __tmp__GR3G=lower_style__PSPH(slot__4P3G);
        };
        __tmp__JR3G=(__tmp__GR3G ==  0);
      } else {
        __tmp__JR3G=FALSE__;
      };
      if (__tmp__JR3G) {
        __tmp__QT3G.__id=10884;
        __tmp__QT3G.self=Self__2P3G;
        action__AQ3G=__tmp__QT3G;
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__RT3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
        } else {
          __tmp__RT3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
        };
        if (((void *)__tmp__RT3G != (void *)NULL)) {
          if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          };
          if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            __tmp__0T3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__0T3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          Self__V40I= 0;
          limit_up__W40I=((__FAST_ARRAYoSLOT_DATAo *)__tmp__0T3G)->parent_arrayed_collection__3K3F.upper__035F;
          while ((Self__V40I <= limit_up__W40I)) {
            if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
              __tmp__CU3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
            } else {
              __tmp__CU3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
            };
            __tmp__EU3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__CU3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__V40I];
            switch (action__AQ3G.__id) {
            case 10884: {
              Self__GOVP=((__TYPE_GENERIC *)action__AQ3G.self);
              __tmp__UR3G=((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.ensure_count__QEAG;
              if ((__tmp__UR3G >  0)) {
                __tmp__5R3G=TRUE__;
              } else {
                __tmp__1R3G=id_section__UG4F(__tmp__EU3G);
                __tmp__5R3G=((void *)((__SECTION_ *)__tmp__1R3G)->name__1I0D == (void *)(&__string_28));
              };
              if (__tmp__5R3G) {
                __tmp__FS3G=((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.type__125F;
                __tmp__FT3G=((void *)((__TYPE_FULL *)__tmp__FS3G)->parent_type__KTL != (void *)Self__GOVP);
              } else {
                __tmp__FT3G=FALSE__;
              };
              if (__tmp__FT3G) {
                __tmp__PS3G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
                __tmp__BT3G=(__tmp__PS3G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
                if (__tmp__BT3G) {
                  __tmp__CT3G=TRUE__;
                } else {
                  __tmp__2S3G=((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.type__125F;
                  __tmp__3S3G=((__TYPE_FULL *)__tmp__2S3G)->parent_type__KTL;
                  __tmp__CT3G=((void *)__tmp__3S3G == (void *)type_block__BLB);
                };
                __tmp__GT3G=__tmp__CT3G;
              } else {
                __tmp__GT3G=FALSE__;
              };
              if (__tmp__GT3G) {
                __tmp__MT3G=((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.type__125F;
                __tmp__NT3G=((__TYPE_FULL *)__tmp__MT3G)->parent_type__KTL;
                switch (((struct ___OBJ *)__tmp__NT3G)->__id) {
                case __TYPE__: {
                  genere_struct__U22G(__tmp__NT3G);
                } break;
                case __TYPE_NULL__: {
                  append__MOK(output_decl__1C,(&__string_175));
                } break;
                case __TYPE_VOID__: {
                } break;
                case __TYPE_CONTEXT__: {
                  append__MOK(output_decl__1C,(&__string_176));
                } break;
                case __TYPE_ID__: {
                } break;
                case __TYPE_GENERIC__: {
                  genere_struct__1P3G(__tmp__NT3G);
                } break;
                case __PROFIL_BLOCK__: {
                } break;
                };
              };
            } break;
            case 10896: {
              Self__KOVP=((__TYPE_GENERIC *)action__AQ3G.self);
              __tmp__LV3G=id_section__UG4F(__tmp__EU3G);
              if (((void *)((__SECTION_ *)__tmp__LV3G)->name__1I0D == (void *)(&__string_28))) {
                __tmp__WV3G=TRUE__;
              } else {
                __tmp__SV3G=((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.ensure_count__QEAG;
                __tmp__WV3G=(__tmp__SV3G >  0);
              };
              if (__tmp__WV3G) {
                add_slot_struct__XWRI(Self__KOVP,__tmp__EU3G);
              };
            } break;
            case 10905: {
              __tmp__2X3G=((__SLOT_DATA *)__tmp__EU3G)->parent_variable__AJZD.ensure_count__QEAG;
              __tmp__4X3G=(__tmp__2X3G >  0);
              if (__tmp__4X3G) {
                genere__KRFI(__tmp__EU3G,output_glob__VD);
              };
            } break;
            };
            Self__V40I=(__INTEGER)(Self__V40I +  1);
          };
        };
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__IU3G=slot_data__Z4TH(slot__4P3G);
        } else {
          __tmp__IU3G=slot_data__T5TH(slot__4P3G);
        };
        __tmp__UR3G=((__SLOT_DATA *)__tmp__IU3G)->parent_variable__AJZD.ensure_count__QEAG;
        if ((__tmp__UR3G >  0)) {
          __tmp__5R3G=TRUE__;
        } else {
          __tmp__1R3G=id_section__UG4F(__tmp__IU3G);
          __tmp__5R3G=((void *)((__SECTION_ *)__tmp__1R3G)->name__1I0D == (void *)(&__string_28));
        };
        if (__tmp__5R3G) {
          __tmp__FS3G=((__SLOT_DATA *)__tmp__IU3G)->parent_variable__AJZD.type__125F;
          __tmp__FT3G=((void *)((__TYPE_FULL *)__tmp__FS3G)->parent_type__KTL != (void *)Self__2P3G);
        } else {
          __tmp__FT3G=FALSE__;
        };
        if (__tmp__FT3G) {
          __tmp__PS3G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__IU3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
          __tmp__BT3G=(__tmp__PS3G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__IU3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
          if (__tmp__BT3G) {
            __tmp__CT3G=TRUE__;
          } else {
            __tmp__2S3G=((__SLOT_DATA *)__tmp__IU3G)->parent_variable__AJZD.type__125F;
            __tmp__3S3G=((__TYPE_FULL *)__tmp__2S3G)->parent_type__KTL;
            __tmp__CT3G=((void *)__tmp__3S3G == (void *)type_block__BLB);
          };
          __tmp__GT3G=__tmp__CT3G;
        } else {
          __tmp__GT3G=FALSE__;
        };
        if (__tmp__GT3G) {
          __tmp__MT3G=((__SLOT_DATA *)__tmp__IU3G)->parent_variable__AJZD.type__125F;
          __tmp__NT3G=((__TYPE_FULL *)__tmp__MT3G)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__NT3G)->__id) {
          case __TYPE__: {
            genere_struct__U22G(__tmp__NT3G);
          } break;
          case __TYPE_NULL__: {
            append__MOK(output_decl__1C,(&__string_175));
          } break;
          case __TYPE_VOID__: {
          } break;
          case __TYPE_CONTEXT__: {
            append__MOK(output_decl__1C,(&__string_176));
          } break;
          case __TYPE_ID__: {
          } break;
          case __TYPE_GENERIC__: {
            genere_struct__1P3G(__tmp__NT3G);
          } break;
          case __PROFIL_BLOCK__: {
          } break;
          };
        };
      };
      Self__NFDH=(__INTEGER)(Self__NFDH +  1);
    };
    __tmp__SU3G=((__FAST_ARRAYoSLOTo *)Self__2P3G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
    Self__5FDH= 0;
    while ((Self__5FDH <= __tmp__SU3G)) {
      slot__4P3G=((void **)((__FAST_ARRAYoSLOTo *)Self__2P3G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[Self__5FDH];
      if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
        __tmp__0U3G=((__SLOT_DATA *)slot__4P3G)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
      } else {
        __tmp__0U3G=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      };
      if ((__tmp__0U3G == '+')) {
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__AV3G=lower_style__DSPH(slot__4P3G);
        } else {
          __tmp__AV3G=lower_style__PSPH(slot__4P3G);
        };
        if ((__tmp__AV3G ==  0)) {
          __tmp__4V3G.__id=10896;
          __tmp__4V3G.self=Self__2P3G;
          action__AQ3G=__tmp__4V3G;
          if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            __tmp__5V3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__5V3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          if (((void *)__tmp__5V3G != (void *)NULL)) {
            if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            };
            if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
              __tmp__IW3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
            } else {
              __tmp__IW3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
            };
            Self__UFXH= 0;
            limit_up__VFXH=((__FAST_ARRAYoSLOT_DATAo *)__tmp__IW3G)->parent_arrayed_collection__3K3F.upper__035F;
            while ((Self__UFXH <= limit_up__VFXH)) {
              if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
                __tmp__QW3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
              } else {
                __tmp__QW3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
              };
              __tmp__SW3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__QW3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__UFXH];
              switch (action__AQ3G.__id) {
              case 10884: {
                Self__WFQP=((__TYPE_GENERIC *)action__AQ3G.self);
                __tmp__UR3G=((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.ensure_count__QEAG;
                if ((__tmp__UR3G >  0)) {
                  __tmp__5R3G=TRUE__;
                } else {
                  __tmp__1R3G=id_section__UG4F(__tmp__SW3G);
                  __tmp__5R3G=((void *)((__SECTION_ *)__tmp__1R3G)->name__1I0D == (void *)(&__string_28));
                };
                if (__tmp__5R3G) {
                  __tmp__FS3G=((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.type__125F;
                  __tmp__FT3G=((void *)((__TYPE_FULL *)__tmp__FS3G)->parent_type__KTL != (void *)Self__WFQP);
                } else {
                  __tmp__FT3G=FALSE__;
                };
                if (__tmp__FT3G) {
                  __tmp__PS3G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
                  __tmp__BT3G=(__tmp__PS3G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
                  if (__tmp__BT3G) {
                    __tmp__CT3G=TRUE__;
                  } else {
                    __tmp__2S3G=((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.type__125F;
                    __tmp__3S3G=((__TYPE_FULL *)__tmp__2S3G)->parent_type__KTL;
                    __tmp__CT3G=((void *)__tmp__3S3G == (void *)type_block__BLB);
                  };
                  __tmp__GT3G=__tmp__CT3G;
                } else {
                  __tmp__GT3G=FALSE__;
                };
                if (__tmp__GT3G) {
                  __tmp__MT3G=((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.type__125F;
                  __tmp__NT3G=((__TYPE_FULL *)__tmp__MT3G)->parent_type__KTL;
                  switch (((struct ___OBJ *)__tmp__NT3G)->__id) {
                  case __TYPE__: {
                    genere_struct__U22G(__tmp__NT3G);
                  } break;
                  case __TYPE_NULL__: {
                    append__MOK(output_decl__1C,(&__string_175));
                  } break;
                  case __TYPE_VOID__: {
                  } break;
                  case __TYPE_CONTEXT__: {
                    append__MOK(output_decl__1C,(&__string_176));
                  } break;
                  case __TYPE_ID__: {
                  } break;
                  case __TYPE_GENERIC__: {
                    genere_struct__1P3G(__tmp__NT3G);
                  } break;
                  case __PROFIL_BLOCK__: {
                  } break;
                  };
                };
              } break;
              case 10896: {
                Self__YFQP=((__TYPE_GENERIC *)action__AQ3G.self);
                __tmp__LV3G=id_section__UG4F(__tmp__SW3G);
                if (((void *)((__SECTION_ *)__tmp__LV3G)->name__1I0D == (void *)(&__string_28))) {
                  __tmp__WV3G=TRUE__;
                } else {
                  __tmp__SV3G=((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.ensure_count__QEAG;
                  __tmp__WV3G=(__tmp__SV3G >  0);
                };
                if (__tmp__WV3G) {
                  add_slot_struct__XWRI(Self__YFQP,__tmp__SW3G);
                };
              } break;
              case 10905: {
                __tmp__2X3G=((__SLOT_DATA *)__tmp__SW3G)->parent_variable__AJZD.ensure_count__QEAG;
                __tmp__4X3G=(__tmp__2X3G >  0);
                if (__tmp__4X3G) {
                  genere__KRFI(__tmp__SW3G,output_glob__VD);
                };
              } break;
              };
              Self__UFXH=(__INTEGER)(Self__UFXH +  1);
            };
          };
          if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            __tmp__WW3G=slot_data__Z4TH(slot__4P3G);
          } else {
            __tmp__WW3G=slot_data__T5TH(slot__4P3G);
          };
          __tmp__LV3G=id_section__UG4F(__tmp__WW3G);
          if (((void *)((__SECTION_ *)__tmp__LV3G)->name__1I0D == (void *)(&__string_28))) {
            __tmp__WV3G=TRUE__;
          } else {
            __tmp__SV3G=((__SLOT_DATA *)__tmp__WW3G)->parent_variable__AJZD.ensure_count__QEAG;
            __tmp__WV3G=(__tmp__SV3G >  0);
          };
          if (__tmp__WV3G) {
            add_slot_struct__XWRI(Self__2P3G,__tmp__WW3G);
          };
        };
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__0W3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__0W3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_id__04OG;
        };
        slot_data__3P3G=__tmp__0W3G;
        if ((((void *)__tmp__0W3G != (void *)NULL) && (((__SLOT_DATA *)__tmp__0W3G)->parent_variable__AJZD.ensure_count__QEAG >  0))) {
          add_slot_struct__XWRI(Self__2P3G,__tmp__0W3G);
        };
      } else {
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__RX3G=lower_style__DSPH(slot__4P3G);
        } else {
          __tmp__RX3G=lower_style__PSPH(slot__4P3G);
        };
        if ((__tmp__RX3G ==  0)) {
          __tmp__GY3G.__id=10905;
          action__AQ3G=__tmp__GY3G;
          if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            __tmp__HY3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__HY3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          if (((void *)__tmp__HY3G != (void *)NULL)) {
            if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            };
            if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
              __tmp__QY3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
            } else {
              __tmp__QY3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
            };
            Self__IGXH= 0;
            limit_up__JGXH=((__FAST_ARRAYoSLOT_DATAo *)__tmp__QY3G)->parent_arrayed_collection__3K3F.upper__035F;
            while ((Self__IGXH <= limit_up__JGXH)) {
              if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
                __tmp__YY3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_data_list__CL3F;
              } else {
                __tmp__YY3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_data_list__CL3F;
              };
              __tmp__0Y3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__YY3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__IGXH];
              switch (action__AQ3G.__id) {
              case 10884: {
                Self__3FQP=((__TYPE_GENERIC *)action__AQ3G.self);
                __tmp__UR3G=((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.ensure_count__QEAG;
                if ((__tmp__UR3G >  0)) {
                  __tmp__5R3G=TRUE__;
                } else {
                  __tmp__1R3G=id_section__UG4F(__tmp__0Y3G);
                  __tmp__5R3G=((void *)((__SECTION_ *)__tmp__1R3G)->name__1I0D == (void *)(&__string_28));
                };
                if (__tmp__5R3G) {
                  __tmp__FS3G=((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.type__125F;
                  __tmp__FT3G=((void *)((__TYPE_FULL *)__tmp__FS3G)->parent_type__KTL != (void *)Self__3FQP);
                } else {
                  __tmp__FT3G=FALSE__;
                };
                if (__tmp__FT3G) {
                  __tmp__PS3G=((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0);
                  __tmp__BT3G=(__tmp__PS3G || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.type__125F)->flag__LTL &  4) !=  0));
                  if (__tmp__BT3G) {
                    __tmp__CT3G=TRUE__;
                  } else {
                    __tmp__2S3G=((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.type__125F;
                    __tmp__3S3G=((__TYPE_FULL *)__tmp__2S3G)->parent_type__KTL;
                    __tmp__CT3G=((void *)__tmp__3S3G == (void *)type_block__BLB);
                  };
                  __tmp__GT3G=__tmp__CT3G;
                } else {
                  __tmp__GT3G=FALSE__;
                };
                if (__tmp__GT3G) {
                  __tmp__MT3G=((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.type__125F;
                  __tmp__NT3G=((__TYPE_FULL *)__tmp__MT3G)->parent_type__KTL;
                  switch (((struct ___OBJ *)__tmp__NT3G)->__id) {
                  case __TYPE__: {
                    genere_struct__U22G(__tmp__NT3G);
                  } break;
                  case __TYPE_NULL__: {
                    append__MOK(output_decl__1C,(&__string_175));
                  } break;
                  case __TYPE_VOID__: {
                  } break;
                  case __TYPE_CONTEXT__: {
                    append__MOK(output_decl__1C,(&__string_176));
                  } break;
                  case __TYPE_ID__: {
                  } break;
                  case __TYPE_GENERIC__: {
                    genere_struct__1P3G(__tmp__NT3G);
                  } break;
                  case __PROFIL_BLOCK__: {
                  } break;
                  };
                };
              } break;
              case 10896: {
                Self__5FQP=((__TYPE_GENERIC *)action__AQ3G.self);
                __tmp__LV3G=id_section__UG4F(__tmp__0Y3G);
                if (((void *)((__SECTION_ *)__tmp__LV3G)->name__1I0D == (void *)(&__string_28))) {
                  __tmp__WV3G=TRUE__;
                } else {
                  __tmp__SV3G=((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.ensure_count__QEAG;
                  __tmp__WV3G=(__tmp__SV3G >  0);
                };
                if (__tmp__WV3G) {
                  add_slot_struct__XWRI(Self__5FQP,__tmp__0Y3G);
                };
              } break;
              case 10905: {
                __tmp__2X3G=((__SLOT_DATA *)__tmp__0Y3G)->parent_variable__AJZD.ensure_count__QEAG;
                __tmp__4X3G=(__tmp__2X3G >  0);
                if (__tmp__4X3G) {
                  genere__KRFI(__tmp__0Y3G,output_glob__VD);
                };
              } break;
              };
              Self__IGXH=(__INTEGER)(Self__IGXH +  1);
            };
          };
          if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
            __tmp__4Y3G=slot_data__Z4TH(slot__4P3G);
          } else {
            __tmp__4Y3G=slot_data__T5TH(slot__4P3G);
          };
          __tmp__2X3G=((__SLOT_DATA *)__tmp__4Y3G)->parent_variable__AJZD.ensure_count__QEAG;
          __tmp__4X3G=(__tmp__2X3G >  0);
          if (__tmp__4X3G) {
            genere__KRFI(__tmp__4Y3G,output_glob__VD);
          };
        };
        if (((struct ___OBJ *)slot__4P3G)->__id==__SLOT_DATA__) {
          __tmp__CZ3G=((__SLOT *)((__SLOT_DATA *)slot__4P3G)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__CZ3G=((__SLOT *)((__SLOT_CODE *)slot__4P3G)->parent_slot__Y22F)->slot_id__04OG;
        };
        slot_data__3P3G=__tmp__CZ3G;
        if ((((void *)__tmp__CZ3G != (void *)NULL) && (((__SLOT_DATA *)__tmp__CZ3G)->parent_variable__AJZD.ensure_count__QEAG >  0))) {
          genere__KRFI(((__SLOT *)((__SLOT_DATA *)__tmp__CZ3G)->parent_slot__BJZD)->slot_id__04OG,output_glob__VD);
        };
      };
      Self__5FDH=(__INTEGER)(Self__5FDH +  1);
    };
    if ((((void *)((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_37)) || ((void *)((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_38)))) {
      tg__BQ3G=Self__2P3G;
      __tmp__P03G=((__TYPE_FULL *)((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__2P3G->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0])->parent_type__KTL;
      switch (((struct ___OBJ *)__tmp__P03G)->__id) {
      case __TYPE__: {
        genere_struct__U22G(__tmp__P03G);
      } break;
      case __TYPE_NULL__: {
        append__MOK(output_decl__1C,(&__string_175));
      } break;
      case __TYPE_VOID__: {
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(output_decl__1C,(&__string_176));
      } break;
      case __TYPE_ID__: {
      } break;
      case __TYPE_GENERIC__: {
        genere_struct__1P3G(__tmp__P03G);
      } break;
      case __PROFIL_BLOCK__: {
      } break;
      };
    } else {
      if (((void *)((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->type_c__EPDC != (void *)NULL)) {
        Self__L1ZI= 0;
        while ((Self__L1ZI <=  4)) {
          tab__5P3G=((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[Self__L1ZI];
          if ((! (((__FAST_ARRAYoSLOT_DATAo *)tab__5P3G)->parent_arrayed_collection__3K3F.upper__035F <  0))) {
            pos__MNHQ=((__SLOT_DATA *)((void **)((__FAST_ARRAYoSLOT_DATAo *)tab__5P3G)->parent_arrayed_collection__3K3F.storage__Y45F)[ 0])->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_276));
            put_position__ECH(pos__MNHQ);
            send_error__2FH();
          };
          Self__L1ZI=(__INTEGER)(Self__L1ZI +  1);
        };
        append__MOK(output_decl__1C,(&__string_277));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        add_last__YPK(output_decl__1C,'\n');
        if (((void *)Self__2P3G->name__2R2B == (void *)(&__string_41))) {
          append__MOK(output_decl__1C,(&__string_278));
          __tmp__413G=TRUE__;
        } else {
          __tmp__413G=FALSE__;
        };
        if (__tmp__413G) {
          __tmp__N23G=TRUE__;
        } else {
          result__Q2ZI=((void *)Self__2P3G->name__2R2B == (void *)(&__string_42));
          if (result__Q2ZI) {
            append__MOK(output_decl__1C,(&__string_279));
          };
          __tmp__N23G=result__Q2ZI;
        };
        if ((! __tmp__N23G)) {
          if ((pass_count__Z3LC == Self__2P3G->parent_type__T2IB.last_pass_binding__YYZI)) {
            pos__PNHQ=((__SLOT_DATA *)((void **)((__FAST_ARRAYoSLOT_DATAo *)tab__5P3G)->parent_arrayed_collection__3K3F.storage__Y45F)[ 0])->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_280));
            put_position__ECH(pos__PNHQ);
            send_error__2FH();
          } else {
            append__MOK(output_decl__1C,(&__string_281));
            append__MOK(output_decl__1C,((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->type_c__EPDC);
            append__MOK(output_decl__1C,(&__string_282));
            append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
            append__MOK(output_decl__1C,(&__string_272));
          };
        };
        add_last__YPK(output_decl__1C,'\n');
      } else {
        append__MOK(output_decl__1C,(&__string_277));
        append__MOK(output_decl__1C,Self__2P3G->name__2R2B);
        append__MOK(output_decl__1C,(&__string_283));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        append__MOK(output_decl__1C,(&__string_284));
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        if ((pass_count__Z3LC == Self__2P3G->parent_type__T2IB.last_pass_binding__YYZI)) {
          append_in__4VC(((__INTEGER_32 )id_counter_with_type__4K3G),output_decl__1C);
          id_counter_with_type__4K3G=(__INTEGER)(id_counter_with_type__4K3G +  1);
          append__MOK(string_tmp__RB,(&__string_285));
          if (((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->is_mapping__1RMC) {
            pos__UNHQ=((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->parent_named__QD.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_286));
            put_position__ECH(pos__UNHQ);
            send_error__2FH();
          };
        } else {
          append_in__4VC(((__INTEGER_32 )id_counter_without_type__2E),output_decl__1C);
          id_counter_without_type__2E=(__INTEGER)(id_counter_without_type__2E +  1);
        };
        add_last__YPK(output_decl__1C,'\n');
        Self__J4ZI= 4;
        while ((Self__J4ZI >=  0)) {
          tab__5P3G=((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[Self__J4ZI];
          __tmp__H53G=((__FAST_ARRAYoSLOT_DATAo *)tab__5P3G)->parent_arrayed_collection__3K3F.upper__035F;
          Self__EFCJ= 0;
          while ((Self__EFCJ <= __tmp__H53G)) {
            slot_data__3P3G=((void **)((__FAST_ARRAYoSLOT_DATAo *)tab__5P3G)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__EFCJ];
            if ((((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->is_mapping__1RMC && is_expanded_c__0ZWG(((__SLOT_DATA *)slot_data__3P3G)->parent_variable__AJZD.type__125F))) {
              append__MOK(string_tmp__RB,(&__string_287));
            } else {
              append__MOK(string_tmp__RB,(&__string_143));
            };
            genere__KRFI(slot_data__3P3G,string_tmp__RB);
            Self__EFCJ=(__INTEGER)(Self__EFCJ +  1);
          };
          ((__FAST_ARRAYoSLOT_DATAo *)tab__5P3G)->parent_arrayed_collection__3K3F.upper__035F=(__INTEGER)(-  1);
          Self__J4ZI=(__INTEGER)(Self__J4ZI -  1);
        };
        if (((void *)Self__2P3G == (void *)type_block__BLB)) {
          append__MOK(string_tmp__RB,(&__string_288));
        };
        if ((((__STRING *)string_tmp__RB)->count__VF ==  0)) {
          append__MOK(string_tmp__RB,(&__string_289));
        };
        append__MOK(output_decl__1C,(&__string_290));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        append__MOK(output_decl__1C,(&__string_291));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        append__MOK(output_decl__1C,(&__string_292));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        append__MOK(output_decl__1C,(&__string_293));
        append__MOK(output_decl__1C,string_tmp__RB);
        if (((__PROTOTYPE *)Self__2P3G->parent_type__T2IB.prototype__RD)->is_mapping__1RMC) {
          append__MOK(output_decl__1C,(&__string_294));
        } else {
          append__MOK(output_decl__1C,(&__string_295));
        };
        append__MOK(output_decl__1C,(&__string_92));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        add_last__YPK(output_decl__1C,' ');
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        add_last__YPK(output_decl__1C,'_');
        if ((pass_count__Z3LC == Self__2P3G->parent_type__T2IB.last_pass_binding__YYZI)) {
          append__MOK(output_decl__1C,(&__string_296));
          append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
          append__MOK(output_decl__1C,(&__string_297));
        };
        append__MOK(output_decl__1C,(&__string_272));
        append__MOK(output_decl__1C,(&__string_298));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        append__MOK(output_decl__1C,(&__string_299));
        append__MOK(output_decl__1C,Self__2P3G->intern_name__FS2B);
        append__MOK(output_decl__1C,(&__string_300));
      };
    };
    force__to__IDDH(Self__2P3G->parent_type__T2IB.slot_run__1JC);
  };
}

static void set_cache_user__C3BE(__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__D3BE,__INTEGER index__E3BE)
// ({HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o},{INTEGER}) VoidRecursive, No inlinable.
{
  void **__tmp__BS4Q,**__tmp__GS4Q;
  __BOOLEAN __tmp__K4BE;
  if ((index__E3BE == (__INTEGER)(Self__D3BE->cache_user__5GAE +  1))) {
    Self__D3BE->cache_user__5GAE=index__E3BE;
    Self__D3BE->cache_node__Q10D=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)Self__D3BE->cache_node__Q10D)->next__V3BE;
    __tmp__BS4Q=Self__D3BE->buckets__3GAE;
    while ((! ((void *)Self__D3BE->cache_node__Q10D != (void *)NULL))) {
      Self__D3BE->cache_buckets__C4BE=(__INTEGER)(Self__D3BE->cache_buckets__C4BE +  1);
      Self__D3BE->cache_node__Q10D=((void **)__tmp__BS4Q)[Self__D3BE->cache_buckets__C4BE];
    };
    __tmp__K4BE=TRUE__;
  } else {
    __tmp__K4BE=FALSE__;
  };
  if ((! (__tmp__K4BE || (index__E3BE == Self__D3BE->cache_user__5GAE)))) {
    if ((index__E3BE ==  1)) {
      Self__D3BE->cache_user__5GAE= 1;
      Self__D3BE->cache_buckets__C4BE= 0;
      Self__D3BE->cache_node__Q10D=((void **)Self__D3BE->buckets__3GAE)[ 0];
      __tmp__GS4Q=Self__D3BE->buckets__3GAE;
      while ((! ((void *)Self__D3BE->cache_node__Q10D != (void *)NULL))) {
        Self__D3BE->cache_buckets__C4BE=(__INTEGER)(Self__D3BE->cache_buckets__C4BE +  1);
        Self__D3BE->cache_node__Q10D=((void **)__tmp__GS4Q)[Self__D3BE->cache_buckets__C4BE];
      };
    } else {
      set_cache_user__C3BE(Self__D3BE, 1);
      while ((Self__D3BE->cache_user__5GAE != index__E3BE)) {
        set_cache_user__C3BE(Self__D3BE,(__INTEGER)(Self__D3BE->cache_user__5GAE +  1));
      };
    };
  };
}

static void append_in__Z4H(__UINTEGER_32 Self__04H,void *buffer__14H)
// ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __UINTEGER_32 val__24H;
  __INTEGER i__54H,j__A5H;
  __STRING *Self__SYX;
  __CHARACTER tmp__VYX;
  val__24H= 0;
  i__54H= 0;
  j__A5H= 0;
  if ((Self__04H ==  0)) {
    add_last__YPK(((__STRING *)buffer__14H),'0');
  } else {
    i__54H=(__INTEGER)(((__STRING *)buffer__14H)->count__VF +  1);
    val__24H=Self__04H;
    while ((val__24H !=  0)) {
      add_last__YPK(((__STRING *)buffer__14H),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__24H %  10)) + ((__INTEGER_8 )'0'))))));
      val__24H=(__UINTEGER_32)(val__24H /  10);
    };
    j__A5H=((__STRING *)buffer__14H)->count__VF;
    while ((i__54H < j__A5H)) {
      Self__SYX=((__STRING *)buffer__14H);
      tmp__VYX=((__CHARACTER *)Self__SYX->storage__XNK)[(__INTEGER)(i__54H -  1)];
      ((__CHARACTER *)Self__SYX->storage__XNK)[(__INTEGER)(i__54H -  1)]=((__CHARACTER *)Self__SYX->storage__XNK)[(__INTEGER)(j__A5H -  1)];
      ((__CHARACTER *)Self__SYX->storage__XNK)[(__INTEGER)(j__A5H -  1)]=tmp__VYX;
      j__A5H=(__INTEGER)(j__A5H -  1);
      i__54H=(__INTEGER)(i__54H +  1);
    };
  };
}

static void print__stat__for__J0UC(void *msg__L0UC,__INTEGER n__M0UC,__INTEGER t__N0UC)
// ({STRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER pour_mil__O0UC,i__HS4Q,i__IS4Q;
  pour_mil__O0UC= 0;
  if ((t__N0UC !=  0)) {
    put_string__EQD(msg__L0UC);
    pour_mil__O0UC=((__INTEGER )((int)((1000./ (t__N0UC) * (n__M0UC)))));
    i__HS4Q=(__INTEGER)(pour_mil__O0UC /  10);
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )i__HS4Q),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    fputc((int)('.'),stderr);
    i__IS4Q=(__INTEGER)(pour_mil__O0UC %  10);
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )i__IS4Q),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    put_string__EQD((&__string_301));
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )n__M0UC),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    fputc((int)('/'),stderr);
    ((__STRING *)tmp_string__PSD)->count__VF= 0;
    append_in__4VC(((__INTEGER_32 )t__N0UC),tmp_string__PSD);
    put_string__EQD(tmp_string__PSD);
    put_string__EQD((&__string_156));
  };
}

static void print__Y0CD(__INTEGER Self__Z0CD)
// ({INTEGER}) VoidNo recursive, No inlinable.
{
  __BOOLEAN __tmp__A1CD;
  if ((Self__Z0CD ==  0)) {
    fputc((int)('0'),stdout);
    __tmp__A1CD=TRUE__;
  } else {
    __tmp__A1CD=FALSE__;
  };
  if ((! __tmp__A1CD)) {
    if ((Self__Z0CD <  0)) {
      fputc((int)('-'),stdout);
      print_positif__HQSE((__INTEGER)(- Self__Z0CD));
    } else {
      print_positif__HQSE(Self__Z0CD);
    };
  };
}

static __CHARACTER* create__5UX(__INTEGER nb_elements__BVX)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__WYOB;
  __CHARACTER *Result__4I0;
  Result__4I0=((__CHARACTER *)alloc_dynamic__J0Y(((__UINTEGER_32 )nb_elements__BVX)));
  Self__WYOB=(__INTEGER)(nb_elements__BVX -  1);
  while ((Self__WYOB >=  0)) {
    Result__4I0[Self__WYOB]='\0';
    Self__WYOB=(__INTEGER)(Self__WYOB -  1);
  };
  return(Result__4I0);
}

static void** create__ITEB(__INTEGER nb_elements__KTEB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__2HRB;
  void **Result__SZFB;
  Result__SZFB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__KTEB * ((__INTEGER )(sizeof(void *)))))));
  Self__2HRB=(__INTEGER)(nb_elements__KTEB -  1);
  while ((Self__2HRB >=  0)) {
    Result__SZFB[Self__2HRB]=NULL;
    Self__2HRB=(__INTEGER)(Self__2HRB -  1);
  };
  return(Result__SZFB);
}

static void clear__to__SCNC(__CHARACTER *Self__TCNC,__INTEGER lower__UCNC,__INTEGER upper__VCNC)
// ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__QXQC;
  Self__QXQC=lower__UCNC;
  while ((Self__QXQC <= upper__VCNC)) {
    Self__TCNC[Self__QXQC]='\0';
    Self__QXQC=(__INTEGER)(Self__QXQC +  1);
  };
}

static __POINTER new_lab__2PJ(__UINTEGER_32 t__4PJ)
// ({UINTEGER_32}) With resultNo recursive, No inlinable.
{
  __UINTEGER_32 idx__AQJ,pv__HQJ;
  __MEMORY *blc__DQJ,*prev__EQJ,*Self__KMRQ;
  __POINTER result__FQJ;
  __BOOLEAN __tmp__HRJ;
  idx__AQJ= 0;
  blc__DQJ=NULL;
  prev__EQJ=NULL;
  pv__HQJ= 0;
  while_do__BYJ:
  {
    if ((idx__AQJ < nb_page__OQJ)) {
      blc__DQJ=((__MEMORY *)(last_block[(idx__AQJ)]));
      __tmp__HRJ=(((__UINTEGER_32)(((__MEMORY *)blc__DQJ)->size_and_id__30C &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__DQJ)->size_and_id__30C &  1) ==  1));
    } else {
      __tmp__HRJ=FALSE__;
    };
    if (__tmp__HRJ) {
      idx__AQJ=(__UINTEGER_32)(idx__AQJ +  1);
      goto while_do__BYJ;
    };
  };
  if ((idx__AQJ >= nb_page__OQJ)) {
    blc__DQJ=new_page__2IU();
  };
  ((__MEMORY *)blc__DQJ)->size_and_id__30C=(__UINTEGER_32)(blc__DQJ->size_and_id__30C -  4096);
  Self__KMRQ=((__MEMORY *)blc__DQJ);
  result__FQJ=((__POINTER )((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__KMRQ) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__KMRQ->size_and_id__30C &  4294967292LU))))));
  if (((__UINTEGER_32)(((__MEMORY *)blc__DQJ)->size_and_id__30C &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
    delete_link_free__W0QB(blc__DQJ);
    pv__HQJ=blc__DQJ->previous_linear__20C;
    if ((pv__HQJ !=  4294967295LU)) {
      prev__EQJ=((__MEMORY *)(void *)((unsigned long)begin_memory__4PI - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__HQJ))));
      ((__MEMORY *)prev__EQJ)->size_and_id__30C=(__UINTEGER_32)((__UINTEGER_32)(prev__EQJ->size_and_id__30C + blc__DQJ->size_and_id__30C) +  8);
      last_block[(idx__AQJ)] = (prev__EQJ);
    };
  };
  ((__POINTER *)result__FQJ)[ 0]=((__POINTER )t__4PJ);
  return((void *)((unsigned long)result__FQJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
}

static __POINTER alloc_dynamic__J0Y(__UINTEGER_32 sz__L0Y)
// ({UINTEGER_32}) With resultNo recursive, No inlinable.
{
  __POINTER result__T0Y;
  __UINTEGER_32 a__LUZQ,new_size__N0Y,new_size2__Q0Y,a__QUZQ;
  __UINTEGER_32 new_size__OUZQ;
  result__T0Y=((__POINTER )(NULL));
  a__LUZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
  new_size__N0Y=(__UINTEGER_32)((__UINTEGER_32)(sz__L0Y + a__LUZQ) & (__UINTEGER_32)(~ a__LUZQ));
  new_size2__Q0Y=(__UINTEGER_32)(new_size__N0Y + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
  if ((new_size2__Q0Y <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
    a__QUZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
    new_size__OUZQ=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Q0Y + a__QUZQ) & (__UINTEGER_32)(~ a__QUZQ));
    result__T0Y=micro_alloc__table__lab__BOI(new_size__OUZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OUZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__OUZQ);
    ((__POINTER *)result__T0Y)[ 0]=((__POINTER ) 3);
    result__T0Y=(void *)((unsigned long)result__T0Y - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
  } else {
    result__T0Y=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__X3AB(new_size__N0Y))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
  };
  return(result__T0Y);
}

static __INTEGER hash_code__WPN(__STRING_CONSTANT *Self__XPN)
// ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER result__ZPN,__tmp__0PN,Self__0OQ;
  __CHARACTER *__tmp__OS4Q;
  result__ZPN= 0;
  __tmp__0PN=Self__XPN->count__XHB;
  Self__0OQ= 1;
  __tmp__OS4Q=Self__XPN->storage__C5K;
  while ((Self__0OQ <= __tmp__0PN)) {
    result__ZPN=(__INTEGER)((__INTEGER)( 5 * result__ZPN) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)__tmp__OS4Q)[(__INTEGER)(Self__0OQ -  1)])));
    Self__0OQ=(__INTEGER)(Self__0OQ +  1);
  };
  if ((result__ZPN <  0)) {
    result__ZPN=(__INTEGER)(~ result__ZPN);
  };
  return(result__ZPN);
}

static void copy__to__size__GB4B(__POINTER src__IB4B,__POINTER dst__JB4B,__UINTEGER_32 sz__KB4B)
// ({POINTER},{POINTER},{UINTEGER_32}) VoidNo recursive, No inlinable.
{
  __INTEGER siz__NB4B,Self__JOAC;
  __POINTER *na_src__LB4B,*na_dst__MB4B;
  siz__NB4B=((__INTEGER )sz__KB4B);
  siz__NB4B=(__INTEGER)(siz__NB4B / ((__INTEGER )(sizeof(void *))));
  na_src__LB4B=((__POINTER *)src__IB4B);
  na_dst__MB4B=((__POINTER *)dst__JB4B);
  Self__JOAC=(__INTEGER)(siz__NB4B -  1);
  while ((Self__JOAC >=  0)) {
    na_dst__MB4B[Self__JOAC]=na_src__LB4B[Self__JOAC];
    Self__JOAC=(__INTEGER)(Self__JOAC -  1);
  };
}

static void to_busy__index__OAMB(__MEMORY *Self__PAMB,__UINTEGER_32 sz__QAMB,__UINTEGER_32 idx__RAMB)
// ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
{
  __MEMORY *new__YAMB,*Self__2WOQ;
  __UINTEGER_32 siz__SAMB,new_size__VAMB;
  new__YAMB=NULL;
  delete_link_free__W0QB(Self__PAMB);
  siz__SAMB=Self__PAMB->size_and_id__30C;
  new_size__VAMB=(__UINTEGER_32)(siz__SAMB - sz__QAMB);
  if ((new_size__VAMB > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
    siz__SAMB=sz__QAMB;
    new__YAMB=((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__PAMB) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__QAMB))));
    ((__MEMORY *)new__YAMB)->previous_linear__20C=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__PAMB) - (unsigned long)begin_memory__4PI))));
    ((__MEMORY *)new__YAMB)->size_and_id__30C=(__UINTEGER_32)(new_size__VAMB -  8);
    add_link_free__SDKB(new__YAMB);
    if (((__UINTEGER_32)(((__MEMORY *)new__YAMB)->size_and_id__30C &  2) !=  0)) {
      last_block[(idx__RAMB)] = (new__YAMB);
    } else {
      Self__2WOQ=((__MEMORY *)new__YAMB);
      ((__MEMORY *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__2WOQ) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__2WOQ->size_and_id__30C &  4294967292LU)))))->previous_linear__20C=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__YAMB)) - (unsigned long)begin_memory__4PI))));
    };
  };
  Self__PAMB->size_and_id__30C=(__UINTEGER_32)(siz__SAMB |  1);
}

static __MEMORY* search__X3AB(__UINTEGER_32 new_size__Z3AB)
// ({UINTEGER_32}) With resultNo recursive, No inlinable.
{
  __MEMORY *result__13AB;
  result__13AB=first_free__04AB;
  while ((((void *)result__13AB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__13AB)->size_and_id__30C &  4294967292LU) < new_size__Z3AB))) {
    result__13AB=result__13AB->next_free__40C;
  };
  if (((void *)result__13AB == (void *)NULL)) {
    result__13AB=new_page__2IU();
  };
  to_busy__index__OAMB(result__13AB,new_size__Z3AB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__13AB)) - (unsigned long)begin_memory__4PI)))) >>  26));
  return(result__13AB);
}

static void add_link_free__SDKB(__MEMORY *Self__TDKB)
// ({MEMORY}) VoidNo recursive, No inlinable.
{
  Self__TDKB->next_free__40C=first_free__04AB;
  Self__TDKB->previous_free__50C=NULL;
  if (((void *)first_free__04AB != (void *)NULL)) {
    ((__MEMORY *)first_free__04AB)->previous_free__50C=Self__TDKB;
  };
  first_free__04AB=Self__TDKB;
}

static void delete_link_free__W0QB(__MEMORY *Self__X0QB)
// ({MEMORY}) VoidNo recursive, No inlinable.
{
  __MEMORY *prev__Y0QB,*next__Z0QB;
  prev__Y0QB=Self__X0QB->previous_free__50C;
  next__Z0QB=Self__X0QB->next_free__40C;
  if (((void *)prev__Y0QB == (void *)NULL)) {
    first_free__04AB=next__Z0QB;
  } else {
    ((__MEMORY *)prev__Y0QB)->next_free__40C=next__Z0QB;
  };
  if (((void *)next__Z0QB != (void *)NULL)) {
    ((__MEMORY *)next__Z0QB)->previous_free__50C=prev__Y0QB;
  };
}

static __FAST_ARRAYoLOCALo* clone__VYEG()
// () With resultNo recursive, No inlinable.
{
  __POINTER ptr__ZYEG;
  __INTEGER typ_id__4YEG;
  __UINTEGER_32 sz__1YEG,a__WUZQ,new_size__UUZQ,t__0UZQ,a__2UZQ;
  __FAST_ARRAYoLOCALo *result__YYEG;
  result__YYEG=NULL;
  ptr__ZYEG=((__POINTER )(NULL));
  typ_id__4YEG= 0;
  sz__1YEG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLOCALo));
  if ((sz__1YEG ==  0)) {
    result__YYEG=FAST_ARRAYoLOCALo__;
  } else {
    typ_id__4YEG=__FAST_ARRAYoLOCALo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__1YEG);
    if ((typ_id__4YEG == (__INTEGER)(-  1))) {
      a__WUZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__UUZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__1YEG + a__WUZQ) & (__UINTEGER_32)(~ a__WUZQ));
      ptr__ZYEG=micro_alloc__table__lab__BOI(new_size__UUZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UUZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__UUZQ);
    } else {
      t__0UZQ=((__UINTEGER_32 )typ_id__4YEG);
      a__2UZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__ZYEG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__1YEG + a__2UZQ) & (__UINTEGER_32)(~ a__2UZQ)),((__POINTER )(&(table_type[(t__0UZQ)]))),(__UINTEGER_32)(t__0UZQ |  1));
    };
    result__YYEG=((__FAST_ARRAYoLOCALo *)ptr__ZYEG);
    *(result__YYEG) = *(FAST_ARRAYoLOCALo__);
  };
  return(result__YYEG);
}

static void** create__OWWG(__INTEGER nb_elements__QWWG)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__GLAH;
  void **Result__3UYG;
  Result__3UYG=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__QWWG * ((__INTEGER )(sizeof(void *)))))));
  Self__GLAH=(__INTEGER)(nb_elements__QWWG -  1);
  while ((Self__GLAH >=  0)) {
    Result__3UYG[Self__GLAH]=NULL;
    Self__GLAH=(__INTEGER)(Self__GLAH -  1);
  };
  return(Result__3UYG);
}

static void clear__to__TVEI(void **Self__UVEI,__INTEGER lower__VVEI,__INTEGER upper__WVEI)
// ({NATIVE_ARRAYoLOCALo},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__2MKI;
  Self__2MKI=lower__VVEI;
  while ((Self__2MKI <= upper__WVEI)) {
    Self__UVEI[Self__2MKI]=NULL;
    Self__2MKI=(__INTEGER)(Self__2MKI +  1);
  };
}

static void** create__CVSB(__INTEGER nb_elements__EVSB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__PYRC;
  void **result__NVSB;
  result__NVSB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__EVSB * ((__INTEGER )(sizeof(void *)))))));
  Self__PYRC=(__INTEGER)(nb_elements__EVSB -  1);
  while ((Self__PYRC >=  0)) {
    result__NVSB[Self__PYRC]=NULL;
    Self__PYRC=(__INTEGER)(Self__PYRC -  1);
  };
  return(result__NVSB);
}

static void copy__to__until__FCJB(__CHARACTER *Self__GCJB,__CHARACTER *src__HCJB,__INTEGER dest__ICJB,__INTEGER src_capacity__JCJB)
// ({NATIVE_ARRAYoExpanded_CHARACTERo},{NULLxNATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER i2__ZCJB,i1__YCJB;
  i2__ZCJB= 0;
  i1__YCJB=dest__ICJB;
  while ((i2__ZCJB != src_capacity__JCJB)) {
    Self__GCJB[i1__YCJB]=((__CHARACTER *)src__HCJB)[i2__ZCJB];
    i2__ZCJB=(__INTEGER)(i2__ZCJB +  1);
    i1__YCJB=(__INTEGER)(i1__YCJB +  1);
  };
}

static void** create__R4JG(__INTEGER nb_elements__T4JG)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__S5QG;
  void **Result__OUMG;
  Result__OUMG=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__T4JG * ((__INTEGER )(sizeof(void *)))))));
  Self__S5QG=(__INTEGER)(nb_elements__T4JG -  1);
  while ((Self__S5QG >=  0)) {
    Result__OUMG[Self__S5QG]=NULL;
    Self__S5QG=(__INTEGER)(Self__S5QG -  1);
  };
  return(Result__OUMG);
}

static __BOOLEAN has__URN(__HASHED_SEToABSTRACT_STRINGo *Self__VRN,void *e__WRN)
// ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *node__5RN;
  node__5RN=((void **)Self__VRN->buckets__YRK)[(__INTEGER)(hash_code__WPN(e__WRN) % Self__VRN->capacity__TRK)];
  while ((! (((void *)node__5RN == (void *)NULL) || __infix_equal_equal__TKW(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__5RN)->item__ESK,e__WRN)))) {
    node__5RN=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__5RN)->next__QSK;
  };
  return(((void *)node__5RN != (void *)NULL));
}

static __BOOLEAN __infix_equal_equal__TKW(__STRING_CONSTANT *Self__UKW,void *other__VKW)
// ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__4KW,__tmp__5KW,__tmp__TLW,i__K0DB;
  __BOOLEAN result__XKW;
  __CHARACTER *__tmp__QLW,*__tmp__RLW,*Self__WZDB,*other__XZDB;
  result__XKW=FALSE__;
  __tmp__4KW=Self__UKW->count__XHB;
  if (((struct ___OBJ *)other__VKW)->__id==__STRING_CONSTANT__) {
    __tmp__5KW=((__STRING_CONSTANT *)other__VKW)->count__XHB;
  } else {
    __tmp__5KW=((__STRING *)other__VKW)->count__VF;
  };
  if ((__tmp__4KW == __tmp__5KW)) {
    if ((Self__UKW->count__XHB ==  0)) {
      result__XKW=TRUE__;
    } else {
      __tmp__QLW=Self__UKW->storage__C5K;
      if (((struct ___OBJ *)other__VKW)->__id==__STRING_CONSTANT__) {
        __tmp__RLW=((__STRING_CONSTANT *)other__VKW)->storage__C5K;
      } else {
        __tmp__RLW=((__STRING *)other__VKW)->storage__XNK;
      };
      __tmp__TLW=Self__UKW->count__XHB;
      Self__WZDB=((__CHARACTER *)__tmp__QLW);
      other__XZDB=__tmp__RLW;
      i__K0DB=(__INTEGER)(__tmp__TLW -  1);
      while (((i__K0DB >=  0) && (Self__WZDB[i__K0DB] == ((__CHARACTER *)other__XZDB)[i__K0DB]))) {
        i__K0DB=(__INTEGER)(i__K0DB -  1);
      };
      result__XKW=(i__K0DB <  0);
    };
  };
  return(result__XKW);
}

static void increase_capacity__430(__HASHED_SEToABSTRACT_STRINGo *Self__530)
// ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
{
  __INTEGER idx__B40,new_capacity__C40,i__A40;
  void *node1__E40,*node2__F40;
  void **old_buckets__D40;
  idx__B40= 0;
  node1__E40=NULL;
  node2__F40=NULL;
  new_capacity__C40=prime_number_ceiling__A4Q((__INTEGER)(Self__530->capacity__TRK +  1));
  old_buckets__D40=Self__530->buckets__YRK;
  Self__530->buckets__YRK=create__KJR(new_capacity__C40);
  i__A40=(__INTEGER)(Self__530->capacity__TRK -  1);
  Self__530->capacity__TRK=new_capacity__C40;
  while ((i__A40 >=  0)) {
    node1__E40=((void **)old_buckets__D40)[i__A40];
    while (((void *)node1__E40 != (void *)NULL)) {
      node2__F40=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__E40)->next__QSK;
      idx__B40=(__INTEGER)(hash_code__WPN(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__E40)->item__ESK) % Self__530->capacity__TRK);
      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__E40)->next__QSK=((void **)Self__530->buckets__YRK)[idx__B40];
      ((void **)Self__530->buckets__YRK)[idx__B40]=node1__E40;
      node1__E40=node2__F40;
    };
    i__A40=(__INTEGER)(i__A40 -  1);
  };
}

static __HASHED_SET_NODEoABSTRACT_STRINGo* create__next__RMU(void *i__TMU,void *n__UMU)
// ({NULLxSTRING_CONSTANT},{NULLxHASHED_SET_NODEoABSTRACT_STRINGo}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__5IY;
  __INTEGER typ_id__EJY;
  __UINTEGER_32 sz__BJY,a__SVZQ,new_size__QVZQ,t__WVZQ,a__YVZQ;
  __HASHED_SET_NODEoABSTRACT_STRINGo *result__4IY,*Self__5DKB;
  result__4IY=NULL;
  ptr__5IY=((__POINTER )(NULL));
  typ_id__EJY= 0;
  sz__BJY=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
  if ((sz__BJY ==  0)) {
    result__4IY=HASHED_SET_NODEoABSTRACT_STRINGo__;
  } else {
    typ_id__EJY=__HASHED_SET_NODEoABSTRACT_STRINGo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__BJY);
    if ((typ_id__EJY == (__INTEGER)(-  1))) {
      a__SVZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__QVZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__BJY + a__SVZQ) & (__UINTEGER_32)(~ a__SVZQ));
      ptr__5IY=micro_alloc__table__lab__BOI(new_size__QVZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QVZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__QVZQ);
    } else {
      t__WVZQ=((__UINTEGER_32 )typ_id__EJY);
      a__YVZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__5IY=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__BJY + a__YVZQ) & (__UINTEGER_32)(~ a__YVZQ)),((__POINTER )(&(table_type[(t__WVZQ)]))),(__UINTEGER_32)(t__WVZQ |  1));
    };
    result__4IY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__5IY);
    *(result__4IY) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
  };
  Self__5DKB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__4IY);
  Self__5DKB->item__ESK=i__TMU;
  Self__5DKB->next__QSK=n__UMU;
  return(result__4IY);
}

static void copy_from__until__YVX(__CHARACTER *Self__ZVX,__CHARACTER *model__0VX,__INTEGER upper__1VX)
// ({NATIVE_ARRAYoExpanded_CHARACTERo},{NULLxNATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__JL0;
  Self__JL0=upper__1VX;
  while ((Self__JL0 >=  0)) {
    Self__ZVX[Self__JL0]=((__CHARACTER *)model__0VX)[Self__JL0];
    Self__JL0=(__INTEGER)(Self__JL0 -  1);
  };
}

static __STRING_CONSTANT* create_copy__I0E(void *other__K0E)
// ({NULLxSTRING}) With resultNo recursive, No inlinable.
{
  __STRING_CONSTANT *result__M0E,*Self__DWM;
  __INTEGER __tmp__GWM;
  result__M0E=clone__U1D();
  Self__DWM=((__STRING_CONSTANT *)result__M0E);
  __tmp__GWM=((__STRING *)other__K0E)->count__VF;
  if ((__tmp__GWM !=  0)) {
    Self__DWM->storage__C5K=create__5UX(__tmp__GWM);
    copy_from__until__YVX(Self__DWM->storage__C5K,((__STRING *)other__K0E)->storage__XNK,(__INTEGER)(__tmp__GWM -  1));
    Self__DWM->count__XHB=__tmp__GWM;
  };
  return(result__M0E);
}

static void fast_add__GAM(__HASHED_SEToABSTRACT_STRINGo *Self__HAM,void *e__IAM)
// ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER h__PAM,idx__QAM;
  void *node__RAM;
  fast_has__RKP(Self__HAM,e__IAM);
  fast_has__RKP(Self__HAM,e__IAM);
  h__PAM=hash_code__WPN(e__IAM);
  idx__QAM=(__INTEGER)(h__PAM % Self__HAM->capacity__TRK);
  node__RAM=((void **)Self__HAM->buckets__YRK)[idx__QAM];
  while ((! (((void *)node__RAM == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__RAM)->item__ESK == (void *)e__IAM)))) {
    node__RAM=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__RAM)->next__QSK;
  };
  if (((void *)node__RAM == (void *)NULL)) {
    if ((Self__HAM->capacity__TRK == Self__HAM->count__ZSK)) {
      increase_capacity__430(Self__HAM);
      idx__QAM=(__INTEGER)(h__PAM % Self__HAM->capacity__TRK);
    };
    node__RAM=create__next__RMU(e__IAM,((void **)Self__HAM->buckets__YRK)[idx__QAM]);
    ((void **)Self__HAM->buckets__YRK)[idx__QAM]=node__RAM;
    Self__HAM->count__ZSK=(__INTEGER)(Self__HAM->count__ZSK +  1);
  };
}

static __LINKED_LIST_NODEoSTRING_CONSTANTo* create__next__PIDB(void *i__RIDB)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__WAFB;
  __INTEGER typ_id__1AFB;
  __UINTEGER_32 sz__YAFB,a__OWZQ,new_size__MWZQ,t__SWZQ,a__UWZQ;
  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__VAFB,*Self__1KMB;
  result__VAFB=NULL;
  ptr__WAFB=((__POINTER )(NULL));
  typ_id__1AFB= 0;
  sz__YAFB=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
  if ((sz__YAFB ==  0)) {
    result__VAFB=LINKED_LIST_NODEoSTRING_CONSTANTo__;
  } else {
    typ_id__1AFB=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__YAFB);
    if ((typ_id__1AFB == (__INTEGER)(-  1))) {
      a__OWZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__MWZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__YAFB + a__OWZQ) & (__UINTEGER_32)(~ a__OWZQ));
      ptr__WAFB=micro_alloc__table__lab__BOI(new_size__MWZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MWZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__MWZQ);
    } else {
      t__SWZQ=((__UINTEGER_32 )typ_id__1AFB);
      a__UWZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__WAFB=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__YAFB + a__UWZQ) & (__UINTEGER_32)(~ a__UWZQ)),((__POINTER )(&(table_type[(t__SWZQ)]))),(__UINTEGER_32)(t__SWZQ |  1));
    };
    result__VAFB=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__WAFB);
    *(result__VAFB) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
  };
  Self__1KMB=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__VAFB);
  Self__1KMB->item__BVK=i__RIDB;
  Self__1KMB->next__AT4=NULL;
  return(result__VAFB);
}

static void** create__3DTB(__INTEGER nb_elements__5DTB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__J2RC;
  void **Result__RDZB;
  Result__RDZB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__5DTB * ((__INTEGER )(sizeof(void *)))))));
  Self__J2RC=(__INTEGER)(nb_elements__5DTB -  1);
  while ((Self__J2RC >=  0)) {
    Result__RDZB[Self__J2RC]=NULL;
    Self__J2RC=(__INTEGER)(Self__J2RC -  1);
  };
  return(Result__RDZB);
}

static __BOOLEAN is_lower__NKHB(__CHARACTER Self__OKHB)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__QKHB;
  result__QKHB=FALSE__;
  if ((((__INTEGER_8 )Self__OKHB) >= ((__INTEGER_8 )'a'))) {
    result__QKHB=(((__INTEGER_8 )Self__OKHB) <= ((__INTEGER_8 )'z'));
  };
  return(result__QKHB);
}

static __INTEGER first_substring_index__GKVE(__STRING *Self__HKVE)
// ({STRING}) With resultNo recursive, No inlinable.
{
  __INTEGER i__JE0E,result__LE0E,s__KE0E,__tmp__5WZQ,__tmp__AXZQ;
  __INTEGER __tmp__BXZQ,__tmp__EXZQ;
  __CHARACTER *__tmp__CXZQ,*__tmp__DXZQ;
  i__JE0E= 0;
  result__LE0E= 0;
  s__KE0E= 1;
  __tmp__5WZQ=((__STRING_CONSTANT *)(&__string_92))->count__XHB;
  __tmp__AXZQ=Self__HKVE->count__VF;
  __tmp__BXZQ=((__STRING_CONSTANT *)(&__string_92))->count__XHB;
  __tmp__CXZQ=Self__HKVE->storage__XNK;
  __tmp__DXZQ=((__STRING_CONSTANT *)(&__string_92))->storage__C5K;
  __tmp__EXZQ=((__STRING_CONSTANT *)(&__string_92))->count__XHB;
  while ((! ((result__LE0E !=  0) || ((__INTEGER)((__INTEGER)(s__KE0E + __tmp__5WZQ) -  1) > __tmp__AXZQ)))) {
    i__JE0E= 1;
    while ((! ((i__JE0E > __tmp__BXZQ) || (((__CHARACTER *)__tmp__CXZQ)[(__INTEGER)((__INTEGER)((__INTEGER)(s__KE0E + i__JE0E) -  1) -  1)] != ((__CHARACTER *)__tmp__DXZQ)[(__INTEGER)(i__JE0E -  1)])))) {
      i__JE0E=(__INTEGER)(i__JE0E +  1);
    };
    if ((i__JE0E > __tmp__EXZQ)) {
      result__LE0E=s__KE0E;
    } else {
      s__KE0E=(__INTEGER)(s__KE0E +  1);
    };
  };
  return(result__LE0E);
}

static __BOOLEAN is_upper__HXFB(__CHARACTER Self__IXFB)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__KXFB;
  result__KXFB=FALSE__;
  if ((((__INTEGER_8 )Self__IXFB) >= ((__INTEGER_8 )'A'))) {
    result__KXFB=(((__INTEGER_8 )Self__IXFB) <= ((__INTEGER_8 )'Z'));
  };
  return(result__KXFB);
}

static __BOOLEAN read_path_expr__TLHB()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__CMHB;
  __POSITION pos__USWP;
  __BOOLEAN result__WLHB,__tmp__VMHB;
  void *__tmp__BMHB;
  __HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *Self__CRIB;
  void *node__MRIB;
  result__WLHB=FALSE__;
  if (read_identifier__OLEB()) {
    if (is_good_section__OCE) {
      __tmp__BMHB=variable__OED;
      __tmp__CMHB=last_string__V1G;
      Self__CRIB=((__HASHED_DICTIONARYoSTRING_CONSTANTxSTRING_CONSTANTo *)__tmp__BMHB);
      node__MRIB=((void **)Self__CRIB->buckets__SPL)[(__INTEGER)(hash_code__WPN(__tmp__CMHB) % Self__CRIB->capacity__NPL)];
      while ((! (((void *)node__MRIB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__MRIB)->key__4PL == (void *)__tmp__CMHB)))) {
        node__MRIB=((__HASHED_DICTIONARY_NODEoSTRING_CONSTANTxSTRING_CONSTANTo *)node__MRIB)->next__KQL;
      };
      if ((! ((void *)node__MRIB != (void *)NULL))) {
        pos__USWP=current_position__EJG();
        put_error__text__0AH( 0,(&__string_302));
        put_position__ECH(pos__USWP);
        send_error__2FH();
      };
      last_string__V1G=at__3WM(variable__OED,last_string__V1G);
    };
    result__WLHB=TRUE__;
    __tmp__VMHB=TRUE__;
  } else {
    __tmp__VMHB=FALSE__;
  };
  if ((! __tmp__VMHB)) {
    if (read_string__BLIB()) {
      result__WLHB=TRUE__;
    };
  };
  return(result__WLHB);
}

static void** create__IRSB(__INTEGER nb_elements__KRSB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__BWRC;
  void **Result__YHYB;
  Result__YHYB=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__KRSB * ((__INTEGER )(sizeof(void *)))))));
  Self__BWRC=(__INTEGER)(nb_elements__KRSB -  1);
  while ((Self__BWRC >=  0)) {
    Result__YHYB[Self__BWRC]=NULL;
    Self__BWRC=(__INTEGER)(Self__BWRC -  1);
  };
  return(Result__YHYB);
}

static void* fast_reference_at__N5KB(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__O5KB,void *k__P5KB)
// ({HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__Z5KB;
  void *node__Y5KB;
  result__Z5KB=NULL;
  node__Y5KB=((void **)Self__O5KB->buckets__LIJB)[(__INTEGER)(hash_code__WPN(k__P5KB) % Self__O5KB->capacity__GIJB)];
  while ((! (((void *)node__Y5KB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__Y5KB)->key__XIJB == (void *)k__P5KB)))) {
    node__Y5KB=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__Y5KB)->next__CJJB;
  };
  if (((void *)node__Y5KB != (void *)NULL)) {
    result__Z5KB=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__Y5KB)->item__ZALB;
  };
  return(result__Z5KB);
}

static void go_on__55AC(void *obj__BABC)
// ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
{
  __POSITION pos__0AXP,pos__4AXP,pos__ABXP,pos__OBXP,pos__RBXP;
  __POSITION pos__UBXP,pos__WBXP,pos__GEXP,pos__IEXP,pos__KEXP;
  __POSITION pos__MEXP,pos__OEXP,pos__QEXP,pos__SEXP,pos__YEXP;
  __POSITION pos__0EXP,pos__3EXP,pos__BFXP,pos__DFXP,pos__FFXP;
  __POSITION pos__HFXP,pos__JFXP,pos__LFXP,pos__OFXP;
  void *n__HCJD,*name__X1PD,*priority__Z1PD,*result__SDLC;
  __SECTION_ *Self__X1PQ,*Self__Y1PQ,*Self__HCXP;
  void *result__V50D,*result__DGJD;
  __INTEGER h__O11D,idx__P11D,idx__DP2E,new_capacity__EP2E,i__FP2E;
  __INTEGER typ_id__SR2E,level__01PD;
  __POINTER ptr__NR2E;
  __UINTEGER_32 sz__PR2E,a__PXZQ,new_size__NXZQ,t__TXZQ,a__VXZQ;
  void *t__XGJD;
  void *arg__0GJD,*arg__11PD;
  void *s__EHJD,*result__21PD;
  void *n__Y1PD;
  __ITM_SLOT *Self__EHUE;
  void *lst__RWTD,*lst__HXTD;
  void *expr__AYSD;
  void *t__Q2BC,*k__K50D,*k__H11D,*lt__YGJD;
  __BOOLEAN result__UMAD,__tmp__N5BC,__tmp__WACC,__tmp__LACC;
  __BOOLEAN result__WGJD,__tmp__Q4PD;
  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__J50D;
  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__F11D;
  void *node__U50D,*node__Q11D,*node1__HP2E,*node2__IP2E,*__tmp__421D;
  void **old_buckets__GP2E;
  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__MR2E;
  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__YDHF;
  void *larg__AHJD,*list_arg__V1PD;
  __CHARACTER affect__BHJD,style__ZGJD;
  object__ODD=obj__BABC;
  source__WFD=((__PROTOTYPE *)obj__BABC)->source__UFD;
  position__ZFD= 1;
  pos_cur__2FD= 1;
  pos_line__3FD= 1;
  pos_col__4FD= 0;
  t__Q2BC=NULL;
  read_space__UAF();
  if ((! read_word__NWH((&__string_8)))) {
    pos__0AXP=current_position__EJG();
    put_error__text__0AH( 0,(&__string_303));
    put_position__ECH(pos__0AXP);
    send_error__2FH();
  };
  if ((! read_word__NWH((&__string_22)))) {
    pos__4AXP=current_position__EJG();
    put_error__text__0AH( 0,(&__string_304));
    put_position__ECH(pos__4AXP);
    send_error__2FH();
  };
  if ((! read_slot_header__R1CC(TRUE__))) {
    pos__ABXP=current_position__EJG();
    put_error__text__0AH( 0,(&__string_305));
    put_position__ECH(pos__ABXP);
    send_error__2FH();
  };
  while (read_slot_header__R1CC(FALSE__)) {
  };
  while (read_word__NWH((&__string_8))) {
    result__UMAD=FALSE__;
    if (((! read_space__UAF()) || (! is_upper__HXFB(last_character__0OF())))) {
      result__UMAD=FALSE__;
    } else {
      ((__STRING *)string_tmp__RB)->count__VF= 0;
      add_last__YPK(string_tmp__RB,last_character__0OF());
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      if (is_lower__NKHB(last_character__0OF())) {
        add_last__YPK(string_tmp__RB,last_character__0OF());
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        while (((last_character__0OF() != ((__CHARACTER )(( 0)))) && ((is_lower__NKHB(last_character__0OF()) || is_digit__EWEB(last_character__0OF())) || (last_character__0OF() == '_')))) {
          add_last__YPK(string_tmp__RB,last_character__0OF());
          position__ZFD=(__INTEGER)(position__ZFD +  1);
        };
        last_string__V1G=get__QEC(string_tmp__RB);
        result__UMAD=TRUE__;
      } else {
        position__ZFD=(__INTEGER)(position__ZFD -  1);
        result__UMAD=FALSE__;
      };
    };
    if (result__UMAD) {
      n__HCJD=last_string__V1G;
      if ((! (((((((((void *)n__HCJD == (void *)(&__string_23)) || ((void *)n__HCJD == (void *)(&__string_24))) || ((void *)n__HCJD == (void *)(&__string_25))) || ((void *)n__HCJD == (void *)(&__string_26))) || ((void *)n__HCJD == (void *)(&__string_27))) || ((void *)n__HCJD == (void *)(&__string_28))) || ((void *)n__HCJD == (void *)(&__string_29))) || ((void *)n__HCJD == (void *)(&__string_30))))) {
        pos__OBXP=current_position__EJG();
        put_error__text__0AH( 0,(&__string_306));
        put_position__ECH(pos__OBXP);
        send_error__2FH();
      };
      last_section__D5BC=get_name__DEJD(last_string__V1G);
      if (((void *)((__SECTION_ *)last_section__D5BC)->name__1I0D == (void *)(&__string_28))) {
        ((__PROTOTYPE *)object__ODD)->is_mapping__1RMC=TRUE__;
        __tmp__N5BC=TRUE__;
      } else {
        __tmp__N5BC=FALSE__;
      };
      if (__tmp__N5BC) {
        __tmp__WACC=TRUE__;
      } else {
        Self__X1PQ=((__SECTION_ *)last_section__D5BC);
        if (((((void *)Self__X1PQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__X1PQ->name__1I0D == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__ODD)->last_slot__05BC != (void *)NULL))) {
          Self__Y1PQ=((__SECTION_ *)((__ITM_SLOT *)((__PROTOTYPE *)object__ODD)->last_slot__05BC)->id_section__EACC);
          __tmp__LACC=(! (((void *)Self__Y1PQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__Y1PQ->name__1I0D == (void *)(&__string_24))));
        } else {
          __tmp__LACC=FALSE__;
        };
        if (__tmp__LACC) {
          pos__RBXP=current_position__EJG();
          put_error__text__0AH( 0,(&__string_307));
          put_position__ECH(pos__RBXP);
          send_error__2FH();
        };
        __tmp__WACC=__tmp__LACC;
      };
      if ((! __tmp__WACC)) {
        if ((((((void *)((__SECTION_ *)last_section__D5BC)->name__1I0D == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__ODD)->type_style__ZNY == (void *)(&__string_13))) && ((void *)((__PROTOTYPE *)object__ODD)->parent_named__QD.name__1QB != (void *)(&__string_41))) && ((void *)((__PROTOTYPE *)object__ODD)->parent_named__QD.name__1QB != (void *)(&__string_42)))) {
          pos__UBXP=current_position__EJG();
          put_error__text__0AH( 2,(&__string_308));
          put_position__ECH(pos__UBXP);
          send_error__2FH();
        };
      };
    } else {
      t__Q2BC=read_type_list__BWAD(PARSER__,TRUE__);
      if (((void *)t__Q2BC == (void *)NULL)) {
        pos__WBXP=current_position__EJG();
        put_error__text__0AH( 0,(&__string_306));
        put_position__ECH(pos__WBXP);
        send_error__2FH();
      };
      Self__J50D=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__HGJD);
      k__K50D=t__Q2BC;
      result__V50D=NULL;
      node__U50D=((void **)Self__J50D->buckets__250D)[(__INTEGER)(hash_code__GQO(t__Q2BC) % Self__J50D->capacity__X50D)];
      while ((! (((void *)node__U50D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__U50D)->key__IA1D == (void *)k__K50D)))) {
        node__U50D=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__U50D)->next__TA1D;
      };
      if (((void *)node__U50D != (void *)NULL)) {
        result__V50D=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__U50D)->item__1A1D;
      };
      result__DGJD=result__V50D;
      if (((void *)result__V50D == (void *)NULL)) {
        result__DGJD=clone__QXPD();
        Self__HCXP=((__SECTION_ *)result__DGJD);
        Self__HCXP->name__1I0D=NULL;
        Self__HCXP->type_list__JY1D=t__Q2BC;
        Self__F11D=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__HGJD);
        k__H11D=t__Q2BC;
        h__O11D=hash_code__GQO(t__Q2BC);
        idx__P11D=(__INTEGER)(h__O11D % Self__F11D->capacity__X50D);
        node__Q11D=((void **)Self__F11D->buckets__250D)[idx__P11D];
        while ((! (((void *)node__Q11D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Q11D)->key__IA1D == (void *)k__H11D)))) {
          node__Q11D=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Q11D)->next__TA1D;
        };
        if (((void *)node__Q11D == (void *)NULL)) {
          if ((Self__F11D->capacity__X50D == Self__F11D->count__R21D)) {
            idx__DP2E= 0;
            node1__HP2E=NULL;
            node2__IP2E=NULL;
            old_buckets__GP2E=Self__F11D->buckets__250D;
            new_capacity__EP2E=prime_number_ceiling__A4Q((__INTEGER)(Self__F11D->capacity__X50D +  1));
            Self__F11D->buckets__250D=create__CELE(new_capacity__EP2E);
            i__FP2E=(__INTEGER)(Self__F11D->capacity__X50D -  1);
            Self__F11D->capacity__X50D=new_capacity__EP2E;
            while ((i__FP2E >=  0)) {
              node1__HP2E=((void **)old_buckets__GP2E)[i__FP2E];
              while (((void *)node1__HP2E != (void *)NULL)) {
                node2__IP2E=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__HP2E)->next__TA1D;
                idx__DP2E=(__INTEGER)(hash_code__GQO(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__HP2E)->key__IA1D) % Self__F11D->capacity__X50D);
                ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__HP2E)->next__TA1D=((void **)Self__F11D->buckets__250D)[idx__DP2E];
                ((void **)Self__F11D->buckets__250D)[idx__DP2E]=node1__HP2E;
                node1__HP2E=node2__IP2E;
              };
              i__FP2E=(__INTEGER)(i__FP2E -  1);
            };
            idx__P11D=(__INTEGER)(h__O11D % Self__F11D->capacity__X50D);
          };
          __tmp__421D=((void **)Self__F11D->buckets__250D)[idx__P11D];
          result__MR2E=NULL;
          ptr__NR2E=((__POINTER )(NULL));
          typ_id__SR2E= 0;
          sz__PR2E=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
          if ((sz__PR2E ==  0)) {
            result__MR2E=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
          } else {
            typ_id__SR2E=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
            clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PR2E);
            if ((typ_id__SR2E == (__INTEGER)(-  1))) {
              a__PXZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
              new_size__NXZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__PR2E + a__PXZQ) & (__UINTEGER_32)(~ a__PXZQ));
              ptr__NR2E=micro_alloc__table__lab__BOI(new_size__NXZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NXZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NXZQ);
            } else {
              t__TXZQ=((__UINTEGER_32 )typ_id__SR2E);
              a__VXZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
              ptr__NR2E=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PR2E + a__VXZQ) & (__UINTEGER_32)(~ a__VXZQ)),((__POINTER )(&(table_type[(t__TXZQ)]))),(__UINTEGER_32)(t__TXZQ |  1));
            };
            result__MR2E=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__NR2E);
            *(result__MR2E) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
          };
          Self__YDHF=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__MR2E);
          Self__YDHF->item__1A1D=result__DGJD;
          Self__YDHF->key__IA1D=t__Q2BC;
          Self__YDHF->next__TA1D=__tmp__421D;
          node__Q11D=result__MR2E;
          ((void **)Self__F11D->buckets__250D)[idx__P11D]=result__MR2E;
          Self__F11D->count__R21D=(__INTEGER)(Self__F11D->count__R21D +  1);
        } else {
          ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Q11D)->item__1A1D=result__DGJD;
        };
      };
      last_section__D5BC=result__DGJD;
    };
    do {
      result__WGJD=FALSE__;
      t__XGJD=NULL;
      lt__YGJD=NULL;
      arg__0GJD=NULL;
      larg__AHJD=NULL;
      affect__BHJD='\0';
      s__EHJD=NULL;
      style__ZGJD=read_style__GDEC();
      if ((style__ZGJD != ' ')) {
        result__WGJD=TRUE__;
        larg__AHJD=new__Q0PD();
        if (read_character__EQ3('(')) {
          arg__0GJD=read_local_arg__with_self__5PSD(PARSER__,FALSE__,TRUE__);
          if (((void *)arg__0GJD == (void *)NULL)) {
            pos__GEXP=current_position__EJG();
            put_error__text__0AH( 0,(&__string_309));
            put_position__ECH(pos__GEXP);
            send_error__2FH();
          };
          if ((! read_character__EQ3(')'))) {
            pos__IEXP=current_position__EJG();
            put_error__text__0AH( 2,(&__string_310));
            put_position__ECH(pos__IEXP);
            send_error__2FH();
          };
        } else {
          arg__0GJD=create__name__type__AWSD(current_position__EJG(),(&__string_57),ITM_TYPE_SELF__);
        };
        add_last__S31D(larg__AHJD,arg__0GJD);
        list_arg__V1PD=larg__AHJD;
        name__X1PD=NULL;
        n__Y1PD=NULL;
        priority__Z1PD=NULL;
        level__01PD= 0;
        arg__11PD=NULL;
        result__21PD=NULL;
        if (read_identifier__OLEB()) {
          n__Y1PD=new__5ALC();
          copy__BNK(n__Y1PD,last_string__V1G);
          arg__11PD=read_loc_arg__EDCD(PARSER__,FALSE__);
          if (((void *)arg__11PD != (void *)NULL)) {
            add_last__S31D(larg__AHJD,arg__11PD);
            if (read_identifier__OLEB()) {
              if (((void *)((__SECTION_ *)last_section__D5BC)->name__1I0D == (void *)(&__string_30))) {
                pos__KEXP=current_position__EJG();
                put_error__text__0AH( 0,(&__string_311));
                put_position__ECH(pos__KEXP);
                send_error__2FH();
              };
              do {
                append__MOK(n__Y1PD,(&__string_92));
                append__MOK(n__Y1PD,last_string__V1G);
                arg__11PD=read_loc_arg__EDCD(PARSER__,FALSE__);
                if (((void *)arg__11PD == (void *)NULL)) {
                  pos__MEXP=current_position__EJG();
                  put_error__text__0AH( 0,(&__string_136));
                  put_position__ECH(pos__MEXP);
                  send_error__2FH();
                };
                add_last__S31D(list_arg__V1PD,arg__11PD);
              } while (read_identifier__OLEB());
            };
          };
          result__SDLC=get__QEC(n__Y1PD);
          add_last__00X(free__DBLC,n__Y1PD);
          ((__STRING *)n__Y1PD)->count__VF= 0;
          result__21PD=create__name__feature__WVTD(current_position__EJG(),result__SDLC,last_section__D5BC);
          __tmp__Q4PD=TRUE__;
        } else {
          __tmp__Q4PD=FALSE__;
        };
        if ((! __tmp__Q4PD)) {
          if (read_character__EQ3('\'')) {
            if ((! read_operator__2IHC())) {
              pos__OEXP=current_position__EJG();
              put_error__text__0AH( 0,(&__string_312));
              put_position__ECH(pos__OEXP);
              send_error__2FH();
            };
            if ((((void *)last_string__V1G == (void *)(&__string_20)) || ((void *)last_string__V1G == (void *)(&__string_21)))) {
              pos__QEXP=current_position__EJG();
              put_error__text__0AH( 0,(&__string_313));
              put_position__ECH(pos__QEXP);
              send_error__2FH();
            };
            name__X1PD=last_string__V1G;
            if ((! read_character__EQ3('\''))) {
              pos__SEXP=current_position__EJG();
              put_error__text__0AH( 2,(&__string_314));
              put_position__ECH(pos__SEXP);
              send_error__2FH();
            };
            if ((read_word__NWH((&__string_10)) || read_word__NWH((&__string_9)))) {
              priority__Z1PD=last_string__V1G;
              if ((! read_integer__4MKC())) {
                pos__YEXP=current_position__EJG();
                put_error__text__0AH( 0,(&__string_315));
                put_position__ECH(pos__YEXP);
                send_error__2FH();
              };
              level__01PD=((__INTEGER )last_integer__R1IC);
            };
            arg__11PD=read_loc_arg__EDCD(PARSER__,FALSE__);
            if (((void *)arg__11PD != (void *)NULL)) {
              add_last__S31D(larg__AHJD,arg__11PD);
              name__X1PD=operator_to_name__2YHC((&__string_84),name__X1PD);
              if (((void *)priority__Z1PD == (void *)NULL)) {
                priority__Z1PD=(&__string_10);
              };
            } else {
              name__X1PD=operator_to_name__2YHC((&__string_85),name__X1PD);
              if (((void *)priority__Z1PD != (void *)NULL)) {
                pos__0EXP=current_position__EJG();
                put_error__text__0AH( 0,(&__string_316));
                put_position__ECH(pos__0EXP);
                send_error__2FH();
              };
            };
            result__21PD=create__name__feature__WVTD(current_position__EJG(),name__X1PD,last_section__D5BC);
            Self__EHUE=((__ITM_SLOT *)result__21PD);
            if (((void *)priority__Z1PD == (void *)(&__string_10))) {
              Self__EHUE->priority_and_level__NHUE=level__01PD;
            } else {
              Self__EHUE->priority_and_level__NHUE=(__INTEGER)(- level__01PD);
            };
          };
        };
        last_slot__UIJD=result__21PD;
        if (((void *)result__21PD == (void *)NULL)) {
          pos__3EXP=current_position__EJG();
          put_error__text__0AH( 0,(&__string_317));
          put_position__ECH(pos__3EXP);
          send_error__2FH();
        };
        ((__ITM_SLOT *)last_slot__UIJD)->parent_named__XIM.style__LDGC=style__ZGJD;
        larg__AHJD=copy__FDQD(larg__AHJD);
        set_argument_list__QA2D(last_slot__UIJD,larg__AHJD);
        if (read_affect__IWZC()) {
          affect__BHJD=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1G)->storage__C5K)[ 0];
        } else {
          affect__BHJD=' ';
        };
        if (((affect__BHJD == ' ') && read_character__EQ3(':'))) {
          if (read_character__EQ3('(')) {
            lt__YGJD=read_type_list__BWAD(PARSER__,FALSE__);
            if (((void *)lt__YGJD == (void *)NULL)) {
              pos__BFXP=current_position__EJG();
              put_error__text__0AH( 0,(&__string_318));
              put_position__ECH(pos__BFXP);
              send_error__2FH();
            };
            if ((! read_character__EQ3(')'))) {
              pos__DFXP=current_position__EJG();
              put_error__text__0AH( 2,(&__string_310));
              put_position__ECH(pos__DFXP);
              send_error__2FH();
            };
            t__XGJD=get__XYVD(lt__YGJD);
          } else {
            t__XGJD=read_type__YKLC(PARSER__,FALSE__);
            if (((void *)t__XGJD == (void *)NULL)) {
              pos__FFXP=current_position__EJG();
              put_error__text__0AH( 0,(&__string_318));
              put_position__ECH(pos__FFXP);
              send_error__2FH();
            };
          };
          if (read_affect__IWZC()) {
            affect__BHJD=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1G)->storage__C5K)[ 0];
          };
        } else {
          t__XGJD=type_void__NHEC;
        };
        set_type__GC2D(last_slot__UIJD,t__XGJD);
        ((__ITM_SLOT *)last_slot__UIJD)->affect__TD2D=affect__BHJD;
        if ((affect__BHJD != ' ')) {
          read_space__UAF();
          lst__RWTD=read_contract__WEEC();
          if (((void *)lst__RWTD != (void *)NULL)) {
            ((__ITM_SLOT *)last_slot__UIJD)->require__SB3D=lst__RWTD;
          };
          expr__AYSD=read_expr__NTFC(PARSER__);
          if (((void *)expr__AYSD == (void *)NULL)) {
            pos__HFXP=current_position__EJG();
            put_error__text__0AH( 0,(&__string_319));
            put_position__ECH(pos__HFXP);
            send_error__2FH();
          };
          ((__ITM_SLOT *)last_slot__UIJD)->value__C42D=expr__AYSD;
          lst__HXTD=read_contract__WEEC();
          if (((void *)lst__HXTD != (void *)NULL)) {
            ((__ITM_SLOT *)last_slot__UIJD)->ensure__WB3D=lst__HXTD;
          };
        };
        if ((! read_character__EQ3(';'))) {
          pos__JFXP=current_position__EJG();
          put_error__text__0AH( 2,(&__string_320));
          put_position__ECH(pos__JFXP);
          send_error__2FH();
        };
        s__EHJD=fast_reference_at__UEQD(((__PROTOTYPE *)object__ODD)->slot_list__3IM,((__ITM_SLOT *)last_slot__UIJD)->parent_named__XIM.name__1QB);
        if (((void *)s__EHJD != (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_321));
          put_position__ECH(((__ITM_SLOT *)s__EHJD)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(((__ITM_SLOT *)last_slot__UIJD)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        add_slot__3GQD(object__ODD,last_slot__UIJD);
      };
    } while (result__WGJD);
  };
  if (((void *)read_contract__WEEC() != (void *)NULL)) {
    pos__LFXP=current_position__EJG();
    put_error__text__0AH( 2,(&__string_322));
    put_position__ECH(pos__LFXP);
    send_error__2FH();
  };
  read_space__UAF();
  if ((last_character__0OF() != ((__CHARACTER )(( 0))))) {
    pos__OFXP=current_position__EJG();
    put_error__text__0AH( 0,(&__string_136));
    put_position__ECH(pos__OFXP);
    send_error__2FH();
  };
  object__ODD=NULL;
}

static void init_slot_for__1QMC(__PROTOTYPE *Self__2QMC,void *typ__3QMC)
// ({PROTOTYPE},{TYPExTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  void *cur__4QMC;
  __SECTION_ *Self__V3PQ;
  __BOOLEAN __tmp__ORMC;
  void *__tmp__VRMC,*__tmp__0SMC;
  cur__4QMC=Self__2QMC->first_slot__5QMC;
  while_do__USQC:
  {
    if (((void *)cur__4QMC != (void *)NULL)) {
      Self__V3PQ=((__SECTION_ *)((__ITM_SLOT *)cur__4QMC)->id_section__EACC);
      __tmp__ORMC=(((void *)Self__V3PQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__V3PQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__ORMC=FALSE__;
    };
    if (__tmp__ORMC) {
      if (((struct ___OBJ *)typ__3QMC)->__id==__TYPE__) {
        __tmp__VRMC=((__TYPE *)typ__3QMC)->slot_run__1JC;
      } else {
        __tmp__VRMC=((__TYPE_GENERIC *)typ__3QMC)->parent_type__T2IB.slot_run__1JC;
      };
      add_last__BV2F(__tmp__VRMC,create__type__ZU2F(cur__4QMC,typ__3QMC));
      cur__4QMC=((__ITM_SLOT *)cur__4QMC)->next__YRMC;
      goto while_do__USQC;
    };
  };
  if (Self__2QMC->is_mapping__1RMC) {
    while (((void *)cur__4QMC != (void *)NULL)) {
      if (((void *)((__SECTION_ *)((__ITM_SLOT *)cur__4QMC)->id_section__EACC)->name__1I0D == (void *)(&__string_28))) {
        if (((struct ___OBJ *)typ__3QMC)->__id==__TYPE__) {
          __tmp__0SMC=((__TYPE *)typ__3QMC)->slot_run__1JC;
        } else {
          __tmp__0SMC=((__TYPE_GENERIC *)typ__3QMC)->parent_type__T2IB.slot_run__1JC;
        };
        add_last__BV2F(__tmp__0SMC,create__type__ZU2F(cur__4QMC,typ__3QMC));
      };
      cur__4QMC=((__ITM_SLOT *)cur__4QMC)->next__YRMC;
    };
  };
}

static __HASHED_SEToTYPEo* create__1H1()
// () With resultNo recursive, No inlinable.
{
  __POINTER ptr__5L4;
  __INTEGER typ_id__EM4,new_capacity__2XPB;
  __UINTEGER_32 sz__BM4,a__BYZQ,new_size__5XZQ,t__FYZQ,a__HYZQ;
  __HASHED_SEToTYPEo *result__4L4,*Self__RBLB;
  result__4L4=NULL;
  ptr__5L4=((__POINTER )(NULL));
  typ_id__EM4= 0;
  sz__BM4=((__UINTEGER_32 )sizeof(__HASHED_SEToTYPEo));
  if ((sz__BM4 ==  0)) {
    result__4L4=HASHED_SEToTYPEo__;
  } else {
    typ_id__EM4=__HASHED_SEToTYPEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__BM4);
    if ((typ_id__EM4 == (__INTEGER)(-  1))) {
      a__BYZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__5XZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__BM4 + a__BYZQ) & (__UINTEGER_32)(~ a__BYZQ));
      ptr__5L4=micro_alloc__table__lab__BOI(new_size__5XZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5XZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__5XZQ);
    } else {
      t__FYZQ=((__UINTEGER_32 )typ_id__EM4);
      a__HYZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__5L4=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__BM4 + a__HYZQ) & (__UINTEGER_32)(~ a__HYZQ)),((__POINTER )(&(table_type[(t__FYZQ)]))),(__UINTEGER_32)(t__FYZQ |  1));
    };
    result__4L4=((__HASHED_SEToTYPEo *)ptr__5L4);
    *(result__4L4) = *(HASHED_SEToTYPEo__);
  };
  Self__RBLB=((__HASHED_SEToTYPEo *)result__4L4);
  new_capacity__2XPB=prime_number_ceiling__A4Q( 53);
  Self__RBLB->buckets__DRKB=create__4NVB(new_capacity__2XPB);
  Self__RBLB->capacity__4QKB=new_capacity__2XPB;
  Self__RBLB->count__DSKB= 0;
  return(result__4L4);
}

static void fast_add__OQKB(__HASHED_SEToTYPEo *Self__PQKB,void *e__QQKB)
// ({HASHED_SEToTYPEo},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__3QKB,idx__YQKB,idx__MTAC,new_capacity__NTAC,i__LTAC;
  __INTEGER __tmp__SUAC,typ_id__BI4B;
  void *__tmp__RUAC;
  __POINTER ptr__2H4B;
  __UINTEGER_32 sz__4H4B,a__MYZQ,new_size__KYZQ,t__QYZQ,a__SYZQ;
  void *node__0QKB,*node1__PTAC,*node2__QTAC,*__tmp__QSKB;
  void **old_buckets__OTAC;
  __HASHED_SET_NODEoTYPEo *result__1H4B,*Self__QKOC;
  fast_has__DCLB(Self__PQKB,e__QQKB);
  fast_has__DCLB(Self__PQKB,e__QQKB);
  switch (((struct ___OBJ *)e__QQKB)->__id) {
  case __TYPE__: {
    __tmp__3QKB=hash_code__WPN(((__PROTOTYPE *)((__TYPE *)e__QQKB)->prototype__RD)->parent_named__QD.name__1QB);
  } break;
  case __TYPE_NULL__: {
    __tmp__3QKB=hash_code__WPN((&__string_59));
  } break;
  case __TYPE_VOID__: {
    __tmp__3QKB=hash_code__WPN((&__string_2));
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__3QKB=hash_code__WPN((&__string_44));
  } break;
  case __TYPE_GENERIC__: {
    __tmp__3QKB=hash_code__WPN(((__TYPE_GENERIC *)e__QQKB)->intern_name__FS2B);
  } break;
  };
  idx__YQKB=(__INTEGER)(__tmp__3QKB % Self__PQKB->capacity__4QKB);
  node__0QKB=((void **)Self__PQKB->buckets__DRKB)[idx__YQKB];
  while ((! (((void *)node__0QKB == (void *)NULL) || ((void *)((__HASHED_SET_NODEoTYPEo *)node__0QKB)->item__PRKB == (void *)e__QQKB)))) {
    node__0QKB=((__HASHED_SET_NODEoTYPEo *)node__0QKB)->next__0RKB;
  };
  if (((void *)node__0QKB == (void *)NULL)) {
    if ((Self__PQKB->capacity__4QKB == Self__PQKB->count__DSKB)) {
      idx__MTAC= 0;
      node1__PTAC=NULL;
      node2__QTAC=NULL;
      new_capacity__NTAC=prime_number_ceiling__A4Q((__INTEGER)(Self__PQKB->capacity__4QKB +  1));
      old_buckets__OTAC=Self__PQKB->buckets__DRKB;
      Self__PQKB->buckets__DRKB=create__4NVB(new_capacity__NTAC);
      i__LTAC=(__INTEGER)(Self__PQKB->capacity__4QKB -  1);
      Self__PQKB->capacity__4QKB=new_capacity__NTAC;
      while ((i__LTAC >=  0)) {
        node1__PTAC=((void **)old_buckets__OTAC)[i__LTAC];
        while (((void *)node1__PTAC != (void *)NULL)) {
          node2__QTAC=((__HASHED_SET_NODEoTYPEo *)node1__PTAC)->next__0RKB;
          __tmp__RUAC=((__HASHED_SET_NODEoTYPEo *)node1__PTAC)->item__PRKB;
          switch (((struct ___OBJ *)__tmp__RUAC)->__id) {
          case __TYPE__: {
            __tmp__SUAC=hash_code__WPN(((__PROTOTYPE *)((__TYPE *)__tmp__RUAC)->prototype__RD)->parent_named__QD.name__1QB);
          } break;
          case __TYPE_NULL__: {
            __tmp__SUAC=hash_code__WPN((&__string_59));
          } break;
          case __TYPE_VOID__: {
            __tmp__SUAC=hash_code__WPN((&__string_2));
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__SUAC=hash_code__WPN((&__string_44));
          } break;
          case __TYPE_GENERIC__: {
            __tmp__SUAC=hash_code__WPN(((__TYPE_GENERIC *)__tmp__RUAC)->intern_name__FS2B);
          } break;
          };
          idx__MTAC=(__INTEGER)(__tmp__SUAC % Self__PQKB->capacity__4QKB);
          ((__HASHED_SET_NODEoTYPEo *)node1__PTAC)->next__0RKB=((void **)Self__PQKB->buckets__DRKB)[idx__MTAC];
          ((void **)Self__PQKB->buckets__DRKB)[idx__MTAC]=node1__PTAC;
          node1__PTAC=node2__QTAC;
        };
        i__LTAC=(__INTEGER)(i__LTAC -  1);
      };
      idx__YQKB=(__INTEGER)(__tmp__3QKB % Self__PQKB->capacity__4QKB);
    };
    __tmp__QSKB=((void **)Self__PQKB->buckets__DRKB)[idx__YQKB];
    result__1H4B=NULL;
    ptr__2H4B=((__POINTER )(NULL));
    typ_id__BI4B= 0;
    sz__4H4B=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoTYPEo));
    if ((sz__4H4B ==  0)) {
      result__1H4B=HASHED_SET_NODEoTYPEo__;
    } else {
      typ_id__BI4B=__HASHED_SET_NODEoTYPEo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__4H4B);
      if ((typ_id__BI4B == (__INTEGER)(-  1))) {
        a__MYZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__KYZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__4H4B + a__MYZQ) & (__UINTEGER_32)(~ a__MYZQ));
        ptr__2H4B=micro_alloc__table__lab__BOI(new_size__KYZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KYZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__KYZQ);
      } else {
        t__QYZQ=((__UINTEGER_32 )typ_id__BI4B);
        a__SYZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__2H4B=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__4H4B + a__SYZQ) & (__UINTEGER_32)(~ a__SYZQ)),((__POINTER )(&(table_type[(t__QYZQ)]))),(__UINTEGER_32)(t__QYZQ |  1));
      };
      result__1H4B=((__HASHED_SET_NODEoTYPEo *)ptr__2H4B);
      *(result__1H4B) = *(HASHED_SET_NODEoTYPEo__);
    };
    Self__QKOC=((__HASHED_SET_NODEoTYPEo *)result__1H4B);
    Self__QKOC->item__PRKB=e__QQKB;
    Self__QKOC->next__0RKB=__tmp__QSKB;
    node__0QKB=result__1H4B;
    ((void **)Self__PQKB->buckets__DRKB)[idx__YQKB]=result__1H4B;
    Self__PQKB->count__DSKB=(__INTEGER)(Self__PQKB->count__DSKB +  1);
  };
}

static void add_subtype__BI1(__TYPE *Self__CI1,void *t__DI1)
// ({TYPE},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  __INTEGER j__EI1;
  void *__tmp__4I1,*__tmp__MJ1,*__tmp__VJ1;
  void *__tmp__AJ1,*__tmp__NJ1;
  __SECTION_ *Self__15PQ;
  void *__tmp__WJ1;
  void *__tmp__XJ1;
  __BOOLEAN __tmp__EJ1;
  j__EI1= 0;
  if ((! fast_has__DCLB(Self__CI1->subtype_list__APY,t__DI1))) {
    fast_add__OQKB(Self__CI1->subtype_list__APY,t__DI1);
    j__EI1= 0;
    while_do__PTCB:
    {
      if ((j__EI1 <= ((__FAST_ARRAYoSLOTo *)Self__CI1->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__4I1=((void **)((__FAST_ARRAYoSLOTo *)Self__CI1->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__EI1];
        if (((struct ___OBJ *)__tmp__4I1)->__id==__SLOT_DATA__) {
          __tmp__AJ1=id_section__UG4F(__tmp__4I1);
        } else {
          __tmp__AJ1=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__4I1)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__15PQ=((__SECTION_ *)__tmp__AJ1);
        __tmp__EJ1=(((void *)Self__15PQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__15PQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__EJ1=FALSE__;
      };
      if (__tmp__EJ1) {
        __tmp__MJ1=((void **)((__FAST_ARRAYoSLOTo *)Self__CI1->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__EI1];
        if (((struct ___OBJ *)__tmp__MJ1)->__id==__SLOT_DATA__) {
          __tmp__NJ1=id_section__UG4F(__tmp__MJ1);
        } else {
          __tmp__NJ1=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__MJ1)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__NJ1)->name__1I0D == (void *)(&__string_23))) {
          __tmp__VJ1=((void **)((__FAST_ARRAYoSLOTo *)Self__CI1->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__EI1];
          if (((struct ___OBJ *)__tmp__VJ1)->__id==__SLOT_DATA__) {
            __tmp__WJ1=get_type_result__PG2G(__tmp__VJ1);
          } else {
            __tmp__WJ1=get_type_result__ZH2G(__tmp__VJ1);
          };
          __tmp__XJ1=((__TYPE_FULL *)__tmp__WJ1)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__XJ1)->__id) {
          case __TYPE__: {
            add_subtype__BI1(__tmp__XJ1,t__DI1);
          } break;
          case __TYPE_NULL__: {
            add_subtype__WT3D(__tmp__XJ1,t__DI1);
          } break;
          case __TYPE_VOID__: {
            add_subtype__S43D(__tmp__XJ1,t__DI1);
          } break;
          case __TYPE_CONTEXT__: {
            add_subtype__OJ4D(__tmp__XJ1,t__DI1);
          } break;
          case __TYPE_ID__: {
            add_subtype__XIHH(__tmp__XJ1,t__DI1);
          } break;
          case __TYPE_GENERIC__: {
            add_subtype__O05B(__tmp__XJ1,t__DI1);
          } break;
          case __PROFIL_BLOCK__: {
            add_subtype__WNFJ(t__DI1);
          } break;
          };
        };
        j__EI1=(__INTEGER)(j__EI1 +  1);
        goto while_do__PTCB;
      };
    };
  };
}

static void* get_with__HSAB(__TYPE_FULL *Self__ISAB,__UINTEGER_8 flg__JSAB)
// ({TYPE_FULL},{UINTEGER_8}) With resultNo recursive, No inlinable.
{
  void *__tmp__LSAB;
  __TYPE *Self__V0LB;
  void *result__Y0LB,*__tmp__MSAB,*result__BUCB,*result__XWCB;
  void *result__GZCB,*result__H3LB,*result__L1MC,*result__KOEJ;
  __INTEGER i__Z0LB,__tmp__1T4Q,i__CUCB,__tmp__FU4Q,i__YWCB,__tmp__PU4Q;
  __INTEGER i__HZCB,__tmp__ZU4Q,i__I3LB,__tmp__DV4Q,i__M1MC,__tmp__NV4Q;
  __INTEGER i__LOEJ,__tmp__XV4Q;
  __TYPE_NULL *Self__4TCB;
  __TYPE_VOID *Self__UWCB;
  __TYPE_CONTEXT *Self__DZCB;
  __TYPE_ID *Self__E3LB;
  __TYPE_GENERIC *Self__I1MC;
  __PROFIL_BLOCK *Self__HOEJ;
  void **__tmp__V15Q,**__tmp__W15Q,**__tmp__X15Q,**__tmp__Y15Q;
  void **__tmp__Z15Q,**__tmp__015Q,**__tmp__115Q;
  __tmp__LSAB=Self__ISAB->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__LSAB)->__id) {
  case __TYPE__: {
    Self__V0LB=((__TYPE *)__tmp__LSAB);
    result__Y0LB=NULL;
    i__Z0LB= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__V0LB->default__AKC)->flag__LTL)) {
      result__Y0LB=Self__V0LB->default__AKC;
    } else {
      if (((void *)Self__V0LB->type_full_list__VUCB == (void *)NULL)) {
        Self__V0LB->type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__Y0LB=create__with__VJD(Self__V0LB,flg__JSAB);
        add_last__KYMB(Self__V0LB->type_full_list__VUCB,result__Y0LB);
      } else {
        __tmp__1T4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__V0LB->type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__V15Q=((__FAST_ARRAYoTYPE_FULLo *)Self__V0LB->type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__Z0LB <= __tmp__1T4Q) && (((__TYPE_FULL *)((void **)__tmp__V15Q)[i__Z0LB])->flag__LTL != flg__JSAB))) {
          i__Z0LB=(__INTEGER)(i__Z0LB +  1);
        };
        if ((i__Z0LB <= ((__FAST_ARRAYoTYPE_FULLo *)Self__V0LB->type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__Y0LB=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__V0LB->type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__Z0LB];
        } else {
          result__Y0LB=create__with__VJD(Self__V0LB,flg__JSAB);
          add_last__KYMB(Self__V0LB->type_full_list__VUCB,result__Y0LB);
        };
      };
    };
    __tmp__MSAB=result__Y0LB;
  } break;
  case __TYPE_NULL__: {
    Self__4TCB=((__TYPE_NULL *)__tmp__LSAB);
    result__BUCB=NULL;
    i__CUCB= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__4TCB->parent_type__TIB.default__AKC)->flag__LTL)) {
      result__BUCB=Self__4TCB->parent_type__TIB.default__AKC;
    } else {
      if (((void *)Self__4TCB->parent_type__TIB.type_full_list__VUCB == (void *)NULL)) {
        Self__4TCB->parent_type__TIB.type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__BUCB=create__with__VJD(Self__4TCB,flg__JSAB);
        add_last__KYMB(Self__4TCB->parent_type__TIB.type_full_list__VUCB,result__BUCB);
      } else {
        __tmp__FU4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__4TCB->parent_type__TIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__W15Q=((__FAST_ARRAYoTYPE_FULLo *)Self__4TCB->parent_type__TIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__CUCB <= __tmp__FU4Q) && (((__TYPE_FULL *)((void **)__tmp__W15Q)[i__CUCB])->flag__LTL != flg__JSAB))) {
          i__CUCB=(__INTEGER)(i__CUCB +  1);
        };
        if ((i__CUCB <= ((__FAST_ARRAYoTYPE_FULLo *)Self__4TCB->parent_type__TIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__BUCB=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__4TCB->parent_type__TIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__CUCB];
        } else {
          result__BUCB=create__with__VJD(Self__4TCB,flg__JSAB);
          add_last__KYMB(Self__4TCB->parent_type__TIB.type_full_list__VUCB,result__BUCB);
        };
      };
    };
    __tmp__MSAB=result__BUCB;
  } break;
  case __TYPE_VOID__: {
    Self__UWCB=((__TYPE_VOID *)__tmp__LSAB);
    result__XWCB=NULL;
    i__YWCB= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__UWCB->parent_type__UIB.default__AKC)->flag__LTL)) {
      result__XWCB=Self__UWCB->parent_type__UIB.default__AKC;
    } else {
      if (((void *)Self__UWCB->parent_type__UIB.type_full_list__VUCB == (void *)NULL)) {
        Self__UWCB->parent_type__UIB.type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__XWCB=create__with__VJD(Self__UWCB,flg__JSAB);
        add_last__KYMB(Self__UWCB->parent_type__UIB.type_full_list__VUCB,result__XWCB);
      } else {
        __tmp__PU4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__UWCB->parent_type__UIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__X15Q=((__FAST_ARRAYoTYPE_FULLo *)Self__UWCB->parent_type__UIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__YWCB <= __tmp__PU4Q) && (((__TYPE_FULL *)((void **)__tmp__X15Q)[i__YWCB])->flag__LTL != flg__JSAB))) {
          i__YWCB=(__INTEGER)(i__YWCB +  1);
        };
        if ((i__YWCB <= ((__FAST_ARRAYoTYPE_FULLo *)Self__UWCB->parent_type__UIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__XWCB=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__UWCB->parent_type__UIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__YWCB];
        } else {
          result__XWCB=create__with__VJD(Self__UWCB,flg__JSAB);
          add_last__KYMB(Self__UWCB->parent_type__UIB.type_full_list__VUCB,result__XWCB);
        };
      };
    };
    __tmp__MSAB=result__XWCB;
  } break;
  case __TYPE_CONTEXT__: {
    Self__DZCB=((__TYPE_CONTEXT *)__tmp__LSAB);
    result__GZCB=NULL;
    i__HZCB= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__DZCB->parent_type__VIB.default__AKC)->flag__LTL)) {
      result__GZCB=Self__DZCB->parent_type__VIB.default__AKC;
    } else {
      if (((void *)Self__DZCB->parent_type__VIB.type_full_list__VUCB == (void *)NULL)) {
        Self__DZCB->parent_type__VIB.type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__GZCB=create__with__VJD(Self__DZCB,flg__JSAB);
        add_last__KYMB(Self__DZCB->parent_type__VIB.type_full_list__VUCB,result__GZCB);
      } else {
        __tmp__ZU4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__DZCB->parent_type__VIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__Y15Q=((__FAST_ARRAYoTYPE_FULLo *)Self__DZCB->parent_type__VIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__HZCB <= __tmp__ZU4Q) && (((__TYPE_FULL *)((void **)__tmp__Y15Q)[i__HZCB])->flag__LTL != flg__JSAB))) {
          i__HZCB=(__INTEGER)(i__HZCB +  1);
        };
        if ((i__HZCB <= ((__FAST_ARRAYoTYPE_FULLo *)Self__DZCB->parent_type__VIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__GZCB=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__DZCB->parent_type__VIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__HZCB];
        } else {
          result__GZCB=create__with__VJD(Self__DZCB,flg__JSAB);
          add_last__KYMB(Self__DZCB->parent_type__VIB.type_full_list__VUCB,result__GZCB);
        };
      };
    };
    __tmp__MSAB=result__GZCB;
  } break;
  case __TYPE_ID__: {
    Self__E3LB=((__TYPE_ID *)__tmp__LSAB);
    result__H3LB=NULL;
    i__I3LB= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__E3LB->parent_type__WIB.default__AKC)->flag__LTL)) {
      result__H3LB=Self__E3LB->parent_type__WIB.default__AKC;
    } else {
      if (((void *)Self__E3LB->parent_type__WIB.type_full_list__VUCB == (void *)NULL)) {
        Self__E3LB->parent_type__WIB.type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__H3LB=create__with__VJD(Self__E3LB,flg__JSAB);
        add_last__KYMB(Self__E3LB->parent_type__WIB.type_full_list__VUCB,result__H3LB);
      } else {
        __tmp__DV4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__E3LB->parent_type__WIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__Z15Q=((__FAST_ARRAYoTYPE_FULLo *)Self__E3LB->parent_type__WIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__I3LB <= __tmp__DV4Q) && (((__TYPE_FULL *)((void **)__tmp__Z15Q)[i__I3LB])->flag__LTL != flg__JSAB))) {
          i__I3LB=(__INTEGER)(i__I3LB +  1);
        };
        if ((i__I3LB <= ((__FAST_ARRAYoTYPE_FULLo *)Self__E3LB->parent_type__WIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__H3LB=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__E3LB->parent_type__WIB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__I3LB];
        } else {
          result__H3LB=create__with__VJD(Self__E3LB,flg__JSAB);
          add_last__KYMB(Self__E3LB->parent_type__WIB.type_full_list__VUCB,result__H3LB);
        };
      };
    };
    __tmp__MSAB=result__H3LB;
  } break;
  case __TYPE_GENERIC__: {
    Self__I1MC=((__TYPE_GENERIC *)__tmp__LSAB);
    result__L1MC=NULL;
    i__M1MC= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__I1MC->parent_type__T2IB.default__AKC)->flag__LTL)) {
      result__L1MC=Self__I1MC->parent_type__T2IB.default__AKC;
    } else {
      if (((void *)Self__I1MC->parent_type__T2IB.type_full_list__VUCB == (void *)NULL)) {
        Self__I1MC->parent_type__T2IB.type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__L1MC=create__with__VJD(Self__I1MC,flg__JSAB);
        add_last__KYMB(Self__I1MC->parent_type__T2IB.type_full_list__VUCB,result__L1MC);
      } else {
        __tmp__NV4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__I1MC->parent_type__T2IB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__015Q=((__FAST_ARRAYoTYPE_FULLo *)Self__I1MC->parent_type__T2IB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__M1MC <= __tmp__NV4Q) && (((__TYPE_FULL *)((void **)__tmp__015Q)[i__M1MC])->flag__LTL != flg__JSAB))) {
          i__M1MC=(__INTEGER)(i__M1MC +  1);
        };
        if ((i__M1MC <= ((__FAST_ARRAYoTYPE_FULLo *)Self__I1MC->parent_type__T2IB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__L1MC=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__I1MC->parent_type__T2IB.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__M1MC];
        } else {
          result__L1MC=create__with__VJD(Self__I1MC,flg__JSAB);
          add_last__KYMB(Self__I1MC->parent_type__T2IB.type_full_list__VUCB,result__L1MC);
        };
      };
    };
    __tmp__MSAB=result__L1MC;
  } break;
  case __PROFIL_BLOCK__: {
    Self__HOEJ=((__PROFIL_BLOCK *)__tmp__LSAB);
    result__KOEJ=NULL;
    i__LOEJ= 0;
    if ((flg__JSAB == ((__TYPE_FULL *)Self__HOEJ->parent_type__HHAG.default__AKC)->flag__LTL)) {
      result__KOEJ=Self__HOEJ->parent_type__HHAG.default__AKC;
    } else {
      if (((void *)Self__HOEJ->parent_type__HHAG.type_full_list__VUCB == (void *)NULL)) {
        Self__HOEJ->parent_type__HHAG.type_full_list__VUCB=create_with_capacity__B1HB( 2);
        result__KOEJ=create__with__VJD(Self__HOEJ,flg__JSAB);
        add_last__KYMB(Self__HOEJ->parent_type__HHAG.type_full_list__VUCB,result__KOEJ);
      } else {
        __tmp__XV4Q=((__FAST_ARRAYoTYPE_FULLo *)Self__HOEJ->parent_type__HHAG.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB;
        __tmp__115Q=((__FAST_ARRAYoTYPE_FULLo *)Self__HOEJ->parent_type__HHAG.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB;
        while (((i__LOEJ <= __tmp__XV4Q) && (((__TYPE_FULL *)((void **)__tmp__115Q)[i__LOEJ])->flag__LTL != flg__JSAB))) {
          i__LOEJ=(__INTEGER)(i__LOEJ +  1);
        };
        if ((i__LOEJ <= ((__FAST_ARRAYoTYPE_FULLo *)Self__HOEJ->parent_type__HHAG.type_full_list__VUCB)->parent_arrayed_collection__UUCB.upper__JVCB)) {
          result__KOEJ=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__HOEJ->parent_type__HHAG.type_full_list__VUCB)->parent_arrayed_collection__UUCB.storage__LZMB)[i__LOEJ];
        } else {
          result__KOEJ=create__with__VJD(Self__HOEJ,flg__JSAB);
          add_last__KYMB(Self__HOEJ->parent_type__HHAG.type_full_list__VUCB,result__KOEJ);
        };
      };
    };
    __tmp__MSAB=result__KOEJ;
  } break;
  };
  return(__tmp__MSAB);
}

static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__L0F(__INTEGER new_count__N0F)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__4QG;
  __INTEGER typ_id__DRG;
  __UINTEGER_32 sz__ARG,a__XYZQ,new_size__VYZQ,t__1YZQ,a__3YZQ;
  __FAST_ARRAYoITM_TYPE_MONOo *result__3QG,*Self__DYM;
  result__3QG=NULL;
  ptr__4QG=((__POINTER )(NULL));
  typ_id__DRG= 0;
  sz__ARG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
  if ((sz__ARG ==  0)) {
    result__3QG=FAST_ARRAYoITM_TYPE_MONOo__;
  } else {
    typ_id__DRG=__FAST_ARRAYoITM_TYPE_MONOo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ARG);
    if ((typ_id__DRG == (__INTEGER)(-  1))) {
      a__XYZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__VYZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__ARG + a__XYZQ) & (__UINTEGER_32)(~ a__XYZQ));
      ptr__4QG=micro_alloc__table__lab__BOI(new_size__VYZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VYZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__VYZQ);
    } else {
      t__1YZQ=((__UINTEGER_32 )typ_id__DRG);
      a__3YZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__4QG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ARG + a__3YZQ) & (__UINTEGER_32)(~ a__3YZQ)),((__POINTER )(&(table_type[(t__1YZQ)]))),(__UINTEGER_32)(t__1YZQ |  1));
    };
    result__3QG=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__4QG);
    *(result__3QG) = *(FAST_ARRAYoITM_TYPE_MONOo__);
  };
  Self__DYM=((__FAST_ARRAYoITM_TYPE_MONOo *)result__3QG);
  if ((Self__DYM->parent_arrayed_collection__PIB.capacity__DWK < new_count__N0F)) {
    Self__DYM->parent_arrayed_collection__PIB.storage__5WK=create__LK1(new_count__N0F);
    Self__DYM->parent_arrayed_collection__PIB.capacity__DWK=new_count__N0F;
  };
  Self__DYM->parent_arrayed_collection__PIB.upper__BWK=(__INTEGER)(-  1);
  return(result__3QG);
}

static void** create__LK1(__INTEGER nb_elements__NK1)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__41PB;
  void **Result__QO4;
  Result__QO4=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__NK1 * ((__INTEGER )(sizeof(void *)))))));
  Self__41PB=(__INTEGER)(nb_elements__NK1 -  1);
  while ((Self__41PB >=  0)) {
    Result__QO4[Self__41PB]=NULL;
    Self__41PB=(__INTEGER)(Self__41PB -  1);
  };
  return(Result__QO4);
}

static __INTEGER hash_code__GQO(__FAST_ARRAYoITM_TYPE_MONOo *Self__HQO)
// ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
{
  __INTEGER result__JQO,__tmp__YQO,__tmp__HRO;
  void *__tmp__XQO,*__tmp__GRO;
  __BOOLEAN __tmp__0QO;
  result__JQO= 0;
  if ((! (Self__HQO->parent_arrayed_collection__PIB.upper__BWK <  0))) {
    if (((void *)((void **)Self__HQO->parent_arrayed_collection__PIB.storage__5WK)[Self__HQO->parent_arrayed_collection__PIB.upper__BWK] != (void *)NULL)) {
      __tmp__XQO=((void **)Self__HQO->parent_arrayed_collection__PIB.storage__5WK)[Self__HQO->parent_arrayed_collection__PIB.upper__BWK];
      switch (((struct ___OBJ *)__tmp__XQO)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__YQO=hash_code__WPN(((__ITM_TYPE_SIMPLE *)__tmp__XQO)->name__UMC);
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__YQO=hash_code__WPN(((__ITM_TYPE_STYLE *)__tmp__XQO)->parent_itm_type_simple__3IB.name__UMC);
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__YQO=hash_code__WPN(((__ITM_TYPE_GENERIC *)__tmp__XQO)->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__YQO=hash_code__WPN(((__ITM_TYPE_SELF *)__tmp__XQO)->parent_itm_type_simple__5KD.name__UMC);
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__YQO=((__ITM_TYPE_GENERIC_ELT *)__tmp__XQO)->index__0E0D;
      } break;
      };
      result__JQO=__tmp__YQO;
      __tmp__0QO=TRUE__;
    } else {
      __tmp__0QO=FALSE__;
    };
    if ((! __tmp__0QO)) {
      if (((void *)((void **)Self__HQO->parent_arrayed_collection__PIB.storage__5WK)[ 0] != (void *)NULL)) {
        __tmp__GRO=((void **)Self__HQO->parent_arrayed_collection__PIB.storage__5WK)[ 0];
        switch (((struct ___OBJ *)__tmp__GRO)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__HRO=hash_code__WPN(((__ITM_TYPE_SIMPLE *)__tmp__GRO)->name__UMC);
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__HRO=hash_code__WPN(((__ITM_TYPE_STYLE *)__tmp__GRO)->parent_itm_type_simple__3IB.name__UMC);
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__HRO=hash_code__WPN(((__ITM_TYPE_GENERIC *)__tmp__GRO)->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__HRO=hash_code__WPN(((__ITM_TYPE_SELF *)__tmp__GRO)->parent_itm_type_simple__5KD.name__UMC);
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__HRO=((__ITM_TYPE_GENERIC_ELT *)__tmp__GRO)->index__0E0D;
        } break;
        };
        result__JQO=__tmp__HRO;
      };
    };
  };
  return(result__JQO);
}

static __BOOLEAN fast_has__O5P(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__P5P,void *e__Q5P)
// ({HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo},{NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
{
  void *node__Z5P;
  node__Z5P=((void **)Self__P5P->buckets__BKL)[(__INTEGER)(hash_code__GQO(e__Q5P) % Self__P5P->capacity__2JL)];
  while ((! (((void *)node__Z5P == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__Z5P)->item__NKL == (void *)e__Q5P)))) {
    node__Z5P=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__Z5P)->next__ZKL;
  };
  return(((void *)node__Z5P != (void *)NULL));
}

static void free__EMD(void *tmp__GMD)
// ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__FYL,__tmp__MZL,__tmp__T2KB,Self__H4QC;
  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__DYL;
  __BOOLEAN __tmp__UYL;
  void **__tmp__LZL,**new__A2KB;
  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__GMD)->parent_arrayed_collection__PIB.upper__BWK=(__INTEGER)(-  1);
  Self__DYL=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SOC);
  new_capacity__FYL= 0;
  if (((__INTEGER)(Self__DYL->parent_arrayed_collection__ROC.upper__WIL +  1) <= (__INTEGER)(Self__DYL->parent_arrayed_collection__ROC.capacity__HYL -  1))) {
    Self__DYL->parent_arrayed_collection__ROC.upper__WIL=(__INTEGER)(Self__DYL->parent_arrayed_collection__ROC.upper__WIL +  1);
    __tmp__UYL=TRUE__;
  } else {
    __tmp__UYL=FALSE__;
  };
  if ((! __tmp__UYL)) {
    if ((Self__DYL->parent_arrayed_collection__ROC.capacity__HYL ==  0)) {
      Self__DYL->parent_arrayed_collection__ROC.storage__CZL=create__G02( 2);
      Self__DYL->parent_arrayed_collection__ROC.capacity__HYL= 2;
      Self__DYL->parent_arrayed_collection__ROC.upper__WIL= 0;
    } else {
      new_capacity__FYL=(__INTEGER)(Self__DYL->parent_arrayed_collection__ROC.capacity__HYL <<  1);
      __tmp__LZL=Self__DYL->parent_arrayed_collection__ROC.storage__CZL;
      __tmp__MZL=Self__DYL->parent_arrayed_collection__ROC.capacity__HYL;
      new__A2KB=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__LZL)),((__UINTEGER_32 )(__INTEGER)(__tmp__MZL * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FYL * ((__INTEGER )(sizeof(void *)))))));
      __tmp__T2KB=(__INTEGER)(new_capacity__FYL -  1);
      Self__H4QC=__tmp__MZL;
      while ((Self__H4QC <= __tmp__T2KB)) {
        new__A2KB[Self__H4QC]=NULL;
        Self__H4QC=(__INTEGER)(Self__H4QC +  1);
      };
      Self__DYL->parent_arrayed_collection__ROC.storage__CZL=new__A2KB;
      Self__DYL->parent_arrayed_collection__ROC.capacity__HYL=new_capacity__FYL;
      Self__DYL->parent_arrayed_collection__ROC.upper__WIL=(__INTEGER)(Self__DYL->parent_arrayed_collection__ROC.upper__WIL +  1);
    };
  };
  ((void **)Self__DYL->parent_arrayed_collection__ROC.storage__CZL)[Self__DYL->parent_arrayed_collection__ROC.upper__WIL]=tmp__GMD;
}

static __FAST_ARRAYoTYPE_FULLo* create_with_capacity__B1HB(__INTEGER new_count__D1HB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__RFIB;
  __INTEGER typ_id__WFIB;
  __UINTEGER_32 sz__TFIB,a__LZZQ,new_size__JZZQ,t__PZZQ,a__RZZQ;
  __FAST_ARRAYoTYPE_FULLo *result__QFIB,*Self__U2MB;
  result__QFIB=NULL;
  ptr__RFIB=((__POINTER )(NULL));
  typ_id__WFIB= 0;
  sz__TFIB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_FULLo));
  if ((sz__TFIB ==  0)) {
    result__QFIB=FAST_ARRAYoTYPE_FULLo__;
  } else {
    typ_id__WFIB=__FAST_ARRAYoTYPE_FULLo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__TFIB);
    if ((typ_id__WFIB == (__INTEGER)(-  1))) {
      a__LZZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__JZZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__TFIB + a__LZZQ) & (__UINTEGER_32)(~ a__LZZQ));
      ptr__RFIB=micro_alloc__table__lab__BOI(new_size__JZZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JZZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__JZZQ);
    } else {
      t__PZZQ=((__UINTEGER_32 )typ_id__WFIB);
      a__RZZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__RFIB=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__TFIB + a__RZZQ) & (__UINTEGER_32)(~ a__RZZQ)),((__POINTER )(&(table_type[(t__PZZQ)]))),(__UINTEGER_32)(t__PZZQ |  1));
    };
    result__QFIB=((__FAST_ARRAYoTYPE_FULLo *)ptr__RFIB);
    *(result__QFIB) = *(FAST_ARRAYoTYPE_FULLo__);
  };
  Self__U2MB=((__FAST_ARRAYoTYPE_FULLo *)result__QFIB);
  if ((Self__U2MB->parent_arrayed_collection__UUCB.capacity__PYMB < new_count__D1HB)) {
    Self__U2MB->parent_arrayed_collection__UUCB.storage__LZMB=create__JG2B(new_count__D1HB);
    Self__U2MB->parent_arrayed_collection__UUCB.capacity__PYMB=new_count__D1HB;
  };
  Self__U2MB->parent_arrayed_collection__UUCB.upper__JVCB=(__INTEGER)(-  1);
  return(result__QFIB);
}

static void* to_run__DKEF(__ITM_TYPE_GENERIC_ELT *Self__EKEF)
// ({ITM_TYPE_GENERIC_ELT}) With resultNo recursive, No inlinable.
{
  void *result__HKEF,*result__ST5F;
  void *__tmp__NKEF;
  void *__tmp__OKEF,*type_generic__GKEF;
  __TYPE_GENERIC *Self__OT5F;
  __INTEGER result__PBBG;
  __POSITION __tmp__DLEF;
  __CHARACTER t__IKEF;
  void *tab__TT5F;
  __FAST_ARRAYoExpanded_CHARACTERo *Self__MBBG;
  result__HKEF=NULL;
  t__IKEF=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )'A') + ((__INTEGER_8 )Self__EKEF->index__0E0D)))));
  __tmp__NKEF=self_up__LKEF;
  if (__tmp__NKEF==NULL) {
    __tmp__OKEF=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__NKEF)->__id) {
    case __TYPE__: {
      __tmp__OKEF=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__OKEF=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__OKEF=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__OKEF=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__OKEF=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__OKEF=((void *)__tmp__NKEF);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__OKEF=NULL;
    } break;
    }
  };
  type_generic__GKEF=__tmp__OKEF;
  if (((void *)__tmp__OKEF != (void *)NULL)) {
    Self__OT5F=((__TYPE_GENERIC *)__tmp__OKEF);
    result__ST5F=NULL;
    tab__TT5F=((__PROTOTYPE *)Self__OT5F->parent_type__T2IB.prototype__RD)->idf_generic_list__KIM;
    Self__MBBG=((__FAST_ARRAYoExpanded_CHARACTERo *)tab__TT5F);
    result__PBBG= 0;
    if ((Self__MBBG->parent_arrayed_collection__IIM.upper__WTJB >=  0)) {
      result__PBBG=fast_first_index_of__until__PAD(Self__MBBG->parent_arrayed_collection__IIM.storage__STJB,t__IKEF,Self__MBBG->parent_arrayed_collection__IIM.upper__WTJB);
    };
    if ((result__PBBG <= ((__FAST_ARRAYoExpanded_CHARACTERo *)tab__TT5F)->parent_arrayed_collection__IIM.upper__WTJB)) {
      result__ST5F=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__OT5F->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[result__PBBG];
    };
    result__HKEF=result__ST5F;
  };
  if (((void *)result__HKEF == (void *)NULL)) {
    copy__BNK(string_tmp__2KEF,(&__string_323));
    add_last__YPK(string_tmp__2KEF,t__IKEF);
    append__MOK(string_tmp__2KEF,(&__string_324));
    __tmp__DLEF=((__PROTOTYPE *)prototype__NQRF(to_run__MPXD()))->parent_named__QD.parent_itm_object__PD.position__BJM;
    put_error__text__0AH( 1,string_tmp__2KEF);
    put_position__ECH(__tmp__DLEF);
    send_error__2FH();
  };
  return(result__HKEF);
}

static void add_last__KYMB(__FAST_ARRAYoTYPE_FULLo *Self__LYMB,void *element__MYMB)
// ({FAST_ARRAYoTYPE_FULLo},{NULLxTYPE_FULL}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__NYMB,__tmp__VZMB,__tmp__0POC,Self__E04D;
  __BOOLEAN __tmp__2YMB;
  void **__tmp__UZMB,**new__HPOC;
  new_capacity__NYMB= 0;
  if (((__INTEGER)(Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB +  1) <= (__INTEGER)(Self__LYMB->parent_arrayed_collection__UUCB.capacity__PYMB -  1))) {
    Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB=(__INTEGER)(Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB +  1);
    __tmp__2YMB=TRUE__;
  } else {
    __tmp__2YMB=FALSE__;
  };
  if ((! __tmp__2YMB)) {
    if ((Self__LYMB->parent_arrayed_collection__UUCB.capacity__PYMB ==  0)) {
      Self__LYMB->parent_arrayed_collection__UUCB.storage__LZMB=create__JG2B( 2);
      Self__LYMB->parent_arrayed_collection__UUCB.capacity__PYMB= 2;
      Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB= 0;
    } else {
      new_capacity__NYMB=(__INTEGER)(Self__LYMB->parent_arrayed_collection__UUCB.capacity__PYMB <<  1);
      __tmp__UZMB=Self__LYMB->parent_arrayed_collection__UUCB.storage__LZMB;
      __tmp__VZMB=Self__LYMB->parent_arrayed_collection__UUCB.capacity__PYMB;
      new__HPOC=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__UZMB)),((__UINTEGER_32 )(__INTEGER)(__tmp__VZMB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__NYMB * ((__INTEGER )(sizeof(void *)))))));
      __tmp__0POC=(__INTEGER)(new_capacity__NYMB -  1);
      Self__E04D=__tmp__VZMB;
      while ((Self__E04D <= __tmp__0POC)) {
        new__HPOC[Self__E04D]=NULL;
        Self__E04D=(__INTEGER)(Self__E04D +  1);
      };
      Self__LYMB->parent_arrayed_collection__UUCB.storage__LZMB=new__HPOC;
      Self__LYMB->parent_arrayed_collection__UUCB.capacity__PYMB=new_capacity__NYMB;
      Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB=(__INTEGER)(Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB +  1);
    };
  };
  ((void **)Self__LYMB->parent_arrayed_collection__UUCB.storage__LZMB)[Self__LYMB->parent_arrayed_collection__UUCB.upper__JVCB]=element__MYMB;
}

static __INTEGER hash_code__ZKRC(__FAST_ARRAYoTYPE_FULLo *Self__0KRC)
// ({FAST_ARRAYoTYPE_FULLo}) With resultNo recursive, No inlinable.
{
  __INTEGER result__2KRC;
  __BOOLEAN __tmp__NLRC;
  result__2KRC= 0;
  if ((! (Self__0KRC->parent_arrayed_collection__UUCB.upper__JVCB <  0))) {
    if (((void *)((void **)Self__0KRC->parent_arrayed_collection__UUCB.storage__LZMB)[Self__0KRC->parent_arrayed_collection__UUCB.upper__JVCB] != (void *)NULL)) {
      result__2KRC=hash_code__T20D(((void **)Self__0KRC->parent_arrayed_collection__UUCB.storage__LZMB)[Self__0KRC->parent_arrayed_collection__UUCB.upper__JVCB]);
      __tmp__NLRC=TRUE__;
    } else {
      __tmp__NLRC=FALSE__;
    };
    if ((! __tmp__NLRC)) {
      if (((void *)((void **)Self__0KRC->parent_arrayed_collection__UUCB.storage__LZMB)[ 0] != (void *)NULL)) {
        result__2KRC=hash_code__T20D(((void **)Self__0KRC->parent_arrayed_collection__UUCB.storage__LZMB)[ 0]);
      };
    };
  };
  return(result__2KRC);
}

static void** create__JG2B(__INTEGER nb_elements__LG2B)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__UPSC;
  void **Result__OK5B;
  Result__OK5B=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__LG2B * ((__INTEGER )(sizeof(void *)))))));
  Self__UPSC=(__INTEGER)(nb_elements__LG2B -  1);
  while ((Self__UPSC >=  0)) {
    Result__OK5B[Self__UPSC]=NULL;
    Self__UPSC=(__INTEGER)(Self__UPSC -  1);
  };
  return(Result__OK5B);
}

static __BOOLEAN fast_has__2HSC(__HASHED_SEToFAST_ARRAYoTYPE_FULLoo *Self__3HSC,void *e__4HSC)
// ({HASHED_SEToFAST_ARRAYoTYPE_FULLoo},{NULLxFAST_ARRAYoTYPE_FULLo}) With resultNo recursive, No inlinable.
{
  void *node__HISC;
  node__HISC=((void **)Self__3HSC->buckets__XLNC)[(__INTEGER)(hash_code__ZKRC(e__4HSC) % Self__3HSC->capacity__SLNC)];
  while ((! (((void *)node__HISC == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__HISC)->item__DMNC == (void *)e__4HSC)))) {
    node__HISC=((__HASHED_SET_NODEoFAST_ARRAYoTYPE_FULLoo *)node__HISC)->next__PMNC;
  };
  return(((void *)node__HISC != (void *)NULL));
}

static void append_name_in__FBYD(__TYPE_FULL *Self__GBYD,void *buffer__HBYD)
// ({TYPE_FULL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__YBYD;
  void *__tmp__ZBYD;
  if (((__UINTEGER_8)(Self__GBYD->flag__LTL &  4) !=  0)) {
    append__MOK(buffer__HBYD,(&__string_325));
  };
  if (((__UINTEGER_8)(Self__GBYD->flag__LTL &  1) !=  0)) {
    append__MOK(buffer__HBYD,(&__string_326));
  };
  __tmp__YBYD=Self__GBYD->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__YBYD)->__id) {
  case __TYPE__: {
    __tmp__ZBYD=((__PROTOTYPE *)((__TYPE *)__tmp__YBYD)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__ZBYD=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__ZBYD=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__ZBYD=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__ZBYD=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__ZBYD=((__TYPE_GENERIC *)__tmp__YBYD)->name__2R2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__ZBYD=((__PROFIL_BLOCK *)__tmp__YBYD)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  append__MOK(buffer__HBYD,__tmp__ZBYD);
}

static void add_subtype__O05B(__TYPE_GENERIC *Self__P05B,void *t__Q05B)
// ({TYPE_GENERIC},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  __INTEGER j__R05B;
  void *__tmp__K15B,*__tmp__X15B,*__tmp__A25B;
  void *__tmp__L15B,*__tmp__Y15B;
  __SECTION_ *Self__BP1D;
  void *__tmp__B25B;
  void *__tmp__C25B;
  __BOOLEAN __tmp__P15B;
  j__R05B= 0;
  if ((! fast_has__DCLB(Self__P05B->parent_type__T2IB.subtype_list__APY,t__Q05B))) {
    fast_add__OQKB(Self__P05B->parent_type__T2IB.subtype_list__APY,t__Q05B);
    j__R05B= 0;
    while_do__T0DC:
    {
      if ((j__R05B <= ((__FAST_ARRAYoSLOTo *)Self__P05B->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__K15B=((void **)((__FAST_ARRAYoSLOTo *)Self__P05B->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__R05B];
        if (((struct ___OBJ *)__tmp__K15B)->__id==__SLOT_DATA__) {
          __tmp__L15B=id_section__UG4F(__tmp__K15B);
        } else {
          __tmp__L15B=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__K15B)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__BP1D=((__SECTION_ *)__tmp__L15B);
        __tmp__P15B=(((void *)Self__BP1D->name__1I0D == (void *)(&__string_23)) || ((void *)Self__BP1D->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__P15B=FALSE__;
      };
      if (__tmp__P15B) {
        __tmp__X15B=((void **)((__FAST_ARRAYoSLOTo *)Self__P05B->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__R05B];
        if (((struct ___OBJ *)__tmp__X15B)->__id==__SLOT_DATA__) {
          __tmp__Y15B=id_section__UG4F(__tmp__X15B);
        } else {
          __tmp__Y15B=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__X15B)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__Y15B)->name__1I0D == (void *)(&__string_23))) {
          __tmp__A25B=((void **)((__FAST_ARRAYoSLOTo *)Self__P05B->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__R05B];
          if (((struct ___OBJ *)__tmp__A25B)->__id==__SLOT_DATA__) {
            __tmp__B25B=get_type_result__PG2G(__tmp__A25B);
          } else {
            __tmp__B25B=get_type_result__ZH2G(__tmp__A25B);
          };
          __tmp__C25B=((__TYPE_FULL *)__tmp__B25B)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__C25B)->__id) {
          case __TYPE__: {
            add_subtype__BI1(__tmp__C25B,t__Q05B);
          } break;
          case __TYPE_NULL__: {
            add_subtype__WT3D(__tmp__C25B,t__Q05B);
          } break;
          case __TYPE_VOID__: {
            add_subtype__S43D(__tmp__C25B,t__Q05B);
          } break;
          case __TYPE_CONTEXT__: {
            add_subtype__OJ4D(__tmp__C25B,t__Q05B);
          } break;
          case __TYPE_ID__: {
            add_subtype__XIHH(__tmp__C25B,t__Q05B);
          } break;
          case __TYPE_GENERIC__: {
            add_subtype__O05B(__tmp__C25B,t__Q05B);
          } break;
          case __PROFIL_BLOCK__: {
            add_subtype__WNFJ(t__Q05B);
          } break;
          };
        };
        j__R05B=(__INTEGER)(j__R05B +  1);
        goto while_do__T0DC;
      };
    };
  };
}

static __CONTEXT* clone__2RCD()
// () With resultNo recursive, No inlinable.
{
  __CONTEXT *result__5RCD;
  __POINTER ptr__ASCD;
  __INTEGER typ_id__FSCD;
  __UINTEGER_32 sz__CSCD,a__A0ZQ,new_size__4ZZQ,t__E0ZQ,a__G0ZQ;
  result__5RCD=NULL;
  ptr__ASCD=((__POINTER )(NULL));
  typ_id__FSCD= 0;
  sz__CSCD=((__UINTEGER_32 )sizeof(__CONTEXT));
  if ((sz__CSCD ==  0)) {
    result__5RCD=CONTEXT__;
  } else {
    typ_id__FSCD=__CONTEXT__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__CSCD);
    if ((typ_id__FSCD == (__INTEGER)(-  1))) {
      a__A0ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__4ZZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__CSCD + a__A0ZQ) & (__UINTEGER_32)(~ a__A0ZQ));
      ptr__ASCD=micro_alloc__table__lab__BOI(new_size__4ZZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4ZZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__4ZZQ);
    } else {
      t__E0ZQ=((__UINTEGER_32 )typ_id__FSCD);
      a__G0ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__ASCD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__CSCD + a__G0ZQ) & (__UINTEGER_32)(~ a__G0ZQ)),((__POINTER )(&(table_type[(t__E0ZQ)]))),(__UINTEGER_32)(t__E0ZQ |  1));
    };
    result__5RCD=((__CONTEXT *)ptr__ASCD);
    *(result__5RCD) = *(CONTEXT__);
  };
  return(result__5RCD);
}

static void add_last__YUZD(__FAST_ARRAYoCONTEXTo *Self__ZUZD,void *element__0UZD)
// ({FAST_ARRAYoCONTEXTo},{NULLxCONTEXT}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__1UZD,__tmp__5VZD,__tmp__W2GF,Self__DVAG;
  __BOOLEAN __tmp__JVZD;
  void **__tmp__4VZD,**new__D2GF;
  new_capacity__1UZD= 0;
  if (((__INTEGER)(Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC +  1) <= (__INTEGER)(Self__ZUZD->parent_arrayed_collection__FHQC.capacity__3TZD -  1))) {
    Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC=(__INTEGER)(Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC +  1);
    __tmp__JVZD=TRUE__;
  } else {
    __tmp__JVZD=FALSE__;
  };
  if ((! __tmp__JVZD)) {
    if ((Self__ZUZD->parent_arrayed_collection__FHQC.capacity__3TZD ==  0)) {
      Self__ZUZD->parent_arrayed_collection__FHQC.storage__33YD=create__TORE( 2);
      Self__ZUZD->parent_arrayed_collection__FHQC.capacity__3TZD= 2;
      Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC= 0;
    } else {
      new_capacity__1UZD=(__INTEGER)(Self__ZUZD->parent_arrayed_collection__FHQC.capacity__3TZD <<  1);
      __tmp__4VZD=Self__ZUZD->parent_arrayed_collection__FHQC.storage__33YD;
      __tmp__5VZD=Self__ZUZD->parent_arrayed_collection__FHQC.capacity__3TZD;
      new__D2GF=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__4VZD)),((__UINTEGER_32 )(__INTEGER)(__tmp__5VZD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__1UZD * ((__INTEGER )(sizeof(void *)))))));
      __tmp__W2GF=(__INTEGER)(new_capacity__1UZD -  1);
      Self__DVAG=__tmp__5VZD;
      while ((Self__DVAG <= __tmp__W2GF)) {
        new__D2GF[Self__DVAG]=NULL;
        Self__DVAG=(__INTEGER)(Self__DVAG +  1);
      };
      Self__ZUZD->parent_arrayed_collection__FHQC.storage__33YD=new__D2GF;
      Self__ZUZD->parent_arrayed_collection__FHQC.capacity__3TZD=new_capacity__1UZD;
      Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC=(__INTEGER)(Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC +  1);
    };
  };
  ((void **)Self__ZUZD->parent_arrayed_collection__FHQC.storage__33YD)[Self__ZUZD->parent_arrayed_collection__FHQC.upper__IHQC]=element__0UZD;
}

static __LIST* create__QCAG(__POSITION p__SCAG)
// ({POSITION}) With resultNo recursive, No inlinable.
{
  __LIST *result__3XBG,*Self__TSPG;
  __POINTER ptr__4XBG,ptr__M0SG;
  __INTEGER typ_id__DYBG,typ_id__R0SG;
  __UINTEGER_32 sz__AYBG,a__R0ZQ,new_size__P0ZQ,t__V0ZQ,a__X0ZQ;
  __UINTEGER_32 sz__O0SG,a__20ZQ,new_size__00ZQ,t__A1ZQ,a__C1ZQ;
  __FAST_ARRAYoINSTRo *result__L0SG,*Self__JQ4G;
  result__3XBG=NULL;
  ptr__4XBG=((__POINTER )(NULL));
  typ_id__DYBG= 0;
  sz__AYBG=((__UINTEGER_32 )sizeof(__LIST));
  if ((sz__AYBG ==  0)) {
    result__3XBG=LIST__;
  } else {
    typ_id__DYBG=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__AYBG);
    if ((typ_id__DYBG == (__INTEGER)(-  1))) {
      a__R0ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__P0ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__AYBG + a__R0ZQ) & (__UINTEGER_32)(~ a__R0ZQ));
      ptr__4XBG=micro_alloc__table__lab__BOI(new_size__P0ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P0ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__P0ZQ);
    } else {
      t__V0ZQ=((__UINTEGER_32 )typ_id__DYBG);
      a__X0ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__4XBG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__AYBG + a__X0ZQ) & (__UINTEGER_32)(~ a__X0ZQ)),((__POINTER )(&(table_type[(t__V0ZQ)]))),(__UINTEGER_32)(t__V0ZQ |  1));
    };
    result__3XBG=((__LIST *)ptr__4XBG);
    *(result__3XBG) = *(LIST__);
  };
  Self__TSPG=((__LIST *)result__3XBG);
  modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  Self__TSPG->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=p__SCAG;
  result__L0SG=NULL;
  ptr__M0SG=((__POINTER )(NULL));
  typ_id__R0SG= 0;
  sz__O0SG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoINSTRo));
  if ((sz__O0SG ==  0)) {
    result__L0SG=FAST_ARRAYoINSTRo__;
  } else {
    typ_id__R0SG=__FAST_ARRAYoINSTRo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__O0SG);
    if ((typ_id__R0SG == (__INTEGER)(-  1))) {
      a__20ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__00ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__O0SG + a__20ZQ) & (__UINTEGER_32)(~ a__20ZQ));
      ptr__M0SG=micro_alloc__table__lab__BOI(new_size__00ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__00ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__00ZQ);
    } else {
      t__A1ZQ=((__UINTEGER_32 )typ_id__R0SG);
      a__C1ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__M0SG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__O0SG + a__C1ZQ) & (__UINTEGER_32)(~ a__C1ZQ)),((__POINTER )(&(table_type[(t__A1ZQ)]))),(__UINTEGER_32)(t__A1ZQ |  1));
    };
    result__L0SG=((__FAST_ARRAYoINSTRo *)ptr__M0SG);
    *(result__L0SG) = *(FAST_ARRAYoINSTRo__);
  };
  Self__JQ4G=((__FAST_ARRAYoINSTRo *)result__L0SG);
  if ((Self__JQ4G->parent_arrayed_collection__IUOG.capacity__FL4G <  2)) {
    Self__JQ4G->parent_arrayed_collection__IUOG.storage__BM4G=create__2FEH();
    Self__JQ4G->parent_arrayed_collection__IUOG.capacity__FL4G= 2;
  };
  Self__JQ4G->parent_arrayed_collection__IUOG.upper__THQG=(__INTEGER)(-  1);
  Self__TSPG->expr_list__JUOG=result__L0SG;
  return(result__3XBG);
}

static __LOCAL* create__name__style__type__25JG(__POSITION p__45JG,void *n__55JG,__CHARACTER c__AAKG,void *t__BAKG)
// ({POSITION},{NULLxSTRING_CONSTANT},{CHARACTER},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  __LOCAL *result__XXMG,*Self__4ZPG;
  __POINTER ptr__YXMG;
  __INTEGER typ_id__3XMG;
  __UINTEGER_32 sz__0XMG,a__H1ZQ,new_size__F1ZQ,t__L1ZQ,a__N1ZQ;
  void *tmp__D0PG;
  __TYPE_FULL *Self__2G1P;
  result__XXMG=NULL;
  ptr__YXMG=((__POINTER )(NULL));
  typ_id__3XMG= 0;
  sz__0XMG=((__UINTEGER_32 )sizeof(__LOCAL));
  if ((sz__0XMG ==  0)) {
    result__XXMG=LOCAL__;
  } else {
    typ_id__3XMG=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__0XMG);
    if ((typ_id__3XMG == (__INTEGER)(-  1))) {
      a__H1ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__F1ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__0XMG + a__H1ZQ) & (__UINTEGER_32)(~ a__H1ZQ));
      ptr__YXMG=micro_alloc__table__lab__BOI(new_size__F1ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F1ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__F1ZQ);
    } else {
      t__L1ZQ=((__UINTEGER_32 )typ_id__3XMG);
      a__N1ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__YXMG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__0XMG + a__N1ZQ) & (__UINTEGER_32)(~ a__N1ZQ)),((__POINTER )(&(table_type[(t__L1ZQ)]))),(__UINTEGER_32)(t__L1ZQ |  1));
    };
    result__XXMG=((__LOCAL *)ptr__YXMG);
    *(result__XXMG) = *(LOCAL__);
  };
  Self__4ZPG=((__LOCAL *)result__XXMG);
  tmp__D0PG=NULL;
  Self__4ZPG->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM=p__45JG;
  Self__4ZPG->parent_variable__B2LC.parent_named__A2LC.name__1QB=n__55JG;
  Self__4ZPG->parent_variable__B2LC.intern_name__025F=get_intern__3MBG(n__55JG);
  if ((((__UINTEGER_8)(((__TYPE_FULL *)t__BAKG)->flag__LTL &  1) !=  0) && (! is_expanded_c__0ZWG(t__BAKG)))) {
    Self__2G1P=((__TYPE_FULL *)t__BAKG);
    Self__4ZPG->parent_variable__B2LC.type__125F=get_with__HSAB(Self__2G1P,(__UINTEGER_8)(Self__2G1P->flag__LTL |  16));
  } else {
    Self__4ZPG->parent_variable__B2LC.type__125F=t__BAKG;
  };
  Self__4ZPG->parent_variable__B2LC.parent_named__A2LC.style__LDGC=c__AAKG;
  if (((((__UINTEGER_8)(((__TYPE_FULL *)Self__4ZPG->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)Self__4ZPG->parent_variable__B2LC.type__125F)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)Self__4ZPG->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57)))) {
    tmp__D0PG=new__XWSG();
    add__R2EJ(tmp__D0PG,((__TYPE_FULL *)t__BAKG)->parent_type__KTL);
    Self__4ZPG->parent_variable__B2LC.type_list__HKZD=to_types__A4EJ(tmp__D0PG);
  } else {
    Self__4ZPG->parent_variable__B2LC.type_list__HKZD=TYPES__;
  };
  return(result__XXMG);
}

static __PUSH* create__context__first__20EG(__PUSH *Self__30EG,__POSITION pos__40EG,void *v__50EG,__BOOLEAN f__A1EG)
// ({PUSH},{POSITION},{NULLxLOCAL},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  __PUSH *result__GBKG,*Self__BYPG;
  __POINTER ptr__HBKG;
  __INTEGER typ_id__MBKG;
  __UINTEGER_32 sz__JBKG,a__S1ZQ,new_size__Q1ZQ,t__W1ZQ,a__Y1ZQ;
  result__GBKG=NULL;
  ptr__HBKG=((__POINTER )(NULL));
  typ_id__MBKG= 0;
  sz__JBKG=((__UINTEGER_32 )sizeof(__PUSH));
  if ((sz__JBKG ==  0)) {
    result__GBKG=Self__30EG;
  } else {
    typ_id__MBKG=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__JBKG);
    if ((typ_id__MBKG == (__INTEGER)(-  1))) {
      a__S1ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__Q1ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__JBKG + a__S1ZQ) & (__UINTEGER_32)(~ a__S1ZQ));
      ptr__HBKG=micro_alloc__table__lab__BOI(new_size__Q1ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q1ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Q1ZQ);
    } else {
      t__W1ZQ=((__UINTEGER_32 )typ_id__MBKG);
      a__Y1ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__HBKG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__JBKG + a__Y1ZQ) & (__UINTEGER_32)(~ a__Y1ZQ)),((__POINTER )(&(table_type[(t__W1ZQ)]))),(__UINTEGER_32)(t__W1ZQ |  1));
    };
    result__GBKG=((__PUSH *)ptr__HBKG);
    *(result__GBKG) = *(Self__30EG);
  };
  Self__BYPG=((__PUSH *)result__GBKG);
  if (((void *)v__50EG == (void *)NULL)) {
    print__1ZE((&__string_327));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
  Self__BYPG->parent_instr__YRB.parent_itm_object__TE.position__BJM=pos__40EG;
  Self__BYPG->context__ZYPG=v__50EG;
  Self__BYPG->is_first__0YPG=f__A1EG;
  return(result__GBKG);
}

static void** create__2FEH()
// () With resultNo recursive, No inlinable.
{
  __INTEGER Self__0MII;
  void **Result__5EGH;
  Result__5EGH=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  1))));
  Self__0MII= 1;
  while ((Self__0MII >=  0)) {
    Result__5EGH[Self__0MII]=NULL;
    Self__0MII=(__INTEGER)(Self__0MII -  1);
  };
  return(Result__5EGH);
}

static void* get_local_slot__H4EG(__TYPE *Self__I4EG,void *n__J4EG)
// ({TYPE},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *itm_slot__M4EG;
  void *result__N4EG,*__tmp__34EG;
  __INTEGER j__L4EG,__tmp__IX4Q;
  void *__tmp__44EG;
  void **__tmp__215Q;
  __BOOLEAN __tmp__B5EG;
  itm_slot__M4EG=NULL;
  result__N4EG=NULL;
  j__L4EG= 0;
  __tmp__IX4Q=((__FAST_ARRAYoSLOTo *)Self__I4EG->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
  __tmp__215Q=((__FAST_ARRAYoSLOTo *)Self__I4EG->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL;
  while_do__KEKG:
  {
    if ((j__L4EG <= __tmp__IX4Q)) {
      __tmp__34EG=((void **)__tmp__215Q)[j__L4EG];
      if (((struct ___OBJ *)__tmp__34EG)->__id==__SLOT_DATA__) {
        __tmp__44EG=((__SLOT_DATA *)__tmp__34EG)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
      } else {
        __tmp__44EG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__34EG)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
      };
      __tmp__B5EG=((void *)__tmp__44EG != (void *)n__J4EG);
    } else {
      __tmp__B5EG=FALSE__;
    };
    if (__tmp__B5EG) {
      j__L4EG=(__INTEGER)(j__L4EG +  1);
      goto while_do__KEKG;
    };
  };
  if ((j__L4EG <= ((__FAST_ARRAYoSLOTo *)Self__I4EG->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
    result__N4EG=((void **)((__FAST_ARRAYoSLOTo *)Self__I4EG->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__L4EG];
  } else {
    itm_slot__M4EG=fast_reference_at__UEQD(((__PROTOTYPE *)Self__I4EG->prototype__RD)->slot_list__3IM,n__J4EG);
    if (((void *)itm_slot__M4EG != (void *)NULL)) {
      result__N4EG=create__type__ZU2F(itm_slot__M4EG,Self__I4EG);
      add_last__BV2F(Self__I4EG->slot_run__1JC,result__N4EG);
    };
  };
  return(result__N4EG);
}

static void* id_section__UG4F(__SLOT_DATA *Self__VG4F)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  void *result__XG4F;
  result__XG4F=NULL;
  if (((void *)Self__VG4F->parent_slot__BJZD != (void *)NULL)) {
    result__XG4F=((__ITM_SLOT *)((__SLOT *)Self__VG4F->parent_slot__BJZD)->base_slot__P22F)->id_section__EACC;
  } else {
    result__XG4F=get_name__DEJD((&__string_26));
  };
  return(result__XG4F);
}

static void* get_type_result__PG2G(__SLOT_DATA *Self__QG2G)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  void *__tmp__UH2G;
  void *result__SG2G,*__tmp__SH2G,*__tmp__HNXP;
  void *tm__TG2G,*__tmp__LH2G;
  void *__tmp__KH2G;
  __ITM_TYPE_STYLE *Self__GNXP;
  __tmp__UH2G=self_up__LKEF;
  result__SG2G=NULL;
  tm__TG2G=NULL;
  if (((void *)((__SLOT *)Self__QG2G->parent_slot__BJZD)->slot_data_intern__1JZD != (void *)NULL)) {
    result__SG2G=((__SLOT_DATA *)((__SLOT *)Self__QG2G->parent_slot__BJZD)->slot_data_intern__1JZD)->parent_variable__AJZD.type__125F;
  } else {
    __tmp__KH2G=((__ITM_SLOT *)((__SLOT *)Self__QG2G->parent_slot__BJZD)->base_slot__P22F)->type__PD2D;
    if (__tmp__KH2G==NULL) {
      __tmp__LH2G=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__KH2G)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__LH2G=((void *)__tmp__KH2G);
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__LH2G=((void *)__tmp__KH2G);
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__LH2G=((void *)__tmp__KH2G);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__LH2G=((void *)__tmp__KH2G);
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__LH2G=((void *)__tmp__KH2G);
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__LH2G=NULL;
      } break;
      }
    };
    tm__TG2G=__tmp__LH2G;
    if (((void *)__tmp__LH2G != (void *)NULL)) {
      self_up__LKEF=receiver_type__R12G(Self__QG2G);
      switch (((struct ___OBJ *)__tmp__LH2G)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__LH2G)->to_run__2VK==0) {
          __tmp__SH2G=((__ITM_TYPE_SIMPLE *)__tmp__LH2G)->to_run__1VK;
        } else {
          __tmp__SH2G=to_run__XVK(__tmp__LH2G);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__LH2G)->to_run__V1IB==0) {
          __tmp__SH2G=((__ITM_TYPE_STYLE *)__tmp__LH2G)->to_run__U1IB;
        } else {
          Self__GNXP=((__ITM_TYPE_STYLE *)__tmp__LH2G);
          __tmp__HNXP=get__XUN(Self__GNXP);
          Self__GNXP->to_run__U1IB=__tmp__HNXP;
          Self__GNXP->to_run__V1IB=0;
          __tmp__SH2G=__tmp__HNXP;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__SH2G=to_run__W1IB(__tmp__LH2G);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__SH2G=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__SH2G=to_run__DKEF(__tmp__LH2G);
      } break;
      };
      result__SG2G=__tmp__SH2G;
      self_up__LKEF=__tmp__UH2G;
    };
  };
  return(result__SG2G);
}

static void* get_type_result__ZH2G(__SLOT_CODE *Self__0H2G)
// ({SLOT_CODE}) With resultNo recursive, No inlinable.
{
  void *__tmp__4I2G;
  void *result__2H2G,*__tmp__2I2G,*__tmp__LNXP;
  void *tm__3H2G,*__tmp__VI2G;
  void *__tmp__UI2G;
  __ITM_TYPE_STYLE *Self__KNXP;
  __tmp__4I2G=self_up__LKEF;
  result__2H2G=NULL;
  tm__3H2G=NULL;
  if (((void *)((__SLOT *)Self__0H2G->parent_slot__Y22F)->slot_data_intern__1JZD != (void *)NULL)) {
    result__2H2G=((__SLOT_DATA *)((__SLOT *)Self__0H2G->parent_slot__Y22F)->slot_data_intern__1JZD)->parent_variable__AJZD.type__125F;
  } else {
    __tmp__UI2G=((__ITM_SLOT *)((__SLOT *)Self__0H2G->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
    if (__tmp__UI2G==NULL) {
      __tmp__VI2G=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__UI2G)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__VI2G=((void *)__tmp__UI2G);
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__VI2G=((void *)__tmp__UI2G);
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__VI2G=((void *)__tmp__UI2G);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__VI2G=((void *)__tmp__UI2G);
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__VI2G=((void *)__tmp__UI2G);
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__VI2G=NULL;
      } break;
      }
    };
    tm__3H2G=__tmp__VI2G;
    if (((void *)__tmp__VI2G != (void *)NULL)) {
      self_up__LKEF=((__SLOT *)Self__0H2G->parent_slot__Y22F)->receiver_type__Q22F;
      switch (((struct ___OBJ *)__tmp__VI2G)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__VI2G)->to_run__2VK==0) {
          __tmp__2I2G=((__ITM_TYPE_SIMPLE *)__tmp__VI2G)->to_run__1VK;
        } else {
          __tmp__2I2G=to_run__XVK(__tmp__VI2G);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__VI2G)->to_run__V1IB==0) {
          __tmp__2I2G=((__ITM_TYPE_STYLE *)__tmp__VI2G)->to_run__U1IB;
        } else {
          Self__KNXP=((__ITM_TYPE_STYLE *)__tmp__VI2G);
          __tmp__LNXP=get__XUN(Self__KNXP);
          Self__KNXP->to_run__U1IB=__tmp__LNXP;
          Self__KNXP->to_run__V1IB=0;
          __tmp__2I2G=__tmp__LNXP;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__2I2G=to_run__W1IB(__tmp__VI2G);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__2I2G=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__2I2G=to_run__DKEF(__tmp__VI2G);
      } break;
      };
      result__2H2G=__tmp__2I2G;
      self_up__LKEF=__tmp__4I2G;
    };
  };
  return(result__2H2G);
}

static void* get_slot__AP5G(__TYPE_FULL *Self__BP5G,void *n__CP5G)
// ({TYPE_FULL},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *__tmp__EP5G;
  void *__tmp__FP5G;
  __tmp__EP5G=Self__BP5G->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__EP5G)->__id) {
  case __TYPE__: {
    __tmp__FP5G=get_slot__U1BG(__tmp__EP5G,n__CP5G);
  } break;
  case __TYPE_NULL__: {
    __tmp__FP5G=get_slot__K3BG(__tmp__EP5G,n__CP5G);
  } break;
  case __TYPE_VOID__: {
    __tmp__FP5G=get_slot__A5BG(__tmp__EP5G,n__CP5G);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__FP5G=get_slot__WACG(__tmp__EP5G,n__CP5G);
  } break;
  case __TYPE_ID__: {
    __tmp__FP5G=get_slot__MCCG(__tmp__EP5G,n__CP5G);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__FP5G=get_slot__CECG(__tmp__EP5G,n__CP5G);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__FP5G=get_slot__VXEJ(n__CP5G);
  } break;
  };
  return(__tmp__FP5G);
}

static void* get_local_slot__1AFG(__TYPE_VOID *Self__2AFG,void *n__3AFG)
// ({TYPE_VOID},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *itm_slot__ABFG;
  void *result__BBFG,*__tmp__RBFG;
  __INTEGER j__5AFG,__tmp__OX4Q;
  void *__tmp__SBFG;
  void **__tmp__315Q;
  __BOOLEAN __tmp__VBFG;
  itm_slot__ABFG=NULL;
  result__BBFG=NULL;
  j__5AFG= 0;
  __tmp__OX4Q=((__FAST_ARRAYoSLOTo *)Self__2AFG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
  __tmp__315Q=((__FAST_ARRAYoSLOTo *)Self__2AFG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL;
  while_do__5EKG:
  {
    if ((j__5AFG <= __tmp__OX4Q)) {
      __tmp__RBFG=((void **)__tmp__315Q)[j__5AFG];
      if (((struct ___OBJ *)__tmp__RBFG)->__id==__SLOT_DATA__) {
        __tmp__SBFG=((__SLOT_DATA *)__tmp__RBFG)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
      } else {
        __tmp__SBFG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__RBFG)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
      };
      __tmp__VBFG=((void *)__tmp__SBFG != (void *)n__3AFG);
    } else {
      __tmp__VBFG=FALSE__;
    };
    if (__tmp__VBFG) {
      j__5AFG=(__INTEGER)(j__5AFG +  1);
      goto while_do__5EKG;
    };
  };
  if ((j__5AFG <= ((__FAST_ARRAYoSLOTo *)Self__2AFG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
    result__BBFG=((void **)((__FAST_ARRAYoSLOTo *)Self__2AFG->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__5AFG];
  } else {
    itm_slot__ABFG=fast_reference_at__UEQD(((__PROTOTYPE *)Self__2AFG->parent_type__UIB.prototype__RD)->slot_list__3IM,n__3AFG);
    if (((void *)itm_slot__ABFG != (void *)NULL)) {
      result__BBFG=create__type__ZU2F(itm_slot__ABFG,Self__2AFG);
      add_last__BV2F(Self__2AFG->parent_type__UIB.slot_run__1JC,result__BBFG);
    };
  };
  return(result__BBFG);
}

static void* get_local_slot__DDFG(__TYPE_CONTEXT *Self__EDFG,void *n__FDFG)
// ({TYPE_CONTEXT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *itm_slot__IDFG;
  void *result__JDFG,*__tmp__ZDFG;
  __INTEGER j__HDFG,__tmp__UX4Q;
  void *__tmp__0DFG;
  void **__tmp__415Q;
  __BOOLEAN __tmp__3DFG;
  itm_slot__IDFG=NULL;
  result__JDFG=NULL;
  j__HDFG= 0;
  __tmp__UX4Q=((__FAST_ARRAYoSLOTo *)Self__EDFG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
  __tmp__415Q=((__FAST_ARRAYoSLOTo *)Self__EDFG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL;
  while_do__VFKG:
  {
    if ((j__HDFG <= __tmp__UX4Q)) {
      __tmp__ZDFG=((void **)__tmp__415Q)[j__HDFG];
      if (((struct ___OBJ *)__tmp__ZDFG)->__id==__SLOT_DATA__) {
        __tmp__0DFG=((__SLOT_DATA *)__tmp__ZDFG)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
      } else {
        __tmp__0DFG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__ZDFG)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
      };
      __tmp__3DFG=((void *)__tmp__0DFG != (void *)n__FDFG);
    } else {
      __tmp__3DFG=FALSE__;
    };
    if (__tmp__3DFG) {
      j__HDFG=(__INTEGER)(j__HDFG +  1);
      goto while_do__VFKG;
    };
  };
  if ((j__HDFG <= ((__FAST_ARRAYoSLOTo *)Self__EDFG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
    result__JDFG=((void **)((__FAST_ARRAYoSLOTo *)Self__EDFG->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__HDFG];
  } else {
    itm_slot__IDFG=fast_reference_at__UEQD(((__PROTOTYPE *)Self__EDFG->parent_type__VIB.prototype__RD)->slot_list__3IM,n__FDFG);
    if (((void *)itm_slot__IDFG != (void *)NULL)) {
      result__JDFG=create__type__ZU2F(itm_slot__IDFG,Self__EDFG);
      add_last__BV2F(Self__EDFG->parent_type__VIB.slot_run__1JC,result__JDFG);
    };
  };
  return(result__JDFG);
}

static void* get_local_slot__LFFG(__TYPE_ID *Self__MFFG,void *n__NFFG)
// ({TYPE_ID},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *itm_slot__QFFG;
  void *result__RFFG,*__tmp__BGFG;
  __INTEGER j__PFFG,__tmp__0X4Q;
  void *__tmp__CGFG;
  void **__tmp__515Q;
  __BOOLEAN __tmp__FGFG;
  itm_slot__QFFG=NULL;
  result__RFFG=NULL;
  j__PFFG= 0;
  __tmp__0X4Q=((__FAST_ARRAYoSLOTo *)Self__MFFG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
  __tmp__515Q=((__FAST_ARRAYoSLOTo *)Self__MFFG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL;
  while_do__LGKG:
  {
    if ((j__PFFG <= __tmp__0X4Q)) {
      __tmp__BGFG=((void **)__tmp__515Q)[j__PFFG];
      if (((struct ___OBJ *)__tmp__BGFG)->__id==__SLOT_DATA__) {
        __tmp__CGFG=((__SLOT_DATA *)__tmp__BGFG)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
      } else {
        __tmp__CGFG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__BGFG)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
      };
      __tmp__FGFG=((void *)__tmp__CGFG != (void *)n__NFFG);
    } else {
      __tmp__FGFG=FALSE__;
    };
    if (__tmp__FGFG) {
      j__PFFG=(__INTEGER)(j__PFFG +  1);
      goto while_do__LGKG;
    };
  };
  if ((j__PFFG <= ((__FAST_ARRAYoSLOTo *)Self__MFFG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
    result__RFFG=((void **)((__FAST_ARRAYoSLOTo *)Self__MFFG->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__PFFG];
  } else {
    itm_slot__QFFG=fast_reference_at__UEQD(((__PROTOTYPE *)Self__MFFG->parent_type__WIB.prototype__RD)->slot_list__3IM,n__NFFG);
    if (((void *)itm_slot__QFFG != (void *)NULL)) {
      result__RFFG=create__type__ZU2F(itm_slot__QFFG,Self__MFFG);
      add_last__BV2F(Self__MFFG->parent_type__WIB.slot_run__1JC,result__RFFG);
    };
  };
  return(result__RFFG);
}

static void* get_local_slot__THFG(__TYPE_GENERIC *Self__UHFG,void *n__VHFG)
// ({TYPE_GENERIC},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *itm_slot__YHFG;
  void *result__ZHFG,*__tmp__JIFG;
  __INTEGER j__XHFG,__tmp__AY4Q;
  void *__tmp__KIFG;
  void **__tmp__A25Q;
  __BOOLEAN __tmp__NIFG;
  itm_slot__YHFG=NULL;
  result__ZHFG=NULL;
  j__XHFG= 0;
  __tmp__AY4Q=((__FAST_ARRAYoSLOTo *)Self__UHFG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL;
  __tmp__A25Q=((__FAST_ARRAYoSLOTo *)Self__UHFG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL;
  while_do__BHKG:
  {
    if ((j__XHFG <= __tmp__AY4Q)) {
      __tmp__JIFG=((void **)__tmp__A25Q)[j__XHFG];
      if (((struct ___OBJ *)__tmp__JIFG)->__id==__SLOT_DATA__) {
        __tmp__KIFG=((__SLOT_DATA *)__tmp__JIFG)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
      } else {
        __tmp__KIFG=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__JIFG)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
      };
      __tmp__NIFG=((void *)__tmp__KIFG != (void *)n__VHFG);
    } else {
      __tmp__NIFG=FALSE__;
    };
    if (__tmp__NIFG) {
      j__XHFG=(__INTEGER)(j__XHFG +  1);
      goto while_do__BHKG;
    };
  };
  if ((j__XHFG <= ((__FAST_ARRAYoSLOTo *)Self__UHFG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
    result__ZHFG=((void **)((__FAST_ARRAYoSLOTo *)Self__UHFG->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__XHFG];
  } else {
    itm_slot__YHFG=fast_reference_at__UEQD(((__PROTOTYPE *)Self__UHFG->parent_type__T2IB.prototype__RD)->slot_list__3IM,n__VHFG);
    if (((void *)itm_slot__YHFG != (void *)NULL)) {
      result__ZHFG=create__type__ZU2F(itm_slot__YHFG,Self__UHFG);
      add_last__BV2F(Self__UHFG->parent_type__T2IB.slot_run__1JC,result__ZHFG);
    };
  };
  return(result__ZHFG);
}

static void* to_strict__LE5D(__TYPE_FULL *Self__ME5D)
// ({TYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *result__OE5D;
  result__OE5D=NULL;
  if (((__UINTEGER_8)(Self__ME5D->flag__LTL &  1) !=  0)) {
    result__OE5D=Self__ME5D;
  } else {
    result__OE5D=get_with__HSAB(Self__ME5D,(__UINTEGER_8)(Self__ME5D->flag__LTL |  4));
  };
  return(result__OE5D);
}

static void* static_type__GIQG(__LIST *Self__HIQG)
// ({LIST}) With resultRecursive, No inlinable.
{
  void *__tmp__JIQG;
  void *__tmp__KIQG;
  __tmp__JIQG=last_expr__URRG(Self__HIQG);
  switch (((struct ___OBJ *)__tmp__JIQG)->__id) {
  case __LIST__: {
    __tmp__KIQG=static_type__GIQG(__tmp__JIQG);
  } break;
  case __STRING_CST__: {
    __tmp__KIQG=((__STRING_CST *)__tmp__JIQG)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__KIQG=((__EXTERNAL_C *)__tmp__JIQG)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__KIQG=((__PROTOTYPE_CST *)__tmp__JIQG)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__KIQG=((__INTEGER_CST *)__tmp__JIQG)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__KIQG=((__LOCAL *)((__READ_LOCAL *)__tmp__JIQG)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KIQG=static_type__0N1H(__tmp__JIQG);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KIQG=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KIQG=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__KIQG=((__REAL_CST *)__tmp__JIQG)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__KIQG=((__CHARACTER_CST *)__tmp__JIQG)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__KIQG=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__KIQG=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__KIQG=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__KIQG=static_type__MP1H(__tmp__JIQG);
  } break;
  case __EXPR_MUL__: {
    __tmp__KIQG=static_type__SP1H(__tmp__JIQG);
  } break;
  case __EXPR_DIV__: {
    __tmp__KIQG=static_type__XP1H(__tmp__JIQG);
  } break;
  case __EXPR_AND__: {
    __tmp__KIQG=static_type__2P1H(__tmp__JIQG);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KIQG=static_type__BQ1H(__tmp__JIQG);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KIQG=static_type__GQ1H(__tmp__JIQG);
  } break;
  case __PUT_TO__: {
    __tmp__KIQG=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__KIQG=static_type__PQ1H(__tmp__JIQG);
  } break;
  case __SIZE_OF__: {
    __tmp__KIQG=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__KIQG=((__CAST *)__tmp__JIQG)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__KIQG=static_type__GIKL(__tmp__JIQG);
  } break;
  case __READ_SLOT__: {
    __tmp__KIQG=((__SLOT_DATA *)((__READ_SLOT *)__tmp__JIQG)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__KIQG=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JIQG)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KIQG=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KIQG=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KIQG=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KIQG=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KIQG=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__KIQG=static_type__Z2IM(__tmp__JIQG);
  } break;
  case __EXPR_ADD__: {
    __tmp__KIQG=static_type__IXML(__tmp__JIQG);
  } break;
  case __EXPR_NOT__: {
    __tmp__KIQG=static_type__BTXM(__tmp__JIQG);
  } break;
  case __EXPR_MOD__: {
    __tmp__KIQG=static_type__5LEO(__tmp__JIQG);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KIQG=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__KIQG=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KIQG=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__KIQG=static_type__NOPN(__tmp__JIQG);
  } break;
  case __EXPR_XOR__: {
    __tmp__KIQG=static_type__XCSO(__tmp__JIQG);
  } break;
  };
  return(__tmp__KIQG);
}

static void* static_type__0N1H(__EXPR_MULTIPLE *Self__1N1H)
// ({EXPR_MULTIPLE}) With resultRecursive, No inlinable.
{
  void *__tmp__4N1H;
  void *__tmp__5N1H;
  __tmp__4N1H=((void **)((__FAST_ARRAYoEXPRo *)Self__1N1H->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
  switch (((struct ___OBJ *)__tmp__4N1H)->__id) {
  case __LIST__: {
    __tmp__5N1H=static_type__GIQG(__tmp__4N1H);
  } break;
  case __STRING_CST__: {
    __tmp__5N1H=((__STRING_CST *)__tmp__4N1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__5N1H=((__EXTERNAL_C *)__tmp__4N1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__5N1H=((__PROTOTYPE_CST *)__tmp__4N1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__5N1H=((__INTEGER_CST *)__tmp__4N1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__5N1H=((__LOCAL *)((__READ_LOCAL *)__tmp__4N1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__5N1H=static_type__0N1H(__tmp__4N1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__5N1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__5N1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__5N1H=((__REAL_CST *)__tmp__4N1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__5N1H=((__CHARACTER_CST *)__tmp__4N1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__5N1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__5N1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__5N1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__5N1H=static_type__MP1H(__tmp__4N1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__5N1H=static_type__SP1H(__tmp__4N1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__5N1H=static_type__XP1H(__tmp__4N1H);
  } break;
  case __EXPR_AND__: {
    __tmp__5N1H=static_type__2P1H(__tmp__4N1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__5N1H=static_type__BQ1H(__tmp__4N1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__5N1H=static_type__GQ1H(__tmp__4N1H);
  } break;
  case __PUT_TO__: {
    __tmp__5N1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__5N1H=static_type__PQ1H(__tmp__4N1H);
  } break;
  case __SIZE_OF__: {
    __tmp__5N1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__5N1H=((__CAST *)__tmp__4N1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__5N1H=static_type__GIKL(__tmp__4N1H);
  } break;
  case __READ_SLOT__: {
    __tmp__5N1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__4N1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__5N1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__4N1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__5N1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__5N1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__5N1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__5N1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__5N1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__5N1H=static_type__Z2IM(__tmp__4N1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__5N1H=static_type__IXML(__tmp__4N1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__5N1H=static_type__BTXM(__tmp__4N1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__5N1H=static_type__5LEO(__tmp__4N1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__5N1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__5N1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__5N1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__5N1H=static_type__NOPN(__tmp__4N1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__5N1H=static_type__XCSO(__tmp__4N1H);
  } break;
  };
  return(__tmp__5N1H);
}

static void* static_type__TO1H()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__WO1H;
  void *__tmp__XO1H;
  __tmp__WO1H=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__WO1H)->__id) {
  case __TYPE__: {
    __tmp__XO1H=((__TYPE *)__tmp__WO1H)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__XO1H=((__TYPE_NULL *)__tmp__WO1H)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__XO1H=((__TYPE_VOID *)__tmp__WO1H)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__XO1H=((__TYPE_CONTEXT *)__tmp__WO1H)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__XO1H=((__TYPE_ID *)__tmp__WO1H)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__XO1H=((__TYPE_GENERIC *)__tmp__WO1H)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__XO1H=((__PROFIL_BLOCK *)__tmp__WO1H)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__XO1H);
}

static void* static_type__YO1H()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__1O1H;
  void *__tmp__2O1H;
  __tmp__1O1H=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__1O1H)->__id) {
  case __TYPE__: {
    __tmp__2O1H=((__TYPE *)__tmp__1O1H)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__2O1H=((__TYPE_NULL *)__tmp__1O1H)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__2O1H=((__TYPE_VOID *)__tmp__1O1H)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__2O1H=((__TYPE_CONTEXT *)__tmp__1O1H)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__2O1H=((__TYPE_ID *)__tmp__1O1H)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__2O1H=((__TYPE_GENERIC *)__tmp__1O1H)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__2O1H=((__PROFIL_BLOCK *)__tmp__1O1H)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__2O1H);
}

static void* static_type__3O1H()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__AP1H;
  void *__tmp__BP1H;
  __tmp__AP1H=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__AP1H)->__id) {
  case __TYPE__: {
    __tmp__BP1H=((__TYPE *)__tmp__AP1H)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__BP1H=((__TYPE_NULL *)__tmp__AP1H)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__BP1H=((__TYPE_VOID *)__tmp__AP1H)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__BP1H=((__TYPE_CONTEXT *)__tmp__AP1H)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__BP1H=((__TYPE_ID *)__tmp__AP1H)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__BP1H=((__TYPE_GENERIC *)__tmp__AP1H)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__BP1H=((__PROFIL_BLOCK *)__tmp__AP1H)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__BP1H);
}

static void* static_type__CP1H()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__FP1H;
  void *__tmp__GP1H;
  __tmp__FP1H=type_integer__3JB;
  switch (((struct ___OBJ *)__tmp__FP1H)->__id) {
  case __TYPE__: {
    __tmp__GP1H=((__TYPE *)__tmp__FP1H)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__GP1H=((__TYPE_NULL *)__tmp__FP1H)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__GP1H=((__TYPE_VOID *)__tmp__FP1H)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__GP1H=((__TYPE_CONTEXT *)__tmp__FP1H)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__GP1H=((__TYPE_ID *)__tmp__FP1H)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__GP1H=((__TYPE_GENERIC *)__tmp__FP1H)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__GP1H=((__PROFIL_BLOCK *)__tmp__FP1H)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__GP1H);
}

static void* static_type__HP1H()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__KP1H;
  void *__tmp__LP1H;
  __tmp__KP1H=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__KP1H)->__id) {
  case __TYPE__: {
    __tmp__LP1H=((__TYPE *)__tmp__KP1H)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__LP1H=((__TYPE_NULL *)__tmp__KP1H)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__LP1H=((__TYPE_VOID *)__tmp__KP1H)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__LP1H=((__TYPE_CONTEXT *)__tmp__KP1H)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__LP1H=((__TYPE_ID *)__tmp__KP1H)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__LP1H=((__TYPE_GENERIC *)__tmp__KP1H)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__LP1H=((__PROFIL_BLOCK *)__tmp__KP1H)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__LP1H);
}

static void* static_type__MP1H(__EXPR_SUB *Self__NP1H)
// ({EXPR_SUB}) With resultRecursive, No inlinable.
{
  void *__tmp__QP1H;
  void *__tmp__RP1H;
  __tmp__QP1H=Self__NP1H->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__QP1H)->__id) {
  case __LIST__: {
    __tmp__RP1H=static_type__GIQG(__tmp__QP1H);
  } break;
  case __STRING_CST__: {
    __tmp__RP1H=((__STRING_CST *)__tmp__QP1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__RP1H=((__EXTERNAL_C *)__tmp__QP1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__RP1H=((__PROTOTYPE_CST *)__tmp__QP1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__RP1H=((__INTEGER_CST *)__tmp__QP1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__RP1H=((__LOCAL *)((__READ_LOCAL *)__tmp__QP1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RP1H=static_type__0N1H(__tmp__QP1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RP1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RP1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__RP1H=((__REAL_CST *)__tmp__QP1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__RP1H=((__CHARACTER_CST *)__tmp__QP1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__RP1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__RP1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__RP1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__RP1H=static_type__MP1H(__tmp__QP1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__RP1H=static_type__SP1H(__tmp__QP1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__RP1H=static_type__XP1H(__tmp__QP1H);
  } break;
  case __EXPR_AND__: {
    __tmp__RP1H=static_type__2P1H(__tmp__QP1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RP1H=static_type__BQ1H(__tmp__QP1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RP1H=static_type__GQ1H(__tmp__QP1H);
  } break;
  case __PUT_TO__: {
    __tmp__RP1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__RP1H=static_type__PQ1H(__tmp__QP1H);
  } break;
  case __SIZE_OF__: {
    __tmp__RP1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__RP1H=((__CAST *)__tmp__QP1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__RP1H=static_type__GIKL(__tmp__QP1H);
  } break;
  case __READ_SLOT__: {
    __tmp__RP1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__QP1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__RP1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__QP1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RP1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RP1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RP1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RP1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RP1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__RP1H=static_type__Z2IM(__tmp__QP1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__RP1H=static_type__IXML(__tmp__QP1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__RP1H=static_type__BTXM(__tmp__QP1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__RP1H=static_type__5LEO(__tmp__QP1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RP1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__RP1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RP1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__RP1H=static_type__NOPN(__tmp__QP1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__RP1H=static_type__XCSO(__tmp__QP1H);
  } break;
  };
  return(__tmp__RP1H);
}

static void* static_type__SP1H(__EXPR_MUL *Self__TP1H)
// ({EXPR_MUL}) With resultRecursive, No inlinable.
{
  void *__tmp__VP1H;
  void *__tmp__WP1H;
  __tmp__VP1H=Self__TP1H->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__VP1H)->__id) {
  case __LIST__: {
    __tmp__WP1H=static_type__GIQG(__tmp__VP1H);
  } break;
  case __STRING_CST__: {
    __tmp__WP1H=((__STRING_CST *)__tmp__VP1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__WP1H=((__EXTERNAL_C *)__tmp__VP1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__WP1H=((__PROTOTYPE_CST *)__tmp__VP1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__WP1H=((__INTEGER_CST *)__tmp__VP1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__WP1H=((__LOCAL *)((__READ_LOCAL *)__tmp__VP1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WP1H=static_type__0N1H(__tmp__VP1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WP1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WP1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__WP1H=((__REAL_CST *)__tmp__VP1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__WP1H=((__CHARACTER_CST *)__tmp__VP1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__WP1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WP1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__WP1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__WP1H=static_type__MP1H(__tmp__VP1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__WP1H=static_type__SP1H(__tmp__VP1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__WP1H=static_type__XP1H(__tmp__VP1H);
  } break;
  case __EXPR_AND__: {
    __tmp__WP1H=static_type__2P1H(__tmp__VP1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WP1H=static_type__BQ1H(__tmp__VP1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WP1H=static_type__GQ1H(__tmp__VP1H);
  } break;
  case __PUT_TO__: {
    __tmp__WP1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__WP1H=static_type__PQ1H(__tmp__VP1H);
  } break;
  case __SIZE_OF__: {
    __tmp__WP1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__WP1H=((__CAST *)__tmp__VP1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__WP1H=static_type__GIKL(__tmp__VP1H);
  } break;
  case __READ_SLOT__: {
    __tmp__WP1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VP1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__WP1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VP1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WP1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WP1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WP1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WP1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WP1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__WP1H=static_type__Z2IM(__tmp__VP1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__WP1H=static_type__IXML(__tmp__VP1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__WP1H=static_type__BTXM(__tmp__VP1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__WP1H=static_type__5LEO(__tmp__VP1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WP1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__WP1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WP1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__WP1H=static_type__NOPN(__tmp__VP1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__WP1H=static_type__XCSO(__tmp__VP1H);
  } break;
  };
  return(__tmp__WP1H);
}

static void* static_type__XP1H(__EXPR_DIV *Self__YP1H)
// ({EXPR_DIV}) With resultRecursive, No inlinable.
{
  void *__tmp__0P1H;
  void *__tmp__1P1H;
  __tmp__0P1H=Self__YP1H->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__0P1H)->__id) {
  case __LIST__: {
    __tmp__1P1H=static_type__GIQG(__tmp__0P1H);
  } break;
  case __STRING_CST__: {
    __tmp__1P1H=((__STRING_CST *)__tmp__0P1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1P1H=((__EXTERNAL_C *)__tmp__0P1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__1P1H=((__PROTOTYPE_CST *)__tmp__0P1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__1P1H=((__INTEGER_CST *)__tmp__0P1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__1P1H=((__LOCAL *)((__READ_LOCAL *)__tmp__0P1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1P1H=static_type__0N1H(__tmp__0P1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1P1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1P1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__1P1H=((__REAL_CST *)__tmp__0P1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__1P1H=((__CHARACTER_CST *)__tmp__0P1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__1P1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1P1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__1P1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__1P1H=static_type__MP1H(__tmp__0P1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__1P1H=static_type__SP1H(__tmp__0P1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__1P1H=static_type__XP1H(__tmp__0P1H);
  } break;
  case __EXPR_AND__: {
    __tmp__1P1H=static_type__2P1H(__tmp__0P1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1P1H=static_type__BQ1H(__tmp__0P1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1P1H=static_type__GQ1H(__tmp__0P1H);
  } break;
  case __PUT_TO__: {
    __tmp__1P1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__1P1H=static_type__PQ1H(__tmp__0P1H);
  } break;
  case __SIZE_OF__: {
    __tmp__1P1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__1P1H=((__CAST *)__tmp__0P1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__1P1H=static_type__GIKL(__tmp__0P1H);
  } break;
  case __READ_SLOT__: {
    __tmp__1P1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0P1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__1P1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0P1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1P1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1P1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1P1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1P1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1P1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__1P1H=static_type__Z2IM(__tmp__0P1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__1P1H=static_type__IXML(__tmp__0P1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__1P1H=static_type__BTXM(__tmp__0P1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__1P1H=static_type__5LEO(__tmp__0P1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1P1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__1P1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1P1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__1P1H=static_type__NOPN(__tmp__0P1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__1P1H=static_type__XCSO(__tmp__0P1H);
  } break;
  };
  return(__tmp__1P1H);
}

static void* static_type__2P1H(__EXPR_AND *Self__3P1H)
// ({EXPR_AND}) With resultRecursive, No inlinable.
{
  void *__tmp__5P1H;
  void *__tmp__AQ1H;
  __tmp__5P1H=Self__3P1H->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__5P1H)->__id) {
  case __LIST__: {
    __tmp__AQ1H=static_type__GIQG(__tmp__5P1H);
  } break;
  case __STRING_CST__: {
    __tmp__AQ1H=((__STRING_CST *)__tmp__5P1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__AQ1H=((__EXTERNAL_C *)__tmp__5P1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__AQ1H=((__PROTOTYPE_CST *)__tmp__5P1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__AQ1H=((__INTEGER_CST *)__tmp__5P1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__AQ1H=((__LOCAL *)((__READ_LOCAL *)__tmp__5P1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__AQ1H=static_type__0N1H(__tmp__5P1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__AQ1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__AQ1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__AQ1H=((__REAL_CST *)__tmp__5P1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__AQ1H=((__CHARACTER_CST *)__tmp__5P1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__AQ1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__AQ1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__AQ1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__AQ1H=static_type__MP1H(__tmp__5P1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__AQ1H=static_type__SP1H(__tmp__5P1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__AQ1H=static_type__XP1H(__tmp__5P1H);
  } break;
  case __EXPR_AND__: {
    __tmp__AQ1H=static_type__2P1H(__tmp__5P1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__AQ1H=static_type__BQ1H(__tmp__5P1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__AQ1H=static_type__GQ1H(__tmp__5P1H);
  } break;
  case __PUT_TO__: {
    __tmp__AQ1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__AQ1H=static_type__PQ1H(__tmp__5P1H);
  } break;
  case __SIZE_OF__: {
    __tmp__AQ1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__AQ1H=((__CAST *)__tmp__5P1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__AQ1H=static_type__GIKL(__tmp__5P1H);
  } break;
  case __READ_SLOT__: {
    __tmp__AQ1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__5P1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__AQ1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__5P1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__AQ1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__AQ1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__AQ1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__AQ1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__AQ1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__AQ1H=static_type__Z2IM(__tmp__5P1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__AQ1H=static_type__IXML(__tmp__5P1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__AQ1H=static_type__BTXM(__tmp__5P1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__AQ1H=static_type__5LEO(__tmp__5P1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__AQ1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__AQ1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__AQ1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__AQ1H=static_type__NOPN(__tmp__5P1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__AQ1H=static_type__XCSO(__tmp__5P1H);
  } break;
  };
  return(__tmp__AQ1H);
}

static void* static_type__BQ1H(__EXPR_SHIFT_R *Self__CQ1H)
// ({EXPR_SHIFT_R}) With resultRecursive, No inlinable.
{
  void *__tmp__EQ1H;
  void *__tmp__FQ1H;
  __tmp__EQ1H=Self__CQ1H->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__EQ1H)->__id) {
  case __LIST__: {
    __tmp__FQ1H=static_type__GIQG(__tmp__EQ1H);
  } break;
  case __STRING_CST__: {
    __tmp__FQ1H=((__STRING_CST *)__tmp__EQ1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__FQ1H=((__EXTERNAL_C *)__tmp__EQ1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__FQ1H=((__PROTOTYPE_CST *)__tmp__EQ1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__FQ1H=((__INTEGER_CST *)__tmp__EQ1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__FQ1H=((__LOCAL *)((__READ_LOCAL *)__tmp__EQ1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FQ1H=static_type__0N1H(__tmp__EQ1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FQ1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FQ1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__FQ1H=((__REAL_CST *)__tmp__EQ1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__FQ1H=((__CHARACTER_CST *)__tmp__EQ1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__FQ1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FQ1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__FQ1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__FQ1H=static_type__MP1H(__tmp__EQ1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__FQ1H=static_type__SP1H(__tmp__EQ1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__FQ1H=static_type__XP1H(__tmp__EQ1H);
  } break;
  case __EXPR_AND__: {
    __tmp__FQ1H=static_type__2P1H(__tmp__EQ1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FQ1H=static_type__BQ1H(__tmp__EQ1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FQ1H=static_type__GQ1H(__tmp__EQ1H);
  } break;
  case __PUT_TO__: {
    __tmp__FQ1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__FQ1H=static_type__PQ1H(__tmp__EQ1H);
  } break;
  case __SIZE_OF__: {
    __tmp__FQ1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__FQ1H=((__CAST *)__tmp__EQ1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__FQ1H=static_type__GIKL(__tmp__EQ1H);
  } break;
  case __READ_SLOT__: {
    __tmp__FQ1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__EQ1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__FQ1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__EQ1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FQ1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FQ1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FQ1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FQ1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FQ1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__FQ1H=static_type__Z2IM(__tmp__EQ1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__FQ1H=static_type__IXML(__tmp__EQ1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__FQ1H=static_type__BTXM(__tmp__EQ1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__FQ1H=static_type__5LEO(__tmp__EQ1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FQ1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__FQ1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FQ1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__FQ1H=static_type__NOPN(__tmp__EQ1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__FQ1H=static_type__XCSO(__tmp__EQ1H);
  } break;
  };
  return(__tmp__FQ1H);
}

static void* static_type__GQ1H(__EXPR_SHIFT_L *Self__HQ1H)
// ({EXPR_SHIFT_L}) With resultRecursive, No inlinable.
{
  void *__tmp__JQ1H;
  void *__tmp__KQ1H;
  __tmp__JQ1H=Self__HQ1H->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__JQ1H)->__id) {
  case __LIST__: {
    __tmp__KQ1H=static_type__GIQG(__tmp__JQ1H);
  } break;
  case __STRING_CST__: {
    __tmp__KQ1H=((__STRING_CST *)__tmp__JQ1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__KQ1H=((__EXTERNAL_C *)__tmp__JQ1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__KQ1H=((__PROTOTYPE_CST *)__tmp__JQ1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__KQ1H=((__INTEGER_CST *)__tmp__JQ1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__KQ1H=((__LOCAL *)((__READ_LOCAL *)__tmp__JQ1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KQ1H=static_type__0N1H(__tmp__JQ1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KQ1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KQ1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__KQ1H=((__REAL_CST *)__tmp__JQ1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__KQ1H=((__CHARACTER_CST *)__tmp__JQ1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__KQ1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__KQ1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__KQ1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__KQ1H=static_type__MP1H(__tmp__JQ1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__KQ1H=static_type__SP1H(__tmp__JQ1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__KQ1H=static_type__XP1H(__tmp__JQ1H);
  } break;
  case __EXPR_AND__: {
    __tmp__KQ1H=static_type__2P1H(__tmp__JQ1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KQ1H=static_type__BQ1H(__tmp__JQ1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KQ1H=static_type__GQ1H(__tmp__JQ1H);
  } break;
  case __PUT_TO__: {
    __tmp__KQ1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__KQ1H=static_type__PQ1H(__tmp__JQ1H);
  } break;
  case __SIZE_OF__: {
    __tmp__KQ1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__KQ1H=((__CAST *)__tmp__JQ1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__KQ1H=static_type__GIKL(__tmp__JQ1H);
  } break;
  case __READ_SLOT__: {
    __tmp__KQ1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__JQ1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__KQ1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JQ1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KQ1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KQ1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KQ1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KQ1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KQ1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__KQ1H=static_type__Z2IM(__tmp__JQ1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__KQ1H=static_type__IXML(__tmp__JQ1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__KQ1H=static_type__BTXM(__tmp__JQ1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__KQ1H=static_type__5LEO(__tmp__JQ1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KQ1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__KQ1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KQ1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__KQ1H=static_type__NOPN(__tmp__JQ1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__KQ1H=static_type__XCSO(__tmp__JQ1H);
  } break;
  };
  return(__tmp__KQ1H);
}

static void* static_type__PQ1H(__ITEM *Self__QQ1H)
// ({ITEM}) With resultRecursive, No inlinable.
{
  void *__tmp__UQ1H;
  void *__tmp__VQ1H;
  void *__tmp__XQ1H;
  void *__tmp__YQ1H,*t__SQ1H;
  __tmp__UQ1H=Self__QQ1H->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__UQ1H)->__id) {
  case __LIST__: {
    __tmp__VQ1H=static_type__GIQG(__tmp__UQ1H);
  } break;
  case __STRING_CST__: {
    __tmp__VQ1H=((__STRING_CST *)__tmp__UQ1H)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__VQ1H=((__EXTERNAL_C *)__tmp__UQ1H)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__VQ1H=((__PROTOTYPE_CST *)__tmp__UQ1H)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__VQ1H=((__INTEGER_CST *)__tmp__UQ1H)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__VQ1H=((__LOCAL *)((__READ_LOCAL *)__tmp__UQ1H)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__VQ1H=static_type__0N1H(__tmp__UQ1H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__VQ1H=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__VQ1H=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__VQ1H=((__REAL_CST *)__tmp__UQ1H)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__VQ1H=((__CHARACTER_CST *)__tmp__UQ1H)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__VQ1H=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__VQ1H=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__VQ1H=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__VQ1H=static_type__MP1H(__tmp__UQ1H);
  } break;
  case __EXPR_MUL__: {
    __tmp__VQ1H=static_type__SP1H(__tmp__UQ1H);
  } break;
  case __EXPR_DIV__: {
    __tmp__VQ1H=static_type__XP1H(__tmp__UQ1H);
  } break;
  case __EXPR_AND__: {
    __tmp__VQ1H=static_type__2P1H(__tmp__UQ1H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__VQ1H=static_type__BQ1H(__tmp__UQ1H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__VQ1H=static_type__GQ1H(__tmp__UQ1H);
  } break;
  case __PUT_TO__: {
    __tmp__VQ1H=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__VQ1H=static_type__PQ1H(__tmp__UQ1H);
  } break;
  case __SIZE_OF__: {
    __tmp__VQ1H=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__VQ1H=((__CAST *)__tmp__UQ1H)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__VQ1H=static_type__GIKL(__tmp__UQ1H);
  } break;
  case __READ_SLOT__: {
    __tmp__VQ1H=((__SLOT_DATA *)((__READ_SLOT *)__tmp__UQ1H)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__VQ1H=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__UQ1H)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__VQ1H=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__VQ1H=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__VQ1H=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__VQ1H=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__VQ1H=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__VQ1H=static_type__Z2IM(__tmp__UQ1H);
  } break;
  case __EXPR_ADD__: {
    __tmp__VQ1H=static_type__IXML(__tmp__UQ1H);
  } break;
  case __EXPR_NOT__: {
    __tmp__VQ1H=static_type__BTXM(__tmp__UQ1H);
  } break;
  case __EXPR_MOD__: {
    __tmp__VQ1H=static_type__5LEO(__tmp__UQ1H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__VQ1H=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__VQ1H=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__VQ1H=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__VQ1H=static_type__NOPN(__tmp__UQ1H);
  } break;
  case __EXPR_XOR__: {
    __tmp__VQ1H=static_type__XCSO(__tmp__UQ1H);
  } break;
  };
  __tmp__XQ1H=((__TYPE_FULL *)__tmp__VQ1H)->parent_type__KTL;
  if (__tmp__XQ1H==NULL) {
    __tmp__YQ1H=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__XQ1H)->__id) {
    case __TYPE__: {
      __tmp__YQ1H=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__YQ1H=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__YQ1H=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__YQ1H=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__YQ1H=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__YQ1H=((void *)__tmp__XQ1H);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__YQ1H=NULL;
    } break;
    }
  };
  t__SQ1H=__tmp__YQ1H;
  return(((void **)((__FAST_ARRAYoTYPE_FULLo *)((__TYPE_GENERIC *)__tmp__YQ1H)->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0]);
}

static void* static_type__1Q1H()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__4Q1H;
  void *__tmp__5Q1H;
  __tmp__4Q1H=type_integer__3JB;
  switch (((struct ___OBJ *)__tmp__4Q1H)->__id) {
  case __TYPE__: {
    __tmp__5Q1H=((__TYPE *)__tmp__4Q1H)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__5Q1H=((__TYPE_NULL *)__tmp__4Q1H)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__5Q1H=((__TYPE_VOID *)__tmp__4Q1H)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__5Q1H=((__TYPE_CONTEXT *)__tmp__4Q1H)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__5Q1H=((__TYPE_ID *)__tmp__4Q1H)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__5Q1H=((__TYPE_GENERIC *)__tmp__4Q1H)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__5Q1H=((__PROFIL_BLOCK *)__tmp__4Q1H)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__5Q1H);
}

static void* static_type__GIKL(__CALL_SLOT *Self__HIKL)
// ({CALL_SLOT}) With resultNo recursive, No inlinable.
{
  void *result__JIKL,*__tmp__RIKL;
  void *__tmp__QIKL;
  void *__tmp__XIKL;
  void *__tmp__YIKL;
  result__JIKL=NULL;
  if (is_interrupt__2MQL(Self__HIKL)) {
    __tmp__QIKL=type_pointer__HLB;
    switch (((struct ___OBJ *)__tmp__QIKL)->__id) {
    case __TYPE__: {
      __tmp__RIKL=((__TYPE *)__tmp__QIKL)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__RIKL=((__TYPE_NULL *)__tmp__QIKL)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__RIKL=((__TYPE_VOID *)__tmp__QIKL)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__RIKL=((__TYPE_CONTEXT *)__tmp__QIKL)->parent_type__VIB.default__AKC;
    } break;
    case __TYPE_ID__: {
      __tmp__RIKL=((__TYPE_ID *)__tmp__QIKL)->parent_type__WIB.default__AKC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__RIKL=((__TYPE_GENERIC *)__tmp__QIKL)->parent_type__T2IB.default__AKC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__RIKL=((__PROFIL_BLOCK *)__tmp__QIKL)->parent_type__HHAG.default__AKC;
    } break;
    };
    result__JIKL=__tmp__RIKL;
  } else {
    __tmp__XIKL=Self__HIKL->profil__QA2H;
    if (((struct ___OBJ *)__tmp__XIKL)->__id==__PROFIL_SLOT__) {
      __tmp__YIKL=((__PROFIL_SLOT *)__tmp__XIKL)->parent_profil__51LC.result_last__XGKH;
    } else {
      __tmp__YIKL=((__PROFIL_BLOCK *)__tmp__XIKL)->parent_profil__GHAG.result_last__XGKH;
    };
    if (((void *)__tmp__YIKL != (void *)NULL)) {
      result__JIKL=((__LOCAL *)__tmp__YIKL)->parent_variable__B2LC.type__125F;
    } else {
      result__JIKL=TYPE_VOID__->parent_type__UIB.default__AKC;
    };
  };
  return(result__JIKL);
}

static void* static_type__JRZM()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__MRZM;
  void *__tmp__NRZM;
  __tmp__MRZM=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__MRZM)->__id) {
  case __TYPE__: {
    __tmp__NRZM=((__TYPE *)__tmp__MRZM)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__NRZM=((__TYPE_NULL *)__tmp__MRZM)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__NRZM=((__TYPE_VOID *)__tmp__MRZM)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__NRZM=((__TYPE_CONTEXT *)__tmp__MRZM)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__NRZM=((__TYPE_ID *)__tmp__MRZM)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__NRZM=((__TYPE_GENERIC *)__tmp__MRZM)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__NRZM=((__PROFIL_BLOCK *)__tmp__MRZM)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__NRZM);
}

static void* static_type__VLEO()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__YLEO;
  void *__tmp__ZLEO;
  __tmp__YLEO=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__YLEO)->__id) {
  case __TYPE__: {
    __tmp__ZLEO=((__TYPE *)__tmp__YLEO)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__ZLEO=((__TYPE_NULL *)__tmp__YLEO)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__ZLEO=((__TYPE_VOID *)__tmp__YLEO)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__ZLEO=((__TYPE_CONTEXT *)__tmp__YLEO)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__ZLEO=((__TYPE_ID *)__tmp__YLEO)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__ZLEO=((__TYPE_GENERIC *)__tmp__YLEO)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__ZLEO=((__PROFIL_BLOCK *)__tmp__YLEO)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__ZLEO);
}

static void* static_type__LVIO()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__OVIO;
  void *__tmp__PVIO;
  __tmp__OVIO=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__OVIO)->__id) {
  case __TYPE__: {
    __tmp__PVIO=((__TYPE *)__tmp__OVIO)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__PVIO=((__TYPE_NULL *)__tmp__OVIO)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__PVIO=((__TYPE_VOID *)__tmp__OVIO)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__PVIO=((__TYPE_CONTEXT *)__tmp__OVIO)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__PVIO=((__TYPE_ID *)__tmp__OVIO)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__PVIO=((__TYPE_GENERIC *)__tmp__OVIO)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__PVIO=((__PROFIL_BLOCK *)__tmp__OVIO)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__PVIO);
}

static void* static_type__0LEO()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__3LEO;
  void *__tmp__4LEO;
  __tmp__3LEO=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__3LEO)->__id) {
  case __TYPE__: {
    __tmp__4LEO=((__TYPE *)__tmp__3LEO)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__4LEO=((__TYPE_NULL *)__tmp__3LEO)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__4LEO=((__TYPE_VOID *)__tmp__3LEO)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__4LEO=((__TYPE_CONTEXT *)__tmp__3LEO)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__4LEO=((__TYPE_ID *)__tmp__3LEO)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__4LEO=((__TYPE_GENERIC *)__tmp__3LEO)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__4LEO=((__PROFIL_BLOCK *)__tmp__3LEO)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__4LEO);
}

static void* static_type__RVIO()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__UVIO;
  void *__tmp__VVIO;
  __tmp__UVIO=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__UVIO)->__id) {
  case __TYPE__: {
    __tmp__VVIO=((__TYPE *)__tmp__UVIO)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__VVIO=((__TYPE_NULL *)__tmp__UVIO)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__VVIO=((__TYPE_VOID *)__tmp__UVIO)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__VVIO=((__TYPE_CONTEXT *)__tmp__UVIO)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__VVIO=((__TYPE_ID *)__tmp__UVIO)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__VVIO=((__TYPE_GENERIC *)__tmp__UVIO)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__VVIO=((__PROFIL_BLOCK *)__tmp__UVIO)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__VVIO);
}

static void* static_type__Z2IM(__EXPR_NEG *Self__02IM)
// ({EXPR_NEG}) With resultRecursive, No inlinable.
{
  void *__tmp__22IM;
  void *__tmp__32IM;
  __tmp__22IM=Self__02IM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__22IM)->__id) {
  case __LIST__: {
    __tmp__32IM=static_type__GIQG(__tmp__22IM);
  } break;
  case __STRING_CST__: {
    __tmp__32IM=((__STRING_CST *)__tmp__22IM)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__32IM=((__EXTERNAL_C *)__tmp__22IM)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__32IM=((__PROTOTYPE_CST *)__tmp__22IM)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__32IM=((__INTEGER_CST *)__tmp__22IM)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__32IM=((__LOCAL *)((__READ_LOCAL *)__tmp__22IM)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__32IM=static_type__0N1H(__tmp__22IM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__32IM=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__32IM=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__32IM=((__REAL_CST *)__tmp__22IM)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__32IM=((__CHARACTER_CST *)__tmp__22IM)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__32IM=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__32IM=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__32IM=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__32IM=static_type__MP1H(__tmp__22IM);
  } break;
  case __EXPR_MUL__: {
    __tmp__32IM=static_type__SP1H(__tmp__22IM);
  } break;
  case __EXPR_DIV__: {
    __tmp__32IM=static_type__XP1H(__tmp__22IM);
  } break;
  case __EXPR_AND__: {
    __tmp__32IM=static_type__2P1H(__tmp__22IM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__32IM=static_type__BQ1H(__tmp__22IM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__32IM=static_type__GQ1H(__tmp__22IM);
  } break;
  case __PUT_TO__: {
    __tmp__32IM=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__32IM=static_type__PQ1H(__tmp__22IM);
  } break;
  case __SIZE_OF__: {
    __tmp__32IM=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__32IM=((__CAST *)__tmp__22IM)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__32IM=static_type__GIKL(__tmp__22IM);
  } break;
  case __READ_SLOT__: {
    __tmp__32IM=((__SLOT_DATA *)((__READ_SLOT *)__tmp__22IM)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__32IM=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__22IM)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__32IM=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__32IM=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__32IM=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__32IM=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__32IM=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__32IM=static_type__Z2IM(__tmp__22IM);
  } break;
  case __EXPR_ADD__: {
    __tmp__32IM=static_type__IXML(__tmp__22IM);
  } break;
  case __EXPR_NOT__: {
    __tmp__32IM=static_type__BTXM(__tmp__22IM);
  } break;
  case __EXPR_MOD__: {
    __tmp__32IM=static_type__5LEO(__tmp__22IM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__32IM=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__32IM=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__32IM=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__32IM=static_type__NOPN(__tmp__22IM);
  } break;
  case __EXPR_XOR__: {
    __tmp__32IM=static_type__XCSO(__tmp__22IM);
  } break;
  };
  return(__tmp__32IM);
}

static void* static_type__IXML(__EXPR_ADD *Self__JXML)
// ({EXPR_ADD}) With resultRecursive, No inlinable.
{
  void *__tmp__LXML;
  void *__tmp__MXML;
  __tmp__LXML=Self__JXML->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__LXML)->__id) {
  case __LIST__: {
    __tmp__MXML=static_type__GIQG(__tmp__LXML);
  } break;
  case __STRING_CST__: {
    __tmp__MXML=((__STRING_CST *)__tmp__LXML)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__MXML=((__EXTERNAL_C *)__tmp__LXML)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__MXML=((__PROTOTYPE_CST *)__tmp__LXML)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__MXML=((__INTEGER_CST *)__tmp__LXML)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__MXML=((__LOCAL *)((__READ_LOCAL *)__tmp__LXML)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MXML=static_type__0N1H(__tmp__LXML);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MXML=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MXML=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__MXML=((__REAL_CST *)__tmp__LXML)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__MXML=((__CHARACTER_CST *)__tmp__LXML)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__MXML=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__MXML=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__MXML=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__MXML=static_type__MP1H(__tmp__LXML);
  } break;
  case __EXPR_MUL__: {
    __tmp__MXML=static_type__SP1H(__tmp__LXML);
  } break;
  case __EXPR_DIV__: {
    __tmp__MXML=static_type__XP1H(__tmp__LXML);
  } break;
  case __EXPR_AND__: {
    __tmp__MXML=static_type__2P1H(__tmp__LXML);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MXML=static_type__BQ1H(__tmp__LXML);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MXML=static_type__GQ1H(__tmp__LXML);
  } break;
  case __PUT_TO__: {
    __tmp__MXML=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__MXML=static_type__PQ1H(__tmp__LXML);
  } break;
  case __SIZE_OF__: {
    __tmp__MXML=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__MXML=((__CAST *)__tmp__LXML)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__MXML=static_type__GIKL(__tmp__LXML);
  } break;
  case __READ_SLOT__: {
    __tmp__MXML=((__SLOT_DATA *)((__READ_SLOT *)__tmp__LXML)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__MXML=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__LXML)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MXML=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MXML=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MXML=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MXML=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MXML=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__MXML=static_type__Z2IM(__tmp__LXML);
  } break;
  case __EXPR_ADD__: {
    __tmp__MXML=static_type__IXML(__tmp__LXML);
  } break;
  case __EXPR_NOT__: {
    __tmp__MXML=static_type__BTXM(__tmp__LXML);
  } break;
  case __EXPR_MOD__: {
    __tmp__MXML=static_type__5LEO(__tmp__LXML);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MXML=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__MXML=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MXML=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__MXML=static_type__NOPN(__tmp__LXML);
  } break;
  case __EXPR_XOR__: {
    __tmp__MXML=static_type__XCSO(__tmp__LXML);
  } break;
  };
  return(__tmp__MXML);
}

static void* static_type__BTXM(__EXPR_NOT *Self__CTXM)
// ({EXPR_NOT}) With resultRecursive, No inlinable.
{
  void *__tmp__ETXM;
  void *__tmp__FTXM;
  __tmp__ETXM=Self__CTXM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__ETXM)->__id) {
  case __LIST__: {
    __tmp__FTXM=static_type__GIQG(__tmp__ETXM);
  } break;
  case __STRING_CST__: {
    __tmp__FTXM=((__STRING_CST *)__tmp__ETXM)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__FTXM=((__EXTERNAL_C *)__tmp__ETXM)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__FTXM=((__PROTOTYPE_CST *)__tmp__ETXM)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__FTXM=((__INTEGER_CST *)__tmp__ETXM)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__FTXM=((__LOCAL *)((__READ_LOCAL *)__tmp__ETXM)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FTXM=static_type__0N1H(__tmp__ETXM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FTXM=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FTXM=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__FTXM=((__REAL_CST *)__tmp__ETXM)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__FTXM=((__CHARACTER_CST *)__tmp__ETXM)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__FTXM=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FTXM=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__FTXM=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__FTXM=static_type__MP1H(__tmp__ETXM);
  } break;
  case __EXPR_MUL__: {
    __tmp__FTXM=static_type__SP1H(__tmp__ETXM);
  } break;
  case __EXPR_DIV__: {
    __tmp__FTXM=static_type__XP1H(__tmp__ETXM);
  } break;
  case __EXPR_AND__: {
    __tmp__FTXM=static_type__2P1H(__tmp__ETXM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FTXM=static_type__BQ1H(__tmp__ETXM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FTXM=static_type__GQ1H(__tmp__ETXM);
  } break;
  case __PUT_TO__: {
    __tmp__FTXM=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__FTXM=static_type__PQ1H(__tmp__ETXM);
  } break;
  case __SIZE_OF__: {
    __tmp__FTXM=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__FTXM=((__CAST *)__tmp__ETXM)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__FTXM=static_type__GIKL(__tmp__ETXM);
  } break;
  case __READ_SLOT__: {
    __tmp__FTXM=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ETXM)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__FTXM=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ETXM)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FTXM=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FTXM=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FTXM=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FTXM=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FTXM=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__FTXM=static_type__Z2IM(__tmp__ETXM);
  } break;
  case __EXPR_ADD__: {
    __tmp__FTXM=static_type__IXML(__tmp__ETXM);
  } break;
  case __EXPR_NOT__: {
    __tmp__FTXM=static_type__BTXM(__tmp__ETXM);
  } break;
  case __EXPR_MOD__: {
    __tmp__FTXM=static_type__5LEO(__tmp__ETXM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FTXM=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__FTXM=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FTXM=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__FTXM=static_type__NOPN(__tmp__ETXM);
  } break;
  case __EXPR_XOR__: {
    __tmp__FTXM=static_type__XCSO(__tmp__ETXM);
  } break;
  };
  return(__tmp__FTXM);
}

static void* static_type__5LEO(__EXPR_MOD *Self__AMEO)
// ({EXPR_MOD}) With resultRecursive, No inlinable.
{
  void *__tmp__CMEO;
  void *__tmp__DMEO;
  __tmp__CMEO=Self__AMEO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__CMEO)->__id) {
  case __LIST__: {
    __tmp__DMEO=static_type__GIQG(__tmp__CMEO);
  } break;
  case __STRING_CST__: {
    __tmp__DMEO=((__STRING_CST *)__tmp__CMEO)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__DMEO=((__EXTERNAL_C *)__tmp__CMEO)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__DMEO=((__PROTOTYPE_CST *)__tmp__CMEO)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__DMEO=((__INTEGER_CST *)__tmp__CMEO)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__DMEO=((__LOCAL *)((__READ_LOCAL *)__tmp__CMEO)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__DMEO=static_type__0N1H(__tmp__CMEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__DMEO=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__DMEO=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__DMEO=((__REAL_CST *)__tmp__CMEO)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__DMEO=((__CHARACTER_CST *)__tmp__CMEO)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__DMEO=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__DMEO=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__DMEO=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__DMEO=static_type__MP1H(__tmp__CMEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__DMEO=static_type__SP1H(__tmp__CMEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__DMEO=static_type__XP1H(__tmp__CMEO);
  } break;
  case __EXPR_AND__: {
    __tmp__DMEO=static_type__2P1H(__tmp__CMEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__DMEO=static_type__BQ1H(__tmp__CMEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__DMEO=static_type__GQ1H(__tmp__CMEO);
  } break;
  case __PUT_TO__: {
    __tmp__DMEO=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__DMEO=static_type__PQ1H(__tmp__CMEO);
  } break;
  case __SIZE_OF__: {
    __tmp__DMEO=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__DMEO=((__CAST *)__tmp__CMEO)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__DMEO=static_type__GIKL(__tmp__CMEO);
  } break;
  case __READ_SLOT__: {
    __tmp__DMEO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__CMEO)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__DMEO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__CMEO)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__DMEO=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__DMEO=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__DMEO=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__DMEO=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__DMEO=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__DMEO=static_type__Z2IM(__tmp__CMEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__DMEO=static_type__IXML(__tmp__CMEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__DMEO=static_type__BTXM(__tmp__CMEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__DMEO=static_type__5LEO(__tmp__CMEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__DMEO=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__DMEO=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__DMEO=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__DMEO=static_type__NOPN(__tmp__CMEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__DMEO=static_type__XCSO(__tmp__CMEO);
  } break;
  };
  return(__tmp__DMEO);
}

static void* static_type__W2DP()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__Z2DP;
  void *__tmp__02DP;
  __tmp__Z2DP=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__Z2DP)->__id) {
  case __TYPE__: {
    __tmp__02DP=((__TYPE *)__tmp__Z2DP)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__02DP=((__TYPE_NULL *)__tmp__Z2DP)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__02DP=((__TYPE_VOID *)__tmp__Z2DP)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__02DP=((__TYPE_CONTEXT *)__tmp__Z2DP)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__02DP=((__TYPE_ID *)__tmp__Z2DP)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__02DP=((__TYPE_GENERIC *)__tmp__Z2DP)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__02DP=((__PROFIL_BLOCK *)__tmp__Z2DP)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__02DP);
}

static void* static_type__FQQN()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__IQQN;
  void *__tmp__JQQN;
  __tmp__IQQN=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__IQQN)->__id) {
  case __TYPE__: {
    __tmp__JQQN=((__TYPE *)__tmp__IQQN)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__JQQN=((__TYPE_NULL *)__tmp__IQQN)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__JQQN=((__TYPE_VOID *)__tmp__IQQN)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__JQQN=((__TYPE_CONTEXT *)__tmp__IQQN)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__JQQN=((__TYPE_ID *)__tmp__IQQN)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__JQQN=((__TYPE_GENERIC *)__tmp__IQQN)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__JQQN=((__PROFIL_BLOCK *)__tmp__IQQN)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__JQQN);
}

static void* static_type__KQQN()
// () With resultNo recursive, No inlinable.
{
  void *__tmp__NQQN;
  void *__tmp__OQQN;
  __tmp__NQQN=type_boolean__VJB;
  switch (((struct ___OBJ *)__tmp__NQQN)->__id) {
  case __TYPE__: {
    __tmp__OQQN=((__TYPE *)__tmp__NQQN)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__OQQN=((__TYPE_NULL *)__tmp__NQQN)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__OQQN=((__TYPE_VOID *)__tmp__NQQN)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__OQQN=((__TYPE_CONTEXT *)__tmp__NQQN)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__OQQN=((__TYPE_ID *)__tmp__NQQN)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__OQQN=((__TYPE_GENERIC *)__tmp__NQQN)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__OQQN=((__PROFIL_BLOCK *)__tmp__NQQN)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(__tmp__OQQN);
}

static void* static_type__NOPN(__EXPR_OR *Self__OOPN)
// ({EXPR_OR}) With resultRecursive, No inlinable.
{
  void *__tmp__QOPN;
  void *__tmp__ROPN;
  __tmp__QOPN=Self__OOPN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__QOPN)->__id) {
  case __LIST__: {
    __tmp__ROPN=static_type__GIQG(__tmp__QOPN);
  } break;
  case __STRING_CST__: {
    __tmp__ROPN=((__STRING_CST *)__tmp__QOPN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ROPN=((__EXTERNAL_C *)__tmp__QOPN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__ROPN=((__PROTOTYPE_CST *)__tmp__QOPN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__ROPN=((__INTEGER_CST *)__tmp__QOPN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__ROPN=((__LOCAL *)((__READ_LOCAL *)__tmp__QOPN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ROPN=static_type__0N1H(__tmp__QOPN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ROPN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ROPN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__ROPN=((__REAL_CST *)__tmp__QOPN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__ROPN=((__CHARACTER_CST *)__tmp__QOPN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__ROPN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ROPN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__ROPN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__ROPN=static_type__MP1H(__tmp__QOPN);
  } break;
  case __EXPR_MUL__: {
    __tmp__ROPN=static_type__SP1H(__tmp__QOPN);
  } break;
  case __EXPR_DIV__: {
    __tmp__ROPN=static_type__XP1H(__tmp__QOPN);
  } break;
  case __EXPR_AND__: {
    __tmp__ROPN=static_type__2P1H(__tmp__QOPN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ROPN=static_type__BQ1H(__tmp__QOPN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ROPN=static_type__GQ1H(__tmp__QOPN);
  } break;
  case __PUT_TO__: {
    __tmp__ROPN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__ROPN=static_type__PQ1H(__tmp__QOPN);
  } break;
  case __SIZE_OF__: {
    __tmp__ROPN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__ROPN=((__CAST *)__tmp__QOPN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__ROPN=static_type__GIKL(__tmp__QOPN);
  } break;
  case __READ_SLOT__: {
    __tmp__ROPN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__QOPN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__ROPN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__QOPN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ROPN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ROPN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ROPN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ROPN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ROPN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__ROPN=static_type__Z2IM(__tmp__QOPN);
  } break;
  case __EXPR_ADD__: {
    __tmp__ROPN=static_type__IXML(__tmp__QOPN);
  } break;
  case __EXPR_NOT__: {
    __tmp__ROPN=static_type__BTXM(__tmp__QOPN);
  } break;
  case __EXPR_MOD__: {
    __tmp__ROPN=static_type__5LEO(__tmp__QOPN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ROPN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__ROPN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ROPN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__ROPN=static_type__NOPN(__tmp__QOPN);
  } break;
  case __EXPR_XOR__: {
    __tmp__ROPN=static_type__XCSO(__tmp__QOPN);
  } break;
  };
  return(__tmp__ROPN);
}

static void* static_type__XCSO(__EXPR_XOR *Self__YCSO)
// ({EXPR_XOR}) With resultRecursive, No inlinable.
{
  void *__tmp__0CSO;
  void *__tmp__1CSO;
  __tmp__0CSO=Self__YCSO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__0CSO)->__id) {
  case __LIST__: {
    __tmp__1CSO=static_type__GIQG(__tmp__0CSO);
  } break;
  case __STRING_CST__: {
    __tmp__1CSO=((__STRING_CST *)__tmp__0CSO)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1CSO=((__EXTERNAL_C *)__tmp__0CSO)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__1CSO=((__PROTOTYPE_CST *)__tmp__0CSO)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__1CSO=((__INTEGER_CST *)__tmp__0CSO)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__1CSO=((__LOCAL *)((__READ_LOCAL *)__tmp__0CSO)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1CSO=static_type__0N1H(__tmp__0CSO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1CSO=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1CSO=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__1CSO=((__REAL_CST *)__tmp__0CSO)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__1CSO=((__CHARACTER_CST *)__tmp__0CSO)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__1CSO=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1CSO=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__1CSO=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__1CSO=static_type__MP1H(__tmp__0CSO);
  } break;
  case __EXPR_MUL__: {
    __tmp__1CSO=static_type__SP1H(__tmp__0CSO);
  } break;
  case __EXPR_DIV__: {
    __tmp__1CSO=static_type__XP1H(__tmp__0CSO);
  } break;
  case __EXPR_AND__: {
    __tmp__1CSO=static_type__2P1H(__tmp__0CSO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1CSO=static_type__BQ1H(__tmp__0CSO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1CSO=static_type__GQ1H(__tmp__0CSO);
  } break;
  case __PUT_TO__: {
    __tmp__1CSO=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__1CSO=static_type__PQ1H(__tmp__0CSO);
  } break;
  case __SIZE_OF__: {
    __tmp__1CSO=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__1CSO=((__CAST *)__tmp__0CSO)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__1CSO=static_type__GIKL(__tmp__0CSO);
  } break;
  case __READ_SLOT__: {
    __tmp__1CSO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0CSO)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__1CSO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0CSO)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1CSO=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1CSO=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1CSO=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1CSO=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1CSO=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__1CSO=static_type__Z2IM(__tmp__0CSO);
  } break;
  case __EXPR_ADD__: {
    __tmp__1CSO=static_type__IXML(__tmp__0CSO);
  } break;
  case __EXPR_NOT__: {
    __tmp__1CSO=static_type__BTXM(__tmp__0CSO);
  } break;
  case __EXPR_MOD__: {
    __tmp__1CSO=static_type__5LEO(__tmp__0CSO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1CSO=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__1CSO=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1CSO=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__1CSO=static_type__NOPN(__tmp__0CSO);
  } break;
  case __EXPR_XOR__: {
    __tmp__1CSO=static_type__XCSO(__tmp__0CSO);
  } break;
  };
  return(__tmp__1CSO);
}

static void* get_expr_result__RUOG(__SLOT_DATA *Self__SUOG)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  void *__tmp__NXOG,*__tmp__AVOG;
  void *result__UUOG;
  void *type_multiple__XUOG,*__tmp__HWOG;
  void *type_mono__YUOG,*__tmp__XWOG,*__tmp__HXOG;
  void *__tmp__BVOG,*__tmp__YWOG,*__tmp__FQXP,*__tmp__IXOG,*__tmp__KQXP;
  void *__tmp__GWOG,*__tmp__GXOG;
  __INTEGER __tmp__RWOG,Self__FUHH;
  __ITM_TYPE_STYLE *Self__EQXP,*Self__JQXP;
  void *lst__VUOG;
  __BOOLEAN __tmp__FVOG;
  __tmp__NXOG=self_up__LKEF;
  result__UUOG=NULL;
  lst__VUOG=NULL;
  type_multiple__XUOG=NULL;
  type_mono__YUOG=NULL;
  if (((void *)((__SECTION_ *)id_section__UG4F(Self__SUOG))->name__1I0D == (void *)(&__string_25))) {
    __tmp__AVOG=type_pointer__HLB;
    switch (((struct ___OBJ *)__tmp__AVOG)->__id) {
    case __TYPE__: {
      __tmp__BVOG=((__TYPE *)__tmp__AVOG)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__BVOG=((__TYPE_NULL *)__tmp__AVOG)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__BVOG=((__TYPE_VOID *)__tmp__AVOG)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__BVOG=((__TYPE_CONTEXT *)__tmp__AVOG)->parent_type__VIB.default__AKC;
    } break;
    case __TYPE_ID__: {
      __tmp__BVOG=((__TYPE_ID *)__tmp__AVOG)->parent_type__WIB.default__AKC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__BVOG=((__TYPE_GENERIC *)__tmp__AVOG)->parent_type__T2IB.default__AKC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__BVOG=((__PROFIL_BLOCK *)__tmp__AVOG)->parent_type__HHAG.default__AKC;
    } break;
    };
    result__UUOG=get_temporary_expr__RCUG(__tmp__BVOG,Self__SUOG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM);
    __tmp__FVOG=TRUE__;
  } else {
    __tmp__FVOG=FALSE__;
  };
  if ((! __tmp__FVOG)) {
    if ((((void *)((__SLOT *)Self__SUOG->parent_slot__BJZD)->slot_data_intern__1JZD != (void *)NULL) && ((void *)((__SLOT *)Self__SUOG->parent_slot__BJZD)->slot_data_list__CL3F == (void *)NULL))) {
      result__UUOG=get_temporary_expr__RCUG(((__SLOT_DATA *)((__SLOT *)Self__SUOG->parent_slot__BJZD)->slot_data_intern__1JZD)->parent_variable__AJZD.type__125F,Self__SUOG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM);
    } else {
      self_up__LKEF=receiver_type__R12G(Self__SUOG);
      __tmp__GWOG=((__ITM_SLOT *)((__SLOT *)Self__SUOG->parent_slot__BJZD)->base_slot__P22F)->type__PD2D;
      if (__tmp__GWOG==NULL) {
        __tmp__HWOG=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__GWOG)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__HWOG=NULL;
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__HWOG=NULL;
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__HWOG=NULL;
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__HWOG=NULL;
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__HWOG=NULL;
        } break;
        case __ITM_TYPE_MULTI__: {
          __tmp__HWOG=((void *)__tmp__GWOG);
        } break;
        }
      };
      type_multiple__XUOG=__tmp__HWOG;
      if (((void *)__tmp__HWOG != (void *)NULL)) {
        lst__VUOG=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__HWOG)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1));
        __tmp__RWOG=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__HWOG)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK;
        Self__FUHH= 0;
        while ((Self__FUHH <= __tmp__RWOG)) {
          __tmp__XWOG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__XUOG)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__FUHH];
          switch (((struct ___OBJ *)__tmp__XWOG)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            if (((__ITM_TYPE_SIMPLE *)__tmp__XWOG)->to_run__2VK==0) {
              __tmp__YWOG=((__ITM_TYPE_SIMPLE *)__tmp__XWOG)->to_run__1VK;
            } else {
              __tmp__YWOG=to_run__XVK(__tmp__XWOG);
            };
          } break;
          case __ITM_TYPE_STYLE__: {
            if (((__ITM_TYPE_STYLE *)__tmp__XWOG)->to_run__V1IB==0) {
              __tmp__YWOG=((__ITM_TYPE_STYLE *)__tmp__XWOG)->to_run__U1IB;
            } else {
              Self__EQXP=((__ITM_TYPE_STYLE *)__tmp__XWOG);
              __tmp__FQXP=get__XUN(Self__EQXP);
              Self__EQXP->to_run__U1IB=__tmp__FQXP;
              Self__EQXP->to_run__V1IB=0;
              __tmp__YWOG=__tmp__FQXP;
            };
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__YWOG=to_run__W1IB(__tmp__XWOG);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__YWOG=to_run__MPXD();
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__YWOG=to_run__DKEF(__tmp__XWOG);
          } break;
          };
          add_last__XSEI(lst__VUOG,get_temporary_expr__RCUG(__tmp__YWOG,Self__SUOG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM));
          Self__FUHH=(__INTEGER)(Self__FUHH +  1);
        };
        result__UUOG=create__SUHH(lst__VUOG);
      } else {
        __tmp__GXOG=((__ITM_SLOT *)((__SLOT *)Self__SUOG->parent_slot__BJZD)->base_slot__P22F)->type__PD2D;
        if (__tmp__GXOG==NULL) {
          __tmp__HXOG=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__GXOG)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            __tmp__HXOG=((void *)__tmp__GXOG);
          } break;
          case __ITM_TYPE_STYLE__: {
            __tmp__HXOG=((void *)__tmp__GXOG);
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__HXOG=((void *)__tmp__GXOG);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__HXOG=((void *)__tmp__GXOG);
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__HXOG=((void *)__tmp__GXOG);
          } break;
          case __ITM_TYPE_MULTI__: {
            __tmp__HXOG=NULL;
          } break;
          }
        };
        type_mono__YUOG=__tmp__HXOG;
        switch (((struct ___OBJ *)__tmp__HXOG)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          if (((__ITM_TYPE_SIMPLE *)__tmp__HXOG)->to_run__2VK==0) {
            __tmp__IXOG=((__ITM_TYPE_SIMPLE *)__tmp__HXOG)->to_run__1VK;
          } else {
            __tmp__IXOG=to_run__XVK(__tmp__HXOG);
          };
        } break;
        case __ITM_TYPE_STYLE__: {
          if (((__ITM_TYPE_STYLE *)__tmp__HXOG)->to_run__V1IB==0) {
            __tmp__IXOG=((__ITM_TYPE_STYLE *)__tmp__HXOG)->to_run__U1IB;
          } else {
            Self__JQXP=((__ITM_TYPE_STYLE *)__tmp__HXOG);
            __tmp__KQXP=get__XUN(Self__JQXP);
            Self__JQXP->to_run__U1IB=__tmp__KQXP;
            Self__JQXP->to_run__V1IB=0;
            __tmp__IXOG=__tmp__KQXP;
          };
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__IXOG=to_run__W1IB(__tmp__HXOG);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__IXOG=to_run__MPXD();
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__IXOG=to_run__DKEF(__tmp__HXOG);
        } break;
        };
        result__UUOG=get_temporary_expr__RCUG(__tmp__IXOG,Self__SUOG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM);
      };
      self_up__LKEF=__tmp__NXOG;
    };
  };
  return(result__UUOG);
}

static void* get_expr_result__QXOG(__SLOT_CODE *Self__RXOG)
// ({SLOT_CODE}) With resultNo recursive, No inlinable.
{
  void *__tmp__L0OG,*__tmp__5XOG;
  void *result__TXOG;
  void *type_multiple__WXOG,*__tmp__GZOG;
  void *type_mono__XXOG,*__tmp__WZOG,*__tmp__F0OG;
  void *__tmp__AYOG,*__tmp__XZOG,*__tmp__SQXP,*__tmp__G0OG,*__tmp__XQXP;
  void *__tmp__FZOG,*__tmp__E0OG;
  __INTEGER __tmp__QZOG,Self__4UHH;
  __ITM_TYPE_STYLE *Self__RQXP,*Self__WQXP;
  void *lst__UXOG;
  __BOOLEAN __tmp__EYOG;
  __tmp__L0OG=self_up__LKEF;
  result__TXOG=NULL;
  lst__UXOG=NULL;
  type_multiple__WXOG=NULL;
  type_mono__XXOG=NULL;
  if (((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_25))) {
    __tmp__5XOG=type_pointer__HLB;
    switch (((struct ___OBJ *)__tmp__5XOG)->__id) {
    case __TYPE__: {
      __tmp__AYOG=((__TYPE *)__tmp__5XOG)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__AYOG=((__TYPE_NULL *)__tmp__5XOG)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__AYOG=((__TYPE_VOID *)__tmp__5XOG)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__AYOG=((__TYPE_CONTEXT *)__tmp__5XOG)->parent_type__VIB.default__AKC;
    } break;
    case __TYPE_ID__: {
      __tmp__AYOG=((__TYPE_ID *)__tmp__5XOG)->parent_type__WIB.default__AKC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__AYOG=((__TYPE_GENERIC *)__tmp__5XOG)->parent_type__T2IB.default__AKC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__AYOG=((__PROFIL_BLOCK *)__tmp__5XOG)->parent_type__HHAG.default__AKC;
    } break;
    };
    result__TXOG=get_temporary_expr__RCUG(__tmp__AYOG,((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
    __tmp__EYOG=TRUE__;
  } else {
    __tmp__EYOG=FALSE__;
  };
  if ((! __tmp__EYOG)) {
    if ((((void *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->slot_data_intern__1JZD != (void *)NULL) && ((void *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->slot_data_list__CL3F == (void *)NULL))) {
      result__TXOG=get_temporary_expr__RCUG(((__SLOT_DATA *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->slot_data_intern__1JZD)->parent_variable__AJZD.type__125F,((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
    } else {
      self_up__LKEF=((__SLOT *)Self__RXOG->parent_slot__Y22F)->receiver_type__Q22F;
      __tmp__FZOG=((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
      if (__tmp__FZOG==NULL) {
        __tmp__GZOG=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__FZOG)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__GZOG=NULL;
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__GZOG=NULL;
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__GZOG=NULL;
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__GZOG=NULL;
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__GZOG=NULL;
        } break;
        case __ITM_TYPE_MULTI__: {
          __tmp__GZOG=((void *)__tmp__FZOG);
        } break;
        }
      };
      type_multiple__WXOG=__tmp__GZOG;
      if (((void *)__tmp__GZOG != (void *)NULL)) {
        lst__UXOG=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__GZOG)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1));
        __tmp__QZOG=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__GZOG)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK;
        Self__4UHH= 0;
        while ((Self__4UHH <= __tmp__QZOG)) {
          __tmp__WZOG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__WXOG)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__4UHH];
          switch (((struct ___OBJ *)__tmp__WZOG)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            if (((__ITM_TYPE_SIMPLE *)__tmp__WZOG)->to_run__2VK==0) {
              __tmp__XZOG=((__ITM_TYPE_SIMPLE *)__tmp__WZOG)->to_run__1VK;
            } else {
              __tmp__XZOG=to_run__XVK(__tmp__WZOG);
            };
          } break;
          case __ITM_TYPE_STYLE__: {
            if (((__ITM_TYPE_STYLE *)__tmp__WZOG)->to_run__V1IB==0) {
              __tmp__XZOG=((__ITM_TYPE_STYLE *)__tmp__WZOG)->to_run__U1IB;
            } else {
              Self__RQXP=((__ITM_TYPE_STYLE *)__tmp__WZOG);
              __tmp__SQXP=get__XUN(Self__RQXP);
              Self__RQXP->to_run__U1IB=__tmp__SQXP;
              Self__RQXP->to_run__V1IB=0;
              __tmp__XZOG=__tmp__SQXP;
            };
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__XZOG=to_run__W1IB(__tmp__WZOG);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__XZOG=to_run__MPXD();
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__XZOG=to_run__DKEF(__tmp__WZOG);
          } break;
          };
          add_last__XSEI(lst__UXOG,get_temporary_expr__RCUG(__tmp__XZOG,((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM));
          Self__4UHH=(__INTEGER)(Self__4UHH +  1);
        };
        result__TXOG=create__SUHH(lst__UXOG);
      } else {
        __tmp__E0OG=((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
        if (__tmp__E0OG==NULL) {
          __tmp__F0OG=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__E0OG)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            __tmp__F0OG=((void *)__tmp__E0OG);
          } break;
          case __ITM_TYPE_STYLE__: {
            __tmp__F0OG=((void *)__tmp__E0OG);
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__F0OG=((void *)__tmp__E0OG);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__F0OG=((void *)__tmp__E0OG);
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__F0OG=((void *)__tmp__E0OG);
          } break;
          case __ITM_TYPE_MULTI__: {
            __tmp__F0OG=NULL;
          } break;
          }
        };
        type_mono__XXOG=__tmp__F0OG;
        switch (((struct ___OBJ *)__tmp__F0OG)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          if (((__ITM_TYPE_SIMPLE *)__tmp__F0OG)->to_run__2VK==0) {
            __tmp__G0OG=((__ITM_TYPE_SIMPLE *)__tmp__F0OG)->to_run__1VK;
          } else {
            __tmp__G0OG=to_run__XVK(__tmp__F0OG);
          };
        } break;
        case __ITM_TYPE_STYLE__: {
          if (((__ITM_TYPE_STYLE *)__tmp__F0OG)->to_run__V1IB==0) {
            __tmp__G0OG=((__ITM_TYPE_STYLE *)__tmp__F0OG)->to_run__U1IB;
          } else {
            Self__WQXP=((__ITM_TYPE_STYLE *)__tmp__F0OG);
            __tmp__XQXP=get__XUN(Self__WQXP);
            Self__WQXP->to_run__U1IB=__tmp__XQXP;
            Self__WQXP->to_run__V1IB=0;
            __tmp__G0OG=__tmp__XQXP;
          };
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__G0OG=to_run__W1IB(__tmp__F0OG);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__G0OG=to_run__MPXD();
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__G0OG=to_run__DKEF(__tmp__F0OG);
        } break;
        };
        result__TXOG=get_temporary_expr__RCUG(__tmp__G0OG,((__ITM_SLOT *)((__SLOT *)Self__RXOG->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
      };
      self_up__LKEF=__tmp__L0OG;
    };
  };
  return(result__TXOG);
}

static void init__C4OG(__SLOT_DATA *Self__D4OG)
// ({SLOT_DATA}) VoidRecursive, No inlinable.
{
  void *self_var__E4OG;
  void *val__F4OG,*rec__G4OG,*__tmp__BBPG,*__tmp__FBPG;
  void *wrt__I4OG;
  void *type_self__J4OG,*__tmp__K5OG,*__tmp__M5OG,*__tmp__EAPG;
  void *__tmp__KAPG,*__tmp__DBPG,*__tmp__PBPG;
  void *type_self_up__K4OG,*__tmp__J5OG,*t2__ZQXP,*__tmp__DAPG;
  void *__tmp__JAPG,*__tmp__OBPG;
  void *old_profil_first__L4OG;
  __POSITION __tmp__AAPG,__tmp__IAPG,__tmp__SAJH,__tmp__EBPG;
  __POSITION __tmp__NBPG;
  void *__tmp__ABPG;
  __ITM_CHARACTER *Self__LSHQ;
  __ITM_STRING *Self__MSHQ;
  __CONTEXT *Self__CRXP;
  self_var__E4OG=NULL;
  val__F4OG=NULL;
  rec__G4OG=NULL;
  wrt__I4OG=NULL;
  type_self__J4OG=NULL;
  type_self_up__K4OG=NULL;
  old_profil_first__L4OG=NULL;
  if ((((void *)Self__D4OG->value__M4OG == (void *)NULL) && ((((__ITM_SLOT *)((__SLOT *)Self__D4OG->parent_slot__BJZD)->base_slot__P22F)->affect__TD2D != '<') || ((void *)Self__D4OG == (void *)((__SLOT *)Self__D4OG->parent_slot__BJZD)->slot_id__04OG)))) {
    type_self__J4OG=run_value__FMQC;
    type_self_up__K4OG=self_up__LKEF;
    __tmp__J5OG=receiver_type__R12G(Self__D4OG);
    switch (((struct ___OBJ *)__tmp__J5OG)->__id) {
    case __TYPE__: {
      __tmp__K5OG=((__TYPE *)__tmp__J5OG)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__K5OG=((__TYPE_NULL *)__tmp__J5OG)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__K5OG=((__TYPE_VOID *)__tmp__J5OG)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__K5OG=((__TYPE_CONTEXT *)__tmp__J5OG)->parent_type__VIB.default__AKC;
    } break;
    case __TYPE_ID__: {
      __tmp__K5OG=((__TYPE_ID *)__tmp__J5OG)->parent_type__WIB.default__AKC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__K5OG=((__TYPE_GENERIC *)__tmp__J5OG)->parent_type__T2IB.default__AKC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__K5OG=((__PROFIL_BLOCK *)__tmp__J5OG)->parent_type__HHAG.default__AKC;
    } break;
    };
    __tmp__M5OG=to_strict__LE5D(__tmp__K5OG);
    t2__ZQXP=receiver_type__R12G(Self__D4OG);
    run_value__FMQC=__tmp__M5OG;
    self_up__LKEF=t2__ZQXP;
    old_profil_first__L4OG=profil_first__4PQC;
    profil_first__4PQC=NULL;
    push_extern__profil__YGQC(Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,NULL);
    Self__D4OG->value__M4OG=list_current__IF1;
    if (((void *)Self__D4OG == (void *)((__SLOT *)Self__D4OG->parent_slot__BJZD)->slot_id__04OG)) {
      val__F4OG=create__type__CLQC(Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,Self__D4OG->parent_variable__AJZD.type__125F);
    } else {
      __tmp__AAPG=Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      __tmp__DAPG=receiver_type__R12G(Self__D4OG);
      switch (((struct ___OBJ *)__tmp__DAPG)->__id) {
      case __TYPE__: {
        __tmp__EAPG=((__TYPE *)__tmp__DAPG)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__EAPG=((__TYPE_NULL *)__tmp__DAPG)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__EAPG=((__TYPE_VOID *)__tmp__DAPG)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__EAPG=((__TYPE_CONTEXT *)__tmp__DAPG)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__EAPG=((__TYPE_ID *)__tmp__DAPG)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__EAPG=((__TYPE_GENERIC *)__tmp__DAPG)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__EAPG=((__PROFIL_BLOCK *)__tmp__DAPG)->parent_type__HHAG.default__AKC;
      } break;
      };
      self_var__E4OG=create__name__style__type__25JG(__tmp__AAPG,(&__string_57),'+',__tmp__EAPG);
      add_last__T2FH(stack_local__RI4F,self_var__E4OG);
      __tmp__IAPG=Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      __tmp__JAPG=receiver_type__R12G(Self__D4OG);
      switch (((struct ___OBJ *)__tmp__JAPG)->__id) {
      case __TYPE__: {
        __tmp__KAPG=((__TYPE *)__tmp__JAPG)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__KAPG=((__TYPE_NULL *)__tmp__JAPG)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__KAPG=((__TYPE_VOID *)__tmp__JAPG)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__KAPG=((__TYPE_CONTEXT *)__tmp__JAPG)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__KAPG=((__TYPE_ID *)__tmp__JAPG)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__KAPG=((__TYPE_GENERIC *)__tmp__JAPG)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__KAPG=((__PROFIL_BLOCK *)__tmp__JAPG)->parent_type__HHAG.default__AKC;
      } break;
      };
      val__F4OG=create__type__CLQC(__tmp__IAPG,__tmp__KAPG);
      wrt__I4OG=write__value__T5FH(self_var__E4OG,Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,val__F4OG);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,wrt__I4OG);
      if (((void *)((__ITM_SLOT *)((__SLOT *)Self__D4OG->parent_slot__BJZD)->base_slot__P22F)->value__C42D == (void *)NULL)) {
        val__F4OG=default_value__U1IH(Self__D4OG->parent_variable__AJZD.type__125F,Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM);
      } else {
        __tmp__ABPG=((__ITM_SLOT *)((__SLOT *)Self__D4OG->parent_slot__BJZD)->base_slot__P22F)->value__C42D;
        switch (((struct ___OBJ *)__tmp__ABPG)->__id) {
        case __ITM_LIST__: {
          __tmp__BBPG=to_run_expr__D3IH(__tmp__ABPG);
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__BBPG=to_run_expr__M3IH(__tmp__ABPG);
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__SAJH=((__ITM_LIST_IDF *)__tmp__ABPG)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 1,(&__string_328));
          put_position__ECH(__tmp__SAJH);
          send_error__2FH();
          __tmp__BBPG=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__BBPG=to_run_expr__UAJH(__tmp__ABPG);
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__BBPG=to_run_expr__WDJH(__tmp__ABPG);
        } break;
        case __ITM_READ__: {
          __tmp__BBPG=to_run_expr__JGJH(__tmp__ABPG);
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__BBPG=to_run_expr__MHJH(__tmp__ABPG);
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__BBPG=to_run_expr__3IJH(__tmp__ABPG);
        } break;
        case __ITM_BINARY__: {
          __tmp__BBPG=to_run_expr__RMJH(__tmp__ABPG);
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__BBPG=to_run_expr__0XJH(__tmp__ABPG);
        } break;
        case __ITM_OLD__: {
          __tmp__BBPG=to_run_expr__5XJH(__tmp__ABPG);
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__BBPG=to_run_expr__U1JH(__tmp__ABPG);
        } break;
        case __ITM_REAL__: {
          __tmp__BBPG=to_run_expr__J3JH(__tmp__ABPG);
        } break;
        case __ITM_NUMBER__: {
          __tmp__BBPG=to_run_expr__T3JH(__tmp__ABPG);
        } break;
        case __ITM_CHARACTER__: {
          Self__LSHQ=((__ITM_CHARACTER *)__tmp__ABPG);
          __tmp__BBPG=create__char__WTMH(Self__LSHQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__LSHQ->character__ED0D);
        } break;
        case __ITM_STRING__: {
          Self__MSHQ=((__ITM_STRING *)__tmp__ABPG);
          __tmp__BBPG=create__text__AUMH(Self__MSHQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__MSHQ->string__QD0D);
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__BBPG=to_run_expr__J4JH(__tmp__ABPG);
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__BBPG=to_run_expr__TIKH(__tmp__ABPG);
        } break;
        };
        val__F4OG=__tmp__BBPG;
      };
      __tmp__DBPG=Self__D4OG->parent_variable__AJZD.type__125F;
      __tmp__EBPG=Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      switch (((struct ___OBJ *)val__F4OG)->__id) {
      case __LIST__: {
        __tmp__FBPG=check_type__with__T5CN(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __STRING_CST__: {
        __tmp__FBPG=check_type__with__Q22H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXTERNAL_C__: {
        __tmp__FBPG=check_type__with__PF3H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__FBPG=check_type__with__OO3H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __INTEGER_CST__: {
        __tmp__FBPG=check_type__with__NX3H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __READ_LOCAL__: {
        __tmp__FBPG=check_type__with__LEFJ(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__FBPG=check_type__with__LA4H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__FBPG=check_type__with__KJ4H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__FBPG=check_type__with__JS4H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __REAL_CST__: {
        __tmp__FBPG=check_type__with__I14H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __CHARACTER_CST__: {
        __tmp__FBPG=check_type__with__HE5H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __IS_EXPANDED__: {
        __tmp__FBPG=check_type__with__FN5H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__FBPG=check_type__with__DW5H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_SUP__: {
        __tmp__FBPG=check_type__with__C55H(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_SUB__: {
        __tmp__FBPG=check_type__with__BIAI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_MUL__: {
        __tmp__FBPG=check_type__with__ARAI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_DIV__: {
        __tmp__FBPG=check_type__with__5ZAI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_AND__: {
        __tmp__FBPG=check_type__with__4CBI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__FBPG=check_type__with__3LBI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__FBPG=check_type__with__2UBI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __PUT_TO__: {
        __tmp__FBPG=check_type__with__03BI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __ITEM__: {
        __tmp__FBPG=check_type__with__YGCI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __SIZE_OF__: {
        __tmp__FBPG=check_type__with__WPCI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __CAST__: {
        __tmp__FBPG=check_type__with__UYCI(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __CALL_SLOT__: {
        __tmp__FBPG=check_type__with__RIDN(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __READ_SLOT__: {
        __tmp__FBPG=check_type__with__VPKL(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __READ_GLOBAL__: {
        __tmp__FBPG=check_type__with__UYKL(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__FBPG=check_type__with__IW2O(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__FBPG=check_type__with__AYIO(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__FBPG=check_type__with__IFSO(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__FBPG=check_type__with__5AJO(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__FBPG=check_type__with__IOSO(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_NEG__: {
        __tmp__FBPG=check_type__with__SVXM(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_ADD__: {
        __tmp__FBPG=check_type__with__R4XM(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_NOT__: {
        __tmp__FBPG=check_type__with__QRDN(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_MOD__: {
        __tmp__FBPG=check_type__with__4JJO(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__FBPG=check_type__with__SQIP(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_INF__: {
        __tmp__FBPG=check_type__with__H52O(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__FBPG=check_type__with__GI3O(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_OR__: {
        __tmp__FBPG=check_type__with__MZZN(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      case __EXPR_XOR__: {
        __tmp__FBPG=check_type__with__FR3O(val__F4OG,__tmp__DBPG,__tmp__EBPG);
      } break;
      };
      val__F4OG=__tmp__FBPG;
    };
    if ((Self__D4OG->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '+')) {
      __tmp__NBPG=Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      __tmp__OBPG=receiver_type__R12G(Self__D4OG);
      switch (((struct ___OBJ *)__tmp__OBPG)->__id) {
      case __TYPE__: {
        __tmp__PBPG=((__TYPE *)__tmp__OBPG)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__PBPG=((__TYPE_NULL *)__tmp__OBPG)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__PBPG=((__TYPE_VOID *)__tmp__OBPG)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__PBPG=((__TYPE_CONTEXT *)__tmp__OBPG)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__PBPG=((__TYPE_ID *)__tmp__OBPG)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__PBPG=((__TYPE_GENERIC *)__tmp__OBPG)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__PBPG=((__PROFIL_BLOCK *)__tmp__OBPG)->parent_type__HHAG.default__AKC;
      } break;
      };
      rec__G4OG=create__type__CLQC(__tmp__NBPG,__tmp__PBPG);
    };
    if ((debug_level_option__3C !=  0)) {
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__context__first__20EG(PUSH__,Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,context_main__D2LC,FALSE__));
    };
    wrt__I4OG=write_direct__with__value__05DH(Self__D4OG,Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,rec__G4OG,val__F4OG);
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,wrt__I4OG);
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__type__CLQC(Self__D4OG->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,TYPE_VOID__->parent_type__UIB.default__AKC));
    Self__CRXP=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
    pop_stack_until__DDAG(stack_local_lower__AI4F);
    stack_local_lower__AI4F=Self__CRXP->local__CI4F;
    remove_since__ERPG(stack_result__WI4F,stack_result_lower__DI4F);
    stack_result_lower__DI4F=Self__CRXP->result__FI4F;
    list_current__IF1=Self__CRXP->list__HI4F;
    profil_second__3PQC=Self__CRXP->profil__LI4F;
    profil_first__4PQC=Self__CRXP->old_profil_first__JI4F;
    top__3GQC=(__INTEGER)(top__3GQC -  1);
    profil_first__4PQC=old_profil_first__L4OG;
    run_value__FMQC=type_self__J4OG;
    self_up__LKEF=type_self_up__K4OG;
  };
}

static __NODE_TYPE* create__with__GWUC(void *e__IWUC,void *d__JWUC)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxDTA_RDxDTA_CASTxDTA_WR_CODExDTA_BLOCKxDTA_WR_VALUExDTA_RD_ARGS}) With resultNo recursive, No inlinable.
{
  __NODE_TYPE *result__GZ0C,*Self__HLZD;
  __POINTER ptr__HZ0C;
  __INTEGER typ_id__MZ0C;
  __UINTEGER_32 sz__JZ0C,a__12ZQ,new_size__Z2ZQ,t__52ZQ,a__B3ZQ;
  result__GZ0C=NULL;
  ptr__HZ0C=((__POINTER )(NULL));
  typ_id__MZ0C= 0;
  sz__JZ0C=((__UINTEGER_32 )sizeof(__NODE_TYPE));
  if ((sz__JZ0C ==  0)) {
    result__GZ0C=NODE_TYPE__;
  } else {
    typ_id__MZ0C=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__JZ0C);
    if ((typ_id__MZ0C == (__INTEGER)(-  1))) {
      a__12ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__Z2ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__JZ0C + a__12ZQ) & (__UINTEGER_32)(~ a__12ZQ));
      ptr__HZ0C=micro_alloc__table__lab__BOI(new_size__Z2ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z2ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Z2ZQ);
    } else {
      t__52ZQ=((__UINTEGER_32 )typ_id__MZ0C);
      a__B3ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__HZ0C=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__JZ0C + a__B3ZQ) & (__UINTEGER_32)(~ a__B3ZQ)),((__POINTER )(&(table_type[(t__52ZQ)]))),(__UINTEGER_32)(t__52ZQ |  1));
    };
    result__GZ0C=((__NODE_TYPE *)ptr__HZ0C);
    *(result__GZ0C) = *(NODE_TYPE__);
  };
  Self__HLZD=((__NODE_TYPE *)result__GZ0C);
  Self__HLZD->parent_node__DMQC.expr__KLZD=e__IWUC;
  Self__HLZD->parent_node__DMQC.data__LLZD=d__JWUC;
  late_binding_counter__DI=(__INTEGER)(late_binding_counter__DI +  1);
  return(result__GZ0C);
}

static void add_last__I4YD(__LINKED_LISToNODE_TYPEo *Self__J4YD,void *element__K4YD)
// ({LINKED_LISToNODE_TYPEo},{NULLxNODE_TYPE}) VoidNo recursive, No inlinable.
{
  void *lnk__M4YD;
  lnk__M4YD=NULL;
  if (((void *)Self__J4YD->first_link__N4YD == (void *)NULL)) {
    Self__J4YD->first_link__N4YD=create__next__OAQE(element__K4YD);
    Self__J4YD->parent_linked_collection__OMQC.upper__ZCID= 1;
    Self__J4YD->last_link__W4YD=Self__J4YD->first_link__N4YD;
    Self__J4YD->mem_idx__X4YD= 1;
    Self__J4YD->mem_lnk__Z4YD=Self__J4YD->first_link__N4YD;
  } else {
    lnk__M4YD=create__next__OAQE(element__K4YD);
    ((__LINKED_LIST_NODEoNODE_TYPEo *)Self__J4YD->last_link__W4YD)->next__GX4E=lnk__M4YD;
    Self__J4YD->parent_linked_collection__OMQC.upper__ZCID=(__INTEGER)(Self__J4YD->parent_linked_collection__OMQC.upper__ZCID +  1);
    Self__J4YD->last_link__W4YD=lnk__M4YD;
  };
}

static void check_type__RI5D(__INTEGER_CST *Self__SI5D)
// ({INTEGER_CST}) VoidNo recursive, No inlinable.
{
  __INTEGER_64 min__UI5D,max__XI5D;
  void *__tmp__1I5D;
  void *__tmp__2I5D;
  __STRING_CONSTANT *Self__24GE;
  __BOOLEAN error__TI5D;
  error__TI5D=FALSE__;
  min__UI5D= 0;
  max__XI5D= 0;
  __tmp__1I5D=((__TYPE_FULL *)Self__SI5D->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__1I5D)->__id) {
  case __TYPE__: {
    __tmp__2I5D=((__PROTOTYPE *)((__TYPE *)__tmp__1I5D)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__2I5D=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__2I5D=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__2I5D=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__2I5D=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__2I5D=((__TYPE_GENERIC *)__tmp__1I5D)->name__2R2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__2I5D=((__PROFIL_BLOCK *)__tmp__1I5D)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  Self__24GE=((__STRING_CONSTANT *)__tmp__2I5D);
  if (((void *)Self__24GE == (void *)(&__string_47))) {
    if ((Self__SI5D->value__PAZD <  0)) {
      error__TI5D=TRUE__;
      max__XI5D= 0;
    };
  };
  if (((void *)Self__24GE == (void *)(&__string_48))) {
    if (((Self__SI5D->value__PAZD <  0) || (Self__SI5D->value__PAZD >  4294967295LU))) {
      error__TI5D=TRUE__;
      max__XI5D= 4294967295LU;
    };
  };
  if (((void *)Self__24GE == (void *)(&__string_49))) {
    if (((Self__SI5D->value__PAZD <  0) || (Self__SI5D->value__PAZD >  65535))) {
      error__TI5D=TRUE__;
      max__XI5D= 65535;
    };
  };
  if (((void *)Self__24GE == (void *)(&__string_50))) {
    if (((Self__SI5D->value__PAZD <  0) || (Self__SI5D->value__PAZD >  255))) {
      error__TI5D=TRUE__;
      max__XI5D= 255;
    };
  };
  if (((void *)Self__24GE == (void *)(&__string_52))) {
    if (((Self__SI5D->value__PAZD < ((__INTEGER_64 )(__INTEGER)(-  2147483647))) || (Self__SI5D->value__PAZD >  2147483647))) {
      error__TI5D=TRUE__;
      min__UI5D=((__INTEGER_64 )(__INTEGER)(-  2147483647));
      max__XI5D= 2147483647;
    };
  };
  if (((void *)Self__24GE == (void *)(&__string_53))) {
    if (((Self__SI5D->value__PAZD <  -32767) || (Self__SI5D->value__PAZD >  32767))) {
      error__TI5D=TRUE__;
      min__UI5D= -32767;
      max__XI5D= 32767;
    };
  };
  if (((void *)Self__24GE == (void *)(&__string_54))) {
    if (((Self__SI5D->value__PAZD <  -127) || (Self__SI5D->value__PAZD >  127))) {
      error__TI5D=TRUE__;
      min__UI5D= -127;
      max__XI5D= 127;
    };
  };
  if (error__TI5D) {
    copy__BNK(string_tmp__RB,(&__string_329));
    append_in__PZWE(Self__SI5D->value__PAZD,string_tmp__RB);
    append__MOK(string_tmp__RB,(&__string_330));
    append_name_in__FBYD(Self__SI5D->parent_constant__P3LC.static_type__F4YD,string_tmp__RB);
    append__MOK(string_tmp__RB,(&__string_331));
    append_in__PZWE(min__UI5D,string_tmp__RB);
    append__MOK(string_tmp__RB,(&__string_332));
    append_in__PZWE(max__XI5D,string_tmp__RB);
    append__MOK(string_tmp__RB,(&__string_333));
    put_error__text__0AH( 2,string_tmp__RB);
    put_position__ECH(Self__SI5D->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
    put_position__ECH(((__LIST *)list_current__IF1)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
    send_error__2FH();
    Self__SI5D->value__PAZD= 0;
  };
}

static void* lookup__LLJM(__PROFIL_SLOT *Self__MLJM,void *n__NLJM)
// ({PROFIL_SLOT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__QLJM;
  __INTEGER j__PLJM,__tmp__MY4Q,__tmp__SY4Q;
  void **__tmp__B25Q,**__tmp__C25Q;
  __BOOLEAN __tmp__YMJM,__tmp__NNJM;
  result__QLJM=NULL;
  j__PLJM= 0;
  __tmp__MY4Q=((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__B25Q=((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__PLJM > __tmp__MY4Q) || ((void *)((__LOCAL *)((void **)__tmp__B25Q)[j__PLJM])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__NLJM)))) {
    j__PLJM=(__INTEGER)(j__PLJM +  1);
  };
  if ((j__PLJM <= ((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F)) {
    result__QLJM=((void **)((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[j__PLJM];
    __tmp__YMJM=TRUE__;
  } else {
    __tmp__YMJM=FALSE__;
  };
  if ((! __tmp__YMJM)) {
    if (((void *)Self__MLJM->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
      if (((void *)n__NLJM == (void *)((__LOCAL *)Self__MLJM->parent_profil__51LC.result_last__XGKH)->parent_variable__B2LC.parent_named__A2LC.name__1QB)) {
        result__QLJM=Self__MLJM->parent_profil__51LC.result_last__XGKH;
        __tmp__NNJM=TRUE__;
      } else {
        __tmp__NNJM=FALSE__;
      };
      if ((! __tmp__NNJM)) {
        if (((void *)Self__MLJM->parent_profil__51LC.result_list__SA2H != (void *)NULL)) {
          j__PLJM= 0;
          __tmp__SY4Q=((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F;
          __tmp__C25Q=((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.storage__FXPG;
          while ((! ((j__PLJM > __tmp__SY4Q) || ((void *)((__LOCAL *)((void **)__tmp__C25Q)[j__PLJM])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__NLJM)))) {
            j__PLJM=(__INTEGER)(j__PLJM +  1);
          };
          if ((j__PLJM <= ((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F)) {
            result__QLJM=((void **)((__FAST_ARRAYoLOCALo *)Self__MLJM->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.storage__FXPG)[j__PLJM];
          };
        };
      };
    };
  };
  return(result__QLJM);
}

static void go_item__QV4E(__LINKED_LISToNODE_TYPEo *Self__RV4E,__INTEGER i__SV4E)
// ({LINKED_LISToNODE_TYPEo},{INTEGER}) VoidNo recursive, No inlinable.
{
  if ((Self__RV4E->mem_idx__X4YD > i__SV4E)) {
    Self__RV4E->mem_idx__X4YD= 1;
    Self__RV4E->mem_lnk__Z4YD=Self__RV4E->first_link__N4YD;
  };
  while ((i__SV4E != Self__RV4E->mem_idx__X4YD)) {
    Self__RV4E->mem_lnk__Z4YD=((__LINKED_LIST_NODEoNODE_TYPEo *)Self__RV4E->mem_lnk__Z4YD)->next__GX4E;
    Self__RV4E->mem_idx__X4YD=(__INTEGER)(Self__RV4E->mem_idx__X4YD +  1);
  };
}

static void* product__with__WMYG(__DTA_RD *Self__XMYG,void *t__YMYG,void *e__ZMYG)
// ({DTA_RD},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__2MYG,__tmp__OQ0G;
  void *result__1MYG;
  void *__tmp__RP0G,*__tmp__TP0G,*s__MP0G,*__tmp__ZP0G,*__tmp__IQ0G;
  void *__tmp__SP0G;
  void *__tmp__0P0G,*__tmp__1P0G,*__tmp__ST1G;
  __STRING_CST *Self__CTHQ,*Self__KTHQ;
  __PROTOTYPE_CST *Self__DTHQ,*Self__LTHQ;
  __INTEGER_CST *Self__ETHQ,*Self__MTHQ;
  __REAL_CST *Self__GTHQ,*Self__OTHQ;
  __CHARACTER_CST *Self__ITHQ,*Self__QTHQ;
  __IS_EXPANDED *Self__JTHQ,*Self__RTHQ;
  void *__tmp__HQ0G,*__tmp__JQ0G;
  switch (((struct ___OBJ *)e__ZMYG)->__id) {
  case __LIST__: {
    __tmp__2MYG=((__LIST *)e__ZMYG)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__2MYG=((__STRING_CST *)e__ZMYG)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__2MYG=((__EXTERNAL_C *)e__ZMYG)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__2MYG=((__PROTOTYPE_CST *)e__ZMYG)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__2MYG=((__INTEGER_CST *)e__ZMYG)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__2MYG=((__READ_LOCAL *)e__ZMYG)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2MYG=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2MYG=((__EXPR_EQUAL *)e__ZMYG)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2MYG=((__EXPR_NOT_EQUAL *)e__ZMYG)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__2MYG=((__REAL_CST *)e__ZMYG)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__2MYG=((__CHARACTER_CST *)e__ZMYG)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__2MYG=((__IS_EXPANDED *)e__ZMYG)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2MYG=((__GET_TYPE_ID *)e__ZMYG)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__2MYG=((__EXPR_SUP *)e__ZMYG)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__2MYG=((__EXPR_SUB *)e__ZMYG)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__2MYG=((__EXPR_MUL *)e__ZMYG)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__2MYG=((__EXPR_DIV *)e__ZMYG)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__2MYG=((__EXPR_AND *)e__ZMYG)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2MYG=((__EXPR_SHIFT_R *)e__ZMYG)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2MYG=((__EXPR_SHIFT_L *)e__ZMYG)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__2MYG=((__PUT_TO *)e__ZMYG)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__2MYG=((__ITEM *)e__ZMYG)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__2MYG=((__SIZE_OF *)e__ZMYG)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__2MYG=((__CAST *)e__ZMYG)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__2MYG=((__CALL_SLOT *)e__ZMYG)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__2MYG=((__READ_SLOT *)e__ZMYG)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__2MYG=((__READ_GLOBAL *)e__ZMYG)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2MYG=((__EXPR_NOT_LOGIC *)e__ZMYG)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2MYG=((__EXPR_OR_LOGIC *)e__ZMYG)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2MYG=((__EXPR_OR_OR_LOGIC *)e__ZMYG)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2MYG=((__EXPR_AND_LOGIC *)e__ZMYG)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2MYG=((__EXPR_AND_AND_LOGIC *)e__ZMYG)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__2MYG=((__EXPR_NEG *)e__ZMYG)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__2MYG=((__EXPR_ADD *)e__ZMYG)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__2MYG=((__EXPR_NOT *)e__ZMYG)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__2MYG=((__EXPR_MOD *)e__ZMYG)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2MYG=((__EXPR_SUP_EQ *)e__ZMYG)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__2MYG=((__EXPR_INF *)e__ZMYG)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2MYG=((__EXPR_INF_EQ *)e__ZMYG)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__2MYG=((__EXPR_OR *)e__ZMYG)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__2MYG=((__EXPR_XOR *)e__ZMYG)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  result__1MYG=create__QCAG(__tmp__2MYG);
  if (((void *)t__YMYG == (void *)TYPE_NULL__)) {
    product_error__for__in__with__2L0G(Self__XMYG->parent_dta__AMQC.parent_itm_object__5LQC.position__BJM,Self__XMYG->parent_dta__AMQC.result_expr__RJZD,result__1MYG,Self__XMYG->parent_dta__AMQC.context__OJZD);
  } else {
    __tmp__RP0G=Self__XMYG->parent_dta__AMQC.slot__PJZD;
    if (((struct ___OBJ *)__tmp__RP0G)->__id==__SLOT_DATA__) {
      __tmp__SP0G=((__SLOT_DATA *)__tmp__RP0G)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
    } else {
      __tmp__SP0G=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__RP0G)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
    };
    switch (((struct ___OBJ *)t__YMYG)->__id) {
    case __TYPE__: {
      __tmp__TP0G=get_local_slot__H4EG(t__YMYG,__tmp__SP0G);
    } break;
    case __TYPE_NULL__: {
      __tmp__TP0G=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__TP0G=get_local_slot__1AFG(t__YMYG,__tmp__SP0G);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__TP0G=get_local_slot__DDFG(t__YMYG,__tmp__SP0G);
    } break;
    case __TYPE_ID__: {
      __tmp__TP0G=get_local_slot__LFFG(t__YMYG,__tmp__SP0G);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__TP0G=get_local_slot__THFG(t__YMYG,__tmp__SP0G);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__TP0G=get_local_slot__05EJ(__tmp__SP0G);
    } break;
    };
    s__MP0G=__tmp__TP0G;
    if (((void *)__tmp__TP0G == (void *)NULL)) {
      switch (((struct ___OBJ *)t__YMYG)->__id) {
      case __TYPE__: {
        __tmp__ZP0G=get_path_slot__JK1G(t__YMYG,__tmp__SP0G);
      } break;
      case __TYPE_NULL__: {
        __tmp__ZP0G=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__ZP0G=get_path_slot__CM1G(t__YMYG,__tmp__SP0G);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__ZP0G=get_path_slot__XN1G(t__YMYG,__tmp__SP0G);
      } break;
      case __TYPE_ID__: {
        __tmp__ZP0G=get_path_slot__MP1G(t__YMYG,__tmp__SP0G);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__ZP0G=get_path_slot__BR1G(t__YMYG,__tmp__SP0G);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__ZP0G=get_path_slot__HAFJ(__tmp__SP0G);
      } break;
      };
      s__MP0G=__tmp__ZP0G;
      if (((struct ___OBJ *)__tmp__ZP0G)->__id==__SLOT_DATA__) {
        __tmp__0P0G=get_expr_result__RUOG(__tmp__ZP0G);
      } else {
        __tmp__0P0G=get_expr_result__QXOG(__tmp__ZP0G);
      };
      switch (((struct ___OBJ *)e__ZMYG)->__id) {
      case __LIST__: {
        __tmp__1P0G=my_copy__2HYM(e__ZMYG);
      } break;
      case __STRING_CST__: {
        Self__CTHQ=((__STRING_CST *)e__ZMYG);
        __tmp__1P0G=create__text__AUMH(Self__CTHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CTHQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__1P0G=my_copy__2K2H(e__ZMYG);
      } break;
      case __PROTOTYPE_CST__: {
        Self__DTHQ=((__PROTOTYPE_CST *)e__ZMYG);
        __tmp__1P0G=create__type__CLQC(Self__DTHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DTHQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__ETHQ=((__INTEGER_CST *)e__ZMYG);
        __tmp__1P0G=create__value__type__DNQC(Self__ETHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ETHQ->value__PAZD,Self__ETHQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__1P0G=my_copy__OAFJ(e__ZMYG);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__1P0G=my_copy__KM2H(e__ZMYG);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__1P0G=my_copy__DN2H(e__ZMYG);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__1P0G=my_copy__QN2H(e__ZMYG);
      } break;
      case __REAL_CST__: {
        Self__GTHQ=((__REAL_CST *)e__ZMYG);
        __tmp__1P0G=create__value__type__1SMH(Self__GTHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GTHQ->value__5N2H,Self__GTHQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__ITHQ=((__CHARACTER_CST *)e__ZMYG);
        __tmp__1P0G=create__char__WTMH(Self__ITHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ITHQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__JTHQ=((__IS_EXPANDED *)e__ZMYG);
        __tmp__1P0G=create__receiver__WRWH(Self__JTHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__JTHQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__1P0G=my_copy__TO2H(e__ZMYG);
      } break;
      case __EXPR_SUP__: {
        __tmp__1P0G=my_copy__2O2H(e__ZMYG);
      } break;
      case __EXPR_SUB__: {
        __tmp__1P0G=my_copy__HP2H(e__ZMYG);
      } break;
      case __EXPR_MUL__: {
        __tmp__1P0G=my_copy__TP2H(e__ZMYG);
      } break;
      case __EXPR_DIV__: {
        __tmp__1P0G=my_copy__4P2H(e__ZMYG);
      } break;
      case __EXPR_AND__: {
        __tmp__1P0G=my_copy__JQ2H(e__ZMYG);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__1P0G=my_copy__UQ2H(e__ZMYG);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__1P0G=my_copy__5Q2H(e__ZMYG);
      } break;
      case __PUT_TO__: {
        __tmp__1P0G=my_copy__KR2H(e__ZMYG);
      } break;
      case __ITEM__: {
        __tmp__1P0G=my_copy__1R2H(e__ZMYG);
      } break;
      case __SIZE_OF__: {
        __tmp__1P0G=my_copy__HS2H(e__ZMYG);
      } break;
      case __CAST__: {
        __tmp__1P0G=my_copy__QS2H(e__ZMYG);
      } break;
      case __CALL_SLOT__: {
        __tmp__1P0G=my_copy__PIYM(e__ZMYG);
      } break;
      case __READ_SLOT__: {
        __tmp__1P0G=my_copy__AVGK(e__ZMYG);
      } break;
      case __READ_GLOBAL__: {
        __tmp__1P0G=my_copy__NVGK(e__ZMYG);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__1P0G=my_copy__RFCN(e__ZMYG);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__1P0G=my_copy__JMEO(e__ZMYG);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__1P0G=my_copy__RTJO(e__ZMYG);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__1P0G=my_copy__WMEO(e__ZMYG);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__1P0G=my_copy__3TJO(e__ZMYG);
      } break;
      case __EXPR_NEG__: {
        __tmp__1P0G=my_copy__YEJM(e__ZMYG);
      } break;
      case __EXPR_ADD__: {
        __tmp__1P0G=my_copy__YRLL(e__ZMYG);
      } break;
      case __EXPR_NOT__: {
        __tmp__1P0G=my_copy__GLYM(e__ZMYG);
      } break;
      case __EXPR_MOD__: {
        __tmp__1P0G=my_copy__BNEO(e__ZMYG);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__1P0G=my_copy__M3DP(e__ZMYG);
      } break;
      case __EXPR_INF__: {
        __tmp__1P0G=my_copy__PBSN(e__ZMYG);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__1P0G=my_copy__0BSN(e__ZMYG);
      } break;
      case __EXPR_OR__: {
        __tmp__1P0G=my_copy__ZOPN(e__ZMYG);
      } break;
      case __EXPR_XOR__: {
        __tmp__1P0G=my_copy__CYSO(e__ZMYG);
      } break;
      };
      add_last__AL4G(((__LIST *)result__1MYG)->expr_list__JUOG,create__with__result__2S1G(__tmp__1P0G,__tmp__ZP0G,Self__XMYG,__tmp__0P0G));
      add_last__AL4G(((__LIST *)result__1MYG)->expr_list__JUOG,create__with__GWUC(__tmp__0P0G,Self__XMYG));
    } else {
      if (((struct ___OBJ *)s__MP0G)->__id==__SLOT_DATA__) {
        __tmp__HQ0G=((__SLOT *)((__SLOT_DATA *)s__MP0G)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__HQ0G=((__SLOT *)((__SLOT_CODE *)s__MP0G)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__IQ0G=Self__XMYG->parent_dta__AMQC.slot__PJZD;
      if (((struct ___OBJ *)__tmp__IQ0G)->__id==__SLOT_DATA__) {
        __tmp__JQ0G=((__SLOT *)((__SLOT_DATA *)__tmp__IQ0G)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__JQ0G=((__SLOT *)((__SLOT_CODE *)__tmp__IQ0G)->parent_slot__Y22F)->base_slot__P22F;
      };
      is_equal_profil__PL5G(__tmp__HQ0G,__tmp__JQ0G);
      switch (((struct ___OBJ *)e__ZMYG)->__id) {
      case __LIST__: {
        __tmp__ST1G=my_copy__2HYM(e__ZMYG);
      } break;
      case __STRING_CST__: {
        Self__KTHQ=((__STRING_CST *)e__ZMYG);
        __tmp__ST1G=create__text__AUMH(Self__KTHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KTHQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__ST1G=my_copy__2K2H(e__ZMYG);
      } break;
      case __PROTOTYPE_CST__: {
        Self__LTHQ=((__PROTOTYPE_CST *)e__ZMYG);
        __tmp__ST1G=create__type__CLQC(Self__LTHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LTHQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__MTHQ=((__INTEGER_CST *)e__ZMYG);
        __tmp__ST1G=create__value__type__DNQC(Self__MTHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MTHQ->value__PAZD,Self__MTHQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__ST1G=my_copy__OAFJ(e__ZMYG);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ST1G=my_copy__KM2H(e__ZMYG);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ST1G=my_copy__DN2H(e__ZMYG);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ST1G=my_copy__QN2H(e__ZMYG);
      } break;
      case __REAL_CST__: {
        Self__OTHQ=((__REAL_CST *)e__ZMYG);
        __tmp__ST1G=create__value__type__1SMH(Self__OTHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OTHQ->value__5N2H,Self__OTHQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__QTHQ=((__CHARACTER_CST *)e__ZMYG);
        __tmp__ST1G=create__char__WTMH(Self__QTHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QTHQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__RTHQ=((__IS_EXPANDED *)e__ZMYG);
        __tmp__ST1G=create__receiver__WRWH(Self__RTHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__RTHQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ST1G=my_copy__TO2H(e__ZMYG);
      } break;
      case __EXPR_SUP__: {
        __tmp__ST1G=my_copy__2O2H(e__ZMYG);
      } break;
      case __EXPR_SUB__: {
        __tmp__ST1G=my_copy__HP2H(e__ZMYG);
      } break;
      case __EXPR_MUL__: {
        __tmp__ST1G=my_copy__TP2H(e__ZMYG);
      } break;
      case __EXPR_DIV__: {
        __tmp__ST1G=my_copy__4P2H(e__ZMYG);
      } break;
      case __EXPR_AND__: {
        __tmp__ST1G=my_copy__JQ2H(e__ZMYG);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ST1G=my_copy__UQ2H(e__ZMYG);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ST1G=my_copy__5Q2H(e__ZMYG);
      } break;
      case __PUT_TO__: {
        __tmp__ST1G=my_copy__KR2H(e__ZMYG);
      } break;
      case __ITEM__: {
        __tmp__ST1G=my_copy__1R2H(e__ZMYG);
      } break;
      case __SIZE_OF__: {
        __tmp__ST1G=my_copy__HS2H(e__ZMYG);
      } break;
      case __CAST__: {
        __tmp__ST1G=my_copy__QS2H(e__ZMYG);
      } break;
      case __CALL_SLOT__: {
        __tmp__ST1G=my_copy__PIYM(e__ZMYG);
      } break;
      case __READ_SLOT__: {
        __tmp__ST1G=my_copy__AVGK(e__ZMYG);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ST1G=my_copy__NVGK(e__ZMYG);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ST1G=my_copy__RFCN(e__ZMYG);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ST1G=my_copy__JMEO(e__ZMYG);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ST1G=my_copy__RTJO(e__ZMYG);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ST1G=my_copy__WMEO(e__ZMYG);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ST1G=my_copy__3TJO(e__ZMYG);
      } break;
      case __EXPR_NEG__: {
        __tmp__ST1G=my_copy__YEJM(e__ZMYG);
      } break;
      case __EXPR_ADD__: {
        __tmp__ST1G=my_copy__YRLL(e__ZMYG);
      } break;
      case __EXPR_NOT__: {
        __tmp__ST1G=my_copy__GLYM(e__ZMYG);
      } break;
      case __EXPR_MOD__: {
        __tmp__ST1G=my_copy__BNEO(e__ZMYG);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ST1G=my_copy__M3DP(e__ZMYG);
      } break;
      case __EXPR_INF__: {
        __tmp__ST1G=my_copy__PBSN(e__ZMYG);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ST1G=my_copy__0BSN(e__ZMYG);
      } break;
      case __EXPR_OR__: {
        __tmp__ST1G=my_copy__ZOPN(e__ZMYG);
      } break;
      case __EXPR_XOR__: {
        __tmp__ST1G=my_copy__CYSO(e__ZMYG);
      } break;
      };
      add_last__AL4G(((__LIST *)result__1MYG)->expr_list__JUOG,create__with__result__2S1G(__tmp__ST1G,s__MP0G,Self__XMYG,Self__XMYG->parent_dta__AMQC.result_expr__RJZD));
    };
    switch (((struct ___OBJ *)e__ZMYG)->__id) {
    case __LIST__: {
      __tmp__OQ0G=((__LIST *)e__ZMYG)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__OQ0G=((__STRING_CST *)e__ZMYG)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OQ0G=((__EXTERNAL_C *)e__ZMYG)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OQ0G=((__PROTOTYPE_CST *)e__ZMYG)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__OQ0G=((__INTEGER_CST *)e__ZMYG)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__OQ0G=((__READ_LOCAL *)e__ZMYG)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OQ0G=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OQ0G=((__EXPR_EQUAL *)e__ZMYG)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OQ0G=((__EXPR_NOT_EQUAL *)e__ZMYG)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__OQ0G=((__REAL_CST *)e__ZMYG)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OQ0G=((__CHARACTER_CST *)e__ZMYG)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OQ0G=((__IS_EXPANDED *)e__ZMYG)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OQ0G=((__GET_TYPE_ID *)e__ZMYG)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__OQ0G=((__EXPR_SUP *)e__ZMYG)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__OQ0G=((__EXPR_SUB *)e__ZMYG)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__OQ0G=((__EXPR_MUL *)e__ZMYG)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__OQ0G=((__EXPR_DIV *)e__ZMYG)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__OQ0G=((__EXPR_AND *)e__ZMYG)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OQ0G=((__EXPR_SHIFT_R *)e__ZMYG)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OQ0G=((__EXPR_SHIFT_L *)e__ZMYG)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__OQ0G=((__PUT_TO *)e__ZMYG)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__OQ0G=((__ITEM *)e__ZMYG)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__OQ0G=((__SIZE_OF *)e__ZMYG)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__OQ0G=((__CAST *)e__ZMYG)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__OQ0G=((__CALL_SLOT *)e__ZMYG)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__OQ0G=((__READ_SLOT *)e__ZMYG)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OQ0G=((__READ_GLOBAL *)e__ZMYG)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OQ0G=((__EXPR_NOT_LOGIC *)e__ZMYG)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OQ0G=((__EXPR_OR_LOGIC *)e__ZMYG)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OQ0G=((__EXPR_OR_OR_LOGIC *)e__ZMYG)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OQ0G=((__EXPR_AND_LOGIC *)e__ZMYG)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OQ0G=((__EXPR_AND_AND_LOGIC *)e__ZMYG)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__OQ0G=((__EXPR_NEG *)e__ZMYG)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__OQ0G=((__EXPR_ADD *)e__ZMYG)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__OQ0G=((__EXPR_NOT *)e__ZMYG)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__OQ0G=((__EXPR_MOD *)e__ZMYG)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OQ0G=((__EXPR_SUP_EQ *)e__ZMYG)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__OQ0G=((__EXPR_INF *)e__ZMYG)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OQ0G=((__EXPR_INF_EQ *)e__ZMYG)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__OQ0G=((__EXPR_OR *)e__ZMYG)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__OQ0G=((__EXPR_XOR *)e__ZMYG)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    add_last__AL4G(((__LIST *)result__1MYG)->expr_list__JUOG,create__type__CLQC(__tmp__OQ0G,TYPE_VOID__->parent_type__UIB.default__AKC));
  };
  return(result__1MYG);
}

static void* product__with__S01H(__DTA_CAST *Self__T01H,void *t__U01H,void *e__V01H)
// ({DTA_CAST},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *new_value__Z01H,*__tmp__A11H,*__tmp__011H,*__tmp__R21H;
  __POSITION __tmp__101H,__tmp__321H,__tmp__E31H,__tmp__I31H;
  void *result__001H;
  void *__tmp__B11H,*rd__Y01H;
  void *__tmp__D11H;
  void *__tmp__E11H,*cast__X01H;
  void *__tmp__Z11H,*__tmp__P21H;
  __STRING_CST *Self__STHQ,*Self__0THQ;
  __PROTOTYPE_CST *Self__TTHQ,*Self__1THQ;
  __INTEGER_CST *Self__UTHQ,*Self__2THQ;
  __REAL_CST *Self__WTHQ,*Self__4THQ;
  __CHARACTER_CST *Self__YTHQ,*Self__AUHQ;
  __IS_EXPANDED *Self__ZTHQ,*Self__BUHQ;
  void *__tmp__H21H;
  __BOOLEAN __tmp__A21H,__tmp__I21H;
  new_value__Z01H=NULL;
  switch (((struct ___OBJ *)e__V01H)->__id) {
  case __LIST__: {
    __tmp__101H=((__LIST *)e__V01H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__101H=((__STRING_CST *)e__V01H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__101H=((__EXTERNAL_C *)e__V01H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__101H=((__PROTOTYPE_CST *)e__V01H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__101H=((__INTEGER_CST *)e__V01H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__101H=((__READ_LOCAL *)e__V01H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__101H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__101H=((__EXPR_EQUAL *)e__V01H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__101H=((__EXPR_NOT_EQUAL *)e__V01H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__101H=((__REAL_CST *)e__V01H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__101H=((__CHARACTER_CST *)e__V01H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__101H=((__IS_EXPANDED *)e__V01H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__101H=((__GET_TYPE_ID *)e__V01H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__101H=((__EXPR_SUP *)e__V01H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__101H=((__EXPR_SUB *)e__V01H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__101H=((__EXPR_MUL *)e__V01H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__101H=((__EXPR_DIV *)e__V01H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__101H=((__EXPR_AND *)e__V01H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__101H=((__EXPR_SHIFT_R *)e__V01H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__101H=((__EXPR_SHIFT_L *)e__V01H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__101H=((__PUT_TO *)e__V01H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__101H=((__ITEM *)e__V01H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__101H=((__SIZE_OF *)e__V01H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__101H=((__CAST *)e__V01H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__101H=((__CALL_SLOT *)e__V01H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__101H=((__READ_SLOT *)e__V01H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__101H=((__READ_GLOBAL *)e__V01H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__101H=((__EXPR_NOT_LOGIC *)e__V01H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__101H=((__EXPR_OR_LOGIC *)e__V01H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__101H=((__EXPR_OR_OR_LOGIC *)e__V01H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__101H=((__EXPR_AND_LOGIC *)e__V01H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__101H=((__EXPR_AND_AND_LOGIC *)e__V01H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__101H=((__EXPR_NEG *)e__V01H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__101H=((__EXPR_ADD *)e__V01H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__101H=((__EXPR_NOT *)e__V01H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__101H=((__EXPR_MOD *)e__V01H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__101H=((__EXPR_SUP_EQ *)e__V01H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__101H=((__EXPR_INF *)e__V01H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__101H=((__EXPR_INF_EQ *)e__V01H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__101H=((__EXPR_OR *)e__V01H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__101H=((__EXPR_XOR *)e__V01H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  result__001H=create__QCAG(__tmp__101H);
  __tmp__A11H=Self__T01H->result_expr__401H;
  if (__tmp__A11H==NULL) {
    __tmp__B11H=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__A11H)->__id) {
    case __PROTOTYPE_CST__: {
      __tmp__B11H=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__B11H=((void *)__tmp__A11H);
    } break;
    }
  };
  rd__Y01H=__tmp__B11H;
  __tmp__D11H=((__READ_LOCAL *)__tmp__B11H)->local__ALZD;
  if (__tmp__D11H==NULL) {
    __tmp__E11H=NULL;
  } else {
    __tmp__E11H=((void *)__tmp__D11H);
  };
  cast__X01H=__tmp__E11H;
  if (((void *)t__U01H != (void *)TYPE_NULL__)) {
    if (((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)__tmp__E11H)->parent_variable__B2LC.type__125F)->flag__LTL &  4) !=  0)) {
      if (((void *)((__TYPE_FULL *)((__LOCAL *)__tmp__E11H)->parent_variable__B2LC.type__125F)->parent_type__KTL == (void *)t__U01H)) {
        __tmp__Z11H=((__LOCAL *)__tmp__E11H)->parent_variable__B2LC.type__125F;
        switch (((struct ___OBJ *)e__V01H)->__id) {
        case __LIST__: {
          __tmp__011H=my_copy__2HYM(e__V01H);
        } break;
        case __STRING_CST__: {
          Self__STHQ=((__STRING_CST *)e__V01H);
          __tmp__011H=create__text__AUMH(Self__STHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__STHQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__011H=my_copy__2K2H(e__V01H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__TTHQ=((__PROTOTYPE_CST *)e__V01H);
          __tmp__011H=create__type__CLQC(Self__TTHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TTHQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__UTHQ=((__INTEGER_CST *)e__V01H);
          __tmp__011H=create__value__type__DNQC(Self__UTHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UTHQ->value__PAZD,Self__UTHQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__011H=my_copy__OAFJ(e__V01H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__011H=my_copy__KM2H(e__V01H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__011H=my_copy__DN2H(e__V01H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__011H=my_copy__QN2H(e__V01H);
        } break;
        case __REAL_CST__: {
          Self__WTHQ=((__REAL_CST *)e__V01H);
          __tmp__011H=create__value__type__1SMH(Self__WTHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WTHQ->value__5N2H,Self__WTHQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__YTHQ=((__CHARACTER_CST *)e__V01H);
          __tmp__011H=create__char__WTMH(Self__YTHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YTHQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__ZTHQ=((__IS_EXPANDED *)e__V01H);
          __tmp__011H=create__receiver__WRWH(Self__ZTHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__ZTHQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__011H=my_copy__TO2H(e__V01H);
        } break;
        case __EXPR_SUP__: {
          __tmp__011H=my_copy__2O2H(e__V01H);
        } break;
        case __EXPR_SUB__: {
          __tmp__011H=my_copy__HP2H(e__V01H);
        } break;
        case __EXPR_MUL__: {
          __tmp__011H=my_copy__TP2H(e__V01H);
        } break;
        case __EXPR_DIV__: {
          __tmp__011H=my_copy__4P2H(e__V01H);
        } break;
        case __EXPR_AND__: {
          __tmp__011H=my_copy__JQ2H(e__V01H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__011H=my_copy__UQ2H(e__V01H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__011H=my_copy__5Q2H(e__V01H);
        } break;
        case __PUT_TO__: {
          __tmp__011H=my_copy__KR2H(e__V01H);
        } break;
        case __ITEM__: {
          __tmp__011H=my_copy__1R2H(e__V01H);
        } break;
        case __SIZE_OF__: {
          __tmp__011H=my_copy__HS2H(e__V01H);
        } break;
        case __CAST__: {
          __tmp__011H=my_copy__QS2H(e__V01H);
        } break;
        case __CALL_SLOT__: {
          __tmp__011H=my_copy__PIYM(e__V01H);
        } break;
        case __READ_SLOT__: {
          __tmp__011H=my_copy__AVGK(e__V01H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__011H=my_copy__NVGK(e__V01H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__011H=my_copy__RFCN(e__V01H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__011H=my_copy__JMEO(e__V01H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__011H=my_copy__RTJO(e__V01H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__011H=my_copy__WMEO(e__V01H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__011H=my_copy__3TJO(e__V01H);
        } break;
        case __EXPR_NEG__: {
          __tmp__011H=my_copy__YEJM(e__V01H);
        } break;
        case __EXPR_ADD__: {
          __tmp__011H=my_copy__YRLL(e__V01H);
        } break;
        case __EXPR_NOT__: {
          __tmp__011H=my_copy__GLYM(e__V01H);
        } break;
        case __EXPR_MOD__: {
          __tmp__011H=my_copy__BNEO(e__V01H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__011H=my_copy__M3DP(e__V01H);
        } break;
        case __EXPR_INF__: {
          __tmp__011H=my_copy__PBSN(e__V01H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__011H=my_copy__0BSN(e__V01H);
        } break;
        case __EXPR_OR__: {
          __tmp__011H=my_copy__ZOPN(e__V01H);
        } break;
        case __EXPR_XOR__: {
          __tmp__011H=my_copy__CYSO(e__V01H);
        } break;
        };
        new_value__Z01H=create__value__S1WH(CAST__,__tmp__Z11H,__tmp__011H);
      };
      __tmp__A21H=TRUE__;
    } else {
      __tmp__A21H=FALSE__;
    };
    if ((! __tmp__A21H)) {
      __tmp__H21H=((__TYPE_FULL *)((__LOCAL *)__tmp__E11H)->parent_variable__B2LC.type__125F)->parent_type__KTL;
      switch (((struct ___OBJ *)t__U01H)->__id) {
      case __TYPE__: {
        __tmp__I21H=is_sub_type__5I3I(t__U01H,__tmp__H21H);
      } break;
      case __TYPE_NULL__: {
        __tmp__I21H=TRUE__;
      } break;
      case __TYPE_VOID__: {
        __tmp__I21H=FALSE__;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__I21H=is_sub_type__CK3I(t__U01H,__tmp__H21H);
      } break;
      case __TYPE_ID__: {
        __tmp__I21H=is_sub_type__3K3I(__tmp__H21H);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__I21H=is_sub_type__DL3I(t__U01H,__tmp__H21H);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__I21H=__infix_equal_equal__GSFJ(((__PROFIL_BLOCK *)t__U01H),__tmp__H21H);
      } break;
      };
      if (__tmp__I21H) {
        switch (((struct ___OBJ *)t__U01H)->__id) {
        case __TYPE__: {
          __tmp__P21H=((__TYPE *)t__U01H)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__P21H=((__TYPE_NULL *)t__U01H)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__P21H=((__TYPE_VOID *)t__U01H)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__P21H=((__TYPE_CONTEXT *)t__U01H)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__P21H=((__TYPE_ID *)t__U01H)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__P21H=((__TYPE_GENERIC *)t__U01H)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__P21H=((__PROFIL_BLOCK *)t__U01H)->parent_type__HHAG.default__AKC;
        } break;
        };
        switch (((struct ___OBJ *)e__V01H)->__id) {
        case __LIST__: {
          __tmp__R21H=my_copy__2HYM(e__V01H);
        } break;
        case __STRING_CST__: {
          Self__0THQ=((__STRING_CST *)e__V01H);
          __tmp__R21H=create__text__AUMH(Self__0THQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0THQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__R21H=my_copy__2K2H(e__V01H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__1THQ=((__PROTOTYPE_CST *)e__V01H);
          __tmp__R21H=create__type__CLQC(Self__1THQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1THQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__2THQ=((__INTEGER_CST *)e__V01H);
          __tmp__R21H=create__value__type__DNQC(Self__2THQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2THQ->value__PAZD,Self__2THQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__R21H=my_copy__OAFJ(e__V01H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__R21H=my_copy__KM2H(e__V01H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__R21H=my_copy__DN2H(e__V01H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__R21H=my_copy__QN2H(e__V01H);
        } break;
        case __REAL_CST__: {
          Self__4THQ=((__REAL_CST *)e__V01H);
          __tmp__R21H=create__value__type__1SMH(Self__4THQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4THQ->value__5N2H,Self__4THQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__AUHQ=((__CHARACTER_CST *)e__V01H);
          __tmp__R21H=create__char__WTMH(Self__AUHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AUHQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__BUHQ=((__IS_EXPANDED *)e__V01H);
          __tmp__R21H=create__receiver__WRWH(Self__BUHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__BUHQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__R21H=my_copy__TO2H(e__V01H);
        } break;
        case __EXPR_SUP__: {
          __tmp__R21H=my_copy__2O2H(e__V01H);
        } break;
        case __EXPR_SUB__: {
          __tmp__R21H=my_copy__HP2H(e__V01H);
        } break;
        case __EXPR_MUL__: {
          __tmp__R21H=my_copy__TP2H(e__V01H);
        } break;
        case __EXPR_DIV__: {
          __tmp__R21H=my_copy__4P2H(e__V01H);
        } break;
        case __EXPR_AND__: {
          __tmp__R21H=my_copy__JQ2H(e__V01H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__R21H=my_copy__UQ2H(e__V01H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__R21H=my_copy__5Q2H(e__V01H);
        } break;
        case __PUT_TO__: {
          __tmp__R21H=my_copy__KR2H(e__V01H);
        } break;
        case __ITEM__: {
          __tmp__R21H=my_copy__1R2H(e__V01H);
        } break;
        case __SIZE_OF__: {
          __tmp__R21H=my_copy__HS2H(e__V01H);
        } break;
        case __CAST__: {
          __tmp__R21H=my_copy__QS2H(e__V01H);
        } break;
        case __CALL_SLOT__: {
          __tmp__R21H=my_copy__PIYM(e__V01H);
        } break;
        case __READ_SLOT__: {
          __tmp__R21H=my_copy__AVGK(e__V01H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__R21H=my_copy__NVGK(e__V01H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__R21H=my_copy__RFCN(e__V01H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__R21H=my_copy__JMEO(e__V01H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__R21H=my_copy__RTJO(e__V01H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__R21H=my_copy__WMEO(e__V01H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__R21H=my_copy__3TJO(e__V01H);
        } break;
        case __EXPR_NEG__: {
          __tmp__R21H=my_copy__YEJM(e__V01H);
        } break;
        case __EXPR_ADD__: {
          __tmp__R21H=my_copy__YRLL(e__V01H);
        } break;
        case __EXPR_NOT__: {
          __tmp__R21H=my_copy__GLYM(e__V01H);
        } break;
        case __EXPR_MOD__: {
          __tmp__R21H=my_copy__BNEO(e__V01H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__R21H=my_copy__M3DP(e__V01H);
        } break;
        case __EXPR_INF__: {
          __tmp__R21H=my_copy__PBSN(e__V01H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__R21H=my_copy__0BSN(e__V01H);
        } break;
        case __EXPR_OR__: {
          __tmp__R21H=my_copy__ZOPN(e__V01H);
        } break;
        case __EXPR_XOR__: {
          __tmp__R21H=my_copy__CYSO(e__V01H);
        } break;
        };
        new_value__Z01H=create__value__S1WH(CAST__,__tmp__P21H,__tmp__R21H);
      };
    };
  };
  if (((void *)new_value__Z01H == (void *)NULL)) {
    switch (((struct ___OBJ *)e__V01H)->__id) {
    case __LIST__: {
      __tmp__321H=((__LIST *)e__V01H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__321H=((__STRING_CST *)e__V01H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__321H=((__EXTERNAL_C *)e__V01H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__321H=((__PROTOTYPE_CST *)e__V01H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__321H=((__INTEGER_CST *)e__V01H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__321H=((__READ_LOCAL *)e__V01H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__321H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__321H=((__EXPR_EQUAL *)e__V01H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__321H=((__EXPR_NOT_EQUAL *)e__V01H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__321H=((__REAL_CST *)e__V01H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__321H=((__CHARACTER_CST *)e__V01H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__321H=((__IS_EXPANDED *)e__V01H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__321H=((__GET_TYPE_ID *)e__V01H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__321H=((__EXPR_SUP *)e__V01H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__321H=((__EXPR_SUB *)e__V01H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__321H=((__EXPR_MUL *)e__V01H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__321H=((__EXPR_DIV *)e__V01H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__321H=((__EXPR_AND *)e__V01H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__321H=((__EXPR_SHIFT_R *)e__V01H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__321H=((__EXPR_SHIFT_L *)e__V01H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__321H=((__PUT_TO *)e__V01H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__321H=((__ITEM *)e__V01H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__321H=((__SIZE_OF *)e__V01H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__321H=((__CAST *)e__V01H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__321H=((__CALL_SLOT *)e__V01H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__321H=((__READ_SLOT *)e__V01H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__321H=((__READ_GLOBAL *)e__V01H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__321H=((__EXPR_NOT_LOGIC *)e__V01H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__321H=((__EXPR_OR_LOGIC *)e__V01H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__321H=((__EXPR_OR_OR_LOGIC *)e__V01H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__321H=((__EXPR_AND_LOGIC *)e__V01H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__321H=((__EXPR_AND_AND_LOGIC *)e__V01H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__321H=((__EXPR_NEG *)e__V01H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__321H=((__EXPR_ADD *)e__V01H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__321H=((__EXPR_NOT *)e__V01H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__321H=((__EXPR_MOD *)e__V01H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__321H=((__EXPR_SUP_EQ *)e__V01H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__321H=((__EXPR_INF *)e__V01H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__321H=((__EXPR_INF_EQ *)e__V01H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__321H=((__EXPR_OR *)e__V01H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__321H=((__EXPR_XOR *)e__V01H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    new_value__Z01H=create__type__CLQC(__tmp__321H,TYPE_NULL__->parent_type__TIB.default__AKC);
  };
  switch (((struct ___OBJ *)e__V01H)->__id) {
  case __LIST__: {
    __tmp__E31H=((__LIST *)e__V01H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__E31H=((__STRING_CST *)e__V01H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__E31H=((__EXTERNAL_C *)e__V01H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__E31H=((__PROTOTYPE_CST *)e__V01H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__E31H=((__INTEGER_CST *)e__V01H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__E31H=((__READ_LOCAL *)e__V01H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__E31H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__E31H=((__EXPR_EQUAL *)e__V01H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__E31H=((__EXPR_NOT_EQUAL *)e__V01H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__E31H=((__REAL_CST *)e__V01H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__E31H=((__CHARACTER_CST *)e__V01H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__E31H=((__IS_EXPANDED *)e__V01H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__E31H=((__GET_TYPE_ID *)e__V01H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__E31H=((__EXPR_SUP *)e__V01H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__E31H=((__EXPR_SUB *)e__V01H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__E31H=((__EXPR_MUL *)e__V01H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__E31H=((__EXPR_DIV *)e__V01H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__E31H=((__EXPR_AND *)e__V01H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__E31H=((__EXPR_SHIFT_R *)e__V01H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__E31H=((__EXPR_SHIFT_L *)e__V01H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__E31H=((__PUT_TO *)e__V01H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__E31H=((__ITEM *)e__V01H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__E31H=((__SIZE_OF *)e__V01H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__E31H=((__CAST *)e__V01H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__E31H=((__CALL_SLOT *)e__V01H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__E31H=((__READ_SLOT *)e__V01H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__E31H=((__READ_GLOBAL *)e__V01H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__E31H=((__EXPR_NOT_LOGIC *)e__V01H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__E31H=((__EXPR_OR_LOGIC *)e__V01H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__E31H=((__EXPR_OR_OR_LOGIC *)e__V01H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__E31H=((__EXPR_AND_LOGIC *)e__V01H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__E31H=((__EXPR_AND_AND_LOGIC *)e__V01H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__E31H=((__EXPR_NEG *)e__V01H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__E31H=((__EXPR_ADD *)e__V01H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__E31H=((__EXPR_NOT *)e__V01H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__E31H=((__EXPR_MOD *)e__V01H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__E31H=((__EXPR_SUP_EQ *)e__V01H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__E31H=((__EXPR_INF *)e__V01H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__E31H=((__EXPR_INF_EQ *)e__V01H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__E31H=((__EXPR_OR *)e__V01H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__E31H=((__EXPR_XOR *)e__V01H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  add_last__AL4G(((__LIST *)result__001H)->expr_list__JUOG,write__value__T5FH(__tmp__E11H,__tmp__E31H,new_value__Z01H));
  switch (((struct ___OBJ *)e__V01H)->__id) {
  case __LIST__: {
    __tmp__I31H=((__LIST *)e__V01H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__I31H=((__STRING_CST *)e__V01H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__I31H=((__EXTERNAL_C *)e__V01H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__I31H=((__PROTOTYPE_CST *)e__V01H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__I31H=((__INTEGER_CST *)e__V01H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__I31H=((__READ_LOCAL *)e__V01H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__I31H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__I31H=((__EXPR_EQUAL *)e__V01H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__I31H=((__EXPR_NOT_EQUAL *)e__V01H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__I31H=((__REAL_CST *)e__V01H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__I31H=((__CHARACTER_CST *)e__V01H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__I31H=((__IS_EXPANDED *)e__V01H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__I31H=((__GET_TYPE_ID *)e__V01H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__I31H=((__EXPR_SUP *)e__V01H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__I31H=((__EXPR_SUB *)e__V01H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__I31H=((__EXPR_MUL *)e__V01H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__I31H=((__EXPR_DIV *)e__V01H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__I31H=((__EXPR_AND *)e__V01H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__I31H=((__EXPR_SHIFT_R *)e__V01H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__I31H=((__EXPR_SHIFT_L *)e__V01H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__I31H=((__PUT_TO *)e__V01H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__I31H=((__ITEM *)e__V01H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__I31H=((__SIZE_OF *)e__V01H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__I31H=((__CAST *)e__V01H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__I31H=((__CALL_SLOT *)e__V01H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__I31H=((__READ_SLOT *)e__V01H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__I31H=((__READ_GLOBAL *)e__V01H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__I31H=((__EXPR_NOT_LOGIC *)e__V01H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__I31H=((__EXPR_OR_LOGIC *)e__V01H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__I31H=((__EXPR_OR_OR_LOGIC *)e__V01H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__I31H=((__EXPR_AND_LOGIC *)e__V01H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__I31H=((__EXPR_AND_AND_LOGIC *)e__V01H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__I31H=((__EXPR_NEG *)e__V01H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__I31H=((__EXPR_ADD *)e__V01H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__I31H=((__EXPR_NOT *)e__V01H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__I31H=((__EXPR_MOD *)e__V01H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__I31H=((__EXPR_SUP_EQ *)e__V01H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__I31H=((__EXPR_INF *)e__V01H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__I31H=((__EXPR_INF_EQ *)e__V01H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__I31H=((__EXPR_OR *)e__V01H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__I31H=((__EXPR_XOR *)e__V01H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  add_last__AL4G(((__LIST *)result__001H)->expr_list__JUOG,create__type__CLQC(__tmp__I31H,TYPE_VOID__->parent_type__UIB.default__AKC));
  return(result__001H);
}

static void* product__with__O31H(__DTA_WR_CODE *Self__P31H,void *t__Q31H,void *e__R31H)
// ({DTA_WR_CODE},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__U31H,__tmp__NX5I,__tmp__KUHQ,__tmp__QUHQ;
  __POSITION __tmp__WUHQ,__tmp__2UHQ,__tmp__0XTI;
  void *result__T31H;
  void *__tmp__3WTI,*__tmp__5WTI,*s__ZWTI,*__tmp__FXTI,*__tmp__UXTI;
  void *b__LUHQ,*b__RUHQ,*b__XUHQ,*b__3UHQ;
  void *__tmp__4WTI,*__tmp__MUHQ,*__tmp__SUHQ,*__tmp__YUHQ,*__tmp__4UHQ;
  void *__tmp__GXTI,*__tmp__HXTI,*__tmp__2X5I;
  __STRING_CST *Self__CUHQ,*Self__CVHQ;
  __PROTOTYPE_CST *Self__DUHQ,*Self__DVHQ;
  __INTEGER_CST *Self__EUHQ,*Self__EVHQ;
  __REAL_CST *Self__GUHQ,*Self__GVHQ;
  __CHARACTER_CST *Self__IUHQ,*Self__IVHQ;
  __IS_EXPANDED *Self__JUHQ,*Self__JVHQ;
  void *__tmp__TXTI,*__tmp__VXTI;
  void *__tmp__OX5I;
  __SLOT_DATA *Self__2TIJ,*result__OUHQ,*result__UUHQ,*result__0UHQ;
  __SLOT_DATA *result__AVHQ;
  __INTEGER result__AUIJ,__tmp__PX5I,result__2VIJ;
  void *slot__5TIJ,*slot__1VIJ;
  void *t__PUHQ,*t__VUHQ,*t__1UHQ,*t__BVHQ;
  __SLOT_CODE *Self__YVIJ;
  void *id__JX5I;
  void *__tmp__1X5I,*__tmp__FY5I;
  __CHARACTER __tmp__NUHQ,__tmp__TUHQ,__tmp__ZUHQ,__tmp__5UHQ;
  __CHARACTER __tmp__VX5I;
  switch (((struct ___OBJ *)e__R31H)->__id) {
  case __LIST__: {
    __tmp__U31H=((__LIST *)e__R31H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__U31H=((__STRING_CST *)e__R31H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__U31H=((__EXTERNAL_C *)e__R31H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__U31H=((__PROTOTYPE_CST *)e__R31H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__U31H=((__INTEGER_CST *)e__R31H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__U31H=((__READ_LOCAL *)e__R31H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__U31H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__U31H=((__EXPR_EQUAL *)e__R31H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__U31H=((__EXPR_NOT_EQUAL *)e__R31H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__U31H=((__REAL_CST *)e__R31H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__U31H=((__CHARACTER_CST *)e__R31H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__U31H=((__IS_EXPANDED *)e__R31H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__U31H=((__GET_TYPE_ID *)e__R31H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__U31H=((__EXPR_SUP *)e__R31H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__U31H=((__EXPR_SUB *)e__R31H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__U31H=((__EXPR_MUL *)e__R31H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__U31H=((__EXPR_DIV *)e__R31H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__U31H=((__EXPR_AND *)e__R31H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__U31H=((__EXPR_SHIFT_R *)e__R31H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__U31H=((__EXPR_SHIFT_L *)e__R31H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__U31H=((__PUT_TO *)e__R31H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__U31H=((__ITEM *)e__R31H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__U31H=((__SIZE_OF *)e__R31H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__U31H=((__CAST *)e__R31H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__U31H=((__CALL_SLOT *)e__R31H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__U31H=((__READ_SLOT *)e__R31H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__U31H=((__READ_GLOBAL *)e__R31H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__U31H=((__EXPR_NOT_LOGIC *)e__R31H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__U31H=((__EXPR_OR_LOGIC *)e__R31H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__U31H=((__EXPR_OR_OR_LOGIC *)e__R31H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__U31H=((__EXPR_AND_LOGIC *)e__R31H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__U31H=((__EXPR_AND_AND_LOGIC *)e__R31H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__U31H=((__EXPR_NEG *)e__R31H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__U31H=((__EXPR_ADD *)e__R31H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__U31H=((__EXPR_NOT *)e__R31H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__U31H=((__EXPR_MOD *)e__R31H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__U31H=((__EXPR_SUP_EQ *)e__R31H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__U31H=((__EXPR_INF *)e__R31H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__U31H=((__EXPR_INF_EQ *)e__R31H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__U31H=((__EXPR_OR *)e__R31H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__U31H=((__EXPR_XOR *)e__R31H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  result__T31H=create__QCAG(__tmp__U31H);
  if (((void *)t__Q31H == (void *)TYPE_NULL__)) {
    product_error__for__in__with__2L0G(Self__P31H->parent_dta__E0LH.parent_itm_object__5LQC.position__BJM,Self__P31H->parent_dta__E0LH.result_expr__RJZD,result__T31H,Self__P31H->parent_dta__E0LH.context__OJZD);
  } else {
    __tmp__3WTI=Self__P31H->parent_dta__E0LH.slot__PJZD;
    if (((struct ___OBJ *)__tmp__3WTI)->__id==__SLOT_DATA__) {
      __tmp__4WTI=((__SLOT_DATA *)__tmp__3WTI)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
    } else {
      __tmp__4WTI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__3WTI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
    };
    switch (((struct ___OBJ *)t__Q31H)->__id) {
    case __TYPE__: {
      __tmp__5WTI=get_local_slot__H4EG(t__Q31H,__tmp__4WTI);
    } break;
    case __TYPE_NULL__: {
      __tmp__5WTI=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__5WTI=get_local_slot__1AFG(t__Q31H,__tmp__4WTI);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__5WTI=get_local_slot__DDFG(t__Q31H,__tmp__4WTI);
    } break;
    case __TYPE_ID__: {
      __tmp__5WTI=get_local_slot__LFFG(t__Q31H,__tmp__4WTI);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__5WTI=get_local_slot__THFG(t__Q31H,__tmp__4WTI);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__5WTI=get_local_slot__05EJ(__tmp__4WTI);
    } break;
    };
    s__ZWTI=__tmp__5WTI;
    if (((void *)__tmp__5WTI == (void *)NULL)) {
      switch (((struct ___OBJ *)t__Q31H)->__id) {
      case __TYPE__: {
        __tmp__FXTI=get_path_slot__JK1G(t__Q31H,__tmp__4WTI);
      } break;
      case __TYPE_NULL__: {
        __tmp__FXTI=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__FXTI=get_path_slot__CM1G(t__Q31H,__tmp__4WTI);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__FXTI=get_path_slot__XN1G(t__Q31H,__tmp__4WTI);
      } break;
      case __TYPE_ID__: {
        __tmp__FXTI=get_path_slot__MP1G(t__Q31H,__tmp__4WTI);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__FXTI=get_path_slot__BR1G(t__Q31H,__tmp__4WTI);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__FXTI=get_path_slot__HAFJ(__tmp__4WTI);
      } break;
      };
      s__ZWTI=__tmp__FXTI;
      if (((struct ___OBJ *)__tmp__FXTI)->__id==__SLOT_DATA__) {
        __tmp__GXTI=get_expr_result__RUOG(__tmp__FXTI);
      } else {
        __tmp__GXTI=get_expr_result__QXOG(__tmp__FXTI);
      };
      switch (((struct ___OBJ *)e__R31H)->__id) {
      case __LIST__: {
        __tmp__HXTI=my_copy__2HYM(e__R31H);
      } break;
      case __STRING_CST__: {
        Self__CUHQ=((__STRING_CST *)e__R31H);
        __tmp__HXTI=create__text__AUMH(Self__CUHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CUHQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__HXTI=my_copy__2K2H(e__R31H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__DUHQ=((__PROTOTYPE_CST *)e__R31H);
        __tmp__HXTI=create__type__CLQC(Self__DUHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DUHQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__EUHQ=((__INTEGER_CST *)e__R31H);
        __tmp__HXTI=create__value__type__DNQC(Self__EUHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EUHQ->value__PAZD,Self__EUHQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__HXTI=my_copy__OAFJ(e__R31H);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__HXTI=my_copy__KM2H(e__R31H);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__HXTI=my_copy__DN2H(e__R31H);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__HXTI=my_copy__QN2H(e__R31H);
      } break;
      case __REAL_CST__: {
        Self__GUHQ=((__REAL_CST *)e__R31H);
        __tmp__HXTI=create__value__type__1SMH(Self__GUHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GUHQ->value__5N2H,Self__GUHQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__IUHQ=((__CHARACTER_CST *)e__R31H);
        __tmp__HXTI=create__char__WTMH(Self__IUHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IUHQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__JUHQ=((__IS_EXPANDED *)e__R31H);
        __tmp__HXTI=create__receiver__WRWH(Self__JUHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__JUHQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__HXTI=my_copy__TO2H(e__R31H);
      } break;
      case __EXPR_SUP__: {
        __tmp__HXTI=my_copy__2O2H(e__R31H);
      } break;
      case __EXPR_SUB__: {
        __tmp__HXTI=my_copy__HP2H(e__R31H);
      } break;
      case __EXPR_MUL__: {
        __tmp__HXTI=my_copy__TP2H(e__R31H);
      } break;
      case __EXPR_DIV__: {
        __tmp__HXTI=my_copy__4P2H(e__R31H);
      } break;
      case __EXPR_AND__: {
        __tmp__HXTI=my_copy__JQ2H(e__R31H);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__HXTI=my_copy__UQ2H(e__R31H);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__HXTI=my_copy__5Q2H(e__R31H);
      } break;
      case __PUT_TO__: {
        __tmp__HXTI=my_copy__KR2H(e__R31H);
      } break;
      case __ITEM__: {
        __tmp__HXTI=my_copy__1R2H(e__R31H);
      } break;
      case __SIZE_OF__: {
        __tmp__HXTI=my_copy__HS2H(e__R31H);
      } break;
      case __CAST__: {
        __tmp__HXTI=my_copy__QS2H(e__R31H);
      } break;
      case __CALL_SLOT__: {
        __tmp__HXTI=my_copy__PIYM(e__R31H);
      } break;
      case __READ_SLOT__: {
        __tmp__HXTI=my_copy__AVGK(e__R31H);
      } break;
      case __READ_GLOBAL__: {
        __tmp__HXTI=my_copy__NVGK(e__R31H);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__HXTI=my_copy__RFCN(e__R31H);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__HXTI=my_copy__JMEO(e__R31H);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__HXTI=my_copy__RTJO(e__R31H);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__HXTI=my_copy__WMEO(e__R31H);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__HXTI=my_copy__3TJO(e__R31H);
      } break;
      case __EXPR_NEG__: {
        __tmp__HXTI=my_copy__YEJM(e__R31H);
      } break;
      case __EXPR_ADD__: {
        __tmp__HXTI=my_copy__YRLL(e__R31H);
      } break;
      case __EXPR_NOT__: {
        __tmp__HXTI=my_copy__GLYM(e__R31H);
      } break;
      case __EXPR_MOD__: {
        __tmp__HXTI=my_copy__BNEO(e__R31H);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__HXTI=my_copy__M3DP(e__R31H);
      } break;
      case __EXPR_INF__: {
        __tmp__HXTI=my_copy__PBSN(e__R31H);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__HXTI=my_copy__0BSN(e__R31H);
      } break;
      case __EXPR_OR__: {
        __tmp__HXTI=my_copy__ZOPN(e__R31H);
      } break;
      case __EXPR_XOR__: {
        __tmp__HXTI=my_copy__CYSO(e__R31H);
      } break;
      };
      add_last__AL4G(((__LIST *)result__T31H)->expr_list__JUOG,create__with__result__2S1G(__tmp__HXTI,__tmp__FXTI,Self__P31H,__tmp__GXTI));
      add_last__AL4G(((__LIST *)result__T31H)->expr_list__JUOG,create__with__GWUC(__tmp__GXTI,Self__P31H));
    } else {
      if (((struct ___OBJ *)s__ZWTI)->__id==__SLOT_DATA__) {
        __tmp__TXTI=((__SLOT *)((__SLOT_DATA *)s__ZWTI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__TXTI=((__SLOT *)((__SLOT_CODE *)s__ZWTI)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__UXTI=Self__P31H->parent_dta__E0LH.slot__PJZD;
      if (((struct ___OBJ *)__tmp__UXTI)->__id==__SLOT_DATA__) {
        __tmp__VXTI=((__SLOT *)((__SLOT_DATA *)__tmp__UXTI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__VXTI=((__SLOT *)((__SLOT_CODE *)__tmp__UXTI)->parent_slot__Y22F)->base_slot__P22F;
      };
      is_equal_profil__PL5G(__tmp__TXTI,__tmp__VXTI);
      switch (((struct ___OBJ *)e__R31H)->__id) {
      case __LIST__: {
        __tmp__NX5I=((__LIST *)e__R31H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __STRING_CST__: {
        __tmp__NX5I=((__STRING_CST *)e__R31H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXTERNAL_C__: {
        __tmp__NX5I=((__EXTERNAL_C *)e__R31H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__NX5I=((__PROTOTYPE_CST *)e__R31H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __INTEGER_CST__: {
        __tmp__NX5I=((__INTEGER_CST *)e__R31H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_LOCAL__: {
        __tmp__NX5I=((__READ_LOCAL *)e__R31H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__NX5I=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__NX5I=((__EXPR_EQUAL *)e__R31H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__NX5I=((__EXPR_NOT_EQUAL *)e__R31H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __REAL_CST__: {
        __tmp__NX5I=((__REAL_CST *)e__R31H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CHARACTER_CST__: {
        __tmp__NX5I=((__CHARACTER_CST *)e__R31H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __IS_EXPANDED__: {
        __tmp__NX5I=((__IS_EXPANDED *)e__R31H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__NX5I=((__GET_TYPE_ID *)e__R31H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP__: {
        __tmp__NX5I=((__EXPR_SUP *)e__R31H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUB__: {
        __tmp__NX5I=((__EXPR_SUB *)e__R31H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MUL__: {
        __tmp__NX5I=((__EXPR_MUL *)e__R31H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_DIV__: {
        __tmp__NX5I=((__EXPR_DIV *)e__R31H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND__: {
        __tmp__NX5I=((__EXPR_AND *)e__R31H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__NX5I=((__EXPR_SHIFT_R *)e__R31H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__NX5I=((__EXPR_SHIFT_L *)e__R31H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PUT_TO__: {
        __tmp__NX5I=((__PUT_TO *)e__R31H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __ITEM__: {
        __tmp__NX5I=((__ITEM *)e__R31H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __SIZE_OF__: {
        __tmp__NX5I=((__SIZE_OF *)e__R31H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CAST__: {
        __tmp__NX5I=((__CAST *)e__R31H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CALL_SLOT__: {
        __tmp__NX5I=((__CALL_SLOT *)e__R31H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_SLOT__: {
        __tmp__NX5I=((__READ_SLOT *)e__R31H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_GLOBAL__: {
        __tmp__NX5I=((__READ_GLOBAL *)e__R31H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__NX5I=((__EXPR_NOT_LOGIC *)e__R31H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__NX5I=((__EXPR_OR_LOGIC *)e__R31H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__NX5I=((__EXPR_OR_OR_LOGIC *)e__R31H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__NX5I=((__EXPR_AND_LOGIC *)e__R31H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__NX5I=((__EXPR_AND_AND_LOGIC *)e__R31H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NEG__: {
        __tmp__NX5I=((__EXPR_NEG *)e__R31H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_ADD__: {
        __tmp__NX5I=((__EXPR_ADD *)e__R31H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT__: {
        __tmp__NX5I=((__EXPR_NOT *)e__R31H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MOD__: {
        __tmp__NX5I=((__EXPR_MOD *)e__R31H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__NX5I=((__EXPR_SUP_EQ *)e__R31H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF__: {
        __tmp__NX5I=((__EXPR_INF *)e__R31H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__NX5I=((__EXPR_INF_EQ *)e__R31H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR__: {
        __tmp__NX5I=((__EXPR_OR *)e__R31H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_XOR__: {
        __tmp__NX5I=((__EXPR_XOR *)e__R31H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      };
      __tmp__OX5I=Self__P31H->code__IOEI;
      if (((struct ___OBJ *)s__ZWTI)->__id==__SLOT_DATA__) {
        Self__2TIJ=((__SLOT_DATA *)s__ZWTI);
        result__AUIJ= 0;
        slot__5TIJ=create__with__YJ3F(Self__2TIJ->parent_slot__BJZD,__tmp__OX5I);
        if (((void *)((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_code_intern__322F == (void *)NULL)) {
          ((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_code_intern__322F=slot__5TIJ;
          b__LUHQ=Self__2TIJ->parent_slot__BJZD;
          t__PUHQ=((__TYPE_ID *)get_index__B3ZH( 0))->parent_type__WIB.default__AKC;
          __tmp__KUHQ=ITM_OBJECT__->position__BJM;
          __tmp__MUHQ=((__ITM_SLOT *)((__SLOT *)b__LUHQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
          __tmp__NUHQ=((__ITM_SLOT *)((__SLOT *)b__LUHQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
          result__OUHQ=clone__K53F();
          make__name__style__base__type__P25F(result__OUHQ,__tmp__KUHQ,__tmp__MUHQ,__tmp__NUHQ,b__LUHQ,t__PUHQ);
          ((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_id__04OG=result__OUHQ;
          init__C4OG(((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_id__04OG);
          result__AUIJ= 1;
        } else {
          if (((void *)((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_code_list__ZUIJ == (void *)NULL)) {
            ((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_code_list__ZUIJ=create_with_capacity__HV4J();
          };
          add_last__QPIK(((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_code_list__ZUIJ,slot__5TIJ);
          if (((void *)((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_id__04OG == (void *)NULL)) {
            b__RUHQ=Self__2TIJ->parent_slot__BJZD;
            t__VUHQ=((__TYPE_ID *)get_index__B3ZH( 1))->parent_type__WIB.default__AKC;
            __tmp__QUHQ=ITM_OBJECT__->position__BJM;
            __tmp__SUHQ=((__ITM_SLOT *)((__SLOT *)b__RUHQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
            __tmp__TUHQ=((__ITM_SLOT *)((__SLOT *)b__RUHQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
            result__UUHQ=clone__K53F();
            make__name__style__base__type__P25F(result__UUHQ,__tmp__QUHQ,__tmp__SUHQ,__tmp__TUHQ,b__RUHQ,t__VUHQ);
            ((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_id__04OG=result__UUHQ;
            init__C4OG(((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_id__04OG);
          };
          result__AUIJ=(__INTEGER)(((__FAST_ARRAYoSLOT_CODEo *)((__SLOT *)Self__2TIJ->parent_slot__BJZD)->slot_code_list__ZUIJ)->parent_arrayed_collection__YUIJ.upper__TVIJ +  2);
        };
        __tmp__PX5I=result__AUIJ;
      } else {
        Self__YVIJ=((__SLOT_CODE *)s__ZWTI);
        result__2VIJ= 0;
        slot__1VIJ=create__with__YJ3F(Self__YVIJ->parent_slot__Y22F,__tmp__OX5I);
        if (((void *)((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_code_intern__322F == (void *)NULL)) {
          ((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_code_intern__322F=slot__1VIJ;
          b__XUHQ=Self__YVIJ->parent_slot__Y22F;
          t__1UHQ=((__TYPE_ID *)get_index__B3ZH( 0))->parent_type__WIB.default__AKC;
          __tmp__WUHQ=ITM_OBJECT__->position__BJM;
          __tmp__YUHQ=((__ITM_SLOT *)((__SLOT *)b__XUHQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
          __tmp__ZUHQ=((__ITM_SLOT *)((__SLOT *)b__XUHQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
          result__0UHQ=clone__K53F();
          make__name__style__base__type__P25F(result__0UHQ,__tmp__WUHQ,__tmp__YUHQ,__tmp__ZUHQ,b__XUHQ,t__1UHQ);
          ((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_id__04OG=result__0UHQ;
          init__C4OG(((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_id__04OG);
          result__2VIJ= 1;
        } else {
          if (((void *)((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_code_list__ZUIJ == (void *)NULL)) {
            ((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_code_list__ZUIJ=create_with_capacity__HV4J();
          };
          add_last__QPIK(((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_code_list__ZUIJ,slot__1VIJ);
          if (((void *)((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_id__04OG == (void *)NULL)) {
            b__3UHQ=Self__YVIJ->parent_slot__Y22F;
            t__BVHQ=((__TYPE_ID *)get_index__B3ZH( 1))->parent_type__WIB.default__AKC;
            __tmp__2UHQ=ITM_OBJECT__->position__BJM;
            __tmp__4UHQ=((__ITM_SLOT *)((__SLOT *)b__3UHQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
            __tmp__5UHQ=((__ITM_SLOT *)((__SLOT *)b__3UHQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
            result__AVHQ=clone__K53F();
            make__name__style__base__type__P25F(result__AVHQ,__tmp__2UHQ,__tmp__4UHQ,__tmp__5UHQ,b__3UHQ,t__BVHQ);
            ((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_id__04OG=result__AVHQ;
            init__C4OG(((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_id__04OG);
          };
          result__2VIJ=(__INTEGER)(((__FAST_ARRAYoSLOT_CODEo *)((__SLOT *)Self__YVIJ->parent_slot__Y22F)->slot_code_list__ZUIJ)->parent_arrayed_collection__YUIJ.upper__TVIJ +  2);
        };
        __tmp__PX5I=result__2VIJ;
      };
      id__JX5I=create__type__CLQC(__tmp__NX5I,((__TYPE_ID *)get_index__B3ZH(__tmp__PX5I))->parent_type__WIB.default__AKC);
      if (((struct ___OBJ *)s__ZWTI)->__id==__SLOT_DATA__) {
        __tmp__VX5I=((__SLOT_DATA *)s__ZWTI)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
      } else {
        __tmp__VX5I=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)s__ZWTI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      };
      if ((__tmp__VX5I == '+')) {
        if (((struct ___OBJ *)s__ZWTI)->__id==__SLOT_DATA__) {
          __tmp__1X5I=((__SLOT *)((__SLOT_DATA *)s__ZWTI)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__1X5I=((__SLOT *)((__SLOT_CODE *)s__ZWTI)->parent_slot__Y22F)->slot_id__04OG;
        };
        switch (((struct ___OBJ *)e__R31H)->__id) {
        case __LIST__: {
          __tmp__2X5I=my_copy__2HYM(e__R31H);
        } break;
        case __STRING_CST__: {
          Self__CVHQ=((__STRING_CST *)e__R31H);
          __tmp__2X5I=create__text__AUMH(Self__CVHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CVHQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__2X5I=my_copy__2K2H(e__R31H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__DVHQ=((__PROTOTYPE_CST *)e__R31H);
          __tmp__2X5I=create__type__CLQC(Self__DVHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DVHQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__EVHQ=((__INTEGER_CST *)e__R31H);
          __tmp__2X5I=create__value__type__DNQC(Self__EVHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EVHQ->value__PAZD,Self__EVHQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__2X5I=my_copy__OAFJ(e__R31H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__2X5I=my_copy__KM2H(e__R31H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__2X5I=my_copy__DN2H(e__R31H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__2X5I=my_copy__QN2H(e__R31H);
        } break;
        case __REAL_CST__: {
          Self__GVHQ=((__REAL_CST *)e__R31H);
          __tmp__2X5I=create__value__type__1SMH(Self__GVHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GVHQ->value__5N2H,Self__GVHQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__IVHQ=((__CHARACTER_CST *)e__R31H);
          __tmp__2X5I=create__char__WTMH(Self__IVHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IVHQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__JVHQ=((__IS_EXPANDED *)e__R31H);
          __tmp__2X5I=create__receiver__WRWH(Self__JVHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__JVHQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__2X5I=my_copy__TO2H(e__R31H);
        } break;
        case __EXPR_SUP__: {
          __tmp__2X5I=my_copy__2O2H(e__R31H);
        } break;
        case __EXPR_SUB__: {
          __tmp__2X5I=my_copy__HP2H(e__R31H);
        } break;
        case __EXPR_MUL__: {
          __tmp__2X5I=my_copy__TP2H(e__R31H);
        } break;
        case __EXPR_DIV__: {
          __tmp__2X5I=my_copy__4P2H(e__R31H);
        } break;
        case __EXPR_AND__: {
          __tmp__2X5I=my_copy__JQ2H(e__R31H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__2X5I=my_copy__UQ2H(e__R31H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__2X5I=my_copy__5Q2H(e__R31H);
        } break;
        case __PUT_TO__: {
          __tmp__2X5I=my_copy__KR2H(e__R31H);
        } break;
        case __ITEM__: {
          __tmp__2X5I=my_copy__1R2H(e__R31H);
        } break;
        case __SIZE_OF__: {
          __tmp__2X5I=my_copy__HS2H(e__R31H);
        } break;
        case __CAST__: {
          __tmp__2X5I=my_copy__QS2H(e__R31H);
        } break;
        case __CALL_SLOT__: {
          __tmp__2X5I=my_copy__PIYM(e__R31H);
        } break;
        case __READ_SLOT__: {
          __tmp__2X5I=my_copy__AVGK(e__R31H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__2X5I=my_copy__NVGK(e__R31H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__2X5I=my_copy__RFCN(e__R31H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__2X5I=my_copy__JMEO(e__R31H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__2X5I=my_copy__RTJO(e__R31H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__2X5I=my_copy__WMEO(e__R31H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__2X5I=my_copy__3TJO(e__R31H);
        } break;
        case __EXPR_NEG__: {
          __tmp__2X5I=my_copy__YEJM(e__R31H);
        } break;
        case __EXPR_ADD__: {
          __tmp__2X5I=my_copy__YRLL(e__R31H);
        } break;
        case __EXPR_NOT__: {
          __tmp__2X5I=my_copy__GLYM(e__R31H);
        } break;
        case __EXPR_MOD__: {
          __tmp__2X5I=my_copy__BNEO(e__R31H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__2X5I=my_copy__M3DP(e__R31H);
        } break;
        case __EXPR_INF__: {
          __tmp__2X5I=my_copy__PBSN(e__R31H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__2X5I=my_copy__0BSN(e__R31H);
        } break;
        case __EXPR_OR__: {
          __tmp__2X5I=my_copy__ZOPN(e__R31H);
        } break;
        case __EXPR_XOR__: {
          __tmp__2X5I=my_copy__CYSO(e__R31H);
        } break;
        };
        add_last__AL4G(((__LIST *)result__T31H)->expr_list__JUOG,write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__1X5I),__tmp__NX5I,__tmp__2X5I,id__JX5I));
      } else {
        if (((struct ___OBJ *)s__ZWTI)->__id==__SLOT_DATA__) {
          __tmp__FY5I=((__SLOT *)((__SLOT_DATA *)s__ZWTI)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__FY5I=((__SLOT *)((__SLOT_CODE *)s__ZWTI)->parent_slot__Y22F)->slot_id__04OG;
        };
        add_last__AL4G(((__LIST *)result__T31H)->expr_list__JUOG,write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__FY5I),__tmp__NX5I,NULL,id__JX5I));
      };
    };
    switch (((struct ___OBJ *)e__R31H)->__id) {
    case __LIST__: {
      __tmp__0XTI=((__LIST *)e__R31H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__0XTI=((__STRING_CST *)e__R31H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0XTI=((__EXTERNAL_C *)e__R31H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0XTI=((__PROTOTYPE_CST *)e__R31H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__0XTI=((__INTEGER_CST *)e__R31H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__0XTI=((__READ_LOCAL *)e__R31H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0XTI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0XTI=((__EXPR_EQUAL *)e__R31H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0XTI=((__EXPR_NOT_EQUAL *)e__R31H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__0XTI=((__REAL_CST *)e__R31H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__0XTI=((__CHARACTER_CST *)e__R31H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__0XTI=((__IS_EXPANDED *)e__R31H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0XTI=((__GET_TYPE_ID *)e__R31H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__0XTI=((__EXPR_SUP *)e__R31H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__0XTI=((__EXPR_SUB *)e__R31H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__0XTI=((__EXPR_MUL *)e__R31H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__0XTI=((__EXPR_DIV *)e__R31H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__0XTI=((__EXPR_AND *)e__R31H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0XTI=((__EXPR_SHIFT_R *)e__R31H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0XTI=((__EXPR_SHIFT_L *)e__R31H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__0XTI=((__PUT_TO *)e__R31H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__0XTI=((__ITEM *)e__R31H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__0XTI=((__SIZE_OF *)e__R31H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__0XTI=((__CAST *)e__R31H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__0XTI=((__CALL_SLOT *)e__R31H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__0XTI=((__READ_SLOT *)e__R31H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__0XTI=((__READ_GLOBAL *)e__R31H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0XTI=((__EXPR_NOT_LOGIC *)e__R31H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0XTI=((__EXPR_OR_LOGIC *)e__R31H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0XTI=((__EXPR_OR_OR_LOGIC *)e__R31H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0XTI=((__EXPR_AND_LOGIC *)e__R31H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0XTI=((__EXPR_AND_AND_LOGIC *)e__R31H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__0XTI=((__EXPR_NEG *)e__R31H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__0XTI=((__EXPR_ADD *)e__R31H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__0XTI=((__EXPR_NOT *)e__R31H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__0XTI=((__EXPR_MOD *)e__R31H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0XTI=((__EXPR_SUP_EQ *)e__R31H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__0XTI=((__EXPR_INF *)e__R31H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0XTI=((__EXPR_INF_EQ *)e__R31H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__0XTI=((__EXPR_OR *)e__R31H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__0XTI=((__EXPR_XOR *)e__R31H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    add_last__AL4G(((__LIST *)result__T31H)->expr_list__JUOG,create__type__CLQC(__tmp__0XTI,TYPE_VOID__->parent_type__UIB.default__AKC));
  };
  return(result__T31H);
}

static void* product__with__F41H(__DTA_BLOCK *Self__G41H,void *t__H41H,void *e__I41H)
// ({DTA_BLOCK},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *t_block__L41H,*__tmp__G51H;
  void *call__P41H;
  void *em__Q41H,*__tmp__W51H;
  void *rd__R41H,*__tmp__IA2H,*__tmp__AB2H,*__tmp__IB2H;
  __POSITION __tmp__T41H,__tmp__141H,__tmp__2YKJ,__tmp__YZKJ;
  __POSITION __tmp__J51H,__tmp__YA2H,__tmp__RB2H,__tmp__2B2H;
  void *result__K41H;
  __PROFIL_BLOCK *Self__J4GJ;
  void *rec__N4GJ,*val__QYKJ,*__tmp__1YKJ,*__tmp__M51H,*__tmp__V51H;
  void *__tmp__HA2H,*__tmp__5A2H,*__tmp__HB2H;
  void *__tmp__P4GJ;
  void *loc__PYKJ,*__tmp__UA2H;
  __INTEGER __tmp__KZKJ,Self__ZPOJ,__tmp__AA2H,Self__0JBJ;
  __READ_LOCAL *Self__VVHQ,*Self__XVHQ;
  __READ_GLOBAL *Self__YVHQ;
  void *__tmp__N51H;
  void *__tmp__PA2H,*__tmp__QB2H;
  void *__tmp__RA2H;
  void *__tmp__0A2H,*__tmp__TB2H;
  void *__tmp__H51H;
  __FAST_ARRAYoEXPRo *Self__BZ4Q,*Self__TZ4Q;
  void *result__SYKJ;
  void *__tmp__TA2H;
  t_block__L41H=NULL;
  call__P41H=NULL;
  em__Q41H=NULL;
  rd__R41H=NULL;
  switch (((struct ___OBJ *)e__I41H)->__id) {
  case __LIST__: {
    __tmp__T41H=((__LIST *)e__I41H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__T41H=((__STRING_CST *)e__I41H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__T41H=((__EXTERNAL_C *)e__I41H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__T41H=((__PROTOTYPE_CST *)e__I41H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__T41H=((__INTEGER_CST *)e__I41H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__T41H=((__READ_LOCAL *)e__I41H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__T41H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__T41H=((__EXPR_EQUAL *)e__I41H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__T41H=((__EXPR_NOT_EQUAL *)e__I41H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__T41H=((__REAL_CST *)e__I41H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__T41H=((__CHARACTER_CST *)e__I41H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__T41H=((__IS_EXPANDED *)e__I41H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__T41H=((__GET_TYPE_ID *)e__I41H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__T41H=((__EXPR_SUP *)e__I41H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__T41H=((__EXPR_SUB *)e__I41H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__T41H=((__EXPR_MUL *)e__I41H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__T41H=((__EXPR_DIV *)e__I41H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__T41H=((__EXPR_AND *)e__I41H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__T41H=((__EXPR_SHIFT_R *)e__I41H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__T41H=((__EXPR_SHIFT_L *)e__I41H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__T41H=((__PUT_TO *)e__I41H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__T41H=((__ITEM *)e__I41H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__T41H=((__SIZE_OF *)e__I41H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__T41H=((__CAST *)e__I41H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__T41H=((__CALL_SLOT *)e__I41H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__T41H=((__READ_SLOT *)e__I41H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__T41H=((__READ_GLOBAL *)e__I41H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__T41H=((__EXPR_NOT_LOGIC *)e__I41H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__T41H=((__EXPR_OR_LOGIC *)e__I41H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__T41H=((__EXPR_OR_OR_LOGIC *)e__I41H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__T41H=((__EXPR_AND_LOGIC *)e__I41H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__T41H=((__EXPR_AND_AND_LOGIC *)e__I41H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__T41H=((__EXPR_NEG *)e__I41H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__T41H=((__EXPR_ADD *)e__I41H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__T41H=((__EXPR_NOT *)e__I41H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__T41H=((__EXPR_MOD *)e__I41H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__T41H=((__EXPR_SUP_EQ *)e__I41H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__T41H=((__EXPR_INF *)e__I41H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__T41H=((__EXPR_INF_EQ *)e__I41H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__T41H=((__EXPR_OR *)e__I41H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__T41H=((__EXPR_XOR *)e__I41H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  result__K41H=create__QCAG(__tmp__T41H);
  if (((void *)t__H41H == (void *)TYPE_NULL__)) {
    switch (((struct ___OBJ *)e__I41H)->__id) {
    case __LIST__: {
      __tmp__141H=((__LIST *)e__I41H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__141H=((__STRING_CST *)e__I41H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__141H=((__EXTERNAL_C *)e__I41H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__141H=((__PROTOTYPE_CST *)e__I41H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__141H=((__INTEGER_CST *)e__I41H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__141H=((__READ_LOCAL *)e__I41H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__141H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__141H=((__EXPR_EQUAL *)e__I41H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__141H=((__EXPR_NOT_EQUAL *)e__I41H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__141H=((__REAL_CST *)e__I41H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__141H=((__CHARACTER_CST *)e__I41H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__141H=((__IS_EXPANDED *)e__I41H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__141H=((__GET_TYPE_ID *)e__I41H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__141H=((__EXPR_SUP *)e__I41H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__141H=((__EXPR_SUB *)e__I41H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__141H=((__EXPR_MUL *)e__I41H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__141H=((__EXPR_DIV *)e__I41H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__141H=((__EXPR_AND *)e__I41H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__141H=((__EXPR_SHIFT_R *)e__I41H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__141H=((__EXPR_SHIFT_L *)e__I41H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__141H=((__PUT_TO *)e__I41H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__141H=((__ITEM *)e__I41H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__141H=((__SIZE_OF *)e__I41H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__141H=((__CAST *)e__I41H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__141H=((__CALL_SLOT *)e__I41H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__141H=((__READ_SLOT *)e__I41H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__141H=((__READ_GLOBAL *)e__I41H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__141H=((__EXPR_NOT_LOGIC *)e__I41H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__141H=((__EXPR_OR_LOGIC *)e__I41H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__141H=((__EXPR_OR_OR_LOGIC *)e__I41H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__141H=((__EXPR_AND_LOGIC *)e__I41H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__141H=((__EXPR_AND_AND_LOGIC *)e__I41H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__141H=((__EXPR_NEG *)e__I41H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__141H=((__EXPR_ADD *)e__I41H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__141H=((__EXPR_NOT *)e__I41H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__141H=((__EXPR_MOD *)e__I41H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__141H=((__EXPR_SUP_EQ *)e__I41H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__141H=((__EXPR_INF *)e__I41H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__141H=((__EXPR_INF_EQ *)e__I41H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__141H=((__EXPR_OR *)e__I41H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__141H=((__EXPR_XOR *)e__I41H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    product_error__for__in__with__2L0G(__tmp__141H,Self__G41H->result_expr__341H,result__K41H,Self__G41H->context__52UH);
  } else {
    if (t__H41H==NULL) {
      __tmp__G51H=NULL;
    } else {
      switch (((struct ___OBJ *)t__H41H)->__id) {
      case __TYPE__: {
        __tmp__G51H=NULL;
      } break;
      case __TYPE_NULL__: {
        __tmp__G51H=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__G51H=NULL;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__G51H=NULL;
      } break;
      case __TYPE_ID__: {
        __tmp__G51H=NULL;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__G51H=NULL;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__G51H=((void *)t__H41H);
      } break;
      }
    };
    t_block__L41H=__tmp__G51H;
    __tmp__H51H=get_argument__T0TI(Self__G41H);
    Self__J4GJ=((__PROFIL_BLOCK *)__tmp__G51H);
    rec__N4GJ=((void **)((__FAST_ARRAYoEXPRo *)__tmp__H51H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    __tmp__P4GJ=Self__J4GJ->slot_self__T4IH;
    switch (((struct ___OBJ *)rec__N4GJ)->__id) {
    case __LIST__: {
    } break;
    case __STRING_CST__: {
    } break;
    case __EXTERNAL_C__: {
    } break;
    case __PROTOTYPE_CST__: {
    } break;
    case __INTEGER_CST__: {
    } break;
    case __READ_LOCAL__: {
    } break;
    case __EXPR_MULTIPLE__: {
    } break;
    case __EXPR_EQUAL__: {
    } break;
    case __EXPR_NOT_EQUAL__: {
    } break;
    case __REAL_CST__: {
    } break;
    case __CHARACTER_CST__: {
    } break;
    case __IS_EXPANDED__: {
    } break;
    case __GET_TYPE_ID__: {
    } break;
    case __EXPR_SUP__: {
    } break;
    case __EXPR_SUB__: {
    } break;
    case __EXPR_MUL__: {
    } break;
    case __EXPR_DIV__: {
    } break;
    case __EXPR_AND__: {
    } break;
    case __EXPR_SHIFT_R__: {
    } break;
    case __EXPR_SHIFT_L__: {
    } break;
    case __PUT_TO__: {
    } break;
    case __ITEM__: {
    } break;
    case __SIZE_OF__: {
    } break;
    case __CAST__: {
    } break;
    case __CALL_SLOT__: {
    } break;
    case __READ_SLOT__: {
    } break;
    case __READ_GLOBAL__: {
    } break;
    case __EXPR_NOT_LOGIC__: {
    } break;
    case __EXPR_OR_LOGIC__: {
    } break;
    case __EXPR_OR_OR_LOGIC__: {
    } break;
    case __EXPR_AND_LOGIC__: {
    } break;
    case __EXPR_AND_AND_LOGIC__: {
    } break;
    case __EXPR_NEG__: {
    } break;
    case __EXPR_ADD__: {
    } break;
    case __EXPR_NOT__: {
    } break;
    case __EXPR_MOD__: {
    } break;
    case __EXPR_SUP_EQ__: {
    } break;
    case __EXPR_INF__: {
    } break;
    case __EXPR_INF_EQ__: {
    } break;
    case __EXPR_OR__: {
    } break;
    case __EXPR_XOR__: {
    } break;
    };
    ((void **)((__FAST_ARRAYoEXPRo *)__tmp__H51H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__with__FYKJ(__tmp__P4GJ,rec__N4GJ);
    loc__PYKJ=NULL;
    val__QYKJ=NULL;
    if (((__INTEGER)(((__FAST_ARRAYoEXPRo *)__tmp__H51H)->parent_arrayed_collection__42LC.upper__USSH +  1) != (__INTEGER)(((__FAST_ARRAYoLOCALo *)Self__J4GJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
      Self__BZ4Q=((__FAST_ARRAYoEXPRo *)__tmp__H51H);
      __tmp__1YKJ=((void **)Self__BZ4Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__BZ4Q->parent_arrayed_collection__42LC.upper__USSH];
      switch (((struct ___OBJ *)__tmp__1YKJ)->__id) {
      case __LIST__: {
        __tmp__2YKJ=((__LIST *)__tmp__1YKJ)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __STRING_CST__: {
        __tmp__2YKJ=((__STRING_CST *)__tmp__1YKJ)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXTERNAL_C__: {
        __tmp__2YKJ=((__EXTERNAL_C *)__tmp__1YKJ)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__2YKJ=((__PROTOTYPE_CST *)__tmp__1YKJ)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __INTEGER_CST__: {
        __tmp__2YKJ=((__INTEGER_CST *)__tmp__1YKJ)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_LOCAL__: {
        __tmp__2YKJ=((__READ_LOCAL *)__tmp__1YKJ)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__2YKJ=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__2YKJ=((__EXPR_EQUAL *)__tmp__1YKJ)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__2YKJ=((__EXPR_NOT_EQUAL *)__tmp__1YKJ)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __REAL_CST__: {
        __tmp__2YKJ=((__REAL_CST *)__tmp__1YKJ)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CHARACTER_CST__: {
        __tmp__2YKJ=((__CHARACTER_CST *)__tmp__1YKJ)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __IS_EXPANDED__: {
        __tmp__2YKJ=((__IS_EXPANDED *)__tmp__1YKJ)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__2YKJ=((__GET_TYPE_ID *)__tmp__1YKJ)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP__: {
        __tmp__2YKJ=((__EXPR_SUP *)__tmp__1YKJ)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUB__: {
        __tmp__2YKJ=((__EXPR_SUB *)__tmp__1YKJ)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MUL__: {
        __tmp__2YKJ=((__EXPR_MUL *)__tmp__1YKJ)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_DIV__: {
        __tmp__2YKJ=((__EXPR_DIV *)__tmp__1YKJ)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND__: {
        __tmp__2YKJ=((__EXPR_AND *)__tmp__1YKJ)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__2YKJ=((__EXPR_SHIFT_R *)__tmp__1YKJ)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__2YKJ=((__EXPR_SHIFT_L *)__tmp__1YKJ)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PUT_TO__: {
        __tmp__2YKJ=((__PUT_TO *)__tmp__1YKJ)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __ITEM__: {
        __tmp__2YKJ=((__ITEM *)__tmp__1YKJ)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __SIZE_OF__: {
        __tmp__2YKJ=((__SIZE_OF *)__tmp__1YKJ)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CAST__: {
        __tmp__2YKJ=((__CAST *)__tmp__1YKJ)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CALL_SLOT__: {
        __tmp__2YKJ=((__CALL_SLOT *)__tmp__1YKJ)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_SLOT__: {
        __tmp__2YKJ=((__READ_SLOT *)__tmp__1YKJ)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_GLOBAL__: {
        __tmp__2YKJ=((__READ_GLOBAL *)__tmp__1YKJ)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__2YKJ=((__EXPR_NOT_LOGIC *)__tmp__1YKJ)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__2YKJ=((__EXPR_OR_LOGIC *)__tmp__1YKJ)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__2YKJ=((__EXPR_OR_OR_LOGIC *)__tmp__1YKJ)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__2YKJ=((__EXPR_AND_LOGIC *)__tmp__1YKJ)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__2YKJ=((__EXPR_AND_AND_LOGIC *)__tmp__1YKJ)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NEG__: {
        __tmp__2YKJ=((__EXPR_NEG *)__tmp__1YKJ)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_ADD__: {
        __tmp__2YKJ=((__EXPR_ADD *)__tmp__1YKJ)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT__: {
        __tmp__2YKJ=((__EXPR_NOT *)__tmp__1YKJ)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MOD__: {
        __tmp__2YKJ=((__EXPR_MOD *)__tmp__1YKJ)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__2YKJ=((__EXPR_SUP_EQ *)__tmp__1YKJ)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF__: {
        __tmp__2YKJ=((__EXPR_INF *)__tmp__1YKJ)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__2YKJ=((__EXPR_INF_EQ *)__tmp__1YKJ)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR__: {
        __tmp__2YKJ=((__EXPR_OR *)__tmp__1YKJ)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_XOR__: {
        __tmp__2YKJ=((__EXPR_XOR *)__tmp__1YKJ)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      };
      put_error__text__0AH( 1,(&__string_334));
      put_position__ECH(__tmp__2YKJ);
      send_error__2FH();
    };
    result__SYKJ=create_with_capacity__UIPH((__INTEGER)(((__FAST_ARRAYoLOCALo *)Self__J4GJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F +  1));
    __tmp__KZKJ=((__FAST_ARRAYoLOCALo *)Self__J4GJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
    Self__ZPOJ= 0;
    while ((Self__ZPOJ <= __tmp__KZKJ)) {
      loc__PYKJ=((void **)((__FAST_ARRAYoLOCALo *)Self__J4GJ->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__ZPOJ];
      val__QYKJ=((void **)((__FAST_ARRAYoEXPRo *)__tmp__H51H)->parent_arrayed_collection__42LC.storage__1SDI)[Self__ZPOJ];
      if (((void *)loc__PYKJ != (void *)NULL)) {
        switch (((struct ___OBJ *)val__QYKJ)->__id) {
        case __LIST__: {
          __tmp__YZKJ=((__LIST *)val__QYKJ)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__YZKJ=((__STRING_CST *)val__QYKJ)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__YZKJ=((__EXTERNAL_C *)val__QYKJ)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__YZKJ=((__PROTOTYPE_CST *)val__QYKJ)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__YZKJ=((__INTEGER_CST *)val__QYKJ)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__YZKJ=((__READ_LOCAL *)val__QYKJ)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__YZKJ=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__YZKJ=((__EXPR_EQUAL *)val__QYKJ)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__YZKJ=((__EXPR_NOT_EQUAL *)val__QYKJ)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__YZKJ=((__REAL_CST *)val__QYKJ)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__YZKJ=((__CHARACTER_CST *)val__QYKJ)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__YZKJ=((__IS_EXPANDED *)val__QYKJ)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__YZKJ=((__GET_TYPE_ID *)val__QYKJ)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__YZKJ=((__EXPR_SUP *)val__QYKJ)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__YZKJ=((__EXPR_SUB *)val__QYKJ)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__YZKJ=((__EXPR_MUL *)val__QYKJ)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__YZKJ=((__EXPR_DIV *)val__QYKJ)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__YZKJ=((__EXPR_AND *)val__QYKJ)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__YZKJ=((__EXPR_SHIFT_R *)val__QYKJ)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__YZKJ=((__EXPR_SHIFT_L *)val__QYKJ)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__YZKJ=((__PUT_TO *)val__QYKJ)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__YZKJ=((__ITEM *)val__QYKJ)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__YZKJ=((__SIZE_OF *)val__QYKJ)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__YZKJ=((__CAST *)val__QYKJ)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__YZKJ=((__CALL_SLOT *)val__QYKJ)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__YZKJ=((__READ_SLOT *)val__QYKJ)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__YZKJ=((__READ_GLOBAL *)val__QYKJ)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__YZKJ=((__EXPR_NOT_LOGIC *)val__QYKJ)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__YZKJ=((__EXPR_OR_LOGIC *)val__QYKJ)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__YZKJ=((__EXPR_OR_OR_LOGIC *)val__QYKJ)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__YZKJ=((__EXPR_AND_LOGIC *)val__QYKJ)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__YZKJ=((__EXPR_AND_AND_LOGIC *)val__QYKJ)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__YZKJ=((__EXPR_NEG *)val__QYKJ)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__YZKJ=((__EXPR_ADD *)val__QYKJ)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__YZKJ=((__EXPR_NOT *)val__QYKJ)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__YZKJ=((__EXPR_MOD *)val__QYKJ)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__YZKJ=((__EXPR_SUP_EQ *)val__QYKJ)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__YZKJ=((__EXPR_INF *)val__QYKJ)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__YZKJ=((__EXPR_INF_EQ *)val__QYKJ)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__YZKJ=((__EXPR_OR *)val__QYKJ)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__YZKJ=((__EXPR_XOR *)val__QYKJ)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        add_last__JPDI(result__SYKJ,write__value__T5FH(loc__PYKJ,__tmp__YZKJ,val__QYKJ));
      } else {
        add_last__JPDI(result__SYKJ,NULL);
        switch (((struct ___OBJ *)val__QYKJ)->__id) {
        case __LIST__: {
          remove__KPJJ(val__QYKJ);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(val__QYKJ);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__VVHQ=((__READ_LOCAL *)val__QYKJ);
          unread__YVJK(Self__VVHQ->local__ALZD,Self__VVHQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(val__QYKJ);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(val__QYKJ);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(val__QYKJ);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__XVHQ=((__READ_LOCAL *)((__IS_EXPANDED *)val__QYKJ)->receiver__OO2H);
          unread__YVJK(Self__XVHQ->local__ALZD,Self__XVHQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(val__QYKJ);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(val__QYKJ);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(val__QYKJ);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(val__QYKJ);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(val__QYKJ);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(val__QYKJ);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(val__QYKJ);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(val__QYKJ);
        } break;
        case __PUT_TO__: {
          remove__RXAK(val__QYKJ);
        } break;
        case __ITEM__: {
          remove__SYAK(val__QYKJ);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(val__QYKJ);
        } break;
        case __CAST__: {
          remove__ZYAK(val__QYKJ);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(val__QYKJ);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(val__QYKJ);
        } break;
        case __READ_GLOBAL__: {
          Self__YVHQ=((__READ_GLOBAL *)val__QYKJ);
          unread__15ML(Self__YVHQ->global__RHJK,Self__YVHQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(val__QYKJ);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(val__QYKJ);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(val__QYKJ);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(val__QYKJ);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(val__QYKJ);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(val__QYKJ);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(val__QYKJ);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(val__QYKJ);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(val__QYKJ);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(val__QYKJ);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(val__QYKJ);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(val__QYKJ);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(val__QYKJ);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(val__QYKJ);
        } break;
        };
      };
      Self__ZPOJ=(__INTEGER)(Self__ZPOJ +  1);
    };
    switch (((struct ___OBJ *)e__I41H)->__id) {
    case __LIST__: {
      __tmp__J51H=((__LIST *)e__I41H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__J51H=((__STRING_CST *)e__I41H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__J51H=((__EXTERNAL_C *)e__I41H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__J51H=((__PROTOTYPE_CST *)e__I41H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__J51H=((__INTEGER_CST *)e__I41H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__J51H=((__READ_LOCAL *)e__I41H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__J51H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__J51H=((__EXPR_EQUAL *)e__I41H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__J51H=((__EXPR_NOT_EQUAL *)e__I41H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__J51H=((__REAL_CST *)e__I41H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__J51H=((__CHARACTER_CST *)e__I41H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__J51H=((__IS_EXPANDED *)e__I41H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__J51H=((__GET_TYPE_ID *)e__I41H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__J51H=((__EXPR_SUP *)e__I41H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__J51H=((__EXPR_SUB *)e__I41H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__J51H=((__EXPR_MUL *)e__I41H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__J51H=((__EXPR_DIV *)e__I41H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__J51H=((__EXPR_AND *)e__I41H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__J51H=((__EXPR_SHIFT_R *)e__I41H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__J51H=((__EXPR_SHIFT_L *)e__I41H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__J51H=((__PUT_TO *)e__I41H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__J51H=((__ITEM *)e__I41H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__J51H=((__SIZE_OF *)e__I41H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__J51H=((__CAST *)e__I41H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__J51H=((__CALL_SLOT *)e__I41H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__J51H=((__READ_SLOT *)e__I41H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__J51H=((__READ_GLOBAL *)e__I41H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__J51H=((__EXPR_NOT_LOGIC *)e__I41H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__J51H=((__EXPR_OR_LOGIC *)e__I41H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__J51H=((__EXPR_OR_OR_LOGIC *)e__I41H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__J51H=((__EXPR_AND_LOGIC *)e__I41H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__J51H=((__EXPR_AND_AND_LOGIC *)e__I41H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__J51H=((__EXPR_NEG *)e__I41H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__J51H=((__EXPR_ADD *)e__I41H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__J51H=((__EXPR_NOT *)e__I41H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__J51H=((__EXPR_MOD *)e__I41H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__J51H=((__EXPR_SUP_EQ *)e__I41H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__J51H=((__EXPR_INF *)e__I41H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__J51H=((__EXPR_INF_EQ *)e__I41H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__J51H=((__EXPR_OR *)e__I41H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__J51H=((__EXPR_XOR *)e__I41H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    call__P41H=create__profil__with__W4TI(__tmp__J51H,__tmp__G51H,result__SYKJ);
    __tmp__M51H=Self__G41H->result_expr__341H;
    switch (((struct ___OBJ *)__tmp__M51H)->__id) {
    case __PROTOTYPE_CST__: {
      __tmp__N51H=((__PROTOTYPE_CST *)__tmp__M51H)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__N51H=((__LOCAL *)((__READ_LOCAL *)__tmp__M51H)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__N51H=static_type__0N1H(__tmp__M51H);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__N51H)->parent_type__KTL != (void *)TYPE_VOID__)) {
      __tmp__V51H=Self__G41H->result_expr__341H;
      if (__tmp__V51H==NULL) {
        __tmp__W51H=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__V51H)->__id) {
        case __PROTOTYPE_CST__: {
          __tmp__W51H=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__W51H=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__W51H=((void *)__tmp__V51H);
        } break;
        }
      };
      em__Q41H=__tmp__W51H;
      if (((void *)__tmp__W51H != (void *)NULL)) {
        __tmp__AA2H=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__W51H)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH -  1);
        Self__0JBJ= 0;
        while ((Self__0JBJ <= __tmp__AA2H)) {
          __tmp__HA2H=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)em__Q41H)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__0JBJ];
          if (__tmp__HA2H==NULL) {
            __tmp__IA2H=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__HA2H)->__id) {
            case __LIST__: {
              __tmp__IA2H=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__IA2H=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__IA2H=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__IA2H=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__IA2H=((void *)__tmp__HA2H);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__IA2H=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__IA2H=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__IA2H=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__IA2H=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__IA2H=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__IA2H=NULL;
            } break;
            case __ITEM__: {
              __tmp__IA2H=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__IA2H=NULL;
            } break;
            case __CAST__: {
              __tmp__IA2H=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__IA2H=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__IA2H=((void *)__tmp__HA2H);
            } break;
            case __READ_GLOBAL__: {
              __tmp__IA2H=((void *)__tmp__HA2H);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__IA2H=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__IA2H=NULL;
            } break;
            }
          };
          switch (((struct ___OBJ *)__tmp__IA2H)->__id) {
          case __READ_LOCAL__: {
            __tmp__PA2H=((__READ_LOCAL *)__tmp__IA2H)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__PA2H=((__READ_SLOT *)__tmp__IA2H)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__PA2H=((__READ_GLOBAL *)__tmp__IA2H)->global__RHJK;
          } break;
          };
          __tmp__RA2H=((__CALL_SLOT *)call__P41H)->profil__QA2H;
          if (((struct ___OBJ *)__tmp__RA2H)->__id==__PROFIL_SLOT__) {
            __tmp__TA2H=((__PROFIL_SLOT *)__tmp__RA2H)->parent_profil__51LC.result_list__SA2H;
          } else {
            __tmp__TA2H=((__PROFIL_BLOCK *)__tmp__RA2H)->parent_profil__GHAG.result_list__SA2H;
          };
          __tmp__UA2H=((void **)((__FAST_ARRAYoLOCALo *)__tmp__TA2H)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__0JBJ];
          switch (((struct ___OBJ *)e__I41H)->__id) {
          case __LIST__: {
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
          } break;
          case __EXPR_MULTIPLE__: {
          } break;
          case __EXPR_EQUAL__: {
          } break;
          case __EXPR_NOT_EQUAL__: {
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
          } break;
          case __GET_TYPE_ID__: {
          } break;
          case __EXPR_SUP__: {
          } break;
          case __EXPR_SUB__: {
          } break;
          case __EXPR_MUL__: {
          } break;
          case __EXPR_DIV__: {
          } break;
          case __EXPR_AND__: {
          } break;
          case __EXPR_SHIFT_R__: {
          } break;
          case __EXPR_SHIFT_L__: {
          } break;
          case __PUT_TO__: {
          } break;
          case __ITEM__: {
          } break;
          case __SIZE_OF__: {
          } break;
          case __CAST__: {
          } break;
          case __CALL_SLOT__: {
          } break;
          case __READ_SLOT__: {
          } break;
          case __READ_GLOBAL__: {
          } break;
          case __EXPR_NOT_LOGIC__: {
          } break;
          case __EXPR_OR_LOGIC__: {
          } break;
          case __EXPR_OR_OR_LOGIC__: {
          } break;
          case __EXPR_AND_LOGIC__: {
          } break;
          case __EXPR_AND_AND_LOGIC__: {
          } break;
          case __EXPR_NEG__: {
          } break;
          case __EXPR_ADD__: {
          } break;
          case __EXPR_NOT__: {
          } break;
          case __EXPR_MOD__: {
          } break;
          case __EXPR_SUP_EQ__: {
          } break;
          case __EXPR_INF__: {
          } break;
          case __EXPR_INF_EQ__: {
          } break;
          case __EXPR_OR__: {
          } break;
          case __EXPR_XOR__: {
          } break;
          };
          rd__R41H=read__IC5G(__tmp__UA2H);
          switch (((struct ___OBJ *)e__I41H)->__id) {
          case __LIST__: {
            __tmp__YA2H=((__LIST *)e__I41H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __STRING_CST__: {
            __tmp__YA2H=((__STRING_CST *)e__I41H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXTERNAL_C__: {
            __tmp__YA2H=((__EXTERNAL_C *)e__I41H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__YA2H=((__PROTOTYPE_CST *)e__I41H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __INTEGER_CST__: {
            __tmp__YA2H=((__INTEGER_CST *)e__I41H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __READ_LOCAL__: {
            __tmp__YA2H=((__READ_LOCAL *)e__I41H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__YA2H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__YA2H=((__EXPR_EQUAL *)e__I41H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__YA2H=((__EXPR_NOT_EQUAL *)e__I41H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __REAL_CST__: {
            __tmp__YA2H=((__REAL_CST *)e__I41H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __CHARACTER_CST__: {
            __tmp__YA2H=((__CHARACTER_CST *)e__I41H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __IS_EXPANDED__: {
            __tmp__YA2H=((__IS_EXPANDED *)e__I41H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__YA2H=((__GET_TYPE_ID *)e__I41H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_SUP__: {
            __tmp__YA2H=((__EXPR_SUP *)e__I41H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_SUB__: {
            __tmp__YA2H=((__EXPR_SUB *)e__I41H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_MUL__: {
            __tmp__YA2H=((__EXPR_MUL *)e__I41H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_DIV__: {
            __tmp__YA2H=((__EXPR_DIV *)e__I41H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_AND__: {
            __tmp__YA2H=((__EXPR_AND *)e__I41H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__YA2H=((__EXPR_SHIFT_R *)e__I41H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__YA2H=((__EXPR_SHIFT_L *)e__I41H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __PUT_TO__: {
            __tmp__YA2H=((__PUT_TO *)e__I41H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __ITEM__: {
            __tmp__YA2H=((__ITEM *)e__I41H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __SIZE_OF__: {
            __tmp__YA2H=((__SIZE_OF *)e__I41H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __CAST__: {
            __tmp__YA2H=((__CAST *)e__I41H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __CALL_SLOT__: {
            __tmp__YA2H=((__CALL_SLOT *)e__I41H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __READ_SLOT__: {
            __tmp__YA2H=((__READ_SLOT *)e__I41H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __READ_GLOBAL__: {
            __tmp__YA2H=((__READ_GLOBAL *)e__I41H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__YA2H=((__EXPR_NOT_LOGIC *)e__I41H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__YA2H=((__EXPR_OR_LOGIC *)e__I41H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__YA2H=((__EXPR_OR_OR_LOGIC *)e__I41H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__YA2H=((__EXPR_AND_LOGIC *)e__I41H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__YA2H=((__EXPR_AND_AND_LOGIC *)e__I41H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_NEG__: {
            __tmp__YA2H=((__EXPR_NEG *)e__I41H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_ADD__: {
            __tmp__YA2H=((__EXPR_ADD *)e__I41H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_NOT__: {
            __tmp__YA2H=((__EXPR_NOT *)e__I41H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_MOD__: {
            __tmp__YA2H=((__EXPR_MOD *)e__I41H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__YA2H=((__EXPR_SUP_EQ *)e__I41H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_INF__: {
            __tmp__YA2H=((__EXPR_INF *)e__I41H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__YA2H=((__EXPR_INF_EQ *)e__I41H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_OR__: {
            __tmp__YA2H=((__EXPR_OR *)e__I41H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          case __EXPR_XOR__: {
            __tmp__YA2H=((__EXPR_XOR *)e__I41H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
          } break;
          };
          if (((struct ___OBJ *)__tmp__PA2H)->__id==__LOCAL__) {
            __tmp__0A2H=write__value__T5FH(__tmp__PA2H,__tmp__YA2H,rd__R41H);
          } else {
            __tmp__0A2H=write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__PA2H),__tmp__YA2H,NULL,rd__R41H);
          };
          add_last__JPDI(((__CALL_SLOT *)call__P41H)->result_list__1A2H,__tmp__0A2H);
          Self__0JBJ=(__INTEGER)(Self__0JBJ +  1);
        };
        Self__TZ4Q=((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__W51H)->expr_list__VFMH);
        __tmp__5A2H=((void **)Self__TZ4Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__TZ4Q->parent_arrayed_collection__42LC.upper__USSH];
        if (__tmp__5A2H==NULL) {
          __tmp__AB2H=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__5A2H)->__id) {
          case __LIST__: {
            __tmp__AB2H=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__AB2H=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__AB2H=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__AB2H=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__AB2H=((void *)__tmp__5A2H);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__AB2H=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__AB2H=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__AB2H=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__AB2H=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__AB2H=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__AB2H=NULL;
          } break;
          case __ITEM__: {
            __tmp__AB2H=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__AB2H=NULL;
          } break;
          case __CAST__: {
            __tmp__AB2H=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__AB2H=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__AB2H=((void *)__tmp__5A2H);
          } break;
          case __READ_GLOBAL__: {
            __tmp__AB2H=((void *)__tmp__5A2H);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__AB2H=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__AB2H=NULL;
          } break;
          }
        };
        rd__R41H=__tmp__AB2H;
      } else {
        __tmp__HB2H=Self__G41H->result_expr__341H;
        if (__tmp__HB2H==NULL) {
          __tmp__IB2H=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__HB2H)->__id) {
          case __PROTOTYPE_CST__: {
            __tmp__IB2H=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__IB2H=((void *)__tmp__HB2H);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__IB2H=NULL;
          } break;
          }
        };
        rd__R41H=__tmp__IB2H;
      };
      switch (((struct ___OBJ *)rd__R41H)->__id) {
      case __READ_LOCAL__: {
        __tmp__QB2H=((__READ_LOCAL *)rd__R41H)->local__ALZD;
      } break;
      case __READ_SLOT__: {
        __tmp__QB2H=((__READ_SLOT *)rd__R41H)->slot__EVGK;
      } break;
      case __READ_GLOBAL__: {
        __tmp__QB2H=((__READ_GLOBAL *)rd__R41H)->global__RHJK;
      } break;
      };
      switch (((struct ___OBJ *)e__I41H)->__id) {
      case __LIST__: {
        __tmp__RB2H=((__LIST *)e__I41H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __STRING_CST__: {
        __tmp__RB2H=((__STRING_CST *)e__I41H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXTERNAL_C__: {
        __tmp__RB2H=((__EXTERNAL_C *)e__I41H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__RB2H=((__PROTOTYPE_CST *)e__I41H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __INTEGER_CST__: {
        __tmp__RB2H=((__INTEGER_CST *)e__I41H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_LOCAL__: {
        __tmp__RB2H=((__READ_LOCAL *)e__I41H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__RB2H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__RB2H=((__EXPR_EQUAL *)e__I41H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__RB2H=((__EXPR_NOT_EQUAL *)e__I41H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __REAL_CST__: {
        __tmp__RB2H=((__REAL_CST *)e__I41H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CHARACTER_CST__: {
        __tmp__RB2H=((__CHARACTER_CST *)e__I41H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __IS_EXPANDED__: {
        __tmp__RB2H=((__IS_EXPANDED *)e__I41H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__RB2H=((__GET_TYPE_ID *)e__I41H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP__: {
        __tmp__RB2H=((__EXPR_SUP *)e__I41H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUB__: {
        __tmp__RB2H=((__EXPR_SUB *)e__I41H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MUL__: {
        __tmp__RB2H=((__EXPR_MUL *)e__I41H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_DIV__: {
        __tmp__RB2H=((__EXPR_DIV *)e__I41H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND__: {
        __tmp__RB2H=((__EXPR_AND *)e__I41H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__RB2H=((__EXPR_SHIFT_R *)e__I41H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__RB2H=((__EXPR_SHIFT_L *)e__I41H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PUT_TO__: {
        __tmp__RB2H=((__PUT_TO *)e__I41H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __ITEM__: {
        __tmp__RB2H=((__ITEM *)e__I41H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __SIZE_OF__: {
        __tmp__RB2H=((__SIZE_OF *)e__I41H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CAST__: {
        __tmp__RB2H=((__CAST *)e__I41H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CALL_SLOT__: {
        __tmp__RB2H=((__CALL_SLOT *)e__I41H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_SLOT__: {
        __tmp__RB2H=((__READ_SLOT *)e__I41H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_GLOBAL__: {
        __tmp__RB2H=((__READ_GLOBAL *)e__I41H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__RB2H=((__EXPR_NOT_LOGIC *)e__I41H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__RB2H=((__EXPR_OR_LOGIC *)e__I41H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__RB2H=((__EXPR_OR_OR_LOGIC *)e__I41H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__RB2H=((__EXPR_AND_LOGIC *)e__I41H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__RB2H=((__EXPR_AND_AND_LOGIC *)e__I41H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NEG__: {
        __tmp__RB2H=((__EXPR_NEG *)e__I41H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_ADD__: {
        __tmp__RB2H=((__EXPR_ADD *)e__I41H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT__: {
        __tmp__RB2H=((__EXPR_NOT *)e__I41H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MOD__: {
        __tmp__RB2H=((__EXPR_MOD *)e__I41H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__RB2H=((__EXPR_SUP_EQ *)e__I41H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF__: {
        __tmp__RB2H=((__EXPR_INF *)e__I41H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__RB2H=((__EXPR_INF_EQ *)e__I41H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR__: {
        __tmp__RB2H=((__EXPR_OR *)e__I41H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_XOR__: {
        __tmp__RB2H=((__EXPR_XOR *)e__I41H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      };
      if (((struct ___OBJ *)__tmp__QB2H)->__id==__LOCAL__) {
        __tmp__TB2H=write__value__T5FH(__tmp__QB2H,__tmp__RB2H,call__P41H);
      } else {
        __tmp__TB2H=write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__QB2H),__tmp__RB2H,NULL,call__P41H);
      };
      add_last__AL4G(((__LIST *)result__K41H)->expr_list__JUOG,__tmp__TB2H);
    } else {
      add_last__AL4G(((__LIST *)result__K41H)->expr_list__JUOG,call__P41H);
    };
  };
  switch (((struct ___OBJ *)e__I41H)->__id) {
  case __LIST__: {
    __tmp__2B2H=((__LIST *)e__I41H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__2B2H=((__STRING_CST *)e__I41H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__2B2H=((__EXTERNAL_C *)e__I41H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__2B2H=((__PROTOTYPE_CST *)e__I41H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__2B2H=((__INTEGER_CST *)e__I41H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__2B2H=((__READ_LOCAL *)e__I41H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2B2H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2B2H=((__EXPR_EQUAL *)e__I41H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2B2H=((__EXPR_NOT_EQUAL *)e__I41H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__2B2H=((__REAL_CST *)e__I41H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__2B2H=((__CHARACTER_CST *)e__I41H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__2B2H=((__IS_EXPANDED *)e__I41H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2B2H=((__GET_TYPE_ID *)e__I41H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__2B2H=((__EXPR_SUP *)e__I41H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__2B2H=((__EXPR_SUB *)e__I41H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__2B2H=((__EXPR_MUL *)e__I41H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__2B2H=((__EXPR_DIV *)e__I41H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__2B2H=((__EXPR_AND *)e__I41H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2B2H=((__EXPR_SHIFT_R *)e__I41H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2B2H=((__EXPR_SHIFT_L *)e__I41H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__2B2H=((__PUT_TO *)e__I41H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__2B2H=((__ITEM *)e__I41H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__2B2H=((__SIZE_OF *)e__I41H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__2B2H=((__CAST *)e__I41H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__2B2H=((__CALL_SLOT *)e__I41H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__2B2H=((__READ_SLOT *)e__I41H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__2B2H=((__READ_GLOBAL *)e__I41H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2B2H=((__EXPR_NOT_LOGIC *)e__I41H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2B2H=((__EXPR_OR_LOGIC *)e__I41H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2B2H=((__EXPR_OR_OR_LOGIC *)e__I41H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2B2H=((__EXPR_AND_LOGIC *)e__I41H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2B2H=((__EXPR_AND_AND_LOGIC *)e__I41H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__2B2H=((__EXPR_NEG *)e__I41H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__2B2H=((__EXPR_ADD *)e__I41H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__2B2H=((__EXPR_NOT *)e__I41H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__2B2H=((__EXPR_MOD *)e__I41H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2B2H=((__EXPR_SUP_EQ *)e__I41H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__2B2H=((__EXPR_INF *)e__I41H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2B2H=((__EXPR_INF_EQ *)e__I41H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__2B2H=((__EXPR_OR *)e__I41H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__2B2H=((__EXPR_XOR *)e__I41H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  add_last__AL4G(((__LIST *)result__K41H)->expr_list__JUOG,create__type__CLQC(__tmp__2B2H,TYPE_VOID__->parent_type__UIB.default__AKC));
  return(result__K41H);
}

static void* product__with__CC2H(__DTA_WR_VALUE *Self__DC2H,void *t__EC2H,void *e__FC2H)
// ({DTA_WR_VALUE},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__IC2H,__tmp__QAUI;
  void *result__HC2H;
  void *__tmp__T5TI,*__tmp__V5TI,*s__P5TI,*__tmp__15TI,*__tmp__KAUI;
  void *s__UZ5I;
  void *__tmp__U5TI;
  void *__tmp__25TI,*__tmp__35TI,*new_value__WZ5I,*__tmp__A05I;
  void *__tmp__B05I;
  __STRING_CST *Self__DWHQ,*Self__LWHQ;
  __PROTOTYPE_CST *Self__EWHQ,*Self__MWHQ;
  __INTEGER_CST *Self__FWHQ,*Self__NWHQ;
  __REAL_CST *Self__HWHQ,*Self__PWHQ;
  __CHARACTER_CST *Self__JWHQ,*Self__RWHQ;
  __IS_EXPANDED *Self__KWHQ,*Self__SWHQ;
  void *__tmp__JAUI,*__tmp__LAUI;
  void *__tmp__J05I,*__tmp__I15I;
  void *__tmp__L05I,*em__YZ5I;
  __INTEGER __tmp__V05I,Self__YYCJ;
  void *__tmp__105I;
  __FAST_ARRAYoEXPRo *Self__2Z4Q;
  switch (((struct ___OBJ *)e__FC2H)->__id) {
  case __LIST__: {
    __tmp__IC2H=((__LIST *)e__FC2H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__IC2H=((__STRING_CST *)e__FC2H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__IC2H=((__EXTERNAL_C *)e__FC2H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__IC2H=((__PROTOTYPE_CST *)e__FC2H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__IC2H=((__INTEGER_CST *)e__FC2H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__IC2H=((__READ_LOCAL *)e__FC2H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IC2H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IC2H=((__EXPR_EQUAL *)e__FC2H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IC2H=((__EXPR_NOT_EQUAL *)e__FC2H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__IC2H=((__REAL_CST *)e__FC2H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__IC2H=((__CHARACTER_CST *)e__FC2H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__IC2H=((__IS_EXPANDED *)e__FC2H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IC2H=((__GET_TYPE_ID *)e__FC2H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__IC2H=((__EXPR_SUP *)e__FC2H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__IC2H=((__EXPR_SUB *)e__FC2H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__IC2H=((__EXPR_MUL *)e__FC2H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__IC2H=((__EXPR_DIV *)e__FC2H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__IC2H=((__EXPR_AND *)e__FC2H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IC2H=((__EXPR_SHIFT_R *)e__FC2H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IC2H=((__EXPR_SHIFT_L *)e__FC2H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__IC2H=((__PUT_TO *)e__FC2H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__IC2H=((__ITEM *)e__FC2H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__IC2H=((__SIZE_OF *)e__FC2H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__IC2H=((__CAST *)e__FC2H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__IC2H=((__CALL_SLOT *)e__FC2H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__IC2H=((__READ_SLOT *)e__FC2H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__IC2H=((__READ_GLOBAL *)e__FC2H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IC2H=((__EXPR_NOT_LOGIC *)e__FC2H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IC2H=((__EXPR_OR_LOGIC *)e__FC2H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IC2H=((__EXPR_OR_OR_LOGIC *)e__FC2H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IC2H=((__EXPR_AND_LOGIC *)e__FC2H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IC2H=((__EXPR_AND_AND_LOGIC *)e__FC2H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__IC2H=((__EXPR_NEG *)e__FC2H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__IC2H=((__EXPR_ADD *)e__FC2H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__IC2H=((__EXPR_NOT *)e__FC2H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__IC2H=((__EXPR_MOD *)e__FC2H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IC2H=((__EXPR_SUP_EQ *)e__FC2H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__IC2H=((__EXPR_INF *)e__FC2H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IC2H=((__EXPR_INF_EQ *)e__FC2H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__IC2H=((__EXPR_OR *)e__FC2H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__IC2H=((__EXPR_XOR *)e__FC2H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  result__HC2H=create__QCAG(__tmp__IC2H);
  if (((void *)t__EC2H == (void *)TYPE_NULL__)) {
    product_error__for__in__with__2L0G(Self__DC2H->parent_dta__PTUH.parent_itm_object__5LQC.position__BJM,NULL,result__HC2H,Self__DC2H->parent_dta__PTUH.context__OJZD);
  } else {
    __tmp__T5TI=Self__DC2H->parent_dta__PTUH.slot__PJZD;
    if (((struct ___OBJ *)__tmp__T5TI)->__id==__SLOT_DATA__) {
      __tmp__U5TI=((__SLOT_DATA *)__tmp__T5TI)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
    } else {
      __tmp__U5TI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__T5TI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
    };
    switch (((struct ___OBJ *)t__EC2H)->__id) {
    case __TYPE__: {
      __tmp__V5TI=get_local_slot__H4EG(t__EC2H,__tmp__U5TI);
    } break;
    case __TYPE_NULL__: {
      __tmp__V5TI=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__V5TI=get_local_slot__1AFG(t__EC2H,__tmp__U5TI);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__V5TI=get_local_slot__DDFG(t__EC2H,__tmp__U5TI);
    } break;
    case __TYPE_ID__: {
      __tmp__V5TI=get_local_slot__LFFG(t__EC2H,__tmp__U5TI);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__V5TI=get_local_slot__THFG(t__EC2H,__tmp__U5TI);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__V5TI=get_local_slot__05EJ(__tmp__U5TI);
    } break;
    };
    s__P5TI=__tmp__V5TI;
    if (((void *)__tmp__V5TI == (void *)NULL)) {
      switch (((struct ___OBJ *)t__EC2H)->__id) {
      case __TYPE__: {
        __tmp__15TI=get_path_slot__JK1G(t__EC2H,__tmp__U5TI);
      } break;
      case __TYPE_NULL__: {
        __tmp__15TI=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__15TI=get_path_slot__CM1G(t__EC2H,__tmp__U5TI);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__15TI=get_path_slot__XN1G(t__EC2H,__tmp__U5TI);
      } break;
      case __TYPE_ID__: {
        __tmp__15TI=get_path_slot__MP1G(t__EC2H,__tmp__U5TI);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__15TI=get_path_slot__BR1G(t__EC2H,__tmp__U5TI);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__15TI=get_path_slot__HAFJ(__tmp__U5TI);
      } break;
      };
      s__P5TI=__tmp__15TI;
      if (((struct ___OBJ *)__tmp__15TI)->__id==__SLOT_DATA__) {
        __tmp__25TI=get_expr_result__RUOG(__tmp__15TI);
      } else {
        __tmp__25TI=get_expr_result__QXOG(__tmp__15TI);
      };
      switch (((struct ___OBJ *)e__FC2H)->__id) {
      case __LIST__: {
        __tmp__35TI=my_copy__2HYM(e__FC2H);
      } break;
      case __STRING_CST__: {
        Self__DWHQ=((__STRING_CST *)e__FC2H);
        __tmp__35TI=create__text__AUMH(Self__DWHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DWHQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__35TI=my_copy__2K2H(e__FC2H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__EWHQ=((__PROTOTYPE_CST *)e__FC2H);
        __tmp__35TI=create__type__CLQC(Self__EWHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EWHQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__FWHQ=((__INTEGER_CST *)e__FC2H);
        __tmp__35TI=create__value__type__DNQC(Self__FWHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FWHQ->value__PAZD,Self__FWHQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__35TI=my_copy__OAFJ(e__FC2H);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__35TI=my_copy__KM2H(e__FC2H);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__35TI=my_copy__DN2H(e__FC2H);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__35TI=my_copy__QN2H(e__FC2H);
      } break;
      case __REAL_CST__: {
        Self__HWHQ=((__REAL_CST *)e__FC2H);
        __tmp__35TI=create__value__type__1SMH(Self__HWHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HWHQ->value__5N2H,Self__HWHQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__JWHQ=((__CHARACTER_CST *)e__FC2H);
        __tmp__35TI=create__char__WTMH(Self__JWHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JWHQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__KWHQ=((__IS_EXPANDED *)e__FC2H);
        __tmp__35TI=create__receiver__WRWH(Self__KWHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__KWHQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__35TI=my_copy__TO2H(e__FC2H);
      } break;
      case __EXPR_SUP__: {
        __tmp__35TI=my_copy__2O2H(e__FC2H);
      } break;
      case __EXPR_SUB__: {
        __tmp__35TI=my_copy__HP2H(e__FC2H);
      } break;
      case __EXPR_MUL__: {
        __tmp__35TI=my_copy__TP2H(e__FC2H);
      } break;
      case __EXPR_DIV__: {
        __tmp__35TI=my_copy__4P2H(e__FC2H);
      } break;
      case __EXPR_AND__: {
        __tmp__35TI=my_copy__JQ2H(e__FC2H);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__35TI=my_copy__UQ2H(e__FC2H);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__35TI=my_copy__5Q2H(e__FC2H);
      } break;
      case __PUT_TO__: {
        __tmp__35TI=my_copy__KR2H(e__FC2H);
      } break;
      case __ITEM__: {
        __tmp__35TI=my_copy__1R2H(e__FC2H);
      } break;
      case __SIZE_OF__: {
        __tmp__35TI=my_copy__HS2H(e__FC2H);
      } break;
      case __CAST__: {
        __tmp__35TI=my_copy__QS2H(e__FC2H);
      } break;
      case __CALL_SLOT__: {
        __tmp__35TI=my_copy__PIYM(e__FC2H);
      } break;
      case __READ_SLOT__: {
        __tmp__35TI=my_copy__AVGK(e__FC2H);
      } break;
      case __READ_GLOBAL__: {
        __tmp__35TI=my_copy__NVGK(e__FC2H);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__35TI=my_copy__RFCN(e__FC2H);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__35TI=my_copy__JMEO(e__FC2H);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__35TI=my_copy__RTJO(e__FC2H);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__35TI=my_copy__WMEO(e__FC2H);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__35TI=my_copy__3TJO(e__FC2H);
      } break;
      case __EXPR_NEG__: {
        __tmp__35TI=my_copy__YEJM(e__FC2H);
      } break;
      case __EXPR_ADD__: {
        __tmp__35TI=my_copy__YRLL(e__FC2H);
      } break;
      case __EXPR_NOT__: {
        __tmp__35TI=my_copy__GLYM(e__FC2H);
      } break;
      case __EXPR_MOD__: {
        __tmp__35TI=my_copy__BNEO(e__FC2H);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__35TI=my_copy__M3DP(e__FC2H);
      } break;
      case __EXPR_INF__: {
        __tmp__35TI=my_copy__PBSN(e__FC2H);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__35TI=my_copy__0BSN(e__FC2H);
      } break;
      case __EXPR_OR__: {
        __tmp__35TI=my_copy__ZOPN(e__FC2H);
      } break;
      case __EXPR_XOR__: {
        __tmp__35TI=my_copy__CYSO(e__FC2H);
      } break;
      };
      add_last__AL4G(((__LIST *)result__HC2H)->expr_list__JUOG,create__with__result__2S1G(__tmp__35TI,__tmp__15TI,Self__DC2H,__tmp__25TI));
      add_last__AL4G(((__LIST *)result__HC2H)->expr_list__JUOG,create__with__GWUC(__tmp__25TI,Self__DC2H));
    } else {
      if (((struct ___OBJ *)s__P5TI)->__id==__SLOT_DATA__) {
        __tmp__JAUI=((__SLOT *)((__SLOT_DATA *)s__P5TI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__JAUI=((__SLOT *)((__SLOT_CODE *)s__P5TI)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__KAUI=Self__DC2H->parent_dta__PTUH.slot__PJZD;
      if (((struct ___OBJ *)__tmp__KAUI)->__id==__SLOT_DATA__) {
        __tmp__LAUI=((__SLOT *)((__SLOT_DATA *)__tmp__KAUI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__LAUI=((__SLOT *)((__SLOT_CODE *)__tmp__KAUI)->parent_slot__Y22F)->base_slot__P22F;
      };
      is_equal_profil__PL5G(__tmp__JAUI,__tmp__LAUI);
      s__UZ5I=s__P5TI;
      new_value__WZ5I=NULL;
      if (Self__DC2H->copy_value__ZZ5I) {
        __tmp__A05I=Self__DC2H->value__RNFI;
        switch (((struct ___OBJ *)__tmp__A05I)->__id) {
        case __LIST__: {
          __tmp__B05I=my_copy__2HYM(__tmp__A05I);
        } break;
        case __STRING_CST__: {
          Self__LWHQ=((__STRING_CST *)__tmp__A05I);
          __tmp__B05I=create__text__AUMH(Self__LWHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LWHQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__B05I=my_copy__2K2H(__tmp__A05I);
        } break;
        case __PROTOTYPE_CST__: {
          Self__MWHQ=((__PROTOTYPE_CST *)__tmp__A05I);
          __tmp__B05I=create__type__CLQC(Self__MWHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MWHQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__NWHQ=((__INTEGER_CST *)__tmp__A05I);
          __tmp__B05I=create__value__type__DNQC(Self__NWHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NWHQ->value__PAZD,Self__NWHQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__B05I=my_copy__OAFJ(__tmp__A05I);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__B05I=my_copy__KM2H(__tmp__A05I);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__B05I=my_copy__DN2H(__tmp__A05I);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__B05I=my_copy__QN2H(__tmp__A05I);
        } break;
        case __REAL_CST__: {
          Self__PWHQ=((__REAL_CST *)__tmp__A05I);
          __tmp__B05I=create__value__type__1SMH(Self__PWHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PWHQ->value__5N2H,Self__PWHQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__RWHQ=((__CHARACTER_CST *)__tmp__A05I);
          __tmp__B05I=create__char__WTMH(Self__RWHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RWHQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__SWHQ=((__IS_EXPANDED *)__tmp__A05I);
          __tmp__B05I=create__receiver__WRWH(Self__SWHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__SWHQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__B05I=my_copy__TO2H(__tmp__A05I);
        } break;
        case __EXPR_SUP__: {
          __tmp__B05I=my_copy__2O2H(__tmp__A05I);
        } break;
        case __EXPR_SUB__: {
          __tmp__B05I=my_copy__HP2H(__tmp__A05I);
        } break;
        case __EXPR_MUL__: {
          __tmp__B05I=my_copy__TP2H(__tmp__A05I);
        } break;
        case __EXPR_DIV__: {
          __tmp__B05I=my_copy__4P2H(__tmp__A05I);
        } break;
        case __EXPR_AND__: {
          __tmp__B05I=my_copy__JQ2H(__tmp__A05I);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__B05I=my_copy__UQ2H(__tmp__A05I);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__B05I=my_copy__5Q2H(__tmp__A05I);
        } break;
        case __PUT_TO__: {
          __tmp__B05I=my_copy__KR2H(__tmp__A05I);
        } break;
        case __ITEM__: {
          __tmp__B05I=my_copy__1R2H(__tmp__A05I);
        } break;
        case __SIZE_OF__: {
          __tmp__B05I=my_copy__HS2H(__tmp__A05I);
        } break;
        case __CAST__: {
          __tmp__B05I=my_copy__QS2H(__tmp__A05I);
        } break;
        case __CALL_SLOT__: {
          __tmp__B05I=my_copy__PIYM(__tmp__A05I);
        } break;
        case __READ_SLOT__: {
          __tmp__B05I=my_copy__AVGK(__tmp__A05I);
        } break;
        case __READ_GLOBAL__: {
          __tmp__B05I=my_copy__NVGK(__tmp__A05I);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__B05I=my_copy__RFCN(__tmp__A05I);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__B05I=my_copy__JMEO(__tmp__A05I);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__B05I=my_copy__RTJO(__tmp__A05I);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__B05I=my_copy__WMEO(__tmp__A05I);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__B05I=my_copy__3TJO(__tmp__A05I);
        } break;
        case __EXPR_NEG__: {
          __tmp__B05I=my_copy__YEJM(__tmp__A05I);
        } break;
        case __EXPR_ADD__: {
          __tmp__B05I=my_copy__YRLL(__tmp__A05I);
        } break;
        case __EXPR_NOT__: {
          __tmp__B05I=my_copy__GLYM(__tmp__A05I);
        } break;
        case __EXPR_MOD__: {
          __tmp__B05I=my_copy__BNEO(__tmp__A05I);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__B05I=my_copy__M3DP(__tmp__A05I);
        } break;
        case __EXPR_INF__: {
          __tmp__B05I=my_copy__PBSN(__tmp__A05I);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__B05I=my_copy__0BSN(__tmp__A05I);
        } break;
        case __EXPR_OR__: {
          __tmp__B05I=my_copy__ZOPN(__tmp__A05I);
        } break;
        case __EXPR_XOR__: {
          __tmp__B05I=my_copy__CYSO(__tmp__A05I);
        } break;
        };
        new_value__WZ5I=__tmp__B05I;
      } else {
        new_value__WZ5I=Self__DC2H->value__RNFI;
        Self__DC2H->copy_value__ZZ5I=TRUE__;
      };
      if (((struct ___OBJ *)s__P5TI)->__id==__SLOT_DATA__) {
        __tmp__J05I=slot_data__Z4TH(s__P5TI);
      } else {
        __tmp__J05I=slot_data__T5TH(s__P5TI);
      };
      if (new_value__WZ5I==NULL) {
        __tmp__L05I=NULL;
      } else {
        switch (((struct ___OBJ *)new_value__WZ5I)->__id) {
        case __LIST__: {
          __tmp__L05I=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__L05I=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__L05I=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__L05I=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__L05I=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__L05I=((void *)new_value__WZ5I);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__L05I=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__L05I=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__L05I=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__L05I=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__L05I=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__L05I=NULL;
        } break;
        case __ITEM__: {
          __tmp__L05I=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__L05I=NULL;
        } break;
        case __CAST__: {
          __tmp__L05I=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__L05I=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__L05I=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__L05I=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__L05I=NULL;
        } break;
        }
      };
      em__YZ5I=__tmp__L05I;
      if (((void *)__tmp__L05I != (void *)NULL)) {
        __tmp__V05I=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__L05I)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH -  1);
        Self__YYCJ= 0;
        while ((Self__YYCJ <= __tmp__V05I)) {
          if (((struct ___OBJ *)s__UZ5I)->__id==__SLOT_DATA__) {
            __tmp__105I=((__SLOT *)((__SLOT_DATA *)s__UZ5I)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__105I=((__SLOT *)((__SLOT_CODE *)s__UZ5I)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          add_last__AL4G(((__LIST *)result__HC2H)->expr_list__JUOG,new_write__rec__value__UKBJ(((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__105I)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__YYCJ],e__FC2H,((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)em__YZ5I)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__YYCJ]));
          Self__YYCJ=(__INTEGER)(Self__YYCJ +  1);
        };
        Self__2Z4Q=((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__L05I)->expr_list__VFMH);
        new_value__WZ5I=((void **)Self__2Z4Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__2Z4Q->parent_arrayed_collection__42LC.upper__USSH];
      };
      add_last__AL4G(((__LIST *)result__HC2H)->expr_list__JUOG,new_write__rec__value__UKBJ(__tmp__J05I,e__FC2H,new_value__WZ5I));
      if (((struct ___OBJ *)s__P5TI)->__id==__SLOT_DATA__) {
        __tmp__I15I=((__SLOT *)((__SLOT_DATA *)s__P5TI)->parent_slot__BJZD)->slot_id__04OG;
      } else {
        __tmp__I15I=((__SLOT *)((__SLOT_CODE *)s__P5TI)->parent_slot__Y22F)->slot_id__04OG;
      };
      if (((void *)__tmp__I15I != (void *)NULL)) {
        add_write_id__in__REBJ(e__FC2H,s__P5TI,result__HC2H);
      };
    };
    switch (((struct ___OBJ *)e__FC2H)->__id) {
    case __LIST__: {
      __tmp__QAUI=((__LIST *)e__FC2H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__QAUI=((__STRING_CST *)e__FC2H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__QAUI=((__EXTERNAL_C *)e__FC2H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QAUI=((__PROTOTYPE_CST *)e__FC2H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__QAUI=((__INTEGER_CST *)e__FC2H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__QAUI=((__READ_LOCAL *)e__FC2H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QAUI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QAUI=((__EXPR_EQUAL *)e__FC2H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QAUI=((__EXPR_NOT_EQUAL *)e__FC2H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__QAUI=((__REAL_CST *)e__FC2H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__QAUI=((__CHARACTER_CST *)e__FC2H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__QAUI=((__IS_EXPANDED *)e__FC2H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QAUI=((__GET_TYPE_ID *)e__FC2H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__QAUI=((__EXPR_SUP *)e__FC2H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__QAUI=((__EXPR_SUB *)e__FC2H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__QAUI=((__EXPR_MUL *)e__FC2H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__QAUI=((__EXPR_DIV *)e__FC2H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__QAUI=((__EXPR_AND *)e__FC2H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QAUI=((__EXPR_SHIFT_R *)e__FC2H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QAUI=((__EXPR_SHIFT_L *)e__FC2H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__QAUI=((__PUT_TO *)e__FC2H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__QAUI=((__ITEM *)e__FC2H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__QAUI=((__SIZE_OF *)e__FC2H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__QAUI=((__CAST *)e__FC2H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__QAUI=((__CALL_SLOT *)e__FC2H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__QAUI=((__READ_SLOT *)e__FC2H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__QAUI=((__READ_GLOBAL *)e__FC2H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QAUI=((__EXPR_NOT_LOGIC *)e__FC2H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QAUI=((__EXPR_OR_LOGIC *)e__FC2H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QAUI=((__EXPR_OR_OR_LOGIC *)e__FC2H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QAUI=((__EXPR_AND_LOGIC *)e__FC2H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QAUI=((__EXPR_AND_AND_LOGIC *)e__FC2H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__QAUI=((__EXPR_NEG *)e__FC2H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__QAUI=((__EXPR_ADD *)e__FC2H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__QAUI=((__EXPR_NOT *)e__FC2H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__QAUI=((__EXPR_MOD *)e__FC2H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QAUI=((__EXPR_SUP_EQ *)e__FC2H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__QAUI=((__EXPR_INF *)e__FC2H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QAUI=((__EXPR_INF_EQ *)e__FC2H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__QAUI=((__EXPR_OR *)e__FC2H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__QAUI=((__EXPR_XOR *)e__FC2H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    add_last__AL4G(((__LIST *)result__HC2H)->expr_list__JUOG,create__type__CLQC(__tmp__QAUI,TYPE_VOID__->parent_type__UIB.default__AKC));
  };
  return(result__HC2H);
}

static void* product__with__YC2H(__DTA_RD_ARGS *Self__ZC2H,void *t__0C2H,void *e__1C2H)
// ({DTA_RD_ARGS},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__4C2H,__tmp__BCUI;
  void *result__3C2H;
  void *__tmp__EBUI,*__tmp__GBUI,*s__ABUI,*__tmp__MBUI,*__tmp__1BUI;
  void *__tmp__FBUI;
  void *__tmp__NBUI,*__tmp__OBUI,*__tmp__K25I;
  __STRING_CST *Self__VWHQ,*Self__3WHQ;
  __PROTOTYPE_CST *Self__WWHQ,*Self__4WHQ;
  __INTEGER_CST *Self__XWHQ,*Self__5WHQ;
  __REAL_CST *Self__ZWHQ,*Self__BXHQ;
  __CHARACTER_CST *Self__1WHQ,*Self__DXHQ;
  __IS_EXPANDED *Self__2WHQ,*Self__EXHQ;
  void *__tmp__0BUI,*__tmp__2BUI;
  switch (((struct ___OBJ *)e__1C2H)->__id) {
  case __LIST__: {
    __tmp__4C2H=((__LIST *)e__1C2H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__4C2H=((__STRING_CST *)e__1C2H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__4C2H=((__EXTERNAL_C *)e__1C2H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__4C2H=((__PROTOTYPE_CST *)e__1C2H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__4C2H=((__INTEGER_CST *)e__1C2H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__4C2H=((__READ_LOCAL *)e__1C2H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4C2H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4C2H=((__EXPR_EQUAL *)e__1C2H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4C2H=((__EXPR_NOT_EQUAL *)e__1C2H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__4C2H=((__REAL_CST *)e__1C2H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__4C2H=((__CHARACTER_CST *)e__1C2H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__4C2H=((__IS_EXPANDED *)e__1C2H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__4C2H=((__GET_TYPE_ID *)e__1C2H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__4C2H=((__EXPR_SUP *)e__1C2H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__4C2H=((__EXPR_SUB *)e__1C2H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__4C2H=((__EXPR_MUL *)e__1C2H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__4C2H=((__EXPR_DIV *)e__1C2H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__4C2H=((__EXPR_AND *)e__1C2H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4C2H=((__EXPR_SHIFT_R *)e__1C2H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4C2H=((__EXPR_SHIFT_L *)e__1C2H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__4C2H=((__PUT_TO *)e__1C2H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__4C2H=((__ITEM *)e__1C2H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__4C2H=((__SIZE_OF *)e__1C2H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__4C2H=((__CAST *)e__1C2H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__4C2H=((__CALL_SLOT *)e__1C2H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__4C2H=((__READ_SLOT *)e__1C2H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__4C2H=((__READ_GLOBAL *)e__1C2H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4C2H=((__EXPR_NOT_LOGIC *)e__1C2H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4C2H=((__EXPR_OR_LOGIC *)e__1C2H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4C2H=((__EXPR_OR_OR_LOGIC *)e__1C2H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4C2H=((__EXPR_AND_LOGIC *)e__1C2H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4C2H=((__EXPR_AND_AND_LOGIC *)e__1C2H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__4C2H=((__EXPR_NEG *)e__1C2H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__4C2H=((__EXPR_ADD *)e__1C2H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__4C2H=((__EXPR_NOT *)e__1C2H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__4C2H=((__EXPR_MOD *)e__1C2H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4C2H=((__EXPR_SUP_EQ *)e__1C2H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__4C2H=((__EXPR_INF *)e__1C2H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4C2H=((__EXPR_INF_EQ *)e__1C2H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__4C2H=((__EXPR_OR *)e__1C2H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__4C2H=((__EXPR_XOR *)e__1C2H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  result__3C2H=create__QCAG(__tmp__4C2H);
  if (((void *)t__0C2H == (void *)TYPE_NULL__)) {
    product_error__for__in__with__2L0G(Self__ZC2H->parent_dta__5OWH.parent_itm_object__5LQC.position__BJM,Self__ZC2H->parent_dta__5OWH.result_expr__RJZD,result__3C2H,Self__ZC2H->parent_dta__5OWH.context__OJZD);
  } else {
    __tmp__EBUI=Self__ZC2H->parent_dta__5OWH.slot__PJZD;
    if (((struct ___OBJ *)__tmp__EBUI)->__id==__SLOT_DATA__) {
      __tmp__FBUI=((__SLOT_DATA *)__tmp__EBUI)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
    } else {
      __tmp__FBUI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__EBUI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
    };
    switch (((struct ___OBJ *)t__0C2H)->__id) {
    case __TYPE__: {
      __tmp__GBUI=get_local_slot__H4EG(t__0C2H,__tmp__FBUI);
    } break;
    case __TYPE_NULL__: {
      __tmp__GBUI=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__GBUI=get_local_slot__1AFG(t__0C2H,__tmp__FBUI);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__GBUI=get_local_slot__DDFG(t__0C2H,__tmp__FBUI);
    } break;
    case __TYPE_ID__: {
      __tmp__GBUI=get_local_slot__LFFG(t__0C2H,__tmp__FBUI);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__GBUI=get_local_slot__THFG(t__0C2H,__tmp__FBUI);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__GBUI=get_local_slot__05EJ(__tmp__FBUI);
    } break;
    };
    s__ABUI=__tmp__GBUI;
    if (((void *)__tmp__GBUI == (void *)NULL)) {
      switch (((struct ___OBJ *)t__0C2H)->__id) {
      case __TYPE__: {
        __tmp__MBUI=get_path_slot__JK1G(t__0C2H,__tmp__FBUI);
      } break;
      case __TYPE_NULL__: {
        __tmp__MBUI=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__MBUI=get_path_slot__CM1G(t__0C2H,__tmp__FBUI);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__MBUI=get_path_slot__XN1G(t__0C2H,__tmp__FBUI);
      } break;
      case __TYPE_ID__: {
        __tmp__MBUI=get_path_slot__MP1G(t__0C2H,__tmp__FBUI);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__MBUI=get_path_slot__BR1G(t__0C2H,__tmp__FBUI);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__MBUI=get_path_slot__HAFJ(__tmp__FBUI);
      } break;
      };
      s__ABUI=__tmp__MBUI;
      if (((struct ___OBJ *)__tmp__MBUI)->__id==__SLOT_DATA__) {
        __tmp__NBUI=get_expr_result__RUOG(__tmp__MBUI);
      } else {
        __tmp__NBUI=get_expr_result__QXOG(__tmp__MBUI);
      };
      switch (((struct ___OBJ *)e__1C2H)->__id) {
      case __LIST__: {
        __tmp__OBUI=my_copy__2HYM(e__1C2H);
      } break;
      case __STRING_CST__: {
        Self__VWHQ=((__STRING_CST *)e__1C2H);
        __tmp__OBUI=create__text__AUMH(Self__VWHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VWHQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__OBUI=my_copy__2K2H(e__1C2H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__WWHQ=((__PROTOTYPE_CST *)e__1C2H);
        __tmp__OBUI=create__type__CLQC(Self__WWHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WWHQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__XWHQ=((__INTEGER_CST *)e__1C2H);
        __tmp__OBUI=create__value__type__DNQC(Self__XWHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XWHQ->value__PAZD,Self__XWHQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__OBUI=my_copy__OAFJ(e__1C2H);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__OBUI=my_copy__KM2H(e__1C2H);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__OBUI=my_copy__DN2H(e__1C2H);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__OBUI=my_copy__QN2H(e__1C2H);
      } break;
      case __REAL_CST__: {
        Self__ZWHQ=((__REAL_CST *)e__1C2H);
        __tmp__OBUI=create__value__type__1SMH(Self__ZWHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZWHQ->value__5N2H,Self__ZWHQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__1WHQ=((__CHARACTER_CST *)e__1C2H);
        __tmp__OBUI=create__char__WTMH(Self__1WHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1WHQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__2WHQ=((__IS_EXPANDED *)e__1C2H);
        __tmp__OBUI=create__receiver__WRWH(Self__2WHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__2WHQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__OBUI=my_copy__TO2H(e__1C2H);
      } break;
      case __EXPR_SUP__: {
        __tmp__OBUI=my_copy__2O2H(e__1C2H);
      } break;
      case __EXPR_SUB__: {
        __tmp__OBUI=my_copy__HP2H(e__1C2H);
      } break;
      case __EXPR_MUL__: {
        __tmp__OBUI=my_copy__TP2H(e__1C2H);
      } break;
      case __EXPR_DIV__: {
        __tmp__OBUI=my_copy__4P2H(e__1C2H);
      } break;
      case __EXPR_AND__: {
        __tmp__OBUI=my_copy__JQ2H(e__1C2H);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__OBUI=my_copy__UQ2H(e__1C2H);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__OBUI=my_copy__5Q2H(e__1C2H);
      } break;
      case __PUT_TO__: {
        __tmp__OBUI=my_copy__KR2H(e__1C2H);
      } break;
      case __ITEM__: {
        __tmp__OBUI=my_copy__1R2H(e__1C2H);
      } break;
      case __SIZE_OF__: {
        __tmp__OBUI=my_copy__HS2H(e__1C2H);
      } break;
      case __CAST__: {
        __tmp__OBUI=my_copy__QS2H(e__1C2H);
      } break;
      case __CALL_SLOT__: {
        __tmp__OBUI=my_copy__PIYM(e__1C2H);
      } break;
      case __READ_SLOT__: {
        __tmp__OBUI=my_copy__AVGK(e__1C2H);
      } break;
      case __READ_GLOBAL__: {
        __tmp__OBUI=my_copy__NVGK(e__1C2H);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__OBUI=my_copy__RFCN(e__1C2H);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__OBUI=my_copy__JMEO(e__1C2H);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__OBUI=my_copy__RTJO(e__1C2H);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__OBUI=my_copy__WMEO(e__1C2H);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__OBUI=my_copy__3TJO(e__1C2H);
      } break;
      case __EXPR_NEG__: {
        __tmp__OBUI=my_copy__YEJM(e__1C2H);
      } break;
      case __EXPR_ADD__: {
        __tmp__OBUI=my_copy__YRLL(e__1C2H);
      } break;
      case __EXPR_NOT__: {
        __tmp__OBUI=my_copy__GLYM(e__1C2H);
      } break;
      case __EXPR_MOD__: {
        __tmp__OBUI=my_copy__BNEO(e__1C2H);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__OBUI=my_copy__M3DP(e__1C2H);
      } break;
      case __EXPR_INF__: {
        __tmp__OBUI=my_copy__PBSN(e__1C2H);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__OBUI=my_copy__0BSN(e__1C2H);
      } break;
      case __EXPR_OR__: {
        __tmp__OBUI=my_copy__ZOPN(e__1C2H);
      } break;
      case __EXPR_XOR__: {
        __tmp__OBUI=my_copy__CYSO(e__1C2H);
      } break;
      };
      add_last__AL4G(((__LIST *)result__3C2H)->expr_list__JUOG,create__with__result__2S1G(__tmp__OBUI,__tmp__MBUI,Self__ZC2H,__tmp__NBUI));
      add_last__AL4G(((__LIST *)result__3C2H)->expr_list__JUOG,create__with__GWUC(__tmp__NBUI,Self__ZC2H));
    } else {
      if (((struct ___OBJ *)s__ABUI)->__id==__SLOT_DATA__) {
        __tmp__0BUI=((__SLOT *)((__SLOT_DATA *)s__ABUI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__0BUI=((__SLOT *)((__SLOT_CODE *)s__ABUI)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__1BUI=Self__ZC2H->parent_dta__5OWH.slot__PJZD;
      if (((struct ___OBJ *)__tmp__1BUI)->__id==__SLOT_DATA__) {
        __tmp__2BUI=((__SLOT *)((__SLOT_DATA *)__tmp__1BUI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__2BUI=((__SLOT *)((__SLOT_CODE *)__tmp__1BUI)->parent_slot__Y22F)->base_slot__P22F;
      };
      is_equal_profil__PL5G(__tmp__0BUI,__tmp__2BUI);
      switch (((struct ___OBJ *)e__1C2H)->__id) {
      case __LIST__: {
        __tmp__K25I=my_copy__2HYM(e__1C2H);
      } break;
      case __STRING_CST__: {
        Self__3WHQ=((__STRING_CST *)e__1C2H);
        __tmp__K25I=create__text__AUMH(Self__3WHQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3WHQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__K25I=my_copy__2K2H(e__1C2H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__4WHQ=((__PROTOTYPE_CST *)e__1C2H);
        __tmp__K25I=create__type__CLQC(Self__4WHQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4WHQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__5WHQ=((__INTEGER_CST *)e__1C2H);
        __tmp__K25I=create__value__type__DNQC(Self__5WHQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5WHQ->value__PAZD,Self__5WHQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__K25I=my_copy__OAFJ(e__1C2H);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__K25I=my_copy__KM2H(e__1C2H);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__K25I=my_copy__DN2H(e__1C2H);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__K25I=my_copy__QN2H(e__1C2H);
      } break;
      case __REAL_CST__: {
        Self__BXHQ=((__REAL_CST *)e__1C2H);
        __tmp__K25I=create__value__type__1SMH(Self__BXHQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BXHQ->value__5N2H,Self__BXHQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__DXHQ=((__CHARACTER_CST *)e__1C2H);
        __tmp__K25I=create__char__WTMH(Self__DXHQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DXHQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__EXHQ=((__IS_EXPANDED *)e__1C2H);
        __tmp__K25I=create__receiver__WRWH(Self__EXHQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__EXHQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__K25I=my_copy__TO2H(e__1C2H);
      } break;
      case __EXPR_SUP__: {
        __tmp__K25I=my_copy__2O2H(e__1C2H);
      } break;
      case __EXPR_SUB__: {
        __tmp__K25I=my_copy__HP2H(e__1C2H);
      } break;
      case __EXPR_MUL__: {
        __tmp__K25I=my_copy__TP2H(e__1C2H);
      } break;
      case __EXPR_DIV__: {
        __tmp__K25I=my_copy__4P2H(e__1C2H);
      } break;
      case __EXPR_AND__: {
        __tmp__K25I=my_copy__JQ2H(e__1C2H);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__K25I=my_copy__UQ2H(e__1C2H);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__K25I=my_copy__5Q2H(e__1C2H);
      } break;
      case __PUT_TO__: {
        __tmp__K25I=my_copy__KR2H(e__1C2H);
      } break;
      case __ITEM__: {
        __tmp__K25I=my_copy__1R2H(e__1C2H);
      } break;
      case __SIZE_OF__: {
        __tmp__K25I=my_copy__HS2H(e__1C2H);
      } break;
      case __CAST__: {
        __tmp__K25I=my_copy__QS2H(e__1C2H);
      } break;
      case __CALL_SLOT__: {
        __tmp__K25I=my_copy__PIYM(e__1C2H);
      } break;
      case __READ_SLOT__: {
        __tmp__K25I=my_copy__AVGK(e__1C2H);
      } break;
      case __READ_GLOBAL__: {
        __tmp__K25I=my_copy__NVGK(e__1C2H);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__K25I=my_copy__RFCN(e__1C2H);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__K25I=my_copy__JMEO(e__1C2H);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__K25I=my_copy__RTJO(e__1C2H);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__K25I=my_copy__WMEO(e__1C2H);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__K25I=my_copy__3TJO(e__1C2H);
      } break;
      case __EXPR_NEG__: {
        __tmp__K25I=my_copy__YEJM(e__1C2H);
      } break;
      case __EXPR_ADD__: {
        __tmp__K25I=my_copy__YRLL(e__1C2H);
      } break;
      case __EXPR_NOT__: {
        __tmp__K25I=my_copy__GLYM(e__1C2H);
      } break;
      case __EXPR_MOD__: {
        __tmp__K25I=my_copy__BNEO(e__1C2H);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__K25I=my_copy__M3DP(e__1C2H);
      } break;
      case __EXPR_INF__: {
        __tmp__K25I=my_copy__PBSN(e__1C2H);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__K25I=my_copy__0BSN(e__1C2H);
      } break;
      case __EXPR_OR__: {
        __tmp__K25I=my_copy__ZOPN(e__1C2H);
      } break;
      case __EXPR_XOR__: {
        __tmp__K25I=my_copy__CYSO(e__1C2H);
      } break;
      };
      add_last__AL4G(((__LIST *)result__3C2H)->expr_list__JUOG,create__with__result__2S1G(__tmp__K25I,s__ABUI,Self__ZC2H,Self__ZC2H->parent_dta__5OWH.result_expr__RJZD));
    };
    switch (((struct ___OBJ *)e__1C2H)->__id) {
    case __LIST__: {
      __tmp__BCUI=((__LIST *)e__1C2H)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__BCUI=((__STRING_CST *)e__1C2H)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BCUI=((__EXTERNAL_C *)e__1C2H)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BCUI=((__PROTOTYPE_CST *)e__1C2H)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__BCUI=((__INTEGER_CST *)e__1C2H)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__BCUI=((__READ_LOCAL *)e__1C2H)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BCUI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BCUI=((__EXPR_EQUAL *)e__1C2H)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BCUI=((__EXPR_NOT_EQUAL *)e__1C2H)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__BCUI=((__REAL_CST *)e__1C2H)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__BCUI=((__CHARACTER_CST *)e__1C2H)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__BCUI=((__IS_EXPANDED *)e__1C2H)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BCUI=((__GET_TYPE_ID *)e__1C2H)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__BCUI=((__EXPR_SUP *)e__1C2H)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__BCUI=((__EXPR_SUB *)e__1C2H)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__BCUI=((__EXPR_MUL *)e__1C2H)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__BCUI=((__EXPR_DIV *)e__1C2H)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__BCUI=((__EXPR_AND *)e__1C2H)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BCUI=((__EXPR_SHIFT_R *)e__1C2H)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BCUI=((__EXPR_SHIFT_L *)e__1C2H)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__BCUI=((__PUT_TO *)e__1C2H)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__BCUI=((__ITEM *)e__1C2H)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__BCUI=((__SIZE_OF *)e__1C2H)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__BCUI=((__CAST *)e__1C2H)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__BCUI=((__CALL_SLOT *)e__1C2H)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__BCUI=((__READ_SLOT *)e__1C2H)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__BCUI=((__READ_GLOBAL *)e__1C2H)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BCUI=((__EXPR_NOT_LOGIC *)e__1C2H)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BCUI=((__EXPR_OR_LOGIC *)e__1C2H)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BCUI=((__EXPR_OR_OR_LOGIC *)e__1C2H)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BCUI=((__EXPR_AND_LOGIC *)e__1C2H)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BCUI=((__EXPR_AND_AND_LOGIC *)e__1C2H)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__BCUI=((__EXPR_NEG *)e__1C2H)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__BCUI=((__EXPR_ADD *)e__1C2H)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__BCUI=((__EXPR_NOT *)e__1C2H)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__BCUI=((__EXPR_MOD *)e__1C2H)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BCUI=((__EXPR_SUP_EQ *)e__1C2H)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__BCUI=((__EXPR_INF *)e__1C2H)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BCUI=((__EXPR_INF_EQ *)e__1C2H)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__BCUI=((__EXPR_OR *)e__1C2H)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__BCUI=((__EXPR_XOR *)e__1C2H)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    add_last__AL4G(((__LIST *)result__3C2H)->expr_list__JUOG,create__type__CLQC(__tmp__BCUI,TYPE_VOID__->parent_type__UIB.default__AKC));
  };
  return(result__3C2H);
}

static __INTEGER count__PNYG(__NODE_TYPE *Self__QNYG)
// ({NODE_TYPE}) With resultNo recursive, No inlinable.
{
  __INTEGER result__SNYG;
  __BOOLEAN __tmp__2NYG;
  result__SNYG= 0;
  if (((void *)Self__QNYG->parent_node__DMQC.switch__ELAG != (void *)NULL)) {
    result__SNYG=(__INTEGER)(((__FAST_ARRAYoCASEo *)((__SWITCH *)Self__QNYG->parent_node__DMQC.switch__ELAG)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1);
    __tmp__2NYG=TRUE__;
  } else {
    __tmp__2NYG=FALSE__;
  };
  if ((! __tmp__2NYG)) {
    if (((void *)Self__QNYG->parent_node__DMQC.first_type__NIAG != (void *)NULL)) {
      result__SNYG= 1;
    };
  };
  return(result__SNYG);
}

static void* subtype_list__0NFJ()
// () With resultRecursive, No inlinable.
{
  void *__tmp__3NFJ;
  void *__tmp__4NFJ;
  __tmp__3NFJ=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__3NFJ)->__id) {
  case __TYPE__: {
    __tmp__4NFJ=((__TYPE *)__tmp__3NFJ)->subtype_list__APY;
  } break;
  case __TYPE_NULL__: {
    __tmp__4NFJ=((__TYPE_NULL *)__tmp__3NFJ)->parent_type__TIB.subtype_list__APY;
  } break;
  case __TYPE_VOID__: {
    __tmp__4NFJ=((__TYPE_VOID *)__tmp__3NFJ)->parent_type__UIB.subtype_list__APY;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__4NFJ=((__TYPE_CONTEXT *)__tmp__3NFJ)->parent_type__VIB.subtype_list__APY;
  } break;
  case __TYPE_ID__: {
    __tmp__4NFJ=((__TYPE_ID *)__tmp__3NFJ)->parent_type__WIB.subtype_list__APY;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__4NFJ=((__TYPE_GENERIC *)__tmp__3NFJ)->parent_type__T2IB.subtype_list__APY;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__4NFJ=subtype_list__0NFJ();
  } break;
  };
  return(__tmp__4NFJ);
}

static void* new__XWSG()
// () With resultNo recursive, No inlinable.
{
  void *result__0WSG;
  __TYPES_TMP *result__JPTI,*Self__V3GJ;
  __POINTER ptr__KPTI;
  __INTEGER typ_id__PPTI;
  __UINTEGER_32 sz__MPTI,a__S3ZQ,new_size__Q3ZQ,t__W3ZQ,a__Y3ZQ;
  __FAST_ARRAYoTYPES_TMPo *Self__4BCH,*Self__UCCH;
  result__0WSG=NULL;
  if ((((__FAST_ARRAYoTYPES_TMPo *)free_list__AXSG)->parent_arrayed_collection__5WSG.upper__MY4G <  0)) {
    result__JPTI=NULL;
    ptr__KPTI=((__POINTER )(NULL));
    typ_id__PPTI= 0;
    sz__MPTI=((__UINTEGER_32 )sizeof(__TYPES_TMP));
    if ((sz__MPTI ==  0)) {
      result__JPTI=TYPES_TMP__;
    } else {
      typ_id__PPTI=__TYPES_TMP__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MPTI);
      if ((typ_id__PPTI == (__INTEGER)(-  1))) {
        a__S3ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__Q3ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__MPTI + a__S3ZQ) & (__UINTEGER_32)(~ a__S3ZQ));
        ptr__KPTI=micro_alloc__table__lab__BOI(new_size__Q3ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q3ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Q3ZQ);
      } else {
        t__W3ZQ=((__UINTEGER_32 )typ_id__PPTI);
        a__Y3ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__KPTI=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MPTI + a__Y3ZQ) & (__UINTEGER_32)(~ a__Y3ZQ)),((__POINTER )(&(table_type[(t__W3ZQ)]))),(__UINTEGER_32)(t__W3ZQ |  1));
      };
      result__JPTI=((__TYPES_TMP *)ptr__KPTI);
      *(result__JPTI) = *(TYPES_TMP__);
    };
    Self__V3GJ=((__TYPES_TMP *)result__JPTI);
    Self__V3GJ->capacity__W3GJ= 256;
    Self__V3GJ->parent_types__W25F.storage__WWFJ=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  8))));
    result__0WSG=result__JPTI;
  } else {
    Self__4BCH=((__FAST_ARRAYoTYPES_TMPo *)free_list__AXSG);
    result__0WSG=((void **)Self__4BCH->parent_arrayed_collection__5WSG.storage__S44G)[Self__4BCH->parent_arrayed_collection__5WSG.upper__MY4G];
    Self__UCCH=((__FAST_ARRAYoTYPES_TMPo *)free_list__AXSG);
    Self__UCCH->parent_arrayed_collection__5WSG.upper__MY4G=(__INTEGER)(Self__UCCH->parent_arrayed_collection__5WSG.upper__MY4G -  1);
  };
  return(result__0WSG);
}

static void get_type__EYMJ(__LIST *Self__FYMJ,void *t__GYMJ)
// ({LIST},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__HYMJ;
  __tmp__HYMJ=last_expr__URRG(Self__FYMJ);
  switch (((struct ___OBJ *)__tmp__HYMJ)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__HYMJ,t__GYMJ);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)((__STRING_CST *)__tmp__HYMJ)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__HYMJ)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__HYMJ)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)((__REAL_CST *)__tmp__HYMJ)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__HYMJ)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__GYMJ,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__GYMJ,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__HYMJ,t__GYMJ);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__GYMJ,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)((__CAST *)__tmp__HYMJ)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__HYMJ,t__GYMJ);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__HYMJ,t__GYMJ);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__HYMJ)->global__RHJK,t__GYMJ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__HYMJ)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__GYMJ,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__HYMJ)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__GYMJ,type_true__FJB);
    add__R2EJ(t__GYMJ,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__HYMJ,t__GYMJ);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__HYMJ,t__GYMJ);
  } break;
  };
}

static void add__R2EJ(__TYPES_TMP *Self__S2EJ,void *t__T2EJ)
// ({TYPES_TMP},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER idx__U2EJ;
  __BOOLEAN __tmp__K3EJ;
  idx__U2EJ= 0;
  if ((Self__S2EJ->parent_types__W25F.upper__4LAG == (__INTEGER)(-  1))) {
    add_last__TWRJ(Self__S2EJ,t__T2EJ);
  } else {
    idx__U2EJ=search__from__to__NXRJ(Self__S2EJ,t__T2EJ, 0,(__INTEGER)(Self__S2EJ->parent_types__W25F.upper__4LAG +  1));
    if ((idx__U2EJ > Self__S2EJ->parent_types__W25F.upper__4LAG)) {
      add_last__TWRJ(Self__S2EJ,t__T2EJ);
      __tmp__K3EJ=TRUE__;
    } else {
      __tmp__K3EJ=FALSE__;
    };
    if ((! __tmp__K3EJ)) {
      if (((void *)((void **)Self__S2EJ->parent_types__W25F.storage__WWFJ)[idx__U2EJ] != (void *)t__T2EJ)) {
        add__to__BLYK(Self__S2EJ,t__T2EJ,idx__U2EJ);
      };
    };
  };
}

static void get_type__ZHDI(__EXTERNAL_C *Self__0HDI,void *t__1HDI)
// ({EXTERNAL_C},{NULLxTYPES_TMP}) VoidNo recursive, No inlinable.
{
  if (((void *)Self__0HDI->living_type__R4QH == (void *)NULL)) {
    add__R2EJ(t__1HDI,((__TYPE_FULL *)Self__0HDI->static_type__UXZD)->parent_type__KTL);
  } else {
    union__IKHJ(t__1HDI,Self__0HDI->living_type__R4QH);
  };
}

static void get_type__AOFJ(__READ_LOCAL *Self__BOFJ,void *t__COFJ)
// ({READ_LOCAL},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  __LOCAL *Self__TTHK;
  void *tmp_type__VTHK;
  void *__tmp__BVHK,*__tmp__UVHK;
  __INTEGER __tmp__NVHK,Self__TPIL;
  Self__TTHK=((__LOCAL *)Self__BOFJ->local__ALZD);
  tmp_type__VTHK=NULL;
  if ((Self__TTHK->parent_variable__B2LC.level_type__XTHK < level_pass__QYUC)) {
    if ((! ((((__UINTEGER_8)(((__TYPE_FULL *)Self__TTHK->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)Self__TTHK->parent_variable__B2LC.type__125F)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)Self__TTHK->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
      if ((is_executing_pass__Q5LC || ((void *)Self__TTHK->parent_variable__B2LC.require_first__DAEH != (void *)NULL))) {
        Self__TTHK->parent_variable__B2LC.level_type__XTHK=level_pass__QYUC;
        tmp_type__VTHK=new__XWSG();
        if (((void *)Self__TTHK->parent_variable__B2LC.require_first__DAEH != (void *)NULL)) {
          __tmp__BVHK=Self__TTHK->parent_variable__B2LC.require_first__DAEH;
          switch (((struct ___OBJ *)__tmp__BVHK)->__id) {
          case __WRITE_GLOBAL__: {
            get_type__44GL(__tmp__BVHK,tmp_type__VTHK);
          } break;
          case __WRITE_SLOT__: {
            get_type__K5GL(__tmp__BVHK,tmp_type__VTHK);
          } break;
          case __WRITE_LOCAL__: {
            get_type__W5GL(__tmp__BVHK,tmp_type__VTHK);
          } break;
          };
          if (((void *)Self__TTHK->parent_variable__B2LC.require_list__UAEH != (void *)NULL)) {
            __tmp__NVHK=((__FAST_ARRAYoWRITEo *)Self__TTHK->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI;
            Self__TPIL= 0;
            while ((Self__TPIL <= __tmp__NVHK)) {
              __tmp__UVHK=((void **)((__FAST_ARRAYoWRITEo *)Self__TTHK->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__TPIL];
              switch (((struct ___OBJ *)__tmp__UVHK)->__id) {
              case __WRITE_GLOBAL__: {
                get_type__44GL(__tmp__UVHK,tmp_type__VTHK);
              } break;
              case __WRITE_SLOT__: {
                get_type__K5GL(__tmp__UVHK,tmp_type__VTHK);
              } break;
              case __WRITE_LOCAL__: {
                get_type__W5GL(__tmp__UVHK,tmp_type__VTHK);
              } break;
              };
              Self__TPIL=(__INTEGER)(Self__TPIL +  1);
            };
          };
        };
        Self__TTHK->parent_variable__B2LC.type_list__HKZD=update__JYMJ(tmp_type__VTHK,Self__TTHK->parent_variable__B2LC.type_list__HKZD);
      };
    };
  };
  union__IKHJ(t__COFJ,Self__TTHK->parent_variable__B2LC.type_list__HKZD);
}

static void get_type__ZJDI(__EXPR_SUB *Self__0JDI,void *t__1JDI)
// ({EXPR_SUB},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__2JDI;
  __tmp__2JDI=Self__0JDI->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__2JDI)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__2JDI,t__1JDI);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)((__STRING_CST *)__tmp__2JDI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__2JDI,t__1JDI);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__2JDI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__2JDI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)((__REAL_CST *)__tmp__2JDI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__2JDI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__1JDI,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__2JDI,t__1JDI);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__1JDI,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__2JDI,t__1JDI);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__1JDI,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)((__CAST *)__tmp__2JDI)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__2JDI,t__1JDI);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__2JDI,t__1JDI);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__2JDI)->global__RHJK,t__1JDI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__2JDI)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__1JDI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__2JDI)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__1JDI,type_true__FJB);
    add__R2EJ(t__1JDI,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__2JDI,t__1JDI);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__2JDI,t__1JDI);
  } break;
  };
}

static void get_type__3JDI(__EXPR_MUL *Self__4JDI,void *t__5JDI)
// ({EXPR_MUL},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__AKDI;
  __tmp__AKDI=Self__4JDI->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__AKDI)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__AKDI,t__5JDI);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)((__STRING_CST *)__tmp__AKDI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__AKDI,t__5JDI);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__AKDI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__AKDI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)((__REAL_CST *)__tmp__AKDI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__AKDI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__5JDI,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__AKDI,t__5JDI);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__5JDI,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__AKDI,t__5JDI);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__5JDI,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)((__CAST *)__tmp__AKDI)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__AKDI,t__5JDI);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__AKDI,t__5JDI);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__AKDI)->global__RHJK,t__5JDI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__AKDI)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__5JDI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__AKDI)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__5JDI,type_true__FJB);
    add__R2EJ(t__5JDI,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__AKDI,t__5JDI);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__AKDI,t__5JDI);
  } break;
  };
}

static void get_type__BKDI(__EXPR_DIV *Self__CKDI,void *t__DKDI)
// ({EXPR_DIV},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__EKDI;
  __tmp__EKDI=Self__CKDI->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__EKDI)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__EKDI,t__DKDI);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)((__STRING_CST *)__tmp__EKDI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__EKDI,t__DKDI);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__EKDI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__EKDI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)((__REAL_CST *)__tmp__EKDI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__EKDI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__DKDI,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__EKDI,t__DKDI);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__DKDI,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__EKDI,t__DKDI);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__DKDI,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)((__CAST *)__tmp__EKDI)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__EKDI,t__DKDI);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__EKDI,t__DKDI);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__EKDI)->global__RHJK,t__DKDI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__EKDI)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__DKDI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__EKDI)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__DKDI,type_true__FJB);
    add__R2EJ(t__DKDI,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__EKDI,t__DKDI);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__EKDI,t__DKDI);
  } break;
  };
}

static void get_type__FKDI(__EXPR_AND *Self__GKDI,void *t__HKDI)
// ({EXPR_AND},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__IKDI;
  __tmp__IKDI=Self__GKDI->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__IKDI)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__IKDI,t__HKDI);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)((__STRING_CST *)__tmp__IKDI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__IKDI,t__HKDI);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__IKDI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__IKDI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)((__REAL_CST *)__tmp__IKDI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__IKDI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__HKDI,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__IKDI,t__HKDI);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__HKDI,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__IKDI,t__HKDI);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__HKDI,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)((__CAST *)__tmp__IKDI)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__IKDI,t__HKDI);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__IKDI,t__HKDI);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__IKDI)->global__RHJK,t__HKDI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__IKDI)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__HKDI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__IKDI)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__HKDI,type_true__FJB);
    add__R2EJ(t__HKDI,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__IKDI,t__HKDI);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__IKDI,t__HKDI);
  } break;
  };
}

static void get_type__JKDI(__EXPR_SHIFT_R *Self__KKDI,void *t__LKDI)
// ({EXPR_SHIFT_R},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__MKDI;
  __tmp__MKDI=Self__KKDI->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__MKDI)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__MKDI,t__LKDI);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)((__STRING_CST *)__tmp__MKDI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__MKDI,t__LKDI);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__MKDI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__MKDI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)((__REAL_CST *)__tmp__MKDI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__MKDI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__LKDI,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__MKDI,t__LKDI);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__LKDI,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__MKDI,t__LKDI);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__LKDI,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)((__CAST *)__tmp__MKDI)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__MKDI,t__LKDI);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__MKDI,t__LKDI);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__MKDI)->global__RHJK,t__LKDI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__MKDI)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__LKDI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__MKDI)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__LKDI,type_true__FJB);
    add__R2EJ(t__LKDI,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__MKDI,t__LKDI);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__MKDI,t__LKDI);
  } break;
  };
}

static void get_type__NKDI(__EXPR_SHIFT_L *Self__OKDI,void *t__PKDI)
// ({EXPR_SHIFT_L},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__QKDI;
  __tmp__QKDI=Self__OKDI->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__QKDI)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__QKDI,t__PKDI);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)((__STRING_CST *)__tmp__QKDI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__QKDI,t__PKDI);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__QKDI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__QKDI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)((__REAL_CST *)__tmp__QKDI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__QKDI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__PKDI,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__QKDI,t__PKDI);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__PKDI,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__QKDI,t__PKDI);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__PKDI,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)((__CAST *)__tmp__QKDI)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__QKDI,t__PKDI);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__QKDI,t__PKDI);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__QKDI)->global__RHJK,t__PKDI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__QKDI)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__PKDI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__QKDI)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__PKDI,type_true__FJB);
    add__R2EJ(t__PKDI,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__QKDI,t__PKDI);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__QKDI,t__PKDI);
  } break;
  };
}

static void get_type__UKDI(__ITEM *Self__VKDI,void *t__WKDI)
// ({ITEM},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__YKDI,*__tmp__E2YM;
  void *__tmp__ZKDI,*typ__G0YM;
  void *__tmp__1KDI;
  void *__tmp__2KDI,*typ_gen__XKDI;
  __TYPE_GENERIC *Self__E0YM;
  void *tmp_type__H0YM;
  __INTEGER __tmp__21YM,Self__FSCN;
  __tmp__YKDI=Self__VKDI->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__YKDI)->__id) {
  case __LIST__: {
    __tmp__ZKDI=static_type__GIQG(__tmp__YKDI);
  } break;
  case __STRING_CST__: {
    __tmp__ZKDI=((__STRING_CST *)__tmp__YKDI)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZKDI=((__EXTERNAL_C *)__tmp__YKDI)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__ZKDI=((__PROTOTYPE_CST *)__tmp__YKDI)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__ZKDI=((__INTEGER_CST *)__tmp__YKDI)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__ZKDI=((__LOCAL *)((__READ_LOCAL *)__tmp__YKDI)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZKDI=static_type__0N1H(__tmp__YKDI);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZKDI=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZKDI=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__ZKDI=((__REAL_CST *)__tmp__YKDI)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__ZKDI=((__CHARACTER_CST *)__tmp__YKDI)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__ZKDI=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ZKDI=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__ZKDI=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__ZKDI=static_type__MP1H(__tmp__YKDI);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZKDI=static_type__SP1H(__tmp__YKDI);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZKDI=static_type__XP1H(__tmp__YKDI);
  } break;
  case __EXPR_AND__: {
    __tmp__ZKDI=static_type__2P1H(__tmp__YKDI);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZKDI=static_type__BQ1H(__tmp__YKDI);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZKDI=static_type__GQ1H(__tmp__YKDI);
  } break;
  case __PUT_TO__: {
    __tmp__ZKDI=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__ZKDI=static_type__PQ1H(__tmp__YKDI);
  } break;
  case __SIZE_OF__: {
    __tmp__ZKDI=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__ZKDI=((__CAST *)__tmp__YKDI)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__ZKDI=static_type__GIKL(__tmp__YKDI);
  } break;
  case __READ_SLOT__: {
    __tmp__ZKDI=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YKDI)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__ZKDI=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YKDI)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZKDI=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZKDI=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZKDI=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZKDI=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZKDI=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__ZKDI=static_type__Z2IM(__tmp__YKDI);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZKDI=static_type__IXML(__tmp__YKDI);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZKDI=static_type__BTXM(__tmp__YKDI);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZKDI=static_type__5LEO(__tmp__YKDI);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZKDI=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__ZKDI=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZKDI=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__ZKDI=static_type__NOPN(__tmp__YKDI);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZKDI=static_type__XCSO(__tmp__YKDI);
  } break;
  };
  __tmp__1KDI=((__TYPE_FULL *)__tmp__ZKDI)->parent_type__KTL;
  if (__tmp__1KDI==NULL) {
    __tmp__2KDI=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__1KDI)->__id) {
    case __TYPE__: {
      __tmp__2KDI=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__2KDI=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__2KDI=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__2KDI=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__2KDI=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__2KDI=((void *)__tmp__1KDI);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__2KDI=NULL;
    } break;
    }
  };
  typ_gen__XKDI=__tmp__2KDI;
  Self__E0YM=((__TYPE_GENERIC *)__tmp__2KDI);
  tmp_type__H0YM=NULL;
  typ__G0YM=((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__E0YM->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0];
  if ((((__UINTEGER_8)(((__TYPE_FULL *)typ__G0YM)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)typ__G0YM)->parent_type__KTL != (void *)type_boolean__VJB))) {
    add__R2EJ(t__WKDI,((__TYPE_FULL *)typ__G0YM)->parent_type__KTL);
  } else {
    if (((void *)Self__E0YM->put_to_list__F1YM != (void *)NULL)) {
      if ((! Self__E0YM->recursive_test__M1YM)) {
        Self__E0YM->recursive_test__M1YM=TRUE__;
        tmp_type__H0YM=new__XWSG();
        __tmp__21YM=((__FAST_ARRAYoPUT_TOo *)Self__E0YM->put_to_list__F1YM)->parent_arrayed_collection__E1YM.upper__01YM;
        Self__FSCN= 0;
        while ((Self__FSCN <= __tmp__21YM)) {
          __tmp__E2YM=((__PUT_TO *)((void **)((__FAST_ARRAYoPUT_TOo *)Self__E0YM->put_to_list__F1YM)->parent_arrayed_collection__E1YM.storage__RTFN)[Self__FSCN])->value__WR2H;
          switch (((struct ___OBJ *)__tmp__E2YM)->__id) {
          case __LIST__: {
            get_type__EYMJ(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __STRING_CST__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)((__STRING_CST *)__tmp__E2YM)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
          } break;
          case __EXTERNAL_C__: {
            get_type__ZHDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __PROTOTYPE_CST__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__E2YM)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
          } break;
          case __INTEGER_CST__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__E2YM)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
          } break;
          case __READ_LOCAL__: {
            get_type__AOFJ(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_MULTIPLE__: {
            print__1ZE((&__string_253));
            fputc((int)('\n'),stdout);
            exit(( 1));
          } break;
          case __EXPR_EQUAL__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_NOT_EQUAL__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __REAL_CST__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)((__REAL_CST *)__tmp__E2YM)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
          } break;
          case __CHARACTER_CST__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__E2YM)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
          } break;
          case __IS_EXPANDED__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __GET_TYPE_ID__: {
            add__R2EJ(tmp_type__H0YM,type_integer__3JB);
          } break;
          case __EXPR_SUP__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_SUB__: {
            get_type__ZJDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_MUL__: {
            get_type__3JDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_DIV__: {
            get_type__BKDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_AND__: {
            get_type__FKDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_SHIFT_R__: {
            get_type__JKDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_SHIFT_L__: {
            get_type__NKDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __PUT_TO__: {
            add__R2EJ(tmp_type__H0YM,TYPE_VOID__);
          } break;
          case __ITEM__: {
            get_type__UKDI(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __SIZE_OF__: {
            add__R2EJ(tmp_type__H0YM,type_integer__3JB);
          } break;
          case __CAST__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)((__CAST *)__tmp__E2YM)->static_type__SO1H)->parent_type__KTL);
          } break;
          case __CALL_SLOT__: {
            get_type__DAML(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __READ_SLOT__: {
            get_type__OD0K(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __READ_GLOBAL__: {
            get_type__ZJOL(((__READ_GLOBAL *)__tmp__E2YM)->global__RHJK,tmp_type__H0YM);
          } break;
          case __EXPR_NOT_LOGIC__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_OR_LOGIC__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_AND_LOGIC__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_NEG__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__E2YM)))->parent_type__KTL);
          } break;
          case __EXPR_ADD__: {
            get_type__YEOL(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_NOT__: {
            add__R2EJ(tmp_type__H0YM,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__E2YM)))->parent_type__KTL);
          } break;
          case __EXPR_MOD__: {
            get_type__FSEO(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_SUP_EQ__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_INF__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_INF_EQ__: {
            add__R2EJ(tmp_type__H0YM,type_true__FJB);
            add__R2EJ(tmp_type__H0YM,type_false__NJB);
          } break;
          case __EXPR_OR__: {
            get_type__CVPN(__tmp__E2YM,tmp_type__H0YM);
          } break;
          case __EXPR_XOR__: {
            get_type__FNTO(__tmp__E2YM,tmp_type__H0YM);
          } break;
          };
          Self__FSCN=(__INTEGER)(Self__FSCN +  1);
        };
        Self__E0YM->old_type__G2YM=update__JYMJ(tmp_type__H0YM,Self__E0YM->old_type__G2YM);
        Self__E0YM->recursive_test__M1YM=FALSE__;
      };
      union__IKHJ(t__WKDI,Self__E0YM->old_type__G2YM);
    };
  };
}

static void get_type__DAML(__CALL_SLOT *Self__EAML,void *t__FAML)
// ({CALL_SLOT},{NULLxTYPES_TMP}) VoidNo recursive, No inlinable.
{
  if (is_interrupt__2MQL(Self__EAML)) {
    add__R2EJ(t__FAML,type_pointer__HLB);
  } else {
    get_type__EYMJ(source__Q53L(Self__EAML),t__FAML);
  };
}

static void get_type__OD0K(__READ_SLOT *Self__PD0K,void *t__QD0K)
// ({READ_SLOT},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  get_type__ZJOL(Self__PD0K->slot__EVGK,t__QD0K);
}

static void get_type__ZJOL(__SLOT_DATA *Self__0JOL,void *t__1JOL)
// ({SLOT_DATA},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *tmp_type__2JOL;
  void *__tmp__HLOL,*__tmp__0LOL;
  __INTEGER __tmp__TLOL,Self__P0GM;
  tmp_type__2JOL=NULL;
  if ((Self__0JOL->parent_variable__AJZD.level_type__XTHK < level_pass__QYUC)) {
    if ((! ((((__UINTEGER_8)(((__TYPE_FULL *)Self__0JOL->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)Self__0JOL->parent_variable__AJZD.type__125F)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)Self__0JOL->parent_variable__AJZD.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
      if ((is_executing_pass__Q5LC || ((void *)Self__0JOL->parent_variable__AJZD.require_first__DAEH != (void *)NULL))) {
        Self__0JOL->parent_variable__AJZD.level_type__XTHK=level_pass__QYUC;
        tmp_type__2JOL=new__XWSG();
        if (((void *)Self__0JOL->parent_variable__AJZD.require_first__DAEH != (void *)NULL)) {
          __tmp__HLOL=Self__0JOL->parent_variable__AJZD.require_first__DAEH;
          switch (((struct ___OBJ *)__tmp__HLOL)->__id) {
          case __WRITE_GLOBAL__: {
            get_type__44GL(__tmp__HLOL,tmp_type__2JOL);
          } break;
          case __WRITE_SLOT__: {
            get_type__K5GL(__tmp__HLOL,tmp_type__2JOL);
          } break;
          case __WRITE_LOCAL__: {
            get_type__W5GL(__tmp__HLOL,tmp_type__2JOL);
          } break;
          };
          if (((void *)Self__0JOL->parent_variable__AJZD.require_list__UAEH != (void *)NULL)) {
            __tmp__TLOL=((__FAST_ARRAYoWRITEo *)Self__0JOL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI;
            Self__P0GM= 0;
            while ((Self__P0GM <= __tmp__TLOL)) {
              __tmp__0LOL=((void **)((__FAST_ARRAYoWRITEo *)Self__0JOL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__P0GM];
              switch (((struct ___OBJ *)__tmp__0LOL)->__id) {
              case __WRITE_GLOBAL__: {
                get_type__44GL(__tmp__0LOL,tmp_type__2JOL);
              } break;
              case __WRITE_SLOT__: {
                get_type__K5GL(__tmp__0LOL,tmp_type__2JOL);
              } break;
              case __WRITE_LOCAL__: {
                get_type__W5GL(__tmp__0LOL,tmp_type__2JOL);
              } break;
              };
              Self__P0GM=(__INTEGER)(Self__P0GM +  1);
            };
          };
        };
        Self__0JOL->parent_variable__AJZD.type_list__HKZD=update__JYMJ(tmp_type__2JOL,Self__0JOL->parent_variable__AJZD.type_list__HKZD);
      };
    };
  };
  union__IKHJ(t__1JOL,Self__0JOL->parent_variable__AJZD.type_list__HKZD);
}

static void get_type__YEOL(__EXPR_ADD *Self__ZEOL,void *t__0EOL)
// ({EXPR_ADD},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__1EOL;
  __tmp__1EOL=Self__ZEOL->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__1EOL)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__1EOL,t__0EOL);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)((__STRING_CST *)__tmp__1EOL)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__1EOL,t__0EOL);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__1EOL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__1EOL)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)((__REAL_CST *)__tmp__1EOL)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__1EOL)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__0EOL,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__1EOL,t__0EOL);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__0EOL,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__1EOL,t__0EOL);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__0EOL,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)((__CAST *)__tmp__1EOL)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__1EOL,t__0EOL);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__1EOL,t__0EOL);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__1EOL)->global__RHJK,t__0EOL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__1EOL)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__0EOL,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__1EOL)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__0EOL,type_true__FJB);
    add__R2EJ(t__0EOL,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__1EOL,t__0EOL);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__1EOL,t__0EOL);
  } break;
  };
}

static void get_type__FSEO(__EXPR_MOD *Self__GSEO,void *t__HSEO)
// ({EXPR_MOD},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__ISEO;
  __tmp__ISEO=Self__GSEO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__ISEO)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__ISEO,t__HSEO);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)((__STRING_CST *)__tmp__ISEO)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__ISEO,t__HSEO);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__ISEO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__ISEO)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)((__REAL_CST *)__tmp__ISEO)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__ISEO)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__HSEO,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__ISEO,t__HSEO);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__HSEO,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__ISEO,t__HSEO);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__HSEO,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)((__CAST *)__tmp__ISEO)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__ISEO,t__HSEO);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__ISEO,t__HSEO);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__ISEO)->global__RHJK,t__HSEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__ISEO)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__HSEO,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__ISEO)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__HSEO,type_true__FJB);
    add__R2EJ(t__HSEO,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__ISEO,t__HSEO);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__ISEO,t__HSEO);
  } break;
  };
}

static void get_type__CVPN(__EXPR_OR *Self__DVPN,void *t__EVPN)
// ({EXPR_OR},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__FVPN;
  __tmp__FVPN=Self__DVPN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__FVPN)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__FVPN,t__EVPN);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)((__STRING_CST *)__tmp__FVPN)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__FVPN,t__EVPN);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__FVPN)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__FVPN)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)((__REAL_CST *)__tmp__FVPN)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__FVPN)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__EVPN,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__FVPN,t__EVPN);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__EVPN,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__FVPN,t__EVPN);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__EVPN,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)((__CAST *)__tmp__FVPN)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__FVPN,t__EVPN);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__FVPN,t__EVPN);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__FVPN)->global__RHJK,t__EVPN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__FVPN)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__EVPN,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__FVPN)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__EVPN,type_true__FJB);
    add__R2EJ(t__EVPN,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__FVPN,t__EVPN);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__FVPN,t__EVPN);
  } break;
  };
}

static void get_type__FNTO(__EXPR_XOR *Self__GNTO,void *t__HNTO)
// ({EXPR_XOR},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__INTO;
  __tmp__INTO=Self__GNTO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__INTO)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__INTO,t__HNTO);
  } break;
  case __STRING_CST__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)((__STRING_CST *)__tmp__INTO)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__INTO,t__HNTO);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__INTO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__INTO)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)((__REAL_CST *)__tmp__INTO)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__INTO)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(t__HNTO,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__INTO,t__HNTO);
  } break;
  case __PUT_TO__: {
    add__R2EJ(t__HNTO,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__INTO,t__HNTO);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(t__HNTO,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)((__CAST *)__tmp__INTO)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__INTO,t__HNTO);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__INTO,t__HNTO);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__INTO)->global__RHJK,t__HNTO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__INTO)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(t__HNTO,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__INTO)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(t__HNTO,type_true__FJB);
    add__R2EJ(t__HNTO,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__INTO,t__HNTO);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__INTO,t__HNTO);
  } break;
  };
}

static __SWITCH* create__with__size__5JVH(void *n__BKVH,void *e__CKVH,__INTEGER s__DKVH)
// ({NODE_TYPExNODE_STYLE},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{INTEGER}) With resultNo recursive, No inlinable.
{
  __SWITCH *result__FKVH,*Self__GMFI;
  void *__tmp__NZNI;
  __POSITION __tmp__OZNI,__tmp__LMFI;
  void *__tmp__OMFI,*__tmp__WMFI;
  void *__tmp__UMFI;
  result__FKVH=clone__CBXH(SWITCH__);
  Self__GMFI=((__SWITCH *)result__FKVH);
  if (((struct ___OBJ *)n__BKVH)->__id==__NODE_TYPE__) {
    __tmp__NZNI=((__NODE_TYPE *)n__BKVH)->parent_node__DMQC.data__LLZD;
    switch (((struct ___OBJ *)__tmp__NZNI)->__id) {
    case __DTA_RD__: {
      __tmp__OZNI=((__DTA_RD *)__tmp__NZNI)->parent_dta__AMQC.parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_CAST__: {
      __tmp__OZNI=DTA__->parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_WR_CODE__: {
      __tmp__OZNI=((__DTA_WR_CODE *)__tmp__NZNI)->parent_dta__E0LH.parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_BLOCK__: {
      __tmp__OZNI=DTA__->parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_WR_VALUE__: {
      __tmp__OZNI=((__DTA_WR_VALUE *)__tmp__NZNI)->parent_dta__PTUH.parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_RD_ARGS__: {
      __tmp__OZNI=((__DTA_RD_ARGS *)__tmp__NZNI)->parent_dta__5OWH.parent_itm_object__5LQC.position__BJM;
    } break;
    };
    __tmp__LMFI=__tmp__OZNI;
  } else {
    __tmp__LMFI=position__V54J(n__BKVH);
  };
  Self__GMFI->parent_instr__HAMC.parent_itm_object__TE.position__BJM=__tmp__LMFI;
  Self__GMFI->expr__MMFI=e__CKVH;
  Self__GMFI->list__SLAG=create_with_capacity__RZNI(s__DKVH);
  if (((struct ___OBJ *)n__BKVH)->__id==__NODE_TYPE__) {
    __tmp__OMFI=((__NODE_TYPE *)n__BKVH)->parent_node__DMQC.first_code__FIAG;
  } else {
    __tmp__OMFI=((__NODE_STYLE *)n__BKVH)->parent_node__OP0G.first_code__FIAG;
  };
  if (((void *)__tmp__OMFI != (void *)NULL)) {
    if (((struct ___OBJ *)n__BKVH)->__id==__NODE_TYPE__) {
      __tmp__UMFI=((__NODE_TYPE *)n__BKVH)->parent_node__DMQC.first_type__NIAG;
    } else {
      __tmp__UMFI=((__NODE_STYLE *)n__BKVH)->parent_node__OP0G.first_type__NIAG;
    };
    if (((struct ___OBJ *)n__BKVH)->__id==__NODE_TYPE__) {
      __tmp__WMFI=((__NODE_TYPE *)n__BKVH)->parent_node__DMQC.first_code__FIAG;
    } else {
      __tmp__WMFI=((__NODE_STYLE *)n__BKVH)->parent_node__OP0G.first_code__FIAG;
    };
    add_last__VPHJ(Self__GMFI->list__SLAG,create__with__NC1H(__tmp__UMFI,__tmp__WMFI));
  };
  return(result__FKVH);
}

static void add_stack_type__2JNG(__NODE_TYPE *Self__3JNG,void *t__4JNG)
// ({NODE_TYPE},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__YKNG,Self__HRTG;
  void *__tmp__5KNG;
  void *__tmp__ELNG;
  __POSITION __tmp__FLNG;
  add_last__YAQG(stack_type__5MAG,t__4JNG);
  if ((((__INTEGER)(((__FAST_ARRAYoTYPEo *)stack_type__5MAG)->parent_arrayed_collection__UOB.upper__1OB +  1) >  1) && ((void *)((void **)((__FAST_ARRAYoTYPEo *)stack_type__5MAG)->parent_arrayed_collection__UOB.storage__X2L)[ 0] == (void *)t__4JNG))) {
    copy__BNK(string_tmp__RB,(&__string_335));
    __tmp__YKNG=((__FAST_ARRAYoTYPEo *)stack_type__5MAG)->parent_arrayed_collection__UOB.upper__1OB;
    Self__HRTG= 0;
    while ((Self__HRTG <= __tmp__YKNG)) {
      __tmp__5KNG=((void **)((__FAST_ARRAYoTYPEo *)stack_type__5MAG)->parent_arrayed_collection__UOB.storage__X2L)[Self__HRTG];
      switch (((struct ___OBJ *)__tmp__5KNG)->__id) {
      case __TYPE__: {
        append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)__tmp__5KNG)->prototype__RD)->parent_named__QD.name__1QB);
      } break;
      case __TYPE_NULL__: {
        append__MOK(string_tmp__RB,(&__string_59));
      } break;
      case __TYPE_VOID__: {
        append__MOK(string_tmp__RB,(&__string_2));
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(string_tmp__RB,(&__string_44));
      } break;
      case __TYPE_ID__: {
        append__MOK(string_tmp__RB,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        append__MOK(string_tmp__RB,((__TYPE_GENERIC *)__tmp__5KNG)->name__2R2B);
      } break;
      case __PROFIL_BLOCK__: {
        append__MOK(string_tmp__RB,(&__string_39));
      } break;
      };
      append__MOK(string_tmp__RB,(&__string_336));
      Self__HRTG=(__INTEGER)(Self__HRTG +  1);
    };
    append__MOK(string_tmp__RB,(&__string_11));
    __tmp__ELNG=Self__3JNG->parent_node__DMQC.data__LLZD;
    switch (((struct ___OBJ *)__tmp__ELNG)->__id) {
    case __DTA_RD__: {
      __tmp__FLNG=((__DTA_RD *)__tmp__ELNG)->parent_dta__AMQC.parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_CAST__: {
      __tmp__FLNG=DTA__->parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_WR_CODE__: {
      __tmp__FLNG=((__DTA_WR_CODE *)__tmp__ELNG)->parent_dta__E0LH.parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_BLOCK__: {
      __tmp__FLNG=DTA__->parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_WR_VALUE__: {
      __tmp__FLNG=((__DTA_WR_VALUE *)__tmp__ELNG)->parent_dta__PTUH.parent_itm_object__5LQC.position__BJM;
    } break;
    case __DTA_RD_ARGS__: {
      __tmp__FLNG=((__DTA_RD_ARGS *)__tmp__ELNG)->parent_dta__5OWH.parent_itm_object__5LQC.position__BJM;
    } break;
    };
    put_error__text__0AH( 1,string_tmp__RB);
    put_position__ECH(__tmp__FLNG);
    send_error__2FH();
  };
}

static __CASE* create__with__NC1H(void *val__PC1H,void *c__QC1H)
// ({NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxLIST}) With resultNo recursive, No inlinable.
{
  __CASE *result__UH1H,*Self__LZFI;
  __POINTER ptr__VH1H;
  __INTEGER typ_id__0H1H;
  __UINTEGER_32 sz__XH1H,a__F4ZQ,new_size__D4ZQ,t__J4ZQ,a__L4ZQ;
  void *__tmp__QZFI,*tb__OZFI;
  __PROFIL_BLOCK *Self__TSHJ;
  result__UH1H=NULL;
  ptr__VH1H=((__POINTER )(NULL));
  typ_id__0H1H= 0;
  sz__XH1H=((__UINTEGER_32 )sizeof(__CASE));
  if ((sz__XH1H ==  0)) {
    result__UH1H=CASE__;
  } else {
    typ_id__0H1H=__CASE__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__XH1H);
    if ((typ_id__0H1H == (__INTEGER)(-  1))) {
      a__F4ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__D4ZQ=(__UINTEGER_32)((__UINTEGER_32)(sz__XH1H + a__F4ZQ) & (__UINTEGER_32)(~ a__F4ZQ));
      ptr__VH1H=micro_alloc__table__lab__BOI(new_size__D4ZQ,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D4ZQ / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__D4ZQ);
    } else {
      t__J4ZQ=((__UINTEGER_32 )typ_id__0H1H);
      a__L4ZQ=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__VH1H=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__XH1H + a__L4ZQ) & (__UINTEGER_32)(~ a__L4ZQ)),((__POINTER )(&(table_type[(t__J4ZQ)]))),(__UINTEGER_32)(t__J4ZQ |  1));
    };
    result__UH1H=((__CASE *)ptr__VH1H);
    *(result__UH1H) = *(CASE__);
  };
  Self__LZFI=((__CASE *)result__UH1H);
  Self__LZFI->id__QMAG=val__PC1H;
  Self__LZFI->code__BQAG=c__QC1H;
  if (val__PC1H==NULL) {
    __tmp__QZFI=NULL;
  } else {
    switch (((struct ___OBJ *)val__PC1H)->__id) {
    case __TYPE__: {
      __tmp__QZFI=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__QZFI=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__QZFI=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__QZFI=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__QZFI=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__QZFI=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__QZFI=((void *)val__PC1H);
    } break;
    }
  };
  tb__OZFI=__tmp__QZFI;
  if (((void *)__tmp__QZFI != (void *)NULL)) {
    Self__TSHJ=((__PROFIL_BLOCK *)__tmp__QZFI);
    ((__SLOT_DATA *)Self__TSHJ->slot_value__H4IH)->parent_variable__AJZD.ensure_count__QEAG=(__INTEGER)(((__SLOT_DATA *)Self__TSHJ->slot_value__H4IH)->parent_variable__AJZD.ensure_count__QEAG +  1);
  };
  return(result__UH1H);
}

static void add__to__IDGJ(__FAST_ARRAYoCASEo *Self__JDGJ,void *element__KDGJ,__INTEGER index__LDGJ)
// ({FAST_ARRAYoCASEo},{NULLxCASE},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__UACK;
  void **__tmp__C14Q,**__tmp__D14Q,**__tmp__E14Q;
  if ((index__LDGJ == (__INTEGER)(Self__JDGJ->parent_arrayed_collection__CHAG.upper__HMAG +  1))) {
    add_last__VPHJ(Self__JDGJ,element__KDGJ);
  } else {
    add_last__VPHJ(Self__JDGJ,element__KDGJ);
    Self__UACK=(__INTEGER)(Self__JDGJ->parent_arrayed_collection__CHAG.upper__HMAG -  1);
    __tmp__C14Q=Self__JDGJ->parent_arrayed_collection__CHAG.storage__NYEJ;
    __tmp__D14Q=Self__JDGJ->parent_arrayed_collection__CHAG.storage__NYEJ;
    __tmp__E14Q=Self__JDGJ->parent_arrayed_collection__CHAG.storage__NYEJ;
    while ((Self__UACK >= index__LDGJ)) {
      ((void **)__tmp__D14Q)[(__INTEGER)(Self__UACK +  1)]=((void **)__tmp__C14Q)[Self__UACK];
      ((void **)__tmp__E14Q)[Self__UACK]=NULL;
      Self__UACK=(__INTEGER)(Self__UACK -  1);
    };
    ((void **)Self__JDGJ->parent_arrayed_collection__CHAG.storage__NYEJ)[index__LDGJ]=element__KDGJ;
  };
}

static void free__OOFJ(__TYPES_TMP *Self__POFJ)
// ({TYPES_TMP}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__IYJJ,__tmp__MZJJ,__tmp__YG5J,Self__LJOK;
  __FAST_ARRAYoTYPES_TMPo *Self__GYJJ;
  __BOOLEAN __tmp__WYJJ;
  void **__tmp__LZJJ,**new__FG5J;
  Self__POFJ->parent_types__W25F.upper__4LAG=(__INTEGER)(-  1);
  Self__GYJJ=((__FAST_ARRAYoTYPES_TMPo *)free_list__AXSG);
  new_capacity__IYJJ= 0;
  if (((__INTEGER)(Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G +  1) <= (__INTEGER)(Self__GYJJ->parent_arrayed_collection__5WSG.capacity__H44G -  1))) {
    Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G=(__INTEGER)(Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G +  1);
    __tmp__WYJJ=TRUE__;
  } else {
    __tmp__WYJJ=FALSE__;
  };
  if ((! __tmp__WYJJ)) {
    if ((Self__GYJJ->parent_arrayed_collection__5WSG.capacity__H44G ==  0)) {
      Self__GYJJ->parent_arrayed_collection__5WSG.storage__S44G=create__N0EH( 2);
      Self__GYJJ->parent_arrayed_collection__5WSG.capacity__H44G= 2;
      Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G= 0;
    } else {
      new_capacity__IYJJ=(__INTEGER)(Self__GYJJ->parent_arrayed_collection__5WSG.capacity__H44G <<  1);
      __tmp__LZJJ=Self__GYJJ->parent_arrayed_collection__5WSG.storage__S44G;
      __tmp__MZJJ=Self__GYJJ->parent_arrayed_collection__5WSG.capacity__H44G;
      new__FG5J=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__LZJJ)),((__UINTEGER_32 )(__INTEGER)(__tmp__MZJJ * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__IYJJ * ((__INTEGER )(sizeof(void *)))))));
      __tmp__YG5J=(__INTEGER)(new_capacity__IYJJ -  1);
      Self__LJOK=__tmp__MZJJ;
      while ((Self__LJOK <= __tmp__YG5J)) {
        new__FG5J[Self__LJOK]=NULL;
        Self__LJOK=(__INTEGER)(Self__LJOK +  1);
      };
      Self__GYJJ->parent_arrayed_collection__5WSG.storage__S44G=new__FG5J;
      Self__GYJJ->parent_arrayed_collection__5WSG.capacity__H44G=new_capacity__IYJJ;
      Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G=(__INTEGER)(Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G +  1);
    };
  };
  ((void **)Self__GYJJ->parent_arrayed_collection__5WSG.storage__S44G)[Self__GYJJ->parent_arrayed_collection__5WSG.upper__MY4G]=Self__POFJ;
}

static __BOOLEAN update_branch__PLNG(void *l__RLNG)
// ({NULLxLIST}) With resultNo recursive, No inlinable.
{
  void *__tmp__WLNG,*__tmp__EMNG;
  void *__tmp__XLNG,*node__TLNG,*__tmp__FMNG;
  __NODE_TYPE *Self__W2QQ,*Self__Y2QQ;
  __BOOLEAN result__ULNG;
  result__ULNG=FALSE__;
  __tmp__WLNG=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__RLNG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
  if (__tmp__WLNG==NULL) {
    __tmp__XLNG=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__WLNG)->__id) {
    case __LIST__: {
      __tmp__XLNG=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__XLNG=NULL;
    } break;
    case __PUSH__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__XLNG=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__XLNG=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__XLNG=NULL;
    } break;
    case __SWITCH__: {
      __tmp__XLNG=NULL;
    } break;
    case __NODE_TYPE__: {
      __tmp__XLNG=((void *)__tmp__WLNG);
    } break;
    case __READ_LOCAL__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__XLNG=NULL;
    } break;
    case __NODE_STYLE__: {
      __tmp__XLNG=((void *)__tmp__WLNG);
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__XLNG=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__XLNG=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__XLNG=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__XLNG=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__XLNG=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__XLNG=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__XLNG=NULL;
    } break;
    case __ITEM__: {
      __tmp__XLNG=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__XLNG=NULL;
    } break;
    case __CAST__: {
      __tmp__XLNG=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__XLNG=NULL;
    } break;
    case __NOP__: {
      __tmp__XLNG=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__XLNG=NULL;
    } break;
    case __WRITE_LOCAL__: {
      __tmp__XLNG=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__XLNG=NULL;
    } break;
    case __LOOP__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__XLNG=NULL;
    } break;
    case __LOOP_END__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__XLNG=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__XLNG=NULL;
    } break;
    }
  };
  node__TLNG=__tmp__XLNG;
  if (((void *)__tmp__XLNG == (void *)NULL)) {
    result__ULNG=TRUE__;
  } else {
    if (((struct ___OBJ *)__tmp__XLNG)->__id==__NODE_TYPE__) {
      Self__W2QQ=((__NODE_TYPE *)__tmp__XLNG);
      update_case__XGAG(Self__W2QQ);
      update_depth__QNAG(Self__W2QQ,FALSE__);
    } else {
      update_link__WYEJ(__tmp__XLNG);
    };
    __tmp__EMNG=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__RLNG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 1];
    if (__tmp__EMNG==NULL) {
      __tmp__FMNG=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__EMNG)->__id) {
      case __LIST__: {
        __tmp__FMNG=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__FMNG=NULL;
      } break;
      case __PUSH__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__FMNG=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__FMNG=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__FMNG=NULL;
      } break;
      case __SWITCH__: {
        __tmp__FMNG=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__FMNG=((void *)__tmp__EMNG);
      } break;
      case __READ_LOCAL__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__FMNG=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__FMNG=((void *)__tmp__EMNG);
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__FMNG=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__FMNG=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__FMNG=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__FMNG=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__FMNG=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__FMNG=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__FMNG=NULL;
      } break;
      case __ITEM__: {
        __tmp__FMNG=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__FMNG=NULL;
      } break;
      case __CAST__: {
        __tmp__FMNG=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__FMNG=NULL;
      } break;
      case __NOP__: {
        __tmp__FMNG=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__FMNG=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__FMNG=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__FMNG=NULL;
      } break;
      case __LOOP__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__FMNG=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__FMNG=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__FMNG=NULL;
      } break;
      }
    };
    node__TLNG=__tmp__FMNG;
    if (((void *)__tmp__FMNG != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__FMNG)->__id==__NODE_TYPE__) {
        Self__Y2QQ=((__NODE_TYPE *)__tmp__FMNG);
        update_case__XGAG(Self__Y2QQ);
        update_depth__QNAG(Self__Y2QQ,FALSE__);
      } else {
        update_link__WYEJ(__tmp__FMNG);
      };
    };
  };
  return(result__ULNG);
}

static __BOOLEAN update_branch__AS1H(void *l__CS1H)
// ({NULLxLIST}) With resultNo recursive, No inlinable.
{
  void *__tmp__HS1H,*__tmp__VS1H;
  void *__tmp__IS1H,*node__ES1H,*__tmp__WS1H;
  __NODE_TYPE *Self__02QQ,*Self__22QQ;
  __BOOLEAN result__FS1H;
  result__FS1H=FALSE__;
  __tmp__HS1H=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__CS1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
  if (__tmp__HS1H==NULL) {
    __tmp__IS1H=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__HS1H)->__id) {
    case __LIST__: {
      __tmp__IS1H=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__IS1H=NULL;
    } break;
    case __PUSH__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__IS1H=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__IS1H=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__IS1H=NULL;
    } break;
    case __SWITCH__: {
      __tmp__IS1H=NULL;
    } break;
    case __NODE_TYPE__: {
      __tmp__IS1H=((void *)__tmp__HS1H);
    } break;
    case __READ_LOCAL__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__IS1H=NULL;
    } break;
    case __NODE_STYLE__: {
      __tmp__IS1H=((void *)__tmp__HS1H);
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__IS1H=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__IS1H=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__IS1H=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__IS1H=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__IS1H=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__IS1H=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__IS1H=NULL;
    } break;
    case __ITEM__: {
      __tmp__IS1H=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__IS1H=NULL;
    } break;
    case __CAST__: {
      __tmp__IS1H=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__IS1H=NULL;
    } break;
    case __NOP__: {
      __tmp__IS1H=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__IS1H=NULL;
    } break;
    case __WRITE_LOCAL__: {
      __tmp__IS1H=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__IS1H=NULL;
    } break;
    case __LOOP__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__IS1H=NULL;
    } break;
    case __LOOP_END__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__IS1H=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__IS1H=NULL;
    } break;
    }
  };
  node__ES1H=__tmp__IS1H;
  if (((void *)__tmp__IS1H == (void *)NULL)) {
    result__FS1H=TRUE__;
  } else {
    if (((struct ___OBJ *)__tmp__IS1H)->__id==__NODE_TYPE__) {
      Self__02QQ=((__NODE_TYPE *)__tmp__IS1H);
      update_case__XGAG(Self__02QQ);
      update_depth__QNAG(Self__02QQ,FALSE__);
    } else {
      update_link__WYEJ(__tmp__IS1H);
    };
    __tmp__VS1H=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__CS1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 1];
    if (__tmp__VS1H==NULL) {
      __tmp__WS1H=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__VS1H)->__id) {
      case __LIST__: {
        __tmp__WS1H=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__WS1H=NULL;
      } break;
      case __PUSH__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__WS1H=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__WS1H=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__WS1H=NULL;
      } break;
      case __SWITCH__: {
        __tmp__WS1H=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__WS1H=((void *)__tmp__VS1H);
      } break;
      case __READ_LOCAL__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__WS1H=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__WS1H=((void *)__tmp__VS1H);
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__WS1H=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__WS1H=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__WS1H=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__WS1H=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__WS1H=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__WS1H=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__WS1H=NULL;
      } break;
      case __ITEM__: {
        __tmp__WS1H=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__WS1H=NULL;
      } break;
      case __CAST__: {
        __tmp__WS1H=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__WS1H=NULL;
      } break;
      case __NOP__: {
        __tmp__WS1H=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__WS1H=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__WS1H=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__WS1H=NULL;
      } break;
      case __LOOP__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__WS1H=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__WS1H=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__WS1H=NULL;
      } break;
      }
    };
    node__ES1H=__tmp__WS1H;
    if (((void *)__tmp__WS1H != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__WS1H)->__id==__NODE_TYPE__) {
        Self__22QQ=((__NODE_TYPE *)__tmp__WS1H);
        update_case__XGAG(Self__22QQ);
        update_depth__QNAG(Self__22QQ,FALSE__);
      } else {
        update_link__WYEJ(__tmp__WS1H);
      };
    };
  };
  return(result__FS1H);
}

static __BOOLEAN update_branch__ET1H(void *l__GT1H)
// ({NULLxLIST}) With resultNo recursive, No inlinable.
{
  void *wrt_slot__JT1H,*__tmp__WT1H;
  void *wrt_glob__KT1H,*__tmp__ZT1H;
  void *__tmp__N2FI,*__tmp__12FI,*__tmp__VT1H,*__tmp__YT1H;
  void *__tmp__O2FI,*node__K2FI,*__tmp__22FI;
  __NODE_TYPE *Self__42QQ,*Self__A3QQ;
  __BOOLEAN result__L2FI,result__IT1H,__tmp__TU1H;
  wrt_slot__JT1H=NULL;
  wrt_glob__KT1H=NULL;
  result__L2FI=FALSE__;
  __tmp__N2FI=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__GT1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
  if (__tmp__N2FI==NULL) {
    __tmp__O2FI=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__N2FI)->__id) {
    case __LIST__: {
      __tmp__O2FI=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__O2FI=NULL;
    } break;
    case __PUSH__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__O2FI=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__O2FI=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__O2FI=NULL;
    } break;
    case __SWITCH__: {
      __tmp__O2FI=NULL;
    } break;
    case __NODE_TYPE__: {
      __tmp__O2FI=((void *)__tmp__N2FI);
    } break;
    case __READ_LOCAL__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__O2FI=NULL;
    } break;
    case __NODE_STYLE__: {
      __tmp__O2FI=((void *)__tmp__N2FI);
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__O2FI=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__O2FI=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__O2FI=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__O2FI=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__O2FI=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__O2FI=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__O2FI=NULL;
    } break;
    case __ITEM__: {
      __tmp__O2FI=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__O2FI=NULL;
    } break;
    case __CAST__: {
      __tmp__O2FI=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__O2FI=NULL;
    } break;
    case __NOP__: {
      __tmp__O2FI=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__O2FI=NULL;
    } break;
    case __WRITE_LOCAL__: {
      __tmp__O2FI=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__O2FI=NULL;
    } break;
    case __LOOP__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__O2FI=NULL;
    } break;
    case __LOOP_END__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__O2FI=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__O2FI=NULL;
    } break;
    }
  };
  node__K2FI=__tmp__O2FI;
  if (((void *)__tmp__O2FI == (void *)NULL)) {
    result__L2FI=TRUE__;
  } else {
    if (((struct ___OBJ *)__tmp__O2FI)->__id==__NODE_TYPE__) {
      Self__42QQ=((__NODE_TYPE *)__tmp__O2FI);
      update_case__XGAG(Self__42QQ);
      update_depth__QNAG(Self__42QQ,FALSE__);
    } else {
      update_link__WYEJ(__tmp__O2FI);
    };
    __tmp__12FI=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__GT1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 1];
    if (__tmp__12FI==NULL) {
      __tmp__22FI=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__12FI)->__id) {
      case __LIST__: {
        __tmp__22FI=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__22FI=NULL;
      } break;
      case __PUSH__: {
        __tmp__22FI=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__22FI=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__22FI=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__22FI=NULL;
      } break;
      case __SWITCH__: {
        __tmp__22FI=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__22FI=((void *)__tmp__12FI);
      } break;
      case __READ_LOCAL__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__22FI=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__22FI=((void *)__tmp__12FI);
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__22FI=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__22FI=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__22FI=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__22FI=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__22FI=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__22FI=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__22FI=NULL;
      } break;
      case __ITEM__: {
        __tmp__22FI=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__22FI=NULL;
      } break;
      case __CAST__: {
        __tmp__22FI=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__22FI=NULL;
      } break;
      case __NOP__: {
        __tmp__22FI=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__22FI=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__22FI=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__22FI=NULL;
      } break;
      case __LOOP__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__22FI=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__22FI=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__22FI=NULL;
      } break;
      }
    };
    node__K2FI=__tmp__22FI;
    if (((void *)__tmp__22FI != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__22FI)->__id==__NODE_TYPE__) {
        Self__A3QQ=((__NODE_TYPE *)__tmp__22FI);
        update_case__XGAG(Self__A3QQ);
        update_depth__QNAG(Self__A3QQ,FALSE__);
      } else {
        update_link__WYEJ(__tmp__22FI);
      };
    };
  };
  result__IT1H=result__L2FI;
  if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)l__GT1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) <  3)) {
    __tmp__VT1H=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__GT1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
    if (__tmp__VT1H==NULL) {
      __tmp__WT1H=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__VT1H)->__id) {
      case __LIST__: {
        __tmp__WT1H=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__WT1H=NULL;
      } break;
      case __PUSH__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__WT1H=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__WT1H=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__WT1H=NULL;
      } break;
      case __SWITCH__: {
        __tmp__WT1H=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__WT1H=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__WT1H=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__WT1H=NULL;
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__WT1H=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__WT1H=((void *)__tmp__VT1H);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__WT1H=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__WT1H=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__WT1H=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__WT1H=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__WT1H=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__WT1H=NULL;
      } break;
      case __ITEM__: {
        __tmp__WT1H=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__WT1H=NULL;
      } break;
      case __CAST__: {
        __tmp__WT1H=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__WT1H=NULL;
      } break;
      case __NOP__: {
        __tmp__WT1H=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__WT1H=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__WT1H=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__WT1H=NULL;
      } break;
      case __LOOP__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__WT1H=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__WT1H=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__WT1H=NULL;
      } break;
      }
    };
    wrt_slot__JT1H=__tmp__WT1H;
    __tmp__YT1H=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__GT1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
    if (__tmp__YT1H==NULL) {
      __tmp__ZT1H=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__YT1H)->__id) {
      case __LIST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __PUSH__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__ZT1H=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __SWITCH__: {
        __tmp__ZT1H=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__ZT1H=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ZT1H=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__ZT1H=NULL;
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__ZT1H=((void *)__tmp__YT1H);
      } break;
      case __WRITE_SLOT__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ZT1H=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__ZT1H=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ZT1H=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__ZT1H=NULL;
      } break;
      case __ITEM__: {
        __tmp__ZT1H=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__ZT1H=NULL;
      } break;
      case __CAST__: {
        __tmp__ZT1H=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__ZT1H=NULL;
      } break;
      case __NOP__: {
        __tmp__ZT1H=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__ZT1H=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__ZT1H=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ZT1H=NULL;
      } break;
      case __LOOP__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__ZT1H=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__ZT1H=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__ZT1H=NULL;
      } break;
      }
    };
    wrt_glob__KT1H=__tmp__ZT1H;
    if (((void *)__tmp__WT1H != (void *)NULL)) {
      if (((void *)((__SLOT *)((__SLOT_DATA *)((__WRITE_SLOT *)__tmp__WT1H)->slot__5T1H)->parent_slot__BJZD)->slot_id__04OG != (void *)NULL)) {
        add_write_id__in__REBJ(((__WRITE_SLOT *)__tmp__WT1H)->receiver__HU1H,((__WRITE_SLOT *)__tmp__WT1H)->slot__5T1H,l__GT1H);
      } else {
        result__IT1H=FALSE__;
      };
      __tmp__TU1H=TRUE__;
    } else {
      __tmp__TU1H=FALSE__;
    };
    if ((! __tmp__TU1H)) {
      if (((void *)__tmp__ZT1H != (void *)NULL)) {
        if (((void *)((__SLOT *)((__SLOT_DATA *)((__WRITE_GLOBAL *)__tmp__ZT1H)->global__4U1H)->parent_slot__BJZD)->slot_id__04OG != (void *)NULL)) {
          add_write_id__in__REBJ(NULL,((__WRITE_GLOBAL *)__tmp__ZT1H)->global__4U1H,l__GT1H);
        } else {
          result__IT1H=FALSE__;
        };
      };
    };
  };
  return(result__IT1H);
}

static __BOOLEAN update_branch__TV1H(void *l__VV1H)
// ({NULLxLIST}) With resultNo recursive, No inlinable.
{
  void *__tmp__0V1H,*__tmp__IW1H;
  void *__tmp__1V1H,*node__XV1H,*__tmp__JW1H;
  __NODE_TYPE *Self__F3QQ,*Self__RYEJ;
  __BOOLEAN result__YV1H;
  result__YV1H=FALSE__;
  __tmp__0V1H=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__VV1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
  if (__tmp__0V1H==NULL) {
    __tmp__1V1H=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__0V1H)->__id) {
    case __LIST__: {
      __tmp__1V1H=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__1V1H=NULL;
    } break;
    case __PUSH__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__1V1H=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__1V1H=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__1V1H=NULL;
    } break;
    case __SWITCH__: {
      __tmp__1V1H=NULL;
    } break;
    case __NODE_TYPE__: {
      __tmp__1V1H=((void *)__tmp__0V1H);
    } break;
    case __READ_LOCAL__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__1V1H=NULL;
    } break;
    case __NODE_STYLE__: {
      __tmp__1V1H=((void *)__tmp__0V1H);
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__1V1H=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__1V1H=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__1V1H=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__1V1H=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__1V1H=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__1V1H=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__1V1H=NULL;
    } break;
    case __ITEM__: {
      __tmp__1V1H=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__1V1H=NULL;
    } break;
    case __CAST__: {
      __tmp__1V1H=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__1V1H=NULL;
    } break;
    case __NOP__: {
      __tmp__1V1H=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__1V1H=NULL;
    } break;
    case __WRITE_LOCAL__: {
      __tmp__1V1H=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__1V1H=NULL;
    } break;
    case __LOOP__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__1V1H=NULL;
    } break;
    case __LOOP_END__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__1V1H=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__1V1H=NULL;
    } break;
    }
  };
  node__XV1H=__tmp__1V1H;
  if (((void *)__tmp__1V1H == (void *)NULL)) {
    result__YV1H=TRUE__;
  } else {
    if (((struct ___OBJ *)__tmp__1V1H)->__id==__NODE_TYPE__) {
      Self__F3QQ=((__NODE_TYPE *)__tmp__1V1H);
      update_case__XGAG(Self__F3QQ);
      update_depth__QNAG(Self__F3QQ,FALSE__);
    } else {
      update_link__WYEJ(__tmp__1V1H);
    };
    __tmp__IW1H=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)l__VV1H)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 1];
    if (__tmp__IW1H==NULL) {
      __tmp__JW1H=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__IW1H)->__id) {
      case __LIST__: {
        __tmp__JW1H=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__JW1H=NULL;
      } break;
      case __PUSH__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__JW1H=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__JW1H=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__JW1H=NULL;
      } break;
      case __SWITCH__: {
        __tmp__JW1H=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__JW1H=((void *)__tmp__IW1H);
      } break;
      case __READ_LOCAL__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__JW1H=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__JW1H=((void *)__tmp__IW1H);
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__JW1H=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__JW1H=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__JW1H=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__JW1H=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__JW1H=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__JW1H=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__JW1H=NULL;
      } break;
      case __ITEM__: {
        __tmp__JW1H=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__JW1H=NULL;
      } break;
      case __CAST__: {
        __tmp__JW1H=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__JW1H=NULL;
      } break;
      case __NOP__: {
        __tmp__JW1H=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__JW1H=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__JW1H=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__JW1H=NULL;
      } break;
      case __LOOP__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__JW1H=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__JW1H=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__JW1H=NULL;
      } break;
      }
    };
    node__XV1H=__tmp__JW1H;
    if (((void *)__tmp__JW1H != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__JW1H)->__id==__NODE_TYPE__) {
        Self__RYEJ=((__NODE_TYPE *)__tmp__JW1H);
        update_case__XGAG(Self__RYEJ);
        update_depth__QNAG(Self__RYEJ,FALSE__);
      } else {
        update_link__WYEJ(__tmp__JW1H);
      };
    };
  };
  return(result__YV1H);
}

static void* execute_list__EOQG(__LIST *Self__FOQG)
// ({LIST}) With resultRecursive, No inlinable.
{
  void *result__HOQG;
  __INTEGER __tmp__SOQG,Self__XFXG;
  __LIST *Self__0Y0G;
  result__HOQG=NULL;
  execute_case__0WRG(Self__FOQG);
  if (((void *)list_current__IF1 != (void *)NULL)) {
    __tmp__SOQG=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__FOQG->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1);
    Self__XFXG= 1;
    while ((Self__XFXG <= __tmp__SOQG)) {
      Self__0Y0G=((__LIST *)list_current__IF1);
      add__to__1H5G(Self__0Y0G->expr_list__JUOG,((void **)((__FAST_ARRAYoINSTRo *)Self__FOQG->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__XFXG -  1)],(__INTEGER)(Self__0Y0G->index__PXRG -  1));
      Self__0Y0G->index__PXRG=(__INTEGER)(Self__0Y0G->index__PXRG +  1);
      Self__XFXG=(__INTEGER)(Self__XFXG +  1);
    };
    result__HOQG=last_expr__URRG(Self__FOQG);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  } else {
    result__HOQG=Self__FOQG;
  };
  return(result__HOQG);
}

static void remove__KPJJ(__LIST *Self__LPJJ)
// ({LIST}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__PPJJ,Self__VNMJ;
  void *__tmp__VPJJ;
  __NODE_TYPE *Self__53IK;
  void *__tmp__A4IK,*__tmp__04IK;
  void *__tmp__H4IK,*__tmp__B5IK;
  __READ_LOCAL *Self__15HQ,*Self__35HQ,*Self__55HQ,*Self__AAIQ;
  __READ_LOCAL *Self__CAIQ,*Self__FAIQ;
  __READ_GLOBAL *Self__45HQ,*Self__DAIQ,*Self__GAIQ;
  __NODE_STYLE *Self__Z4IK;
  __LOOP *Self__GXGN;
  __tmp__PPJJ=(__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__LPJJ->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1);
  Self__VNMJ= 1;
  while ((Self__VNMJ <= __tmp__PPJJ)) {
    __tmp__VPJJ=((void **)((__FAST_ARRAYoINSTRo *)Self__LPJJ->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__VNMJ -  1)];
    switch (((struct ___OBJ *)__tmp__VPJJ)->__id) {
    case __LIST__: {
      remove__KPJJ(__tmp__VPJJ);
    } break;
    case __STRING_CST__: {
    } break;
    case __PUSH__: {
    } break;
    case __EXTERNAL_C__: {
      remove__UUAK(__tmp__VPJJ);
    } break;
    case __PROTOTYPE_CST__: {
    } break;
    case __INTEGER_CST__: {
    } break;
    case __SWITCH__: {
      remove__OZYK(__tmp__VPJJ);
    } break;
    case __NODE_TYPE__: {
      Self__53IK=((__NODE_TYPE *)__tmp__VPJJ);
      __tmp__A4IK=Self__53IK->parent_node__DMQC.data__LLZD;
      switch (((struct ___OBJ *)__tmp__A4IK)->__id) {
      case __DTA_RD__: {
      } break;
      case __DTA_CAST__: {
      } break;
      case __DTA_WR_CODE__: {
      } break;
      case __DTA_BLOCK__: {
        remove__C5LK(__tmp__A4IK);
      } break;
      case __DTA_WR_VALUE__: {
        remove__15LK(__tmp__A4IK);
      } break;
      case __DTA_RD_ARGS__: {
        remove__HAMK(__tmp__A4IK);
      } break;
      };
      if (((void *)Self__53IK->parent_node__DMQC.switch__ELAG == (void *)NULL)) {
        __tmp__H4IK=Self__53IK->parent_node__DMQC.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__H4IK)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__H4IK);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__H4IK);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__15HQ=((__READ_LOCAL *)__tmp__H4IK);
          unread__YVJK(Self__15HQ->local__ALZD,Self__15HQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__H4IK);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__H4IK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__H4IK);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__35HQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__H4IK)->receiver__OO2H);
          unread__YVJK(Self__35HQ->local__ALZD,Self__35HQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__H4IK);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__H4IK);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__H4IK);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__H4IK);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__H4IK);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__H4IK);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__H4IK);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__H4IK);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__H4IK);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__H4IK);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__H4IK);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__H4IK);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__H4IK);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__H4IK);
        } break;
        case __READ_GLOBAL__: {
          Self__45HQ=((__READ_GLOBAL *)__tmp__H4IK);
          unread__15ML(Self__45HQ->global__RHJK,Self__45HQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__H4IK);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__H4IK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__H4IK);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__H4IK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__H4IK);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__H4IK);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__H4IK);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__H4IK);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__H4IK);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__H4IK);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__H4IK);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__H4IK);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__H4IK);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__H4IK);
        } break;
        };
        if (((void *)Self__53IK->parent_node__DMQC.first_code__FIAG != (void *)NULL)) {
          remove__KPJJ(Self__53IK->parent_node__DMQC.first_code__FIAG);
        };
      } else {
        remove__OZYK(Self__53IK->parent_node__DMQC.switch__ELAG);
      };
    } break;
    case __READ_LOCAL__: {
      Self__55HQ=((__READ_LOCAL *)__tmp__VPJJ);
      unread__YVJK(Self__55HQ->local__ALZD,Self__55HQ);
    } break;
    case __EXPR_MULTIPLE__: {
      remove__TVAK(__tmp__VPJJ);
    } break;
    case __NODE_STYLE__: {
      Self__Z4IK=((__NODE_STYLE *)__tmp__VPJJ);
      __tmp__04IK=Self__Z4IK->parent_node__OP0G.data__LLZD;
      switch (((struct ___OBJ *)__tmp__04IK)->__id) {
      case __DTA_RD__: {
      } break;
      case __DTA_CAST__: {
      } break;
      case __DTA_WR_CODE__: {
      } break;
      case __DTA_BLOCK__: {
        remove__C5LK(__tmp__04IK);
      } break;
      case __DTA_WR_VALUE__: {
        remove__15LK(__tmp__04IK);
      } break;
      case __DTA_RD_ARGS__: {
        remove__HAMK(__tmp__04IK);
      } break;
      };
      if (((void *)Self__Z4IK->parent_node__OP0G.switch__ELAG == (void *)NULL)) {
        __tmp__B5IK=Self__Z4IK->parent_node__OP0G.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__B5IK)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__B5IK);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__B5IK);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__AAIQ=((__READ_LOCAL *)__tmp__B5IK);
          unread__YVJK(Self__AAIQ->local__ALZD,Self__AAIQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__B5IK);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__B5IK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__B5IK);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__CAIQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__B5IK)->receiver__OO2H);
          unread__YVJK(Self__CAIQ->local__ALZD,Self__CAIQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__B5IK);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__B5IK);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__B5IK);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__B5IK);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__B5IK);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__B5IK);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__B5IK);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__B5IK);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__B5IK);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__B5IK);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__B5IK);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__B5IK);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__B5IK);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__B5IK);
        } break;
        case __READ_GLOBAL__: {
          Self__DAIQ=((__READ_GLOBAL *)__tmp__B5IK);
          unread__15ML(Self__DAIQ->global__RHJK,Self__DAIQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__B5IK);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__B5IK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__B5IK);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__B5IK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__B5IK);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__B5IK);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__B5IK);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__B5IK);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__B5IK);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__B5IK);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__B5IK);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__B5IK);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__B5IK);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__B5IK);
        } break;
        };
        if (((void *)Self__Z4IK->parent_node__OP0G.first_code__FIAG != (void *)NULL)) {
          remove__KPJJ(Self__Z4IK->parent_node__OP0G.first_code__FIAG);
        };
      } else {
        remove__OZYK(Self__Z4IK->parent_node__OP0G.switch__ELAG);
      };
    } break;
    case __WRITE_GLOBAL__: {
      remove__S5IK(__tmp__VPJJ);
    } break;
    case __WRITE_SLOT__: {
      remove__W5IK(__tmp__VPJJ);
    } break;
    case __EXPR_EQUAL__: {
      remove__DWAK(__tmp__VPJJ);
    } break;
    case __EXPR_NOT_EQUAL__: {
      remove__HWAK(__tmp__VPJJ);
    } break;
    case __REAL_CST__: {
    } break;
    case __CHARACTER_CST__: {
    } break;
    case __IS_EXPANDED__: {
      Self__FAIQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__VPJJ)->receiver__OO2H);
      unread__YVJK(Self__FAIQ->local__ALZD,Self__FAIQ);
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(__tmp__VPJJ);
    } break;
    case __EXPR_SUP__: {
      remove__VWAK(__tmp__VPJJ);
    } break;
    case __EXPR_SUB__: {
      remove__ZWAK(__tmp__VPJJ);
    } break;
    case __EXPR_MUL__: {
      remove__3WAK(__tmp__VPJJ);
    } break;
    case __EXPR_DIV__: {
      remove__BXAK(__tmp__VPJJ);
    } break;
    case __EXPR_AND__: {
      remove__FXAK(__tmp__VPJJ);
    } break;
    case __EXPR_SHIFT_R__: {
      remove__JXAK(__tmp__VPJJ);
    } break;
    case __EXPR_SHIFT_L__: {
      remove__NXAK(__tmp__VPJJ);
    } break;
    case __PUT_TO__: {
      remove__RXAK(__tmp__VPJJ);
    } break;
    case __ITEM__: {
      remove__SYAK(__tmp__VPJJ);
    } break;
    case __SIZE_OF__: {
      remove__WYAK(__tmp__VPJJ);
    } break;
    case __CAST__: {
      remove__ZYAK(__tmp__VPJJ);
    } break;
    case __CALL_SLOT__: {
      remove__2NML(__tmp__VPJJ);
    } break;
    case __NOP__: {
    } break;
    case __READ_SLOT__: {
      remove__4GHK(__tmp__VPJJ);
    } break;
    case __WRITE_LOCAL__: {
      remove__25IK(__tmp__VPJJ);
    } break;
    case __READ_GLOBAL__: {
      Self__GAIQ=((__READ_GLOBAL *)__tmp__VPJJ);
      unread__15ML(Self__GAIQ->global__RHJK,Self__GAIQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      remove__GWZM(__tmp__VPJJ);
    } break;
    case __LOOP__: {
      remove__KPJJ(((__LOOP *)__tmp__VPJJ)->body__5ALM);
    } break;
    case __EXPR_OR_LOGIC__: {
      remove__WPEO(__tmp__VPJJ);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      remove__WMKO(__tmp__VPJJ);
    } break;
    case __EXPR_AND_LOGIC__: {
      remove__0PEO(__tmp__VPJJ);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      remove__1MKO(__tmp__VPJJ);
    } break;
    case __EXPR_NEG__: {
      remove__3KJM(__tmp__VPJJ);
    } break;
    case __EXPR_ADD__: {
      remove__QQML(__tmp__VPJJ);
    } break;
    case __EXPR_NOT__: {
      remove__D5YM(__tmp__VPJJ);
    } break;
    case __EXPR_MOD__: {
      remove__4PEO(__tmp__VPJJ);
    } break;
    case __LOOP_END__: {
      Self__GXGN=((__LOOP *)((__LOOP_END *)__tmp__VPJJ)->loop__5WLM);
      Self__GXGN->link_count__YALM=(__INTEGER)(Self__GXGN->link_count__YALM -  1);
    } break;
    case __EXPR_SUP_EQ__: {
      remove__X5DP(__tmp__VPJJ);
    } break;
    case __EXPR_INF__: {
      remove__KZQN(__tmp__VPJJ);
    } break;
    case __EXPR_INF_EQ__: {
      remove__OZQN(__tmp__VPJJ);
    } break;
    case __EXPR_OR__: {
      remove__LUPN(__tmp__VPJJ);
    } break;
    case __EXPR_XOR__: {
      remove__AQTO(__tmp__VPJJ);
    } break;
    };
    Self__VNMJ=(__INTEGER)(Self__VNMJ +  1);
  };
}

static void remove_profil__3FAM(__SLOT_CODE *Self__4FAM,void *prof__5FAM)
// ({SLOT_CODE},{PROFIL_SLOT}) VoidNo recursive, No inlinable.
{
  __INTEGER result__3VBM,__tmp__GWBM,idx__U4EM,__tmp__PFEM,i__GCFM;
  __FAST_ARRAYoPROFIL_SLOTo *Self__0VBM,*Self__FFEM;
  void **__tmp__FWBM,**Self__I4EM,**__tmp__OFEM,**Self__VBFM;
  Self__0VBM=((__FAST_ARRAYoPROFIL_SLOTo *)Self__4FAM->profil__J15F);
  result__3VBM= 0;
  if ((Self__0VBM->parent_arrayed_collection__H15F.upper__IVPG >=  0)) {
    __tmp__FWBM=Self__0VBM->parent_arrayed_collection__H15F.storage__EVPG;
    __tmp__GWBM=Self__0VBM->parent_arrayed_collection__H15F.upper__IVPG;
    Self__I4EM=((void **)__tmp__FWBM);
    idx__U4EM= 0;
    while ((! ((idx__U4EM > __tmp__GWBM) || ((void *)prof__5FAM == (void *)Self__I4EM[idx__U4EM])))) {
      idx__U4EM=(__INTEGER)(idx__U4EM +  1);
    };
    result__3VBM=idx__U4EM;
  };
  if ((result__3VBM <= ((__FAST_ARRAYoPROFIL_SLOTo *)Self__4FAM->profil__J15F)->parent_arrayed_collection__H15F.upper__IVPG)) {
    Self__FFEM=((__FAST_ARRAYoPROFIL_SLOTo *)Self__4FAM->profil__J15F);
    __tmp__OFEM=Self__FFEM->parent_arrayed_collection__H15F.storage__EVPG;
    __tmp__PFEM=Self__FFEM->parent_arrayed_collection__H15F.upper__IVPG;
    Self__VBFM=((void **)__tmp__OFEM);
    i__GCFM=result__3VBM;
    while ((i__GCFM != __tmp__PFEM)) {
      Self__VBFM[i__GCFM]=Self__VBFM[(__INTEGER)(i__GCFM +  1)];
      i__GCFM=(__INTEGER)(i__GCFM +  1);
    };
    Self__FFEM->parent_arrayed_collection__H15F.upper__IVPG=(__INTEGER)(Self__FFEM->parent_arrayed_collection__H15F.upper__IVPG -  1);
  };
}

static void* execute_unlink__0SRJ(__LIST *Self__1SRJ)
// ({LIST}) With resultNo recursive, No inlinable.
{
  if (((void *)((__TYPE_FULL *)static_type__GIQG(Self__1SRJ))->parent_type__KTL != (void *)TYPE_VOID__)) {
    add_last__AL4G(Self__1SRJ->expr_list__JUOG,create__type__CLQC(Self__1SRJ->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,TYPE_VOID__->parent_type__UIB.default__AKC));
  };
  return(execute_list__EOQG(Self__1SRJ));
}

static void clear__TQJJ()
// () VoidNo recursive, No inlinable.
{
  void *l__VQJJ;
  __INTEGER Self__HOMJ,new_capacity__EAJK,__tmp__NBJK,__tmp__WPOL;
  __INTEGER Self__2GMM;
  void *__tmp__NRJJ;
  __FAST_ARRAYoLOCAL_SEQo *Self__CAJK;
  __BOOLEAN __tmp__UAJK;
  void **__tmp__MBJK,**new__DPOL;
  l__VQJJ=NULL;
  Self__HOMJ=((__FAST_ARRAYoLOCALo *)list_busy__WQJJ)->parent_arrayed_collection__QI4F.upper__TI4F;
  while ((Self__HOMJ >=  0)) {
    l__VQJJ=((void **)((__FAST_ARRAYoLOCALo *)list_busy__WQJJ)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__HOMJ];
    __tmp__NRJJ=((__LOCAL *)l__VQJJ)->last_seq__LRJJ;
    Self__CAJK=((__FAST_ARRAYoLOCAL_SEQo *)list_free__JRJJ);
    new_capacity__EAJK= 0;
    if (((__INTEGER)(Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK +  1) <= (__INTEGER)(Self__CAJK->parent_arrayed_collection__IRJJ.capacity__HAJK -  1))) {
      Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK=(__INTEGER)(Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK +  1);
      __tmp__UAJK=TRUE__;
    } else {
      __tmp__UAJK=FALSE__;
    };
    if ((! __tmp__UAJK)) {
      if ((Self__CAJK->parent_arrayed_collection__IRJJ.capacity__HAJK ==  0)) {
        Self__CAJK->parent_arrayed_collection__IRJJ.storage__DBJK=create__TCZK( 2);
        Self__CAJK->parent_arrayed_collection__IRJJ.capacity__HAJK= 2;
        Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK= 0;
      } else {
        new_capacity__EAJK=(__INTEGER)(Self__CAJK->parent_arrayed_collection__IRJJ.capacity__HAJK <<  1);
        __tmp__MBJK=Self__CAJK->parent_arrayed_collection__IRJJ.storage__DBJK;
        __tmp__NBJK=Self__CAJK->parent_arrayed_collection__IRJJ.capacity__HAJK;
        new__DPOL=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__MBJK)),((__UINTEGER_32 )(__INTEGER)(__tmp__NBJK * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EAJK * ((__INTEGER )(sizeof(void *)))))));
        __tmp__WPOL=(__INTEGER)(new_capacity__EAJK -  1);
        Self__2GMM=__tmp__NBJK;
        while ((Self__2GMM <= __tmp__WPOL)) {
          new__DPOL[Self__2GMM]=NULL;
          Self__2GMM=(__INTEGER)(Self__2GMM +  1);
        };
        Self__CAJK->parent_arrayed_collection__IRJJ.storage__DBJK=new__DPOL;
        Self__CAJK->parent_arrayed_collection__IRJJ.capacity__HAJK=new_capacity__EAJK;
        Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK=(__INTEGER)(Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK +  1);
      };
    };
    ((void **)Self__CAJK->parent_arrayed_collection__IRJJ.storage__DBJK)[Self__CAJK->parent_arrayed_collection__IRJJ.upper__FAJK]=__tmp__NRJJ;
    ((__LOCAL *)l__VQJJ)->last_seq__LRJJ=NULL;
    Self__HOMJ=(__INTEGER)(Self__HOMJ -  1);
  };
  ((__FAST_ARRAYoLOCALo *)list_busy__WQJJ)->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(-  1);
}

static void display__SUFK(__STRING_CST *Self__TUFK,void *buffer__UUFK)
// ({STRING_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__MPLK,result__MZZK;
  add_last__YPK(buffer__UUFK,'"');
  append__MOK(buffer__UUFK,Self__TUFK->string__ZK2H);
  add_last__YPK(buffer__UUFK,'"');
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__UUFK,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__MPLK=ANY__->object_id__WAZG;
    } else {
      result__MZZK=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__MZZK;
      ANY__->object_id__XAZG=0;
      __tmp__MPLK=result__MZZK;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__MPLK),buffer__UUFK);
    append__MOK(buffer__UUFK,(&__string_262));
  };
}

static void display__2UFK(__EXTERNAL_C *Self__3UFK,void *buffer__4UFK)
// ({EXTERNAL_C},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__WVFK,Self__2YTL,__tmp__QWFK,Self__QUTK,__tmp__PQLK;
  __INTEGER result__B0ZK;
  void *__tmp__3VFK,*__tmp__AWFK;
  __IS_EXPANDED *Self__5XJQ,*Self__BYJQ;
  void *__tmp__XWFK,*__tmp__2WFK;
  void *__tmp__YWFK,*__tmp__3WFK;
  __TYPES *Self__A5ZQ;
  __FAST_ARRAYoEXPRo *Self__Q24Q;
  add_last__YPK(buffer__4UFK,'`');
  append__MOK(buffer__4UFK,Self__3UFK->code__WXZD);
  if ((((void *)Self__3UFK->access_list__XXZD != (void *)NULL) && (! (((__FAST_ARRAYoEXPRo *)Self__3UFK->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH <  0)))) {
    add_last__YPK(buffer__4UFK,'(');
    __tmp__WVFK=(__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__3UFK->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH -  1);
    Self__2YTL= 0;
    while ((Self__2YTL <= __tmp__WVFK)) {
      __tmp__3VFK=((void **)((__FAST_ARRAYoEXPRo *)Self__3UFK->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__2YTL];
      switch (((struct ___OBJ *)__tmp__3VFK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__3VFK,buffer__4UFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __IS_EXPANDED__: {
        Self__5XJQ=((__IS_EXPANDED *)__tmp__3VFK);
        append__MOK(buffer__4UFK,(&__string_259));
        display__MYFK(Self__5XJQ->receiver__OO2H,buffer__4UFK);
        add_last__YPK(buffer__4UFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__3VFK,buffer__4UFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__3VFK,buffer__4UFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__3VFK,buffer__4UFK);
      } break;
      };
      add_last__YPK(buffer__4UFK,',');
      Self__2YTL=(__INTEGER)(Self__2YTL +  1);
    };
    Self__Q24Q=((__FAST_ARRAYoEXPRo *)Self__3UFK->access_list__XXZD);
    __tmp__AWFK=((void **)Self__Q24Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__Q24Q->parent_arrayed_collection__42LC.upper__USSH];
    switch (((struct ___OBJ *)__tmp__AWFK)->__id) {
    case __LIST__: {
      display__2QQG(__tmp__AWFK,buffer__4UFK);
    } break;
    case __STRING_CST__: {
      display__SUFK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXTERNAL_C__: {
      display__2UFK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __PROTOTYPE_CST__: {
      display__BXFK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __INTEGER_CST__: {
      display__FXFK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __READ_LOCAL__: {
      display__MYFK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_EQUAL__: {
      display__E1FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      display__M1FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __REAL_CST__: {
      display__U1FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __CHARACTER_CST__: {
      display__Z1FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __IS_EXPANDED__: {
      Self__BYJQ=((__IS_EXPANDED *)__tmp__AWFK);
      append__MOK(buffer__4UFK,(&__string_259));
      display__MYFK(Self__BYJQ->receiver__OO2H,buffer__4UFK);
      add_last__YPK(buffer__4UFK,')');
    } break;
    case __GET_TYPE_ID__: {
      display__B2FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_SUP__: {
      display__F2FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_SUB__: {
      display__N2FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_MUL__: {
      display__T2FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_DIV__: {
      display__Z2FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_AND__: {
      display__52FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_SHIFT_R__: {
      display__F3FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_SHIFT_L__: {
      display__L3FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __PUT_TO__: {
      display__R3FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __ITEM__: {
      display__X3FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __SIZE_OF__: {
      display__23FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __CAST__: {
      display__A4FK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __CALL_SLOT__: {
      display__VNKL(__tmp__AWFK,buffer__4UFK);
    } break;
    case __READ_SLOT__: {
      display__N1ZK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __READ_GLOBAL__: {
      display__S1ZK(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      display__2PZM(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_OR_LOGIC__: {
      display__NZEO(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      display__F4KO(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_AND_LOGIC__: {
      display__TZEO(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      display__M4KO(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_NEG__: {
      display__VXJM(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_ADD__: {
      display__52ML(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_NOT__: {
      display__LKZM(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_MOD__: {
      display__ZZEO(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_SUP_EQ__: {
      display__VHEP(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_INF__: {
      display__ZNQN(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_INF_EQ__: {
      display__COQN(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_OR__: {
      display__R5PN(__tmp__AWFK,buffer__4UFK);
    } break;
    case __EXPR_XOR__: {
      display__SHUO(__tmp__AWFK,buffer__4UFK);
    } break;
    };
    add_last__YPK(buffer__4UFK,')');
  };
  add_last__YPK(buffer__4UFK,'`');
  append_name_in__FBYD(Self__3UFK->static_type__UXZD,buffer__4UFK);
  if (((void *)Self__3UFK->living_type__R4QH != (void *)NULL)) {
    add_last__YPK(buffer__4UFK,'(');
    __tmp__QWFK=(__INTEGER)(((__TYPES *)Self__3UFK->living_type__R4QH)->upper__4LAG -  1);
    Self__QUTK= 0;
    while ((Self__QUTK <= __tmp__QWFK)) {
      __tmp__XWFK=((void **)((__TYPES *)Self__3UFK->living_type__R4QH)->storage__WWFJ)[Self__QUTK];
      switch (((struct ___OBJ *)__tmp__XWFK)->__id) {
      case __TYPE__: {
        __tmp__YWFK=((__PROTOTYPE *)((__TYPE *)__tmp__XWFK)->prototype__RD)->parent_named__QD.name__1QB;
      } break;
      case __TYPE_NULL__: {
        __tmp__YWFK=(&__string_59);
      } break;
      case __TYPE_VOID__: {
        __tmp__YWFK=(&__string_2);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__YWFK=(&__string_44);
      } break;
      case __TYPE_ID__: {
        __tmp__YWFK=(&__string_46);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__YWFK=((__TYPE_GENERIC *)__tmp__XWFK)->intern_name__FS2B;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__YWFK=((__PROFIL_BLOCK *)__tmp__XWFK)->parent_profil__GHAG.name__XJEI;
      } break;
      };
      append__MOK(buffer__4UFK,__tmp__YWFK);
      add_last__YPK(buffer__4UFK,',');
      Self__QUTK=(__INTEGER)(Self__QUTK +  1);
    };
    Self__A5ZQ=((__TYPES *)Self__3UFK->living_type__R4QH);
    __tmp__2WFK=((void **)Self__A5ZQ->storage__WWFJ)[Self__A5ZQ->upper__4LAG];
    switch (((struct ___OBJ *)__tmp__2WFK)->__id) {
    case __TYPE__: {
      __tmp__3WFK=((__PROTOTYPE *)((__TYPE *)__tmp__2WFK)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__3WFK=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__3WFK=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__3WFK=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__3WFK=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__3WFK=((__TYPE_GENERIC *)__tmp__2WFK)->intern_name__FS2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__3WFK=((__PROFIL_BLOCK *)__tmp__2WFK)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    append__MOK(buffer__4UFK,__tmp__3WFK);
    add_last__YPK(buffer__4UFK,')');
  };
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__4UFK,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__PQLK=ANY__->object_id__WAZG;
    } else {
      result__B0ZK=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__B0ZK;
      ANY__->object_id__XAZG=0;
      __tmp__PQLK=result__B0ZK;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__PQLK),buffer__4UFK);
    append__MOK(buffer__4UFK,(&__string_262));
  };
}

static void display__BXFK(__PROTOTYPE_CST *Self__CXFK,void *buffer__DXFK)
// ({PROTOTYPE_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __TYPE_FULL *Self__UQLK;
  __INTEGER __tmp__JRLK,result__P0ZK;
  Self__UQLK=((__TYPE_FULL *)Self__CXFK->parent_constant__E3LC.static_type__F4YD);
  if (((__UINTEGER_8)(Self__UQLK->flag__LTL &  32) !=  0)) {
    append__MOK(buffer__DXFK,(&__string_337));
  };
  append_name_in__FBYD(Self__UQLK,buffer__DXFK);
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__DXFK,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__JRLK=ANY__->object_id__WAZG;
    } else {
      result__P0ZK=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__P0ZK;
      ANY__->object_id__XAZG=0;
      __tmp__JRLK=result__P0ZK;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__JRLK),buffer__DXFK);
    append__MOK(buffer__DXFK,(&__string_262));
  };
}

static void display__FXFK(__INTEGER_CST *Self__GXFK,void *buffer__HXFK)
// ({INTEGER_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__ZRLK,result__20ZK;
  add_last__YPK(buffer__HXFK,'(');
  append_name_in__FBYD(Self__GXFK->parent_constant__P3LC.static_type__F4YD,buffer__HXFK);
  add_last__YPK(buffer__HXFK,')');
  append_in__PZWE(Self__GXFK->value__PAZD,buffer__HXFK);
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__HXFK,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__ZRLK=ANY__->object_id__WAZG;
    } else {
      result__20ZK=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__20ZK;
      ANY__->object_id__XAZG=0;
      __tmp__ZRLK=result__20ZK;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__ZRLK),buffer__HXFK);
    append__MOK(buffer__HXFK,(&__string_262));
  };
}

static void display__5VTK(__SWITCH *Self__AWTK,void *buffer__BWTK)
// ({SWITCH},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__EXTK;
  __IS_EXPANDED *Self__DYJQ;
  __INTEGER __tmp__PXTK,Self__M45K,limit_up__N45K,__tmp__KWTK,j__GWTK;
  void *__tmp__RWTK;
  void *__tmp__SWTK;
  void *i__IWTK;
  append__MOK(buffer__BWTK,(&__string_338));
  __tmp__EXTK=Self__AWTK->expr__MMFI;
  switch (((struct ___OBJ *)__tmp__EXTK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__EXTK,buffer__BWTK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __IS_EXPANDED__: {
    Self__DYJQ=((__IS_EXPANDED *)__tmp__EXTK);
    append__MOK(buffer__BWTK,(&__string_259));
    display__MYFK(Self__DYJQ->receiver__OO2H,buffer__BWTK);
    add_last__YPK(buffer__BWTK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__EXTK,buffer__BWTK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__EXTK,buffer__BWTK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__EXTK,buffer__BWTK);
  } break;
  };
  add_last__YPK(buffer__BWTK,'\n');
  if (((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) >  0)) {
    append__MOK(indent__ZQOG,(&__string_339));
    __tmp__PXTK=((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
    Self__M45K= 0;
    limit_up__N45K=(__INTEGER)(__tmp__PXTK -  1);
    while ((Self__M45K <= limit_up__N45K)) {
      append__MOK(buffer__BWTK,indent__ZQOG);
      __tmp__KWTK=((__STRING *)buffer__BWTK)->count__VF;
      ((__CHARACTER *)((__STRING *)buffer__BWTK)->storage__XNK)[(__INTEGER)((__INTEGER)(__tmp__KWTK -  1) -  1)]='+';
      ((__CHARACTER *)((__STRING *)buffer__BWTK)->storage__XNK)[(__INTEGER)(((__STRING *)buffer__BWTK)->count__VF -  1)]='-';
      __tmp__RWTK=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__M45K])->id__QMAG;
      switch (((struct ___OBJ *)__tmp__RWTK)->__id) {
      case __TYPE__: {
        __tmp__SWTK=((__PROTOTYPE *)((__TYPE *)__tmp__RWTK)->prototype__RD)->parent_named__QD.name__1QB;
      } break;
      case __TYPE_NULL__: {
        __tmp__SWTK=(&__string_59);
      } break;
      case __TYPE_VOID__: {
        __tmp__SWTK=(&__string_2);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__SWTK=(&__string_44);
      } break;
      case __TYPE_ID__: {
        __tmp__SWTK=(&__string_46);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__SWTK=((__TYPE_GENERIC *)__tmp__RWTK)->intern_name__FS2B;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__SWTK=((__PROFIL_BLOCK *)__tmp__RWTK)->parent_profil__GHAG.name__XJEI;
      } break;
      };
      append__MOK(buffer__BWTK,__tmp__SWTK);
      append__MOK(buffer__BWTK,(&__string_263));
      append__MOK(buffer__BWTK,indent__ZQOG);
      i__IWTK=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__M45K])->code__BQAG;
      if (((void *)i__IWTK == (void *)NULL)) {
        append__MOK(buffer__BWTK,(&__string_340));
      } else {
        display__2QQG(i__IWTK,buffer__BWTK);
      };
      add_last__YPK(buffer__BWTK,'\n');
      Self__M45K=(__INTEGER)(Self__M45K +  1);
    };
    ((__CHARACTER *)((__STRING *)indent__ZQOG)->storage__XNK)[(__INTEGER)((__INTEGER)(((__STRING *)indent__ZQOG)->count__VF -  1) -  1)]=' ';
    j__GWTK=((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
    append__MOK(buffer__BWTK,indent__ZQOG);
    __tmp__KWTK=((__STRING *)buffer__BWTK)->count__VF;
    ((__CHARACTER *)((__STRING *)buffer__BWTK)->storage__XNK)[(__INTEGER)((__INTEGER)(__tmp__KWTK -  1) -  1)]='+';
    ((__CHARACTER *)((__STRING *)buffer__BWTK)->storage__XNK)[(__INTEGER)(((__STRING *)buffer__BWTK)->count__VF -  1)]='-';
    __tmp__RWTK=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[j__GWTK])->id__QMAG;
    switch (((struct ___OBJ *)__tmp__RWTK)->__id) {
    case __TYPE__: {
      __tmp__SWTK=((__PROTOTYPE *)((__TYPE *)__tmp__RWTK)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__SWTK=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__SWTK=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__SWTK=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__SWTK=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__SWTK=((__TYPE_GENERIC *)__tmp__RWTK)->intern_name__FS2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__SWTK=((__PROFIL_BLOCK *)__tmp__RWTK)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    append__MOK(buffer__BWTK,__tmp__SWTK);
    append__MOK(buffer__BWTK,(&__string_263));
    append__MOK(buffer__BWTK,indent__ZQOG);
    i__IWTK=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__AWTK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[j__GWTK])->code__BQAG;
    if (((void *)i__IWTK == (void *)NULL)) {
      append__MOK(buffer__BWTK,(&__string_340));
    } else {
      display__2QQG(i__IWTK,buffer__BWTK);
    };
    remove_last__RLLB(indent__ZQOG, 2);
  };
}

static void display__KXFK(__NODE_TYPE *Self__LXFK,void *buffer__MXFK)
// ({NODE_TYPE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__0XFK,*__tmp__2XFK,*__tmp__CYFK;
  __IS_EXPANDED *Self__QCIQ,*Self__VCIQ,*Self__XCIQ;
  void *__tmp__1XFK;
  if (((void *)Self__LXFK->parent_node__DMQC.switch__ELAG == (void *)NULL)) {
    if (((void *)Self__LXFK->parent_node__DMQC.first_code__FIAG == (void *)NULL)) {
      append_in__4VC(((__INTEGER_32 )((__INTEGER )((__POINTER )Self__LXFK))),buffer__MXFK);
      append__MOK(buffer__MXFK,(&__string_341));
      __tmp__0XFK=Self__LXFK->parent_node__DMQC.expr__KLZD;
      switch (((struct ___OBJ *)__tmp__0XFK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__0XFK,buffer__MXFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __IS_EXPANDED__: {
        Self__QCIQ=((__IS_EXPANDED *)__tmp__0XFK);
        append__MOK(buffer__MXFK,(&__string_259));
        display__MYFK(Self__QCIQ->receiver__OO2H,buffer__MXFK);
        add_last__YPK(buffer__MXFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__0XFK,buffer__MXFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__0XFK,buffer__MXFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__0XFK,buffer__MXFK);
      } break;
      };
      append__MOK(buffer__MXFK,(&__string_342));
      __tmp__1XFK=Self__LXFK->parent_node__DMQC.data__LLZD;
      switch (((struct ___OBJ *)__tmp__1XFK)->__id) {
      case __DTA_RD__: {
        append__MOK(buffer__MXFK,(&__string_343));
      } break;
      case __DTA_CAST__: {
        append__MOK(buffer__MXFK,(&__string_344));
      } break;
      case __DTA_WR_CODE__: {
        display__5S2K(__tmp__1XFK,buffer__MXFK);
      } break;
      case __DTA_BLOCK__: {
        append__MOK(buffer__MXFK,(&__string_345));
      } break;
      case __DTA_WR_VALUE__: {
        display__IT2K(__tmp__1XFK,buffer__MXFK);
      } break;
      case __DTA_RD_ARGS__: {
        display__OT2K(__tmp__1XFK,buffer__MXFK);
      } break;
      };
      append__MOK(buffer__MXFK,(&__string_346));
      __tmp__2XFK=result_expr__PVDI(Self__LXFK);
      switch (((struct ___OBJ *)__tmp__2XFK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__2XFK,buffer__MXFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __IS_EXPANDED__: {
        Self__VCIQ=((__IS_EXPANDED *)__tmp__2XFK);
        append__MOK(buffer__MXFK,(&__string_259));
        display__MYFK(Self__VCIQ->receiver__OO2H,buffer__MXFK);
        add_last__YPK(buffer__MXFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__2XFK,buffer__MXFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__2XFK,buffer__MXFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__2XFK,buffer__MXFK);
      } break;
      };
      add_last__YPK(buffer__MXFK,'>');
    } else {
      __tmp__CYFK=Self__LXFK->parent_node__DMQC.expr__KLZD;
      switch (((struct ___OBJ *)__tmp__CYFK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__CYFK,buffer__MXFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __IS_EXPANDED__: {
        Self__XCIQ=((__IS_EXPANDED *)__tmp__CYFK);
        append__MOK(buffer__MXFK,(&__string_259));
        display__MYFK(Self__XCIQ->receiver__OO2H,buffer__MXFK);
        add_last__YPK(buffer__MXFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__CYFK,buffer__MXFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__CYFK,buffer__MXFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__CYFK,buffer__MXFK);
      } break;
      };
      display__2QQG(Self__LXFK->parent_node__DMQC.first_code__FIAG,buffer__MXFK);
    };
  } else {
    display__5VTK(Self__LXFK->parent_node__DMQC.switch__ELAG,buffer__MXFK);
  };
}

static void display__MYFK(__READ_LOCAL *Self__NYFK,void *buffer__OYFK)
// ({READ_LOCAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__MSLK,result__E5OK,__tmp__YSLK,result__3BRQ;
  __INTEGER result__4BRQ,result__5BRQ,Self__I55K,limit_up__J55K;
  __INTEGER __tmp__KTLK,result__N2ZK,result__ACRQ,result__BCRQ;
  void *result__EYJQ;
  void *req_list__LSLK;
  append__MOK(buffer__OYFK,((__LOCAL *)Self__NYFK->local__ALZD)->parent_variable__B2LC.intern_name__025F);
  add_last__YPK(buffer__OYFK,'[');
  append_name_in__FBYD(((__LOCAL *)Self__NYFK->local__ALZD)->parent_variable__B2LC.type__125F,buffer__OYFK);
  add_last__YPK(buffer__OYFK,']');
  req_list__LSLK=NULL;
  add_last__YPK(buffer__OYFK,'<');
  if (ANY__->object_id__XAZG==0) {
    __tmp__MSLK=ANY__->object_id__WAZG;
  } else {
    result__E5OK=object_counter__RAZG__SAZG;
    object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
    ANY__->object_id__WAZG=result__E5OK;
    ANY__->object_id__XAZG=0;
    __tmp__MSLK=result__E5OK;
  };
  result__EYJQ=create__AXB( 11);
  append_in__4VC(((__INTEGER_32 )__tmp__MSLK),result__EYJQ);
  append__MOK(buffer__OYFK,result__EYJQ);
  append__MOK(buffer__OYFK,(&__string_347));
  if (((void *)((__LOCAL *)Self__NYFK->local__ALZD)->parent_variable__B2LC.require_first__DAEH != (void *)NULL)) {
    switch (((struct ___OBJ *)((__LOCAL *)Self__NYFK->local__ALZD)->parent_variable__B2LC.require_first__DAEH)->__id) {
    case __WRITE_GLOBAL__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__YSLK=ANY__->object_id__WAZG;
      } else {
        result__3BRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__3BRQ;
        ANY__->object_id__XAZG=0;
        __tmp__YSLK=result__3BRQ;
      };
    } break;
    case __WRITE_SLOT__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__YSLK=ANY__->object_id__WAZG;
      } else {
        result__4BRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__4BRQ;
        ANY__->object_id__XAZG=0;
        __tmp__YSLK=result__4BRQ;
      };
    } break;
    case __WRITE_LOCAL__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__YSLK=ANY__->object_id__WAZG;
      } else {
        result__5BRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__5BRQ;
        ANY__->object_id__XAZG=0;
        __tmp__YSLK=result__5BRQ;
      };
    } break;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__YSLK),buffer__OYFK);
    req_list__LSLK=((__LOCAL *)Self__NYFK->local__ALZD)->parent_variable__B2LC.require_list__UAEH;
    if (((void *)req_list__LSLK != (void *)NULL)) {
      Self__I55K= 0;
      limit_up__J55K=((__FAST_ARRAYoWRITEo *)req_list__LSLK)->parent_arrayed_collection__TAEH.upper__NPDI;
      while ((Self__I55K <= limit_up__J55K)) {
        add_last__YPK(buffer__OYFK,',');
        switch (((struct ___OBJ *)((void **)((__FAST_ARRAYoWRITEo *)req_list__LSLK)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__I55K])->__id) {
        case __WRITE_GLOBAL__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__KTLK=ANY__->object_id__WAZG;
          } else {
            result__N2ZK=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__N2ZK;
            ANY__->object_id__XAZG=0;
            __tmp__KTLK=result__N2ZK;
          };
        } break;
        case __WRITE_SLOT__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__KTLK=ANY__->object_id__WAZG;
          } else {
            result__ACRQ=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__ACRQ;
            ANY__->object_id__XAZG=0;
            __tmp__KTLK=result__ACRQ;
          };
        } break;
        case __WRITE_LOCAL__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__KTLK=ANY__->object_id__WAZG;
          } else {
            result__BCRQ=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__BCRQ;
            ANY__->object_id__XAZG=0;
            __tmp__KTLK=result__BCRQ;
          };
        } break;
        };
        append_in__4VC(((__INTEGER_32 )__tmp__KTLK),buffer__OYFK);
        Self__I55K=(__INTEGER)(Self__I55K +  1);
      };
    };
  } else {
    add_last__YPK(buffer__OYFK,'*');
  };
  append__MOK(buffer__OYFK,(&__string_348));
  append_in__4VC(((__INTEGER_32 )((__LOCAL *)Self__NYFK->local__ALZD)->parent_variable__B2LC.ensure_count__QEAG),buffer__OYFK);
  add_last__YPK(buffer__OYFK,'>');
}

static void display__UYFK(__EXPR_MULTIPLE *Self__VYFK,void *buffer__WYFK)
// ({EXPR_MULTIPLE},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__3YFK,Self__0TLK;
  void *__tmp__EZFK,*__tmp__HZFK;
  __IS_EXPANDED *Self__ZCIQ,*Self__1CIQ;
  __FAST_ARRAYoEXPRo *Self__J34Q;
  add_last__YPK(buffer__WYFK,'(');
  __tmp__3YFK=(__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__VYFK->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH -  1);
  Self__0TLK= 0;
  while ((Self__0TLK <= __tmp__3YFK)) {
    __tmp__EZFK=((void **)((__FAST_ARRAYoEXPRo *)Self__VYFK->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__0TLK];
    switch (((struct ___OBJ *)__tmp__EZFK)->__id) {
    case __LIST__: {
      display__2QQG(__tmp__EZFK,buffer__WYFK);
    } break;
    case __STRING_CST__: {
      display__SUFK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXTERNAL_C__: {
      display__2UFK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __PROTOTYPE_CST__: {
      display__BXFK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __INTEGER_CST__: {
      display__FXFK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __READ_LOCAL__: {
      display__MYFK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_EQUAL__: {
      display__E1FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      display__M1FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __REAL_CST__: {
      display__U1FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __CHARACTER_CST__: {
      display__Z1FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __IS_EXPANDED__: {
      Self__ZCIQ=((__IS_EXPANDED *)__tmp__EZFK);
      append__MOK(buffer__WYFK,(&__string_259));
      display__MYFK(Self__ZCIQ->receiver__OO2H,buffer__WYFK);
      add_last__YPK(buffer__WYFK,')');
    } break;
    case __GET_TYPE_ID__: {
      display__B2FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_SUP__: {
      display__F2FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_SUB__: {
      display__N2FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_MUL__: {
      display__T2FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_DIV__: {
      display__Z2FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_AND__: {
      display__52FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_SHIFT_R__: {
      display__F3FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_SHIFT_L__: {
      display__L3FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __PUT_TO__: {
      display__R3FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __ITEM__: {
      display__X3FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __SIZE_OF__: {
      display__23FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __CAST__: {
      display__A4FK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __CALL_SLOT__: {
      display__VNKL(__tmp__EZFK,buffer__WYFK);
    } break;
    case __READ_SLOT__: {
      display__N1ZK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __READ_GLOBAL__: {
      display__S1ZK(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      display__2PZM(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_OR_LOGIC__: {
      display__NZEO(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      display__F4KO(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_AND_LOGIC__: {
      display__TZEO(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      display__M4KO(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_NEG__: {
      display__VXJM(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_ADD__: {
      display__52ML(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_NOT__: {
      display__LKZM(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_MOD__: {
      display__ZZEO(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_SUP_EQ__: {
      display__VHEP(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_INF__: {
      display__ZNQN(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_INF_EQ__: {
      display__COQN(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_OR__: {
      display__R5PN(__tmp__EZFK,buffer__WYFK);
    } break;
    case __EXPR_XOR__: {
      display__SHUO(__tmp__EZFK,buffer__WYFK);
    } break;
    };
    add_last__YPK(buffer__WYFK,',');
    Self__0TLK=(__INTEGER)(Self__0TLK +  1);
  };
  Self__J34Q=((__FAST_ARRAYoEXPRo *)Self__VYFK->expr_list__VFMH);
  __tmp__HZFK=((void **)Self__J34Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__J34Q->parent_arrayed_collection__42LC.upper__USSH];
  switch (((struct ___OBJ *)__tmp__HZFK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__HZFK,buffer__WYFK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __IS_EXPANDED__: {
    Self__1CIQ=((__IS_EXPANDED *)__tmp__HZFK);
    append__MOK(buffer__WYFK,(&__string_259));
    display__MYFK(Self__1CIQ->receiver__OO2H,buffer__WYFK);
    add_last__YPK(buffer__WYFK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__HZFK,buffer__WYFK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__HZFK,buffer__WYFK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__HZFK,buffer__WYFK);
  } break;
  };
  add_last__YPK(buffer__WYFK,')');
}

static void display__IZFK(__NODE_STYLE *Self__JZFK,void *buffer__KZFK)
// ({NODE_STYLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__YZFK,*__tmp__0ZFK,*__tmp__A0FK;
  __IS_EXPANDED *Self__3CIQ,*Self__5CIQ,*Self__BDIQ;
  void *__tmp__ZZFK;
  if (((void *)Self__JZFK->parent_node__OP0G.switch__ELAG == (void *)NULL)) {
    if (((void *)Self__JZFK->parent_node__OP0G.first_code__FIAG == (void *)NULL)) {
      append_in__4VC(((__INTEGER_32 )((__INTEGER )((__POINTER )Self__JZFK))),buffer__KZFK);
      append__MOK(buffer__KZFK,(&__string_341));
      __tmp__YZFK=Self__JZFK->parent_node__OP0G.expr__KLZD;
      switch (((struct ___OBJ *)__tmp__YZFK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__YZFK,buffer__KZFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __IS_EXPANDED__: {
        Self__3CIQ=((__IS_EXPANDED *)__tmp__YZFK);
        append__MOK(buffer__KZFK,(&__string_259));
        display__MYFK(Self__3CIQ->receiver__OO2H,buffer__KZFK);
        add_last__YPK(buffer__KZFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__YZFK,buffer__KZFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__YZFK,buffer__KZFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__YZFK,buffer__KZFK);
      } break;
      };
      append__MOK(buffer__KZFK,(&__string_342));
      __tmp__ZZFK=Self__JZFK->parent_node__OP0G.data__LLZD;
      switch (((struct ___OBJ *)__tmp__ZZFK)->__id) {
      case __DTA_RD__: {
        append__MOK(buffer__KZFK,(&__string_343));
      } break;
      case __DTA_CAST__: {
        append__MOK(buffer__KZFK,(&__string_344));
      } break;
      case __DTA_WR_CODE__: {
        display__5S2K(__tmp__ZZFK,buffer__KZFK);
      } break;
      case __DTA_BLOCK__: {
        append__MOK(buffer__KZFK,(&__string_345));
      } break;
      case __DTA_WR_VALUE__: {
        display__IT2K(__tmp__ZZFK,buffer__KZFK);
      } break;
      case __DTA_RD_ARGS__: {
        display__OT2K(__tmp__ZZFK,buffer__KZFK);
      } break;
      };
      append__MOK(buffer__KZFK,(&__string_346));
      __tmp__0ZFK=Self__JZFK->result_expr__HO5G;
      switch (((struct ___OBJ *)__tmp__0ZFK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __IS_EXPANDED__: {
        Self__5CIQ=((__IS_EXPANDED *)__tmp__0ZFK);
        append__MOK(buffer__KZFK,(&__string_259));
        display__MYFK(Self__5CIQ->receiver__OO2H,buffer__KZFK);
        add_last__YPK(buffer__KZFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__0ZFK,buffer__KZFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__0ZFK,buffer__KZFK);
      } break;
      };
      add_last__YPK(buffer__KZFK,'>');
    } else {
      __tmp__A0FK=Self__JZFK->parent_node__OP0G.expr__KLZD;
      switch (((struct ___OBJ *)__tmp__A0FK)->__id) {
      case __LIST__: {
        display__2QQG(__tmp__A0FK,buffer__KZFK);
      } break;
      case __STRING_CST__: {
        display__SUFK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXTERNAL_C__: {
        display__2UFK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __PROTOTYPE_CST__: {
        display__BXFK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __INTEGER_CST__: {
        display__FXFK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __READ_LOCAL__: {
        display__MYFK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_EQUAL__: {
        display__E1FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        display__M1FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __REAL_CST__: {
        display__U1FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __CHARACTER_CST__: {
        display__Z1FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __IS_EXPANDED__: {
        Self__BDIQ=((__IS_EXPANDED *)__tmp__A0FK);
        append__MOK(buffer__KZFK,(&__string_259));
        display__MYFK(Self__BDIQ->receiver__OO2H,buffer__KZFK);
        add_last__YPK(buffer__KZFK,')');
      } break;
      case __GET_TYPE_ID__: {
        display__B2FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_SUP__: {
        display__F2FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_SUB__: {
        display__N2FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_MUL__: {
        display__T2FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_DIV__: {
        display__Z2FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_AND__: {
        display__52FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_SHIFT_R__: {
        display__F3FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_SHIFT_L__: {
        display__L3FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __PUT_TO__: {
        display__R3FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __ITEM__: {
        display__X3FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __SIZE_OF__: {
        display__23FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __CAST__: {
        display__A4FK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __CALL_SLOT__: {
        display__VNKL(__tmp__A0FK,buffer__KZFK);
      } break;
      case __READ_SLOT__: {
        display__N1ZK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __READ_GLOBAL__: {
        display__S1ZK(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        display__2PZM(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        display__NZEO(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        display__F4KO(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        display__TZEO(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        display__M4KO(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_NEG__: {
        display__VXJM(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_ADD__: {
        display__52ML(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_NOT__: {
        display__LKZM(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_MOD__: {
        display__ZZEO(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_SUP_EQ__: {
        display__VHEP(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_INF__: {
        display__ZNQN(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_INF_EQ__: {
        display__COQN(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_OR__: {
        display__R5PN(__tmp__A0FK,buffer__KZFK);
      } break;
      case __EXPR_XOR__: {
        display__SHUO(__tmp__A0FK,buffer__KZFK);
      } break;
      };
      display__2QQG(Self__JZFK->parent_node__OP0G.first_code__FIAG,buffer__KZFK);
    };
  } else {
    display__5VTK(Self__JZFK->parent_node__OP0G.switch__ELAG,buffer__KZFK);
  };
}

static void display__E1FK(__EXPR_EQUAL *Self__F1FK,void *buffer__G1FK)
// ({EXPR_EQUAL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__H1FK,*__tmp__J1FK,*__tmp__L1FK;
  void *__tmp__I1FK;
  __IS_EXPANDED *Self__HYJQ,*Self__JYJQ;
  add_last__YPK(buffer__G1FK,'(');
  __tmp__H1FK=Self__F1FK->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__H1FK)->__id) {
  case __LIST__: {
    __tmp__I1FK=static_type__GIQG(__tmp__H1FK);
  } break;
  case __STRING_CST__: {
    __tmp__I1FK=((__STRING_CST *)__tmp__H1FK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__I1FK=((__EXTERNAL_C *)__tmp__H1FK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__I1FK=((__PROTOTYPE_CST *)__tmp__H1FK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__I1FK=((__INTEGER_CST *)__tmp__H1FK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__I1FK=((__LOCAL *)((__READ_LOCAL *)__tmp__H1FK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__I1FK=static_type__0N1H(__tmp__H1FK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__I1FK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__I1FK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__I1FK=((__REAL_CST *)__tmp__H1FK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__I1FK=((__CHARACTER_CST *)__tmp__H1FK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__I1FK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__I1FK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__I1FK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__I1FK=static_type__MP1H(__tmp__H1FK);
  } break;
  case __EXPR_MUL__: {
    __tmp__I1FK=static_type__SP1H(__tmp__H1FK);
  } break;
  case __EXPR_DIV__: {
    __tmp__I1FK=static_type__XP1H(__tmp__H1FK);
  } break;
  case __EXPR_AND__: {
    __tmp__I1FK=static_type__2P1H(__tmp__H1FK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__I1FK=static_type__BQ1H(__tmp__H1FK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__I1FK=static_type__GQ1H(__tmp__H1FK);
  } break;
  case __PUT_TO__: {
    __tmp__I1FK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__I1FK=static_type__PQ1H(__tmp__H1FK);
  } break;
  case __SIZE_OF__: {
    __tmp__I1FK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__I1FK=((__CAST *)__tmp__H1FK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__I1FK=static_type__GIKL(__tmp__H1FK);
  } break;
  case __READ_SLOT__: {
    __tmp__I1FK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__H1FK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__I1FK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__H1FK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__I1FK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__I1FK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__I1FK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__I1FK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__I1FK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__I1FK=static_type__Z2IM(__tmp__H1FK);
  } break;
  case __EXPR_ADD__: {
    __tmp__I1FK=static_type__IXML(__tmp__H1FK);
  } break;
  case __EXPR_NOT__: {
    __tmp__I1FK=static_type__BTXM(__tmp__H1FK);
  } break;
  case __EXPR_MOD__: {
    __tmp__I1FK=static_type__5LEO(__tmp__H1FK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__I1FK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__I1FK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__I1FK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__I1FK=static_type__NOPN(__tmp__H1FK);
  } break;
  case __EXPR_XOR__: {
    __tmp__I1FK=static_type__XCSO(__tmp__H1FK);
  } break;
  };
  append_name_in__FBYD(__tmp__I1FK,buffer__G1FK);
  add_last__YPK(buffer__G1FK,' ');
  __tmp__J1FK=Self__F1FK->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__J1FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__J1FK,buffer__G1FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __IS_EXPANDED__: {
    Self__HYJQ=((__IS_EXPANDED *)__tmp__J1FK);
    append__MOK(buffer__G1FK,(&__string_259));
    display__MYFK(Self__HYJQ->receiver__OO2H,buffer__G1FK);
    add_last__YPK(buffer__G1FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__J1FK,buffer__G1FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__J1FK,buffer__G1FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__J1FK,buffer__G1FK);
  } break;
  };
  append__MOK(buffer__G1FK,(&__string_349));
  __tmp__L1FK=Self__F1FK->parent_expr_binary_cmp__1LJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__L1FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__L1FK,buffer__G1FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __IS_EXPANDED__: {
    Self__JYJQ=((__IS_EXPANDED *)__tmp__L1FK);
    append__MOK(buffer__G1FK,(&__string_259));
    display__MYFK(Self__JYJQ->receiver__OO2H,buffer__G1FK);
    add_last__YPK(buffer__G1FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__L1FK,buffer__G1FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__L1FK,buffer__G1FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__L1FK,buffer__G1FK);
  } break;
  };
  add_last__YPK(buffer__G1FK,')');
}

static void display__M1FK(__EXPR_NOT_EQUAL *Self__N1FK,void *buffer__O1FK)
// ({EXPR_NOT_EQUAL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__P1FK,*__tmp__R1FK,*__tmp__T1FK;
  void *__tmp__Q1FK;
  __IS_EXPANDED *Self__LYJQ,*Self__41FK;
  add_last__YPK(buffer__O1FK,'(');
  __tmp__P1FK=Self__N1FK->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__P1FK)->__id) {
  case __LIST__: {
    __tmp__Q1FK=static_type__GIQG(__tmp__P1FK);
  } break;
  case __STRING_CST__: {
    __tmp__Q1FK=((__STRING_CST *)__tmp__P1FK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__Q1FK=((__EXTERNAL_C *)__tmp__P1FK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__Q1FK=((__PROTOTYPE_CST *)__tmp__P1FK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__Q1FK=((__INTEGER_CST *)__tmp__P1FK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__Q1FK=((__LOCAL *)((__READ_LOCAL *)__tmp__P1FK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__Q1FK=static_type__0N1H(__tmp__P1FK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__Q1FK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__Q1FK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__Q1FK=((__REAL_CST *)__tmp__P1FK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__Q1FK=((__CHARACTER_CST *)__tmp__P1FK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__Q1FK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__Q1FK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__Q1FK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__Q1FK=static_type__MP1H(__tmp__P1FK);
  } break;
  case __EXPR_MUL__: {
    __tmp__Q1FK=static_type__SP1H(__tmp__P1FK);
  } break;
  case __EXPR_DIV__: {
    __tmp__Q1FK=static_type__XP1H(__tmp__P1FK);
  } break;
  case __EXPR_AND__: {
    __tmp__Q1FK=static_type__2P1H(__tmp__P1FK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__Q1FK=static_type__BQ1H(__tmp__P1FK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__Q1FK=static_type__GQ1H(__tmp__P1FK);
  } break;
  case __PUT_TO__: {
    __tmp__Q1FK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__Q1FK=static_type__PQ1H(__tmp__P1FK);
  } break;
  case __SIZE_OF__: {
    __tmp__Q1FK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__Q1FK=((__CAST *)__tmp__P1FK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__Q1FK=static_type__GIKL(__tmp__P1FK);
  } break;
  case __READ_SLOT__: {
    __tmp__Q1FK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__P1FK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__Q1FK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__P1FK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__Q1FK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__Q1FK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__Q1FK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__Q1FK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__Q1FK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__Q1FK=static_type__Z2IM(__tmp__P1FK);
  } break;
  case __EXPR_ADD__: {
    __tmp__Q1FK=static_type__IXML(__tmp__P1FK);
  } break;
  case __EXPR_NOT__: {
    __tmp__Q1FK=static_type__BTXM(__tmp__P1FK);
  } break;
  case __EXPR_MOD__: {
    __tmp__Q1FK=static_type__5LEO(__tmp__P1FK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__Q1FK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__Q1FK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__Q1FK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__Q1FK=static_type__NOPN(__tmp__P1FK);
  } break;
  case __EXPR_XOR__: {
    __tmp__Q1FK=static_type__XCSO(__tmp__P1FK);
  } break;
  };
  append_name_in__FBYD(__tmp__Q1FK,buffer__O1FK);
  add_last__YPK(buffer__O1FK,' ');
  __tmp__R1FK=Self__N1FK->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__R1FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__R1FK,buffer__O1FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __IS_EXPANDED__: {
    Self__LYJQ=((__IS_EXPANDED *)__tmp__R1FK);
    append__MOK(buffer__O1FK,(&__string_259));
    display__MYFK(Self__LYJQ->receiver__OO2H,buffer__O1FK);
    add_last__YPK(buffer__O1FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__R1FK,buffer__O1FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__R1FK,buffer__O1FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__R1FK,buffer__O1FK);
  } break;
  };
  append__MOK(buffer__O1FK,(&__string_21));
  __tmp__T1FK=Self__N1FK->parent_expr_binary_cmp__DMJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__T1FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__T1FK,buffer__O1FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __IS_EXPANDED__: {
    Self__41FK=((__IS_EXPANDED *)__tmp__T1FK);
    append__MOK(buffer__O1FK,(&__string_259));
    display__MYFK(Self__41FK->receiver__OO2H,buffer__O1FK);
    add_last__YPK(buffer__O1FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__T1FK,buffer__O1FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__T1FK,buffer__O1FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__T1FK,buffer__O1FK);
  } break;
  };
  add_last__YPK(buffer__O1FK,')');
}

static void display__U1FK(__REAL_CST *Self__V1FK,void *buffer__W1FK)
// ({REAL_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__EZLK,result__Q4ZK;
  add_last__YPK(buffer__W1FK,'(');
  append_name_in__FBYD(Self__V1FK->parent_constant__M3JH.static_type__F4YD,buffer__W1FK);
  add_last__YPK(buffer__W1FK,')');
  append__MOK(buffer__W1FK,Self__V1FK->value__5N2H);
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__W1FK,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__EZLK=ANY__->object_id__WAZG;
    } else {
      result__Q4ZK=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__Q4ZK;
      ANY__->object_id__XAZG=0;
      __tmp__EZLK=result__Q4ZK;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__EZLK),buffer__W1FK);
    append__MOK(buffer__W1FK,(&__string_262));
  };
}

static void display__Z1FK(__CHARACTER_CST *Self__01FK,void *buffer__11FK)
// ({CHARACTER_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__SZLK,result__34ZK;
  add_last__YPK(buffer__11FK,'\'');
  append__MOK(buffer__11FK,Self__01FK->text__HO2H);
  add_last__YPK(buffer__11FK,'\'');
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__11FK,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__SZLK=ANY__->object_id__WAZG;
    } else {
      result__34ZK=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__34ZK;
      ANY__->object_id__XAZG=0;
      __tmp__SZLK=result__34ZK;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__SZLK),buffer__11FK);
    append__MOK(buffer__11FK,(&__string_262));
  };
}

static void display__B2FK(__GET_TYPE_ID *Self__C2FK,void *buffer__D2FK)
// ({GET_TYPE_ID},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__E2FK;
  __IS_EXPANDED *Self__WB4P;
  append__MOK(buffer__D2FK,(&__string_350));
  __tmp__E2FK=Self__C2FK->receiver__XO2H;
  switch (((struct ___OBJ *)__tmp__E2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__E2FK,buffer__D2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__WB4P=((__IS_EXPANDED *)__tmp__E2FK);
    append__MOK(buffer__D2FK,(&__string_259));
    display__MYFK(Self__WB4P->receiver__OO2H,buffer__D2FK);
    add_last__YPK(buffer__D2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__E2FK,buffer__D2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__E2FK,buffer__D2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__E2FK,buffer__D2FK);
  } break;
  };
  add_last__YPK(buffer__D2FK,')');
}

static void display__F2FK(__EXPR_SUP *Self__G2FK,void *buffer__H2FK)
// ({EXPR_SUP},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__I2FK,*__tmp__K2FK,*__tmp__M2FK;
  void *__tmp__J2FK;
  __IS_EXPANDED *Self__4B4P,*Self__AC4P;
  add_last__YPK(buffer__H2FK,'(');
  __tmp__I2FK=Self__G2FK->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__I2FK)->__id) {
  case __LIST__: {
    __tmp__J2FK=static_type__GIQG(__tmp__I2FK);
  } break;
  case __STRING_CST__: {
    __tmp__J2FK=((__STRING_CST *)__tmp__I2FK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__J2FK=((__EXTERNAL_C *)__tmp__I2FK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__J2FK=((__PROTOTYPE_CST *)__tmp__I2FK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__J2FK=((__INTEGER_CST *)__tmp__I2FK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__J2FK=((__LOCAL *)((__READ_LOCAL *)__tmp__I2FK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__J2FK=static_type__0N1H(__tmp__I2FK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__J2FK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__J2FK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__J2FK=((__REAL_CST *)__tmp__I2FK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__J2FK=((__CHARACTER_CST *)__tmp__I2FK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__J2FK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__J2FK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__J2FK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__J2FK=static_type__MP1H(__tmp__I2FK);
  } break;
  case __EXPR_MUL__: {
    __tmp__J2FK=static_type__SP1H(__tmp__I2FK);
  } break;
  case __EXPR_DIV__: {
    __tmp__J2FK=static_type__XP1H(__tmp__I2FK);
  } break;
  case __EXPR_AND__: {
    __tmp__J2FK=static_type__2P1H(__tmp__I2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__J2FK=static_type__BQ1H(__tmp__I2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__J2FK=static_type__GQ1H(__tmp__I2FK);
  } break;
  case __PUT_TO__: {
    __tmp__J2FK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__J2FK=static_type__PQ1H(__tmp__I2FK);
  } break;
  case __SIZE_OF__: {
    __tmp__J2FK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__J2FK=((__CAST *)__tmp__I2FK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__J2FK=static_type__GIKL(__tmp__I2FK);
  } break;
  case __READ_SLOT__: {
    __tmp__J2FK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__I2FK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__J2FK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__I2FK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__J2FK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__J2FK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__J2FK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__J2FK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__J2FK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__J2FK=static_type__Z2IM(__tmp__I2FK);
  } break;
  case __EXPR_ADD__: {
    __tmp__J2FK=static_type__IXML(__tmp__I2FK);
  } break;
  case __EXPR_NOT__: {
    __tmp__J2FK=static_type__BTXM(__tmp__I2FK);
  } break;
  case __EXPR_MOD__: {
    __tmp__J2FK=static_type__5LEO(__tmp__I2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__J2FK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__J2FK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__J2FK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__J2FK=static_type__NOPN(__tmp__I2FK);
  } break;
  case __EXPR_XOR__: {
    __tmp__J2FK=static_type__XCSO(__tmp__I2FK);
  } break;
  };
  append_name_in__FBYD(__tmp__J2FK,buffer__H2FK);
  add_last__YPK(buffer__H2FK,' ');
  __tmp__K2FK=Self__G2FK->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__K2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__K2FK,buffer__H2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__4B4P=((__IS_EXPANDED *)__tmp__K2FK);
    append__MOK(buffer__H2FK,(&__string_259));
    display__MYFK(Self__4B4P->receiver__OO2H,buffer__H2FK);
    add_last__YPK(buffer__H2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__K2FK,buffer__H2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__K2FK,buffer__H2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__K2FK,buffer__H2FK);
  } break;
  };
  append__MOK(buffer__H2FK,(&__string_262));
  __tmp__M2FK=Self__G2FK->parent_expr_binary_cmp__TAKH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__M2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__M2FK,buffer__H2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__AC4P=((__IS_EXPANDED *)__tmp__M2FK);
    append__MOK(buffer__H2FK,(&__string_259));
    display__MYFK(Self__AC4P->receiver__OO2H,buffer__H2FK);
    add_last__YPK(buffer__H2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__M2FK,buffer__H2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__M2FK,buffer__H2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__M2FK,buffer__H2FK);
  } break;
  };
  add_last__YPK(buffer__H2FK,')');
}

static void display__N2FK(__EXPR_SUB *Self__O2FK,void *buffer__P2FK)
// ({EXPR_SUB},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__Q2FK,*__tmp__S2FK;
  __IS_EXPANDED *Self__CC4P,*Self__EC4P;
  add_last__YPK(buffer__P2FK,'(');
  __tmp__Q2FK=Self__O2FK->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__Q2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__CC4P=((__IS_EXPANDED *)__tmp__Q2FK);
    append__MOK(buffer__P2FK,(&__string_259));
    display__MYFK(Self__CC4P->receiver__OO2H,buffer__P2FK);
    add_last__YPK(buffer__P2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__Q2FK,buffer__P2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__Q2FK,buffer__P2FK);
  } break;
  };
  append__MOK(buffer__P2FK,(&__string_351));
  __tmp__S2FK=Self__O2FK->parent_expr_binary__HBKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__S2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__S2FK,buffer__P2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__EC4P=((__IS_EXPANDED *)__tmp__S2FK);
    append__MOK(buffer__P2FK,(&__string_259));
    display__MYFK(Self__EC4P->receiver__OO2H,buffer__P2FK);
    add_last__YPK(buffer__P2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__S2FK,buffer__P2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__S2FK,buffer__P2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__S2FK,buffer__P2FK);
  } break;
  };
  add_last__YPK(buffer__P2FK,')');
}

static void display__T2FK(__EXPR_MUL *Self__U2FK,void *buffer__V2FK)
// ({EXPR_MUL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__W2FK,*__tmp__Y2FK;
  __IS_EXPANDED *Self__GC4P,*Self__IC4P;
  add_last__YPK(buffer__V2FK,'(');
  __tmp__W2FK=Self__U2FK->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__W2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__W2FK,buffer__V2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__GC4P=((__IS_EXPANDED *)__tmp__W2FK);
    append__MOK(buffer__V2FK,(&__string_259));
    display__MYFK(Self__GC4P->receiver__OO2H,buffer__V2FK);
    add_last__YPK(buffer__V2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__W2FK,buffer__V2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__W2FK,buffer__V2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__W2FK,buffer__V2FK);
  } break;
  };
  append__MOK(buffer__V2FK,(&__string_158));
  __tmp__Y2FK=Self__U2FK->parent_expr_binary__0BKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__Y2FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __IS_EXPANDED__: {
    Self__IC4P=((__IS_EXPANDED *)__tmp__Y2FK);
    append__MOK(buffer__V2FK,(&__string_259));
    display__MYFK(Self__IC4P->receiver__OO2H,buffer__V2FK);
    add_last__YPK(buffer__V2FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__Y2FK,buffer__V2FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__Y2FK,buffer__V2FK);
  } break;
  };
  add_last__YPK(buffer__V2FK,')');
}

static void display__Z2FK(__EXPR_DIV *Self__02FK,void *buffer__12FK)
// ({EXPR_DIV},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__22FK,*__tmp__42FK;
  __IS_EXPANDED *Self__KC4P,*Self__MC4P;
  add_last__YPK(buffer__12FK,'(');
  __tmp__22FK=Self__02FK->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__22FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__22FK,buffer__12FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__22FK,buffer__12FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__22FK,buffer__12FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__22FK,buffer__12FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__22FK,buffer__12FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__22FK,buffer__12FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__22FK,buffer__12FK);
  } break;
  case __IS_EXPANDED__: {
    Self__KC4P=((__IS_EXPANDED *)__tmp__22FK);
    append__MOK(buffer__12FK,(&__string_259));
    display__MYFK(Self__KC4P->receiver__OO2H,buffer__12FK);
    add_last__YPK(buffer__12FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__22FK,buffer__12FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__22FK,buffer__12FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__22FK,buffer__12FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__22FK,buffer__12FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__22FK,buffer__12FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__22FK,buffer__12FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__22FK,buffer__12FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__22FK,buffer__12FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__22FK,buffer__12FK);
  } break;
  };
  append__MOK(buffer__12FK,(&__string_352));
  __tmp__42FK=Self__02FK->parent_expr_binary__NCKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__42FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__42FK,buffer__12FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__42FK,buffer__12FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__42FK,buffer__12FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__42FK,buffer__12FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__42FK,buffer__12FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__42FK,buffer__12FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__42FK,buffer__12FK);
  } break;
  case __IS_EXPANDED__: {
    Self__MC4P=((__IS_EXPANDED *)__tmp__42FK);
    append__MOK(buffer__12FK,(&__string_259));
    display__MYFK(Self__MC4P->receiver__OO2H,buffer__12FK);
    add_last__YPK(buffer__12FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__42FK,buffer__12FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__42FK,buffer__12FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__42FK,buffer__12FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__42FK,buffer__12FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__42FK,buffer__12FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__42FK,buffer__12FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__42FK,buffer__12FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__42FK,buffer__12FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__42FK,buffer__12FK);
  } break;
  };
  add_last__YPK(buffer__12FK,')');
}

static void display__52FK(__EXPR_AND *Self__A3FK,void *buffer__B3FK)
// ({EXPR_AND},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__C3FK,*__tmp__E3FK;
  __IS_EXPANDED *Self__OC4P,*Self__QC4P;
  add_last__YPK(buffer__B3FK,'(');
  __tmp__C3FK=Self__A3FK->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__C3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__C3FK,buffer__B3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__OC4P=((__IS_EXPANDED *)__tmp__C3FK);
    append__MOK(buffer__B3FK,(&__string_259));
    display__MYFK(Self__OC4P->receiver__OO2H,buffer__B3FK);
    add_last__YPK(buffer__B3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__C3FK,buffer__B3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__C3FK,buffer__B3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__C3FK,buffer__B3FK);
  } break;
  };
  append__MOK(buffer__B3FK,(&__string_353));
  __tmp__E3FK=Self__A3FK->parent_expr_binary__ADKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__E3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__E3FK,buffer__B3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__QC4P=((__IS_EXPANDED *)__tmp__E3FK);
    append__MOK(buffer__B3FK,(&__string_259));
    display__MYFK(Self__QC4P->receiver__OO2H,buffer__B3FK);
    add_last__YPK(buffer__B3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__E3FK,buffer__B3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__E3FK,buffer__B3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__E3FK,buffer__B3FK);
  } break;
  };
  add_last__YPK(buffer__B3FK,')');
}

static void display__F3FK(__EXPR_SHIFT_R *Self__G3FK,void *buffer__H3FK)
// ({EXPR_SHIFT_R},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__I3FK,*__tmp__K3FK;
  __IS_EXPANDED *Self__SC4P,*Self__UC4P;
  add_last__YPK(buffer__H3FK,'(');
  __tmp__I3FK=Self__G3FK->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__I3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__I3FK,buffer__H3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__SC4P=((__IS_EXPANDED *)__tmp__I3FK);
    append__MOK(buffer__H3FK,(&__string_259));
    display__MYFK(Self__SC4P->receiver__OO2H,buffer__H3FK);
    add_last__YPK(buffer__H3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__I3FK,buffer__H3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__I3FK,buffer__H3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__I3FK,buffer__H3FK);
  } break;
  };
  append__MOK(buffer__H3FK,(&__string_354));
  __tmp__K3FK=Self__G3FK->parent_expr_binary__TDKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__K3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__K3FK,buffer__H3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__UC4P=((__IS_EXPANDED *)__tmp__K3FK);
    append__MOK(buffer__H3FK,(&__string_259));
    display__MYFK(Self__UC4P->receiver__OO2H,buffer__H3FK);
    add_last__YPK(buffer__H3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__K3FK,buffer__H3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__K3FK,buffer__H3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__K3FK,buffer__H3FK);
  } break;
  };
  add_last__YPK(buffer__H3FK,')');
}

static void display__L3FK(__EXPR_SHIFT_L *Self__M3FK,void *buffer__N3FK)
// ({EXPR_SHIFT_L},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__O3FK,*__tmp__Q3FK;
  __IS_EXPANDED *Self__WC4P,*Self__YC4P;
  add_last__YPK(buffer__N3FK,'(');
  __tmp__O3FK=Self__M3FK->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__O3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__O3FK,buffer__N3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__WC4P=((__IS_EXPANDED *)__tmp__O3FK);
    append__MOK(buffer__N3FK,(&__string_259));
    display__MYFK(Self__WC4P->receiver__OO2H,buffer__N3FK);
    add_last__YPK(buffer__N3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__O3FK,buffer__N3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__O3FK,buffer__N3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__O3FK,buffer__N3FK);
  } break;
  };
  append__MOK(buffer__N3FK,(&__string_355));
  __tmp__Q3FK=Self__M3FK->parent_expr_binary__GEKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__Q3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__YC4P=((__IS_EXPANDED *)__tmp__Q3FK);
    append__MOK(buffer__N3FK,(&__string_259));
    display__MYFK(Self__YC4P->receiver__OO2H,buffer__N3FK);
    add_last__YPK(buffer__N3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__Q3FK,buffer__N3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__Q3FK,buffer__N3FK);
  } break;
  };
  add_last__YPK(buffer__N3FK,')');
}

static void display__R3FK(__PUT_TO *Self__S3FK,void *buffer__T3FK)
// ({PUT_TO},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__U3FK,*__tmp__V3FK,*__tmp__W3FK;
  __IS_EXPANDED *Self__0C4P,*Self__2C4P,*Self__4C4P;
  __tmp__U3FK=Self__S3FK->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__U3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__U3FK,buffer__T3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__0C4P=((__IS_EXPANDED *)__tmp__U3FK);
    append__MOK(buffer__T3FK,(&__string_259));
    display__MYFK(Self__0C4P->receiver__OO2H,buffer__T3FK);
    add_last__YPK(buffer__T3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__U3FK,buffer__T3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__U3FK,buffer__T3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__U3FK,buffer__T3FK);
  } break;
  };
  add_last__YPK(buffer__T3FK,'[');
  __tmp__V3FK=Self__S3FK->index__SR2H;
  switch (((struct ___OBJ *)__tmp__V3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__V3FK,buffer__T3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__2C4P=((__IS_EXPANDED *)__tmp__V3FK);
    append__MOK(buffer__T3FK,(&__string_259));
    display__MYFK(Self__2C4P->receiver__OO2H,buffer__T3FK);
    add_last__YPK(buffer__T3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__V3FK,buffer__T3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__V3FK,buffer__T3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__V3FK,buffer__T3FK);
  } break;
  };
  append__MOK(buffer__T3FK,(&__string_356));
  __tmp__W3FK=Self__S3FK->value__WR2H;
  switch (((struct ___OBJ *)__tmp__W3FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__W3FK,buffer__T3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__4C4P=((__IS_EXPANDED *)__tmp__W3FK);
    append__MOK(buffer__T3FK,(&__string_259));
    display__MYFK(Self__4C4P->receiver__OO2H,buffer__T3FK);
    add_last__YPK(buffer__T3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__W3FK,buffer__T3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__W3FK,buffer__T3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__W3FK,buffer__T3FK);
  } break;
  };
}

static void display__X3FK(__ITEM *Self__Y3FK,void *buffer__Z3FK)
// ({ITEM},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__03FK,*__tmp__13FK;
  __IS_EXPANDED *Self__AD4P,*Self__CD4P;
  __tmp__03FK=Self__Y3FK->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__03FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__03FK,buffer__Z3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__AD4P=((__IS_EXPANDED *)__tmp__03FK);
    append__MOK(buffer__Z3FK,(&__string_259));
    display__MYFK(Self__AD4P->receiver__OO2H,buffer__Z3FK);
    add_last__YPK(buffer__Z3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__03FK,buffer__Z3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__03FK,buffer__Z3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__03FK,buffer__Z3FK);
  } break;
  };
  add_last__YPK(buffer__Z3FK,'[');
  __tmp__13FK=Self__Y3FK->index__CS2H;
  switch (((struct ___OBJ *)__tmp__13FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__13FK,buffer__Z3FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __IS_EXPANDED__: {
    Self__CD4P=((__IS_EXPANDED *)__tmp__13FK);
    append__MOK(buffer__Z3FK,(&__string_259));
    display__MYFK(Self__CD4P->receiver__OO2H,buffer__Z3FK);
    add_last__YPK(buffer__Z3FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__13FK,buffer__Z3FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__13FK,buffer__Z3FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__13FK,buffer__Z3FK);
  } break;
  };
  add_last__YPK(buffer__Z3FK,']');
}

static void display__23FK(__SIZE_OF *Self__33FK,void *buffer__43FK)
// ({SIZE_OF},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__53FK;
  __IS_EXPANDED *Self__ED4P;
  append__MOK(buffer__43FK,(&__string_357));
  __tmp__53FK=Self__33FK->receiver__LS2H;
  switch (((struct ___OBJ *)__tmp__53FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__53FK,buffer__43FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__53FK,buffer__43FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__53FK,buffer__43FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__53FK,buffer__43FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__53FK,buffer__43FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__53FK,buffer__43FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__53FK,buffer__43FK);
  } break;
  case __IS_EXPANDED__: {
    Self__ED4P=((__IS_EXPANDED *)__tmp__53FK);
    append__MOK(buffer__43FK,(&__string_259));
    display__MYFK(Self__ED4P->receiver__OO2H,buffer__43FK);
    add_last__YPK(buffer__43FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__53FK,buffer__43FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__53FK,buffer__43FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__53FK,buffer__43FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__53FK,buffer__43FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__53FK,buffer__43FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__53FK,buffer__43FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__53FK,buffer__43FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__53FK,buffer__43FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__53FK,buffer__43FK);
  } break;
  };
  add_last__YPK(buffer__43FK,')');
}

static void display__A4FK(__CAST *Self__B4FK,void *buffer__C4FK)
// ({CAST},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__M4FK;
  __IS_EXPANDED *Self__KD4P;
  add_last__YPK(buffer__C4FK,'(');
  append_name_in__FBYD(Self__B4FK->static_type__SO1H,buffer__C4FK);
  if ((! ((__UINTEGER_8)(((__TYPE_FULL *)Self__B4FK->static_type__SO1H)->flag__LTL &  1) !=  0))) {
    add_last__YPK(buffer__C4FK,'*');
  };
  add_last__YPK(buffer__C4FK,')');
  __tmp__M4FK=Self__B4FK->value__US2H;
  switch (((struct ___OBJ *)__tmp__M4FK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__M4FK,buffer__C4FK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __IS_EXPANDED__: {
    Self__KD4P=((__IS_EXPANDED *)__tmp__M4FK);
    append__MOK(buffer__C4FK,(&__string_259));
    display__MYFK(Self__KD4P->receiver__OO2H,buffer__C4FK);
    add_last__YPK(buffer__C4FK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__M4FK,buffer__C4FK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__M4FK,buffer__C4FK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__M4FK,buffer__C4FK);
  } break;
  };
}

static void display__VNKL(__CALL_SLOT *Self__WNKL,void *buffer__XNKL)
// ({CALL_SLOT},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *arg__YNKL;
  void *__tmp__ZNKL;
  void *__tmp__0NKL;
  __INTEGER __tmp__QNQL,result__RU2L,__tmp__LOKL,Self__5HXL;
  void *__tmp__3OKL;
  __IS_EXPANDED *Self__TD4P;
  arg__YNKL=NULL;
  __tmp__ZNKL=Self__WNKL->profil__QA2H;
  if (((struct ___OBJ *)__tmp__ZNKL)->__id==__PROFIL_SLOT__) {
    __tmp__0NKL=((__PROFIL_SLOT *)__tmp__ZNKL)->parent_profil__51LC.name__XJEI;
  } else {
    __tmp__0NKL=((__PROFIL_BLOCK *)__tmp__ZNKL)->parent_profil__GHAG.name__XJEI;
  };
  append__MOK(buffer__XNKL,__tmp__0NKL);
  if ((verbose_level__FX !=  0)) {
    append__MOK(buffer__XNKL,(&__string_261));
    if (ANY__->object_id__XAZG==0) {
      __tmp__QNQL=ANY__->object_id__WAZG;
    } else {
      result__RU2L=object_counter__RAZG__SAZG;
      object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
      ANY__->object_id__WAZG=result__RU2L;
      ANY__->object_id__XAZG=0;
      __tmp__QNQL=result__RU2L;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__QNQL),buffer__XNKL);
    append__MOK(buffer__XNKL,(&__string_262));
  };
  if ((((__FAST_ARRAYoWRITEo *)Self__WNKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI <  0)) {
    append__MOK(buffer__XNKL,(&__string_358));
  } else {
    append__MOK(buffer__XNKL,(&__string_359));
    __tmp__LOKL=((__FAST_ARRAYoWRITEo *)Self__WNKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
    Self__5HXL= 0;
    while ((Self__5HXL <= __tmp__LOKL)) {
      arg__YNKL=((void **)((__FAST_ARRAYoWRITEo *)Self__WNKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__5HXL];
      if (((void *)arg__YNKL == (void *)NULL)) {
        append__MOK(buffer__XNKL,(&__string_360));
      } else {
        switch (((struct ___OBJ *)arg__YNKL)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__3OKL=((__WRITE_GLOBAL *)arg__YNKL)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__3OKL=((__WRITE_SLOT *)arg__YNKL)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__3OKL=((__WRITE_LOCAL *)arg__YNKL)->parent_write__X50I.value__HBEH;
        } break;
        };
        switch (((struct ___OBJ *)__tmp__3OKL)->__id) {
        case __LIST__: {
          display__2QQG(__tmp__3OKL,buffer__XNKL);
        } break;
        case __STRING_CST__: {
          display__SUFK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXTERNAL_C__: {
          display__2UFK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __PROTOTYPE_CST__: {
          display__BXFK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __INTEGER_CST__: {
          display__FXFK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __READ_LOCAL__: {
          display__MYFK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_EQUAL__: {
          display__E1FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          display__M1FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __REAL_CST__: {
          display__U1FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __CHARACTER_CST__: {
          display__Z1FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __IS_EXPANDED__: {
          Self__TD4P=((__IS_EXPANDED *)__tmp__3OKL);
          append__MOK(buffer__XNKL,(&__string_259));
          display__MYFK(Self__TD4P->receiver__OO2H,buffer__XNKL);
          add_last__YPK(buffer__XNKL,')');
        } break;
        case __GET_TYPE_ID__: {
          display__B2FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_SUP__: {
          display__F2FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_SUB__: {
          display__N2FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_MUL__: {
          display__T2FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_DIV__: {
          display__Z2FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_AND__: {
          display__52FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_SHIFT_R__: {
          display__F3FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_SHIFT_L__: {
          display__L3FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __PUT_TO__: {
          display__R3FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __ITEM__: {
          display__X3FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __SIZE_OF__: {
          display__23FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __CAST__: {
          display__A4FK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __CALL_SLOT__: {
          display__VNKL(__tmp__3OKL,buffer__XNKL);
        } break;
        case __READ_SLOT__: {
          display__N1ZK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __READ_GLOBAL__: {
          display__S1ZK(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_NOT_LOGIC__: {
          display__2PZM(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_OR_LOGIC__: {
          display__NZEO(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          display__F4KO(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_AND_LOGIC__: {
          display__TZEO(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          display__M4KO(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_NEG__: {
          display__VXJM(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_ADD__: {
          display__52ML(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_NOT__: {
          display__LKZM(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_MOD__: {
          display__ZZEO(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_SUP_EQ__: {
          display__VHEP(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_INF__: {
          display__ZNQN(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_INF_EQ__: {
          display__COQN(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_OR__: {
          display__R5PN(__tmp__3OKL,buffer__XNKL);
        } break;
        case __EXPR_XOR__: {
          display__SHUO(__tmp__3OKL,buffer__XNKL);
        } break;
        };
      };
      add_last__YPK(buffer__XNKL,',');
      Self__5HXL=(__INTEGER)(Self__5HXL +  1);
    };
    ((__CHARACTER *)((__STRING *)buffer__XNKL)->storage__XNK)[(__INTEGER)(((__STRING *)buffer__XNKL)->count__VF -  1)]=')';
  };
}

static void display__N1ZK(__READ_SLOT *Self__O1ZK,void *buffer__P1ZK)
// ({READ_SLOT},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__Q1ZK;
  __IS_EXPANDED *Self__YD4P;
  __INTEGER __tmp__F25K,result__NHDL,__tmp__R25K,result__OYJQ;
  __INTEGER result__CCRQ,result__DCRQ,Self__ZEIL,limit_up__0EIL;
  __INTEGER __tmp__D35K,result__PYJQ,result__ECRQ,result__FCRQ;
  void *result__MYJQ;
  void *req_list__E25K;
  __tmp__Q1ZK=Self__O1ZK->receiver__I1TI;
  switch (((struct ___OBJ *)__tmp__Q1ZK)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __IS_EXPANDED__: {
    Self__YD4P=((__IS_EXPANDED *)__tmp__Q1ZK);
    append__MOK(buffer__P1ZK,(&__string_259));
    display__MYFK(Self__YD4P->receiver__OO2H,buffer__P1ZK);
    add_last__YPK(buffer__P1ZK,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__Q1ZK,buffer__P1ZK);
  } break;
  };
  append__MOK(buffer__P1ZK,(&__string_19));
  append__MOK(buffer__P1ZK,((__SLOT_DATA *)Self__O1ZK->slot__EVGK)->parent_variable__AJZD.intern_name__025F);
  add_last__YPK(buffer__P1ZK,'[');
  append_name_in__FBYD(((__SLOT_DATA *)Self__O1ZK->slot__EVGK)->parent_variable__AJZD.type__125F,buffer__P1ZK);
  add_last__YPK(buffer__P1ZK,']');
  req_list__E25K=NULL;
  add_last__YPK(buffer__P1ZK,'<');
  if (ANY__->object_id__XAZG==0) {
    __tmp__F25K=ANY__->object_id__WAZG;
  } else {
    result__NHDL=object_counter__RAZG__SAZG;
    object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
    ANY__->object_id__WAZG=result__NHDL;
    ANY__->object_id__XAZG=0;
    __tmp__F25K=result__NHDL;
  };
  result__MYJQ=create__AXB( 11);
  append_in__4VC(((__INTEGER_32 )__tmp__F25K),result__MYJQ);
  append__MOK(buffer__P1ZK,result__MYJQ);
  append__MOK(buffer__P1ZK,(&__string_347));
  if (((void *)((__SLOT_DATA *)Self__O1ZK->slot__EVGK)->parent_variable__AJZD.require_first__DAEH != (void *)NULL)) {
    switch (((struct ___OBJ *)((__SLOT_DATA *)Self__O1ZK->slot__EVGK)->parent_variable__AJZD.require_first__DAEH)->__id) {
    case __WRITE_GLOBAL__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__R25K=ANY__->object_id__WAZG;
      } else {
        result__OYJQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__OYJQ;
        ANY__->object_id__XAZG=0;
        __tmp__R25K=result__OYJQ;
      };
    } break;
    case __WRITE_SLOT__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__R25K=ANY__->object_id__WAZG;
      } else {
        result__CCRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__CCRQ;
        ANY__->object_id__XAZG=0;
        __tmp__R25K=result__CCRQ;
      };
    } break;
    case __WRITE_LOCAL__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__R25K=ANY__->object_id__WAZG;
      } else {
        result__DCRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__DCRQ;
        ANY__->object_id__XAZG=0;
        __tmp__R25K=result__DCRQ;
      };
    } break;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__R25K),buffer__P1ZK);
    req_list__E25K=((__SLOT_DATA *)Self__O1ZK->slot__EVGK)->parent_variable__AJZD.require_list__UAEH;
    if (((void *)req_list__E25K != (void *)NULL)) {
      Self__ZEIL= 0;
      limit_up__0EIL=((__FAST_ARRAYoWRITEo *)req_list__E25K)->parent_arrayed_collection__TAEH.upper__NPDI;
      while ((Self__ZEIL <= limit_up__0EIL)) {
        add_last__YPK(buffer__P1ZK,',');
        switch (((struct ___OBJ *)((void **)((__FAST_ARRAYoWRITEo *)req_list__E25K)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__ZEIL])->__id) {
        case __WRITE_GLOBAL__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__D35K=ANY__->object_id__WAZG;
          } else {
            result__PYJQ=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__PYJQ;
            ANY__->object_id__XAZG=0;
            __tmp__D35K=result__PYJQ;
          };
        } break;
        case __WRITE_SLOT__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__D35K=ANY__->object_id__WAZG;
          } else {
            result__ECRQ=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__ECRQ;
            ANY__->object_id__XAZG=0;
            __tmp__D35K=result__ECRQ;
          };
        } break;
        case __WRITE_LOCAL__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__D35K=ANY__->object_id__WAZG;
          } else {
            result__FCRQ=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__FCRQ;
            ANY__->object_id__XAZG=0;
            __tmp__D35K=result__FCRQ;
          };
        } break;
        };
        append_in__4VC(((__INTEGER_32 )__tmp__D35K),buffer__P1ZK);
        Self__ZEIL=(__INTEGER)(Self__ZEIL +  1);
      };
    };
  } else {
    add_last__YPK(buffer__P1ZK,'*');
  };
  append__MOK(buffer__P1ZK,(&__string_348));
  append_in__4VC(((__INTEGER_32 )((__SLOT_DATA *)Self__O1ZK->slot__EVGK)->parent_variable__AJZD.ensure_count__QEAG),buffer__P1ZK);
  add_last__YPK(buffer__P1ZK,'>');
}

static void display__S1ZK(__READ_GLOBAL *Self__T1ZK,void *buffer__U1ZK)
// ({READ_GLOBAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__CV2K,result__X35K,__tmp__OV2K,result__SYJQ;
  __INTEGER result__GCRQ,result__HCRQ,Self__NKHL,limit_up__OKHL;
  __INTEGER __tmp__AW2K,result__TYJQ,result__Y2ZK,result__D3ZK;
  void *result__QYJQ;
  void *req_list__BV2K;
  append__MOK(buffer__U1ZK,((__SLOT_DATA *)Self__T1ZK->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  add_last__YPK(buffer__U1ZK,'[');
  append_name_in__FBYD(((__SLOT_DATA *)Self__T1ZK->global__RHJK)->parent_variable__AJZD.type__125F,buffer__U1ZK);
  add_last__YPK(buffer__U1ZK,']');
  req_list__BV2K=NULL;
  add_last__YPK(buffer__U1ZK,'<');
  if (ANY__->object_id__XAZG==0) {
    __tmp__CV2K=ANY__->object_id__WAZG;
  } else {
    result__X35K=object_counter__RAZG__SAZG;
    object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
    ANY__->object_id__WAZG=result__X35K;
    ANY__->object_id__XAZG=0;
    __tmp__CV2K=result__X35K;
  };
  result__QYJQ=create__AXB( 11);
  append_in__4VC(((__INTEGER_32 )__tmp__CV2K),result__QYJQ);
  append__MOK(buffer__U1ZK,result__QYJQ);
  append__MOK(buffer__U1ZK,(&__string_347));
  if (((void *)((__SLOT_DATA *)Self__T1ZK->global__RHJK)->parent_variable__AJZD.require_first__DAEH != (void *)NULL)) {
    switch (((struct ___OBJ *)((__SLOT_DATA *)Self__T1ZK->global__RHJK)->parent_variable__AJZD.require_first__DAEH)->__id) {
    case __WRITE_GLOBAL__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__OV2K=ANY__->object_id__WAZG;
      } else {
        result__SYJQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__SYJQ;
        ANY__->object_id__XAZG=0;
        __tmp__OV2K=result__SYJQ;
      };
    } break;
    case __WRITE_SLOT__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__OV2K=ANY__->object_id__WAZG;
      } else {
        result__GCRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__GCRQ;
        ANY__->object_id__XAZG=0;
        __tmp__OV2K=result__GCRQ;
      };
    } break;
    case __WRITE_LOCAL__: {
      if (ANY__->object_id__XAZG==0) {
        __tmp__OV2K=ANY__->object_id__WAZG;
      } else {
        result__HCRQ=object_counter__RAZG__SAZG;
        object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
        ANY__->object_id__WAZG=result__HCRQ;
        ANY__->object_id__XAZG=0;
        __tmp__OV2K=result__HCRQ;
      };
    } break;
    };
    append_in__4VC(((__INTEGER_32 )__tmp__OV2K),buffer__U1ZK);
    req_list__BV2K=((__SLOT_DATA *)Self__T1ZK->global__RHJK)->parent_variable__AJZD.require_list__UAEH;
    if (((void *)req_list__BV2K != (void *)NULL)) {
      Self__NKHL= 0;
      limit_up__OKHL=((__FAST_ARRAYoWRITEo *)req_list__BV2K)->parent_arrayed_collection__TAEH.upper__NPDI;
      while ((Self__NKHL <= limit_up__OKHL)) {
        add_last__YPK(buffer__U1ZK,',');
        switch (((struct ___OBJ *)((void **)((__FAST_ARRAYoWRITEo *)req_list__BV2K)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__NKHL])->__id) {
        case __WRITE_GLOBAL__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__AW2K=ANY__->object_id__WAZG;
          } else {
            result__TYJQ=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__TYJQ;
            ANY__->object_id__XAZG=0;
            __tmp__AW2K=result__TYJQ;
          };
        } break;
        case __WRITE_SLOT__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__AW2K=ANY__->object_id__WAZG;
          } else {
            result__Y2ZK=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__Y2ZK;
            ANY__->object_id__XAZG=0;
            __tmp__AW2K=result__Y2ZK;
          };
        } break;
        case __WRITE_LOCAL__: {
          if (ANY__->object_id__XAZG==0) {
            __tmp__AW2K=ANY__->object_id__WAZG;
          } else {
            result__D3ZK=object_counter__RAZG__SAZG;
            object_counter__RAZG__SAZG=(__INTEGER)(object_counter__RAZG__SAZG +  1);
            ANY__->object_id__WAZG=result__D3ZK;
            ANY__->object_id__XAZG=0;
            __tmp__AW2K=result__D3ZK;
          };
        } break;
        };
        append_in__4VC(((__INTEGER_32 )__tmp__AW2K),buffer__U1ZK);
        Self__NKHL=(__INTEGER)(Self__NKHL +  1);
      };
    };
  } else {
    add_last__YPK(buffer__U1ZK,'*');
  };
  append__MOK(buffer__U1ZK,(&__string_348));
  append_in__4VC(((__INTEGER_32 )((__SLOT_DATA *)Self__T1ZK->global__RHJK)->parent_variable__AJZD.ensure_count__QEAG),buffer__U1ZK);
  add_last__YPK(buffer__U1ZK,'>');
}

static void display__2PZM(__EXPR_NOT_LOGIC *Self__3PZM,void *buffer__4PZM)
// ({EXPR_NOT_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__BQZM;
  __IS_EXPANDED *Self__WE4P;
  add_last__YPK(buffer__4PZM,'(');
  add_last__YPK(buffer__4PZM,'!');
  add_last__YPK(buffer__4PZM,' ');
  __tmp__BQZM=Self__3PZM->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__BQZM)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__BQZM,buffer__4PZM);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __IS_EXPANDED__: {
    Self__WE4P=((__IS_EXPANDED *)__tmp__BQZM);
    append__MOK(buffer__4PZM,(&__string_259));
    display__MYFK(Self__WE4P->receiver__OO2H,buffer__4PZM);
    add_last__YPK(buffer__4PZM,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__BQZM,buffer__4PZM);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__BQZM,buffer__4PZM);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__BQZM,buffer__4PZM);
  } break;
  };
  add_last__YPK(buffer__4PZM,')');
}

static void display__NZEO(__EXPR_OR_LOGIC *Self__OZEO,void *buffer__PZEO)
// ({EXPR_OR_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__QZEO,*__tmp__SZEO;
  __IS_EXPANDED *Self__YE4P,*Self__0E4P;
  add_last__YPK(buffer__PZEO,'(');
  __tmp__QZEO=Self__OZEO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__QZEO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__QZEO,buffer__PZEO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __IS_EXPANDED__: {
    Self__YE4P=((__IS_EXPANDED *)__tmp__QZEO);
    append__MOK(buffer__PZEO,(&__string_259));
    display__MYFK(Self__YE4P->receiver__OO2H,buffer__PZEO);
    add_last__YPK(buffer__PZEO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__QZEO,buffer__PZEO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__QZEO,buffer__PZEO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__QZEO,buffer__PZEO);
  } break;
  };
  append__MOK(buffer__PZEO,(&__string_361));
  __tmp__SZEO=Self__OZEO->parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__SZEO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__SZEO,buffer__PZEO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __IS_EXPANDED__: {
    Self__0E4P=((__IS_EXPANDED *)__tmp__SZEO);
    append__MOK(buffer__PZEO,(&__string_259));
    display__MYFK(Self__0E4P->receiver__OO2H,buffer__PZEO);
    add_last__YPK(buffer__PZEO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__SZEO,buffer__PZEO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__SZEO,buffer__PZEO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__SZEO,buffer__PZEO);
  } break;
  };
  add_last__YPK(buffer__PZEO,')');
}

static void display__F4KO(__EXPR_OR_OR_LOGIC *Self__G4KO,void *buffer__H4KO)
// ({EXPR_OR_OR_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__I4KO,*__tmp__K4KO;
  __IS_EXPANDED *Self__2E4P,*Self__4E4P;
  add_last__YPK(buffer__H4KO,'(');
  __tmp__I4KO=Self__G4KO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__I4KO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__I4KO,buffer__H4KO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __IS_EXPANDED__: {
    Self__2E4P=((__IS_EXPANDED *)__tmp__I4KO);
    append__MOK(buffer__H4KO,(&__string_259));
    display__MYFK(Self__2E4P->receiver__OO2H,buffer__H4KO);
    add_last__YPK(buffer__H4KO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__I4KO,buffer__H4KO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__I4KO,buffer__H4KO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__I4KO,buffer__H4KO);
  } break;
  };
  append__MOK(buffer__H4KO,(&__string_362));
  __tmp__K4KO=Self__G4KO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__K4KO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__K4KO,buffer__H4KO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __IS_EXPANDED__: {
    Self__4E4P=((__IS_EXPANDED *)__tmp__K4KO);
    append__MOK(buffer__H4KO,(&__string_259));
    display__MYFK(Self__4E4P->receiver__OO2H,buffer__H4KO);
    add_last__YPK(buffer__H4KO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__K4KO,buffer__H4KO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__K4KO,buffer__H4KO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__K4KO,buffer__H4KO);
  } break;
  };
  add_last__YPK(buffer__H4KO,')');
}

static void display__TZEO(__EXPR_AND_LOGIC *Self__UZEO,void *buffer__VZEO)
// ({EXPR_AND_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__WZEO,*__tmp__YZEO;
  __IS_EXPANDED *Self__AF4P,*Self__CF4P;
  add_last__YPK(buffer__VZEO,'(');
  __tmp__WZEO=Self__UZEO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__WZEO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__WZEO,buffer__VZEO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __IS_EXPANDED__: {
    Self__AF4P=((__IS_EXPANDED *)__tmp__WZEO);
    append__MOK(buffer__VZEO,(&__string_259));
    display__MYFK(Self__AF4P->receiver__OO2H,buffer__VZEO);
    add_last__YPK(buffer__VZEO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__WZEO,buffer__VZEO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__WZEO,buffer__VZEO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__WZEO,buffer__VZEO);
  } break;
  };
  append__MOK(buffer__VZEO,(&__string_353));
  __tmp__YZEO=Self__UZEO->parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__YZEO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__YZEO,buffer__VZEO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __IS_EXPANDED__: {
    Self__CF4P=((__IS_EXPANDED *)__tmp__YZEO);
    append__MOK(buffer__VZEO,(&__string_259));
    display__MYFK(Self__CF4P->receiver__OO2H,buffer__VZEO);
    add_last__YPK(buffer__VZEO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__YZEO,buffer__VZEO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__YZEO,buffer__VZEO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__YZEO,buffer__VZEO);
  } break;
  };
  add_last__YPK(buffer__VZEO,')');
}

static void display__M4KO(__EXPR_AND_AND_LOGIC *Self__N4KO,void *buffer__O4KO)
// ({EXPR_AND_AND_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__P4KO,*__tmp__R4KO;
  __IS_EXPANDED *Self__EF4P,*Self__GF4P;
  add_last__YPK(buffer__O4KO,'(');
  __tmp__P4KO=Self__N4KO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__P4KO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__P4KO,buffer__O4KO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __IS_EXPANDED__: {
    Self__EF4P=((__IS_EXPANDED *)__tmp__P4KO);
    append__MOK(buffer__O4KO,(&__string_259));
    display__MYFK(Self__EF4P->receiver__OO2H,buffer__O4KO);
    add_last__YPK(buffer__O4KO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__P4KO,buffer__O4KO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__P4KO,buffer__O4KO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__P4KO,buffer__O4KO);
  } break;
  };
  append__MOK(buffer__O4KO,(&__string_363));
  __tmp__R4KO=Self__N4KO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__R4KO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__R4KO,buffer__O4KO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __IS_EXPANDED__: {
    Self__GF4P=((__IS_EXPANDED *)__tmp__R4KO);
    append__MOK(buffer__O4KO,(&__string_259));
    display__MYFK(Self__GF4P->receiver__OO2H,buffer__O4KO);
    add_last__YPK(buffer__O4KO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__R4KO,buffer__O4KO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__R4KO,buffer__O4KO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__R4KO,buffer__O4KO);
  } break;
  };
  add_last__YPK(buffer__O4KO,')');
}

static void display__VXJM(__EXPR_NEG *Self__WXJM,void *buffer__XXJM)
// ({EXPR_NEG},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__ZXJM;
  __IS_EXPANDED *Self__IF4P;
  add_last__YPK(buffer__XXJM,'(');
  add_last__YPK(buffer__XXJM,'-');
  add_last__YPK(buffer__XXJM,' ');
  __tmp__ZXJM=Self__WXJM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__ZXJM)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __IS_EXPANDED__: {
    Self__IF4P=((__IS_EXPANDED *)__tmp__ZXJM);
    append__MOK(buffer__XXJM,(&__string_259));
    display__MYFK(Self__IF4P->receiver__OO2H,buffer__XXJM);
    add_last__YPK(buffer__XXJM,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__ZXJM,buffer__XXJM);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__ZXJM,buffer__XXJM);
  } break;
  };
  add_last__YPK(buffer__XXJM,')');
}

static void display__52ML(__EXPR_ADD *Self__A3ML,void *buffer__B3ML)
// ({EXPR_ADD},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__C3ML,*__tmp__E3ML;
  __IS_EXPANDED *Self__KF4P,*Self__MF4P;
  add_last__YPK(buffer__B3ML,'(');
  __tmp__C3ML=Self__A3ML->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__C3ML)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__C3ML,buffer__B3ML);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __IS_EXPANDED__: {
    Self__KF4P=((__IS_EXPANDED *)__tmp__C3ML);
    append__MOK(buffer__B3ML,(&__string_259));
    display__MYFK(Self__KF4P->receiver__OO2H,buffer__B3ML);
    add_last__YPK(buffer__B3ML,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__C3ML,buffer__B3ML);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__C3ML,buffer__B3ML);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__C3ML,buffer__B3ML);
  } break;
  };
  append__MOK(buffer__B3ML,(&__string_364));
  __tmp__E3ML=Self__A3ML->parent_expr_binary__UZDL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__E3ML)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__E3ML,buffer__B3ML);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __IS_EXPANDED__: {
    Self__MF4P=((__IS_EXPANDED *)__tmp__E3ML);
    append__MOK(buffer__B3ML,(&__string_259));
    display__MYFK(Self__MF4P->receiver__OO2H,buffer__B3ML);
    add_last__YPK(buffer__B3ML,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__E3ML,buffer__B3ML);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__E3ML,buffer__B3ML);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__E3ML,buffer__B3ML);
  } break;
  };
  add_last__YPK(buffer__B3ML,')');
}

static void display__LKZM(__EXPR_NOT *Self__MKZM,void *buffer__NKZM)
// ({EXPR_NOT},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__PKZM;
  __IS_EXPANDED *Self__OF4P;
  add_last__YPK(buffer__NKZM,'(');
  add_last__YPK(buffer__NKZM,'~');
  add_last__YPK(buffer__NKZM,' ');
  __tmp__PKZM=Self__MKZM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__PKZM)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__PKZM,buffer__NKZM);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __IS_EXPANDED__: {
    Self__OF4P=((__IS_EXPANDED *)__tmp__PKZM);
    append__MOK(buffer__NKZM,(&__string_259));
    display__MYFK(Self__OF4P->receiver__OO2H,buffer__NKZM);
    add_last__YPK(buffer__NKZM,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__PKZM,buffer__NKZM);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__PKZM,buffer__NKZM);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__PKZM,buffer__NKZM);
  } break;
  };
  add_last__YPK(buffer__NKZM,')');
}

static void display__ZZEO(__EXPR_MOD *Self__0ZEO,void *buffer__1ZEO)
// ({EXPR_MOD},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__2ZEO,*__tmp__4ZEO;
  __IS_EXPANDED *Self__QF4P,*Self__SF4P;
  add_last__YPK(buffer__1ZEO,'(');
  __tmp__2ZEO=Self__0ZEO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__2ZEO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __IS_EXPANDED__: {
    Self__QF4P=((__IS_EXPANDED *)__tmp__2ZEO);
    append__MOK(buffer__1ZEO,(&__string_259));
    display__MYFK(Self__QF4P->receiver__OO2H,buffer__1ZEO);
    add_last__YPK(buffer__1ZEO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__2ZEO,buffer__1ZEO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__2ZEO,buffer__1ZEO);
  } break;
  };
  append__MOK(buffer__1ZEO,(&__string_365));
  __tmp__4ZEO=Self__0ZEO->parent_expr_binary__PDWL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__4ZEO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __IS_EXPANDED__: {
    Self__SF4P=((__IS_EXPANDED *)__tmp__4ZEO);
    append__MOK(buffer__1ZEO,(&__string_259));
    display__MYFK(Self__SF4P->receiver__OO2H,buffer__1ZEO);
    add_last__YPK(buffer__1ZEO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__4ZEO,buffer__1ZEO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__4ZEO,buffer__1ZEO);
  } break;
  };
  add_last__YPK(buffer__1ZEO,')');
}

static void display__VHEP(__EXPR_SUP_EQ *Self__WHEP,void *buffer__XHEP)
// ({EXPR_SUP_EQ},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__YHEP,*__tmp__0HEP,*__tmp__2HEP;
  void *__tmp__ZHEP;
  __IS_EXPANDED *Self__0F4P,*Self__2F4P;
  add_last__YPK(buffer__XHEP,'(');
  __tmp__YHEP=Self__WHEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__YHEP)->__id) {
  case __LIST__: {
    __tmp__ZHEP=static_type__GIQG(__tmp__YHEP);
  } break;
  case __STRING_CST__: {
    __tmp__ZHEP=((__STRING_CST *)__tmp__YHEP)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZHEP=((__EXTERNAL_C *)__tmp__YHEP)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__ZHEP=((__PROTOTYPE_CST *)__tmp__YHEP)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__ZHEP=((__INTEGER_CST *)__tmp__YHEP)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__ZHEP=((__LOCAL *)((__READ_LOCAL *)__tmp__YHEP)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZHEP=static_type__0N1H(__tmp__YHEP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZHEP=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZHEP=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__ZHEP=((__REAL_CST *)__tmp__YHEP)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__ZHEP=((__CHARACTER_CST *)__tmp__YHEP)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__ZHEP=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ZHEP=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__ZHEP=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__ZHEP=static_type__MP1H(__tmp__YHEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZHEP=static_type__SP1H(__tmp__YHEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZHEP=static_type__XP1H(__tmp__YHEP);
  } break;
  case __EXPR_AND__: {
    __tmp__ZHEP=static_type__2P1H(__tmp__YHEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZHEP=static_type__BQ1H(__tmp__YHEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZHEP=static_type__GQ1H(__tmp__YHEP);
  } break;
  case __PUT_TO__: {
    __tmp__ZHEP=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__ZHEP=static_type__PQ1H(__tmp__YHEP);
  } break;
  case __SIZE_OF__: {
    __tmp__ZHEP=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__ZHEP=((__CAST *)__tmp__YHEP)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__ZHEP=static_type__GIKL(__tmp__YHEP);
  } break;
  case __READ_SLOT__: {
    __tmp__ZHEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YHEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__ZHEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YHEP)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZHEP=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZHEP=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZHEP=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZHEP=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZHEP=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__ZHEP=static_type__Z2IM(__tmp__YHEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZHEP=static_type__IXML(__tmp__YHEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZHEP=static_type__BTXM(__tmp__YHEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZHEP=static_type__5LEO(__tmp__YHEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZHEP=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__ZHEP=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZHEP=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__ZHEP=static_type__NOPN(__tmp__YHEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZHEP=static_type__XCSO(__tmp__YHEP);
  } break;
  };
  append_name_in__FBYD(__tmp__ZHEP,buffer__XHEP);
  add_last__YPK(buffer__XHEP,' ');
  __tmp__0HEP=Self__WHEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__0HEP)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__0HEP,buffer__XHEP);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __IS_EXPANDED__: {
    Self__0F4P=((__IS_EXPANDED *)__tmp__0HEP);
    append__MOK(buffer__XHEP,(&__string_259));
    display__MYFK(Self__0F4P->receiver__OO2H,buffer__XHEP);
    add_last__YPK(buffer__XHEP,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__0HEP,buffer__XHEP);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__0HEP,buffer__XHEP);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__0HEP,buffer__XHEP);
  } break;
  };
  append__MOK(buffer__XHEP,(&__string_366));
  __tmp__2HEP=Self__WHEP->parent_expr_binary_cmp__EP1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__2HEP)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__2HEP,buffer__XHEP);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __IS_EXPANDED__: {
    Self__2F4P=((__IS_EXPANDED *)__tmp__2HEP);
    append__MOK(buffer__XHEP,(&__string_259));
    display__MYFK(Self__2F4P->receiver__OO2H,buffer__XHEP);
    add_last__YPK(buffer__XHEP,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__2HEP,buffer__XHEP);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__2HEP,buffer__XHEP);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__2HEP,buffer__XHEP);
  } break;
  };
  add_last__YPK(buffer__XHEP,')');
}

static void display__ZNQN(__EXPR_INF *Self__0NQN,void *buffer__1NQN)
// ({EXPR_INF},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__2NQN,*__tmp__4NQN,*__tmp__BOQN;
  void *__tmp__3NQN;
  __IS_EXPANDED *Self__EG4P,*Self__GG4P;
  add_last__YPK(buffer__1NQN,'(');
  __tmp__2NQN=Self__0NQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__2NQN)->__id) {
  case __LIST__: {
    __tmp__3NQN=static_type__GIQG(__tmp__2NQN);
  } break;
  case __STRING_CST__: {
    __tmp__3NQN=((__STRING_CST *)__tmp__2NQN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__3NQN=((__EXTERNAL_C *)__tmp__2NQN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__3NQN=((__PROTOTYPE_CST *)__tmp__2NQN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__3NQN=((__INTEGER_CST *)__tmp__2NQN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__3NQN=((__LOCAL *)((__READ_LOCAL *)__tmp__2NQN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3NQN=static_type__0N1H(__tmp__2NQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3NQN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3NQN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__3NQN=((__REAL_CST *)__tmp__2NQN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__3NQN=((__CHARACTER_CST *)__tmp__2NQN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__3NQN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3NQN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__3NQN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__3NQN=static_type__MP1H(__tmp__2NQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__3NQN=static_type__SP1H(__tmp__2NQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__3NQN=static_type__XP1H(__tmp__2NQN);
  } break;
  case __EXPR_AND__: {
    __tmp__3NQN=static_type__2P1H(__tmp__2NQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3NQN=static_type__BQ1H(__tmp__2NQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3NQN=static_type__GQ1H(__tmp__2NQN);
  } break;
  case __PUT_TO__: {
    __tmp__3NQN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__3NQN=static_type__PQ1H(__tmp__2NQN);
  } break;
  case __SIZE_OF__: {
    __tmp__3NQN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__3NQN=((__CAST *)__tmp__2NQN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__3NQN=static_type__GIKL(__tmp__2NQN);
  } break;
  case __READ_SLOT__: {
    __tmp__3NQN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__2NQN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__3NQN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__2NQN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3NQN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3NQN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3NQN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3NQN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3NQN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__3NQN=static_type__Z2IM(__tmp__2NQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__3NQN=static_type__IXML(__tmp__2NQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__3NQN=static_type__BTXM(__tmp__2NQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__3NQN=static_type__5LEO(__tmp__2NQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3NQN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__3NQN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3NQN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__3NQN=static_type__NOPN(__tmp__2NQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__3NQN=static_type__XCSO(__tmp__2NQN);
  } break;
  };
  append_name_in__FBYD(__tmp__3NQN,buffer__1NQN);
  add_last__YPK(buffer__1NQN,' ');
  __tmp__4NQN=Self__0NQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__4NQN)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__4NQN,buffer__1NQN);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __IS_EXPANDED__: {
    Self__EG4P=((__IS_EXPANDED *)__tmp__4NQN);
    append__MOK(buffer__1NQN,(&__string_259));
    display__MYFK(Self__EG4P->receiver__OO2H,buffer__1NQN);
    add_last__YPK(buffer__1NQN,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__4NQN,buffer__1NQN);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__4NQN,buffer__1NQN);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__4NQN,buffer__1NQN);
  } break;
  };
  append__MOK(buffer__1NQN,(&__string_261));
  __tmp__BOQN=Self__0NQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__BOQN)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__BOQN,buffer__1NQN);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __IS_EXPANDED__: {
    Self__GG4P=((__IS_EXPANDED *)__tmp__BOQN);
    append__MOK(buffer__1NQN,(&__string_259));
    display__MYFK(Self__GG4P->receiver__OO2H,buffer__1NQN);
    add_last__YPK(buffer__1NQN,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__BOQN,buffer__1NQN);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__BOQN,buffer__1NQN);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__BOQN,buffer__1NQN);
  } break;
  };
  add_last__YPK(buffer__1NQN,')');
}

static void display__COQN(__EXPR_INF_EQ *Self__DOQN,void *buffer__EOQN)
// ({EXPR_INF_EQ},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__FOQN,*__tmp__HOQN,*__tmp__KOQN;
  void *__tmp__GOQN;
  __IS_EXPANDED *Self__OG4P,*Self__QG4P;
  add_last__YPK(buffer__EOQN,'(');
  __tmp__FOQN=Self__DOQN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__FOQN)->__id) {
  case __LIST__: {
    __tmp__GOQN=static_type__GIQG(__tmp__FOQN);
  } break;
  case __STRING_CST__: {
    __tmp__GOQN=((__STRING_CST *)__tmp__FOQN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__GOQN=((__EXTERNAL_C *)__tmp__FOQN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__GOQN=((__PROTOTYPE_CST *)__tmp__FOQN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__GOQN=((__INTEGER_CST *)__tmp__FOQN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__GOQN=((__LOCAL *)((__READ_LOCAL *)__tmp__FOQN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__GOQN=static_type__0N1H(__tmp__FOQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__GOQN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__GOQN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__GOQN=((__REAL_CST *)__tmp__FOQN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__GOQN=((__CHARACTER_CST *)__tmp__FOQN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__GOQN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__GOQN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__GOQN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__GOQN=static_type__MP1H(__tmp__FOQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__GOQN=static_type__SP1H(__tmp__FOQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__GOQN=static_type__XP1H(__tmp__FOQN);
  } break;
  case __EXPR_AND__: {
    __tmp__GOQN=static_type__2P1H(__tmp__FOQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__GOQN=static_type__BQ1H(__tmp__FOQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__GOQN=static_type__GQ1H(__tmp__FOQN);
  } break;
  case __PUT_TO__: {
    __tmp__GOQN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__GOQN=static_type__PQ1H(__tmp__FOQN);
  } break;
  case __SIZE_OF__: {
    __tmp__GOQN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__GOQN=((__CAST *)__tmp__FOQN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__GOQN=static_type__GIKL(__tmp__FOQN);
  } break;
  case __READ_SLOT__: {
    __tmp__GOQN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__FOQN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__GOQN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__FOQN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__GOQN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__GOQN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__GOQN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__GOQN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__GOQN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__GOQN=static_type__Z2IM(__tmp__FOQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__GOQN=static_type__IXML(__tmp__FOQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__GOQN=static_type__BTXM(__tmp__FOQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__GOQN=static_type__5LEO(__tmp__FOQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__GOQN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__GOQN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__GOQN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__GOQN=static_type__NOPN(__tmp__FOQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__GOQN=static_type__XCSO(__tmp__FOQN);
  } break;
  };
  append_name_in__FBYD(__tmp__GOQN,buffer__EOQN);
  add_last__YPK(buffer__EOQN,' ');
  __tmp__HOQN=Self__DOQN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__HOQN)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__HOQN,buffer__EOQN);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __IS_EXPANDED__: {
    Self__OG4P=((__IS_EXPANDED *)__tmp__HOQN);
    append__MOK(buffer__EOQN,(&__string_259));
    display__MYFK(Self__OG4P->receiver__OO2H,buffer__EOQN);
    add_last__YPK(buffer__EOQN,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__HOQN,buffer__EOQN);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__HOQN,buffer__EOQN);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__HOQN,buffer__EOQN);
  } break;
  };
  append__MOK(buffer__EOQN,(&__string_367));
  __tmp__KOQN=Self__DOQN->parent_expr_binary_cmp__MR1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__KOQN)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__KOQN,buffer__EOQN);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __IS_EXPANDED__: {
    Self__QG4P=((__IS_EXPANDED *)__tmp__KOQN);
    append__MOK(buffer__EOQN,(&__string_259));
    display__MYFK(Self__QG4P->receiver__OO2H,buffer__EOQN);
    add_last__YPK(buffer__EOQN,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__KOQN,buffer__EOQN);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__KOQN,buffer__EOQN);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__KOQN,buffer__EOQN);
  } break;
  };
  add_last__YPK(buffer__EOQN,')');
}

static void display__R5PN(__EXPR_OR *Self__S5PN,void *buffer__T5PN)
// ({EXPR_OR},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__U5PN,*__tmp__W5PN;
  __IS_EXPANDED *Self__SG4P,*Self__UG4P;
  add_last__YPK(buffer__T5PN,'(');
  __tmp__U5PN=Self__S5PN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__U5PN)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__U5PN,buffer__T5PN);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __IS_EXPANDED__: {
    Self__SG4P=((__IS_EXPANDED *)__tmp__U5PN);
    append__MOK(buffer__T5PN,(&__string_259));
    display__MYFK(Self__SG4P->receiver__OO2H,buffer__T5PN);
    add_last__YPK(buffer__T5PN,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__U5PN,buffer__T5PN);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__U5PN,buffer__T5PN);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__U5PN,buffer__T5PN);
  } break;
  };
  append__MOK(buffer__T5PN,(&__string_361));
  __tmp__W5PN=Self__S5PN->parent_expr_binary__ET1M.right__OP2H;
  switch (((struct ___OBJ *)__tmp__W5PN)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__W5PN,buffer__T5PN);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __IS_EXPANDED__: {
    Self__UG4P=((__IS_EXPANDED *)__tmp__W5PN);
    append__MOK(buffer__T5PN,(&__string_259));
    display__MYFK(Self__UG4P->receiver__OO2H,buffer__T5PN);
    add_last__YPK(buffer__T5PN,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__W5PN,buffer__T5PN);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__W5PN,buffer__T5PN);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__W5PN,buffer__T5PN);
  } break;
  };
  add_last__YPK(buffer__T5PN,')');
}

static void display__SHUO(__EXPR_XOR *Self__THUO,void *buffer__UHUO)
// ({EXPR_XOR},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__VHUO,*__tmp__XHUO;
  __IS_EXPANDED *Self__WG4P,*Self__YG4P;
  add_last__YPK(buffer__UHUO,'(');
  __tmp__VHUO=Self__THUO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__VHUO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__VHUO,buffer__UHUO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __IS_EXPANDED__: {
    Self__WG4P=((__IS_EXPANDED *)__tmp__VHUO);
    append__MOK(buffer__UHUO,(&__string_259));
    display__MYFK(Self__WG4P->receiver__OO2H,buffer__UHUO);
    add_last__YPK(buffer__UHUO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__VHUO,buffer__UHUO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__VHUO,buffer__UHUO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__VHUO,buffer__UHUO);
  } break;
  };
  append__MOK(buffer__UHUO,(&__string_368));
  __tmp__XHUO=Self__THUO->parent_expr_binary__UA5N.right__OP2H;
  switch (((struct ___OBJ *)__tmp__XHUO)->__id) {
  case __LIST__: {
    display__2QQG(__tmp__XHUO,buffer__UHUO);
  } break;
  case __STRING_CST__: {
    display__SUFK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXTERNAL_C__: {
    display__2UFK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __PROTOTYPE_CST__: {
    display__BXFK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __INTEGER_CST__: {
    display__FXFK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __READ_LOCAL__: {
    display__MYFK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_EQUAL__: {
    display__E1FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    display__M1FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __REAL_CST__: {
    display__U1FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __CHARACTER_CST__: {
    display__Z1FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __IS_EXPANDED__: {
    Self__YG4P=((__IS_EXPANDED *)__tmp__XHUO);
    append__MOK(buffer__UHUO,(&__string_259));
    display__MYFK(Self__YG4P->receiver__OO2H,buffer__UHUO);
    add_last__YPK(buffer__UHUO,')');
  } break;
  case __GET_TYPE_ID__: {
    display__B2FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_SUP__: {
    display__F2FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_SUB__: {
    display__N2FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_MUL__: {
    display__T2FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_DIV__: {
    display__Z2FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_AND__: {
    display__52FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_SHIFT_R__: {
    display__F3FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_SHIFT_L__: {
    display__L3FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __PUT_TO__: {
    display__R3FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __ITEM__: {
    display__X3FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __SIZE_OF__: {
    display__23FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __CAST__: {
    display__A4FK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __CALL_SLOT__: {
    display__VNKL(__tmp__XHUO,buffer__UHUO);
  } break;
  case __READ_SLOT__: {
    display__N1ZK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __READ_GLOBAL__: {
    display__S1ZK(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    display__2PZM(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    display__NZEO(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    display__F4KO(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_AND_LOGIC__: {
    display__TZEO(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    display__M4KO(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_NEG__: {
    display__VXJM(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_ADD__: {
    display__52ML(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_NOT__: {
    display__LKZM(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_MOD__: {
    display__ZZEO(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_SUP_EQ__: {
    display__VHEP(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_INF__: {
    display__ZNQN(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_INF_EQ__: {
    display__COQN(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_OR__: {
    display__R5PN(__tmp__XHUO,buffer__UHUO);
  } break;
  case __EXPR_XOR__: {
    display__SHUO(__tmp__XHUO,buffer__UHUO);
  } break;
  };
  add_last__YPK(buffer__UHUO,')');
}

static void genere_declaration__Q2NI(__TYPE_FULL *Self__R2NI,void *buffer__S2NI)
// ({TYPE_FULL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__Z2NI,*__tmp__H3NI,*__tmp__N3NI;
  __TYPE *Self__JCRQ,*Self__LCRQ,*Self__OBVJ;
  __TYPE_NULL *Self__4FZQ,*Self__EGZQ,*Self__5BVJ;
  __TYPE_VOID *Self__AGZQ,*Self__GGZQ,*Self__QCVJ;
  __TYPE_CONTEXT *Self__CGZQ,*Self__IGZQ,*Self__BDVJ;
  __TYPE_GENERIC *Self__JAIQ,*Self__VDVJ;
  __PROFIL_BLOCK *Self__NAIQ;
  __BOOLEAN __tmp__12NI;
  if (((__UINTEGER_8)(Self__R2NI->flag__LTL &  1) !=  0)) {
    __tmp__Z2NI=Self__R2NI->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__Z2NI)->__id) {
    case __TYPE__: {
      Self__JCRQ=((__TYPE *)__tmp__Z2NI);
      append__MOK(buffer__S2NI,(&__string_92));
      append__MOK(buffer__S2NI,((__PROTOTYPE *)Self__JCRQ->prototype__RD)->parent_named__QD.name__1QB);
      add_genere_list__MK5I(Self__JCRQ);
    } break;
    case __TYPE_NULL__: {
      Self__4FZQ=((__TYPE_NULL *)__tmp__Z2NI);
      append__MOK(buffer__S2NI,(&__string_92));
      append__MOK(buffer__S2NI,(&__string_59));
      add_genere_list__ZL5I(Self__4FZQ);
    } break;
    case __TYPE_VOID__: {
      Self__AGZQ=((__TYPE_VOID *)__tmp__Z2NI);
      append__MOK(buffer__S2NI,(&__string_92));
      append__MOK(buffer__S2NI,(&__string_2));
      add_genere_list__GN5I(Self__AGZQ);
    } break;
    case __TYPE_CONTEXT__: {
      Self__CGZQ=((__TYPE_CONTEXT *)__tmp__Z2NI);
      append__MOK(buffer__S2NI,(&__string_92));
      append__MOK(buffer__S2NI,(&__string_44));
      add_genere_list__TO5I(Self__CGZQ);
    } break;
    case __TYPE_ID__: {
      append__MOK(buffer__S2NI,(&__string_92));
      append__MOK(buffer__S2NI,(&__string_46));
    } break;
    case __TYPE_GENERIC__: {
      Self__JAIQ=((__TYPE_GENERIC *)__tmp__Z2NI);
      append__MOK(buffer__S2NI,(&__string_92));
      append__MOK(buffer__S2NI,Self__JAIQ->intern_name__FS2B);
      add_genere_list__BQ5I(Self__JAIQ);
    } break;
    case __PROFIL_BLOCK__: {
      append__MOK(buffer__S2NI,(&__string_369));
    } break;
    };
    __tmp__12NI=TRUE__;
  } else {
    __tmp__12NI=FALSE__;
  };
  if ((! __tmp__12NI)) {
    if (((__UINTEGER_8)(Self__R2NI->flag__LTL &  4) !=  0)) {
      __tmp__H3NI=Self__R2NI->parent_type__KTL;
      switch (((struct ___OBJ *)__tmp__H3NI)->__id) {
      case __TYPE__: {
        Self__LCRQ=((__TYPE *)__tmp__H3NI);
        append__MOK(buffer__S2NI,(&__string_92));
        append__MOK(buffer__S2NI,((__PROTOTYPE *)Self__LCRQ->prototype__RD)->parent_named__QD.name__1QB);
        add_genere_list__MK5I(Self__LCRQ);
      } break;
      case __TYPE_NULL__: {
        Self__EGZQ=((__TYPE_NULL *)__tmp__H3NI);
        append__MOK(buffer__S2NI,(&__string_92));
        append__MOK(buffer__S2NI,(&__string_59));
        add_genere_list__ZL5I(Self__EGZQ);
      } break;
      case __TYPE_VOID__: {
        Self__GGZQ=((__TYPE_VOID *)__tmp__H3NI);
        append__MOK(buffer__S2NI,(&__string_92));
        append__MOK(buffer__S2NI,(&__string_2));
        add_genere_list__GN5I(Self__GGZQ);
      } break;
      case __TYPE_CONTEXT__: {
        Self__IGZQ=((__TYPE_CONTEXT *)__tmp__H3NI);
        append__MOK(buffer__S2NI,(&__string_92));
        append__MOK(buffer__S2NI,(&__string_44));
        add_genere_list__TO5I(Self__IGZQ);
      } break;
      case __TYPE_ID__: {
        append__MOK(buffer__S2NI,(&__string_92));
        append__MOK(buffer__S2NI,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        put_reference_declaration__55UJ(__tmp__H3NI,buffer__S2NI);
      } break;
      case __PROFIL_BLOCK__: {
        Self__NAIQ=((__PROFIL_BLOCK *)__tmp__H3NI);
        append__MOK(buffer__S2NI,(&__string_92));
        append__MOK(buffer__S2NI,Self__NAIQ->parent_profil__GHAG.name__XJEI);
        add_genere_list__NW0J(Self__NAIQ);
      } break;
      };
    } else {
      __tmp__N3NI=Self__R2NI->parent_type__KTL;
      switch (((struct ___OBJ *)__tmp__N3NI)->__id) {
      case __TYPE__: {
        Self__OBVJ=((__TYPE *)__tmp__N3NI);
        if (((void *)Self__OBVJ == (void *)type_block__BLB)) {
          append__MOK(buffer__S2NI,(&__string_92));
          append__MOK(buffer__S2NI,((__PROTOTYPE *)Self__OBVJ->prototype__RD)->parent_named__QD.name__1QB);
          add_genere_list__MK5I(Self__OBVJ);
        } else {
          append__MOK(buffer__S2NI,(&__string_89));
        };
      } break;
      case __TYPE_NULL__: {
        Self__5BVJ=((__TYPE_NULL *)__tmp__N3NI);
        if (((void *)Self__5BVJ == (void *)type_block__BLB)) {
          append__MOK(buffer__S2NI,(&__string_92));
          append__MOK(buffer__S2NI,(&__string_59));
          add_genere_list__ZL5I(Self__5BVJ);
        } else {
          append__MOK(buffer__S2NI,(&__string_89));
        };
      } break;
      case __TYPE_VOID__: {
        Self__QCVJ=((__TYPE_VOID *)__tmp__N3NI);
        if (((void *)Self__QCVJ == (void *)type_block__BLB)) {
          append__MOK(buffer__S2NI,(&__string_92));
          append__MOK(buffer__S2NI,(&__string_2));
          add_genere_list__GN5I(Self__QCVJ);
        } else {
          append__MOK(buffer__S2NI,(&__string_89));
        };
      } break;
      case __TYPE_CONTEXT__: {
        Self__BDVJ=((__TYPE_CONTEXT *)__tmp__N3NI);
        if (((void *)Self__BDVJ == (void *)type_block__BLB)) {
          append__MOK(buffer__S2NI,(&__string_92));
          append__MOK(buffer__S2NI,(&__string_44));
          add_genere_list__TO5I(Self__BDVJ);
        } else {
          append__MOK(buffer__S2NI,(&__string_89));
        };
      } break;
      case __TYPE_ID__: {
        append__MOK(buffer__S2NI,(&__string_370));
      } break;
      case __TYPE_GENERIC__: {
        Self__VDVJ=((__TYPE_GENERIC *)__tmp__N3NI);
        if (((void *)Self__VDVJ == (void *)type_block__BLB)) {
          append__MOK(buffer__S2NI,(&__string_92));
          append__MOK(buffer__S2NI,Self__VDVJ->intern_name__FS2B);
          add_genere_list__BQ5I(Self__VDVJ);
        } else {
          append__MOK(buffer__S2NI,(&__string_89));
        };
      } break;
      case __PROFIL_BLOCK__: {
        if (((void *)((__PROFIL_BLOCK *)__tmp__N3NI) == (void *)type_block__BLB)) {
          append__MOK(buffer__S2NI,(&__string_369));
        } else {
          append__MOK(buffer__S2NI,(&__string_89));
        };
      } break;
      };
    };
  };
}

static void genere_star_declaration__Q3NI(__TYPE_FULL *Self__R3NI,void *buffer__S3NI)
// ({TYPE_FULL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__D4NI;
  if (((! ((__UINTEGER_8)(Self__R3NI->flag__LTL &  1) !=  0)) || ((__UINTEGER_8)(Self__R3NI->flag__LTL &  16) !=  0))) {
    __tmp__D4NI=Self__R3NI->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__D4NI)->__id) {
    case __TYPE__: {
      put_reference_star_declaration__TE3I(__tmp__D4NI,buffer__S3NI);
    } break;
    case __TYPE_NULL__: {
      put_reference_star_declaration__4E3I(__tmp__D4NI,buffer__S3NI);
    } break;
    case __TYPE_VOID__: {
      put_reference_star_declaration__JF3I(__tmp__D4NI,buffer__S3NI);
    } break;
    case __TYPE_CONTEXT__: {
      put_reference_star_declaration__UF3I(__tmp__D4NI,buffer__S3NI);
    } break;
    case __TYPE_ID__: {
    } break;
    case __TYPE_GENERIC__: {
      put_reference_star_declaration__AG3I(__tmp__D4NI,buffer__S3NI);
    } break;
    case __PROFIL_BLOCK__: {
      put_reference_star_declaration__BDIJ(__tmp__D4NI,buffer__S3NI);
    } break;
    };
  };
}

static void genere__result__in__ESWM(void *v__GSWM,__BOOLEAN is_res__HSWM,void *buffer__ISWM)
// ({NULLxLOCAL},{TRUExFALSE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *ts__JSWM;
  ts__JSWM=((__LOCAL *)v__GSWM)->parent_variable__B2LC.type__125F;
  genere_declaration__Q2NI(ts__JSWM,buffer__ISWM);
  add_last__YPK(buffer__ISWM,' ');
  genere_star_declaration__Q3NI(ts__JSWM,buffer__ISWM);
  if (is_res__HSWM) {
    add_last__YPK(buffer__ISWM,'*');
  };
  append__MOK(buffer__ISWM,((__LOCAL *)v__GSWM)->parent_variable__B2LC.intern_name__025F);
}

static void genere__result__in__IQBK(void *v__KQBK,__BOOLEAN is_res__LQBK,void *buffer__MQBK)
// ({NULLxLOCAL},{TRUExFALSE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *ts__NQBK;
  ts__NQBK=((__LOCAL *)v__KQBK)->parent_variable__B2LC.type__125F;
  genere_declaration__Q2NI(ts__NQBK,buffer__MQBK);
  add_last__YPK(buffer__MQBK,' ');
  genere_star_declaration__Q3NI(ts__NQBK,buffer__MQBK);
  if (is_res__LQBK) {
    add_last__YPK(buffer__MQBK,'*');
  };
  append__MOK(buffer__MQBK,((__LOCAL *)v__KQBK)->parent_variable__B2LC.intern_name__025F);
}

static void genere__SFEK(__LIST *Self__TFEK,void *buffer__UFEK)
// ({LIST},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__ZFEK,Self__I4JK;
  void *__tmp__AGEK;
  __CHARACTER_CST *Self__3AIQ;
  __LOOP_END *Self__M2CN;
  append__MOK(buffer__UFEK,(&__string_269));
  append__MOK(indent__ZQOG,(&__string_143));
  __tmp__ZFEK=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__TFEK->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1);
  Self__I4JK= 1;
  while ((Self__I4JK <= __tmp__ZFEK)) {
    append__MOK(buffer__UFEK,indent__ZQOG);
    __tmp__AGEK=((void **)((__FAST_ARRAYoINSTRo *)Self__TFEK->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__I4JK -  1)];
    switch (((struct ___OBJ *)__tmp__AGEK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __PUSH__: {
      genere__JNFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __SWITCH__: {
      genere__T3IM(__tmp__AGEK,buffer__UFEK);
    } break;
    case __NODE_TYPE__: {
      display__KXFK(((__NODE_TYPE *)__tmp__AGEK),buffer__UFEK);
      append__MOK(buffer__UFEK,(&__string_270));
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__AGEK),buffer__UFEK);
      append__MOK(buffer__UFEK,(&__string_270));
    } break;
    case __NODE_STYLE__: {
      display__IZFK(((__NODE_STYLE *)__tmp__AGEK),buffer__UFEK);
      append__MOK(buffer__UFEK,(&__string_270));
    } break;
    case __WRITE_GLOBAL__: {
      genere__GPFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __WRITE_SLOT__: {
      genere__IQFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__UFEK,((__REAL_CST *)__tmp__AGEK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__3AIQ=((__CHARACTER_CST *)__tmp__AGEK);
      add_last__YPK(buffer__UFEK,'\'');
      append__MOK(buffer__UFEK,Self__3AIQ->text__HO2H);
      add_last__YPK(buffer__UFEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__AGEK,buffer__UFEK);
    } break;
    case __NOP__: {
      append__MOK(buffer__UFEK,(&__string_260));
      append__MOK(buffer__UFEK,(&__string_270));
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__AGEK,buffer__UFEK);
    } break;
    case __WRITE_LOCAL__: {
      genere__ZSFK(__tmp__AGEK,buffer__UFEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__UFEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__AGEK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__AGEK,buffer__UFEK);
    } break;
    case __LOOP__: {
      genere__WTXM(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__AGEK,buffer__UFEK);
    } break;
    case __LOOP_END__: {
      Self__M2CN=((__LOOP_END *)__tmp__AGEK);
      append__MOK(buffer__UFEK,(&__string_264));
      append__MOK(buffer__UFEK,((__LOOP *)Self__M2CN->loop__5WLM)->name__DILM);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__AGEK,buffer__UFEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__AGEK,buffer__UFEK);
    } break;
    };
    append__MOK(buffer__UFEK,(&__string_272));
    Self__I4JK=(__INTEGER)(Self__I4JK +  1);
  };
  remove_last__RLLB(indent__ZQOG, 2);
  append__MOK(buffer__UFEK,indent__ZQOG);
  add_last__YPK(buffer__UFEK,'}');
}

static void genere__EGEK(__STRING_CST *Self__FGEK,void *buffer__GGEK)
// ({STRING_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER idx__HGEK,cur__JGEK,val__IGEK;
  void *__tmp__SGEK;
  void *__tmp__VGEK;
  void *__tmp__WGEK;
  void *__tmp__GHEK;
  __HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *Self__H5JK;
  void *node__S5JK;
  idx__HGEK= 0;
  cur__JGEK= 0;
  if ((is_storage__KGEK__LGEK ==  0)) {
    __tmp__SGEK=type_string_constant__TKB;
    switch (((struct ___OBJ *)__tmp__SGEK)->__id) {
    case __TYPE__: {
      __tmp__VGEK=get_local_slot__H4EG(__tmp__SGEK,(&__string_88));
    } break;
    case __TYPE_NULL__: {
      __tmp__VGEK=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__VGEK=get_local_slot__1AFG(__tmp__SGEK,(&__string_88));
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__VGEK=get_local_slot__DDFG(__tmp__SGEK,(&__string_88));
    } break;
    case __TYPE_ID__: {
      __tmp__VGEK=get_local_slot__LFFG(__tmp__SGEK,(&__string_88));
    } break;
    case __TYPE_GENERIC__: {
      __tmp__VGEK=get_local_slot__THFG(__tmp__SGEK,(&__string_88));
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__VGEK=get_local_slot__05EJ((&__string_88));
    } break;
    };
    if (((struct ___OBJ *)__tmp__VGEK)->__id==__SLOT_DATA__) {
      __tmp__WGEK=((__SLOT *)((__SLOT_DATA *)__tmp__VGEK)->parent_slot__BJZD)->slot_data_intern__1JZD;
    } else {
      __tmp__WGEK=((__SLOT *)((__SLOT_CODE *)__tmp__VGEK)->parent_slot__Y22F)->slot_data_intern__1JZD;
    };
    if ((((__SLOT_DATA *)__tmp__WGEK)->parent_variable__AJZD.ensure_count__QEAG ==  0)) {
      is_storage__KGEK__LGEK= 1;
    } else {
      is_storage__KGEK__LGEK= 2;
    };
  };
  __tmp__GHEK=Self__FGEK->string__ZK2H;
  Self__H5JK=((__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *)dico_string__OD0D);
  node__S5JK=((void **)Self__H5JK->buckets__FKFF)[(__INTEGER)(hash_code__WPN(__tmp__GHEK) % Self__H5JK->capacity__AKFF)];
  while (((void *)((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node__S5JK)->key__RKFF != (void *)__tmp__GHEK)) {
    node__S5JK=((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node__S5JK)->next__2KFF;
  };
  val__IGEK=((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node__S5JK)->item__U11F;
  if ((val__IGEK >=  0)) {
    output_count__AG=(__INTEGER)(output_count__AG +  1);
    idx__HGEK=output_count__AG;
    cur__JGEK=(__INTEGER)(((__STRING *)output__HG)->count__VF -  1);
    append__MOK(output__HG,(&__string_371));
    append_in__4VC(((__INTEGER_32 )idx__HGEK),output__HG);
    append__MOK(output__HG,(&__string_372));
    if (is_late_binding__LQSK(Self__FGEK->parent_constant__5F.static_type__F4YD)) {
      append__MOK(output__HG,(&__string_373));
    };
    append_in__4VC(((__INTEGER_32 )val__IGEK),output__HG);
    if ((is_storage__KGEK__LGEK ==  2)) {
      append__MOK(output__HG,(&__string_190));
      append__MOK(output__HG,Self__FGEK->string__ZK2H);
      while (((__INTEGER)(((__STRING *)output__HG)->count__VF - cur__JGEK) >  78)) {
        insert_string__to__KMQG(output__HG,(&__string_374),(__INTEGER)(cur__JGEK +  78));
        cur__JGEK=(__INTEGER)(cur__JGEK +  78);
      };
      add_last__YPK(output__HG,'"');
    };
    append__MOK(output__HG,(&__string_295));
    fast_put__to__RJFF(dico_string__OD0D,(__INTEGER)(- idx__HGEK),Self__FGEK->string__ZK2H);
  } else {
    idx__HGEK=(__INTEGER)(- val__IGEK);
  };
  append__MOK(buffer__GGEK,(&__string_375));
  append_in__4VC(((__INTEGER_32 )idx__HGEK),buffer__GGEK);
  add_last__YPK(buffer__GGEK,')');
}

static void genere__JNFK(__PUSH *Self__KNFK,void *buffer__LNFK)
// ({PUSH},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__PNFK;
  __POSITION __tmp__TCLK,Self__FK2K;
  void *t__CCLK;
  __INTEGER j__BCLK,__tmp__A44Q,__tmp__F44Q,pos__HK2K,Self__TW5K;
  __INTEGER limit_up__UW5K,h__IN2K,idx__JN2K,idx__0GHL;
  __INTEGER new_capacity__1GHL,i__2GHL,typ_id__JJHL;
  __UINTEGER_32 id__MNFK,k__JITK,__tmp__RK2K,k__BN2K,sz__GJHL,a__NB0Q;
  __UINTEGER_32 new_size__LB0Q,t__RB0Q,a__TB0Q;
  void *src__IK2K;
  __STRING *Self__FB0Q,*result__2X5K;
  __POINTER ptr__EJHL;
  void *tab__ACLK;
  void **__tmp__D25Q,**__tmp__E25Q,**__tmp__F25Q;
  __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__IITK;
  __HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *Self__5M2K;
  void *node__SITK,*node__KN2K,*node1__4GHL,*node2__5GHL,*__tmp__XO2K;
  __CHARACTER char__JK2K;
  __CHARACTER *__tmp__L44Q;
  void **old_buckets__3GHL,**__tmp__W44Q,**__tmp__X44Q;
  __HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *result__DJHL;
  __HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *Self__QKPL;
  __tmp__PNFK=Self__KNFK->context__ZYPG;
  if ((((__LOCAL *)__tmp__PNFK)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '+')) {
    print__1ZE(((__LOCAL *)__tmp__PNFK)->parent_variable__B2LC.intern_name__025F);
    print__1ZE((&__string_376));
    fputc((int)(((__LOCAL *)__tmp__PNFK)->parent_variable__B2LC.parent_named__A2LC.style__LDGC),stdout);
    print__1ZE((&__string_377));
    __tmp__TCLK=((__LOCAL *)__tmp__PNFK)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    put_error__text__0AH( 2,(&__string_378));
    put_position__ECH(__tmp__TCLK);
    send_error__2FH();
  };
  t__CCLK=((__LOCAL *)__tmp__PNFK)->parent_variable__B2LC.type__125F;
  tab__ACLK=((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[size__P2BJ(((__LOCAL *)__tmp__PNFK)->parent_variable__B2LC.type__125F)];
  j__BCLK= 0;
  __tmp__A44Q=((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__D25Q=((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.storage__FXPG;
  while (((j__BCLK <= __tmp__A44Q) && ((void *)((__LOCAL *)((void **)__tmp__D25Q)[j__BCLK])->parent_variable__B2LC.type__125F != (void *)t__CCLK))) {
    j__BCLK=(__INTEGER)(j__BCLK +  1);
  };
  if ((j__BCLK > ((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.upper__TI4F)) {
    add_last__T2FH(tab__ACLK,__tmp__PNFK);
  } else {
    __tmp__F44Q=((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.upper__TI4F;
    __tmp__E25Q=((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.storage__FXPG;
    __tmp__F25Q=((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.storage__FXPG;
    while ((((j__BCLK <= __tmp__F44Q) && ((void *)((void **)__tmp__E25Q)[j__BCLK] != (void *)__tmp__PNFK)) && ((void *)((__LOCAL *)((void **)__tmp__F25Q)[j__BCLK])->parent_variable__B2LC.type__125F == (void *)t__CCLK))) {
      j__BCLK=(__INTEGER)(j__BCLK +  1);
    };
    if (((j__BCLK > ((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.upper__TI4F) || ((void *)((void **)((__FAST_ARRAYoLOCALo *)tab__ACLK)->parent_arrayed_collection__QI4F.storage__FXPG)[j__BCLK] != (void *)__tmp__PNFK))) {
      add__to__DU5K(tab__ACLK,__tmp__PNFK,j__BCLK);
    };
  };
  if (Self__KNFK->is_first__0YPG) {
    append__MOK(buffer__LNFK,(&__string_379));
  } else {
    append__MOK(buffer__LNFK,(&__string_380));
  };
  append__MOK(buffer__LNFK,((__LOCAL *)Self__KNFK->context__ZYPG)->parent_variable__B2LC.intern_name__025F);
  add_last__YPK(buffer__LNFK,',');
  id__MNFK=((__UINTEGER_32 )Self__KNFK->parent_instr__YRB.parent_itm_object__TE.position__BJM);
  if (debug_with_code__R1) {
    Self__IITK=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)source_line__ZRB);
    k__JITK=id__MNFK;
    node__SITK=((void **)Self__IITK->buckets__3GAE)[(__INTEGER)(((__INTEGER )id__MNFK) % Self__IITK->capacity__OYZD)];
    while ((! (((void *)node__SITK == (void *)NULL) || (((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node__SITK)->key__S10D == id__MNFK)))) {
      node__SITK=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node__SITK)->next__V3BE;
    };
    if ((! ((void *)node__SITK != (void *)NULL))) {
      Self__FK2K=Self__KNFK->parent_instr__YRB.parent_itm_object__TE.position__BJM;
      char__JK2K='\0';
      src__IK2K=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FK2K)) &  511)])->source__UFD;
      pos__HK2K= 1;
      __tmp__RK2K=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FK2K) >>  17) -  1);
      Self__TW5K= 1;
      limit_up__UW5K=((__INTEGER )__tmp__RK2K);
      __tmp__L44Q=((__STRING *)src__IK2K)->storage__XNK;
      while ((Self__TW5K <= limit_up__UW5K)) {
        while ((((__CHARACTER *)__tmp__L44Q)[(__INTEGER)(pos__HK2K -  1)] != '\n')) {
          pos__HK2K=(__INTEGER)(pos__HK2K +  1);
        };
        pos__HK2K=(__INTEGER)(pos__HK2K +  1);
        Self__TW5K=(__INTEGER)(Self__TW5K +  1);
      };
      ((__STRING *)string_tmp__RB)->count__VF= 0;
      while ((! ((pos__HK2K > ((__STRING *)src__IK2K)->count__VF) || (((__CHARACTER *)((__STRING *)src__IK2K)->storage__XNK)[(__INTEGER)(pos__HK2K -  1)] == '\n')))) {
        char__JK2K=((__CHARACTER *)((__STRING *)src__IK2K)->storage__XNK)[(__INTEGER)(pos__HK2K -  1)];
        if ((char__JK2K == '\\')) {
          add_last__YPK(string_tmp__RB,'\\');
        };
        if ((char__JK2K == '"')) {
          add_last__YPK(string_tmp__RB,'\\');
        };
        add_last__YPK(string_tmp__RB,char__JK2K);
        pos__HK2K=(__INTEGER)(pos__HK2K +  1);
      };
      Self__FB0Q=((__STRING *)string_tmp__RB);
      if ((((__INTEGER_8 )((__CHARACTER *)Self__FB0Q->storage__XNK)[(__INTEGER)(Self__FB0Q->count__VF -  1)]) ==  13)) {
        remove_last__RLLB(string_tmp__RB, 1);
      };
      result__2X5K=create__AXB(((__STRING *)string_tmp__RB)->count__VF);
      copy__BNK(result__2X5K,string_tmp__RB);
      Self__5M2K=((__HASHED_DICTIONARYoSTRINGxExpanded_UINTEGER_32o *)source_line__ZRB);
      k__BN2K=id__MNFK;
      h__IN2K=((__INTEGER )id__MNFK);
      idx__JN2K=(__INTEGER)(h__IN2K % Self__5M2K->capacity__OYZD);
      node__KN2K=((void **)Self__5M2K->buckets__3GAE)[idx__JN2K];
      while ((! (((void *)node__KN2K == (void *)NULL) || (((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node__KN2K)->key__S10D == id__MNFK)))) {
        node__KN2K=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node__KN2K)->next__V3BE;
      };
      if (((void *)node__KN2K == (void *)NULL)) {
        if ((Self__5M2K->capacity__OYZD == Self__5M2K->count__1RB)) {
          idx__0GHL= 0;
          node1__4GHL=NULL;
          node2__5GHL=NULL;
          old_buckets__3GHL=Self__5M2K->buckets__3GAE;
          new_capacity__1GHL=prime_number_ceiling__A4Q((__INTEGER)(Self__5M2K->capacity__OYZD +  1));
          Self__5M2K->buckets__3GAE=create__5CIE(new_capacity__1GHL);
          i__2GHL=(__INTEGER)(Self__5M2K->capacity__OYZD -  1);
          Self__5M2K->capacity__OYZD=new_capacity__1GHL;
          __tmp__W44Q=Self__5M2K->buckets__3GAE;
          __tmp__X44Q=Self__5M2K->buckets__3GAE;
          while ((i__2GHL >=  0)) {
            node1__4GHL=((void **)old_buckets__3GHL)[i__2GHL];
            while (((void *)node1__4GHL != (void *)NULL)) {
              node2__5GHL=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node1__4GHL)->next__V3BE;
              idx__0GHL=(__INTEGER)(((__INTEGER )((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node1__4GHL)->key__S10D) % new_capacity__1GHL);
              ((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node1__4GHL)->next__V3BE=((void **)__tmp__W44Q)[idx__0GHL];
              ((void **)__tmp__X44Q)[idx__0GHL]=node1__4GHL;
              node1__4GHL=node2__5GHL;
            };
            i__2GHL=(__INTEGER)(i__2GHL -  1);
          };
          Self__5M2K->cache_user__5GAE=(__INTEGER)(-  1);
          idx__JN2K=(__INTEGER)(h__IN2K % new_capacity__1GHL);
        };
        __tmp__XO2K=((void **)Self__5M2K->buckets__3GAE)[idx__JN2K];
        result__DJHL=NULL;
        ptr__EJHL=((__POINTER )(NULL));
        typ_id__JJHL= 0;
        sz__GJHL=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o));
        if ((sz__GJHL ==  0)) {
          result__DJHL=HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__;
        } else {
          typ_id__JJHL=__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__GJHL);
          if ((typ_id__JJHL == (__INTEGER)(-  1))) {
            a__NB0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__LB0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__GJHL + a__NB0Q) & (__UINTEGER_32)(~ a__NB0Q));
            ptr__EJHL=micro_alloc__table__lab__BOI(new_size__LB0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LB0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LB0Q);
          } else {
            t__RB0Q=((__UINTEGER_32 )typ_id__JJHL);
            a__TB0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__EJHL=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__GJHL + a__TB0Q) & (__UINTEGER_32)(~ a__TB0Q)),((__POINTER )(&(table_type[(t__RB0Q)]))),(__UINTEGER_32)(t__RB0Q |  1));
          };
          result__DJHL=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)ptr__EJHL);
          *(result__DJHL) = *(HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o__);
        };
        Self__QKPL=((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)result__DJHL);
        Self__QKPL->item__J20D=result__2X5K;
        Self__QKPL->key__S10D=id__MNFK;
        Self__QKPL->next__V3BE=__tmp__XO2K;
        node__KN2K=result__DJHL;
        ((void **)Self__5M2K->buckets__3GAE)[idx__JN2K]=result__DJHL;
        Self__5M2K->count__1RB=(__INTEGER)(Self__5M2K->count__1RB +  1);
        Self__5M2K->cache_user__5GAE=(__INTEGER)(-  1);
      } else {
        ((__HASHED_DICTIONARY_NODEoSTRINGxExpanded_UINTEGER_32o *)node__KN2K)->item__J20D=result__2X5K;
      };
    };
    add_last__YPK(buffer__LNFK,'L');
  };
  append_in__Z4H(id__MNFK,buffer__LNFK);
  add_last__YPK(buffer__LNFK,')');
  append__MOK(buffer__LNFK,(&__string_381));
  append_in__Z4H((__UINTEGER_32)(((__UINTEGER_32 )Self__KNFK->parent_instr__YRB.parent_itm_object__TE.position__BJM) >>  17),buffer__LNFK);
  add_last__YPK(buffer__LNFK,' ');
  append__MOK(buffer__LNFK,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__KNFK->parent_instr__YRB.parent_itm_object__TE.position__BJM)) &  511)])->parent_named__QD.name__1QB);
}

static void genere__OJEK(__EXTERNAL_C *Self__PJEK,void *buffer__QJEK)
// ({EXTERNAL_C},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  __INTEGER idx__RJEK,beg__SJEK,__tmp__NKEK,Self__KSSK,__tmp__UKEK;
  __INTEGER Self__OADL,__tmp__GLEK,Self__0SSK;
  void *__tmp__ALEK;
  __CHARACTER_CST *Self__PBIQ;
  idx__RJEK= 0;
  beg__SJEK= 0;
  if (((void *)((__TYPE_FULL *)Self__PJEK->static_type__UXZD)->parent_type__KTL != (void *)TYPE_VOID__)) {
    append__MOK(buffer__QJEK,(&__string_382));
    genere_declaration__Q2NI(Self__PJEK->static_type__UXZD,buffer__QJEK);
    add_last__YPK(buffer__QJEK,' ');
    genere_star_declaration__Q3NI(Self__PJEK->static_type__UXZD,buffer__QJEK);
    append__MOK(buffer__QJEK,(&__string_383));
  };
  if (((void *)Self__PJEK->access_list__XXZD != (void *)NULL)) {
    beg__SJEK= 1;
    idx__RJEK=index_of__since__ARSK(Self__PJEK->code__WXZD, 1);
    __tmp__NKEK=((__FAST_ARRAYoEXPRo *)Self__PJEK->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH;
    Self__KSSK= 0;
    while ((Self__KSSK <= __tmp__NKEK)) {
      __tmp__UKEK=(__INTEGER)(idx__RJEK -  1);
      Self__OADL=beg__SJEK;
      while ((Self__OADL <= __tmp__UKEK)) {
        add_last__YPK(buffer__QJEK,((__CHARACTER *)((__STRING_CONSTANT *)Self__PJEK->code__WXZD)->storage__C5K)[(__INTEGER)(Self__OADL -  1)]);
        Self__OADL=(__INTEGER)(Self__OADL +  1);
      };
      beg__SJEK=(__INTEGER)(idx__RJEK +  1);
      __tmp__ALEK=((void **)((__FAST_ARRAYoEXPRo *)Self__PJEK->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__KSSK];
      switch (((struct ___OBJ *)__tmp__ALEK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__ALEK),buffer__QJEK);
        append__MOK(buffer__QJEK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__QJEK,((__REAL_CST *)__tmp__ALEK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__PBIQ=((__CHARACTER_CST *)__tmp__ALEK);
        add_last__YPK(buffer__QJEK,'\'');
        append__MOK(buffer__QJEK,Self__PBIQ->text__HO2H);
        add_last__YPK(buffer__QJEK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__ALEK,buffer__QJEK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__ALEK,buffer__QJEK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__ALEK,buffer__QJEK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__QJEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ALEK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__ALEK,buffer__QJEK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__ALEK,buffer__QJEK);
      } break;
      };
      idx__RJEK=index_of__since__ARSK(Self__PJEK->code__WXZD,beg__SJEK);
      Self__KSSK=(__INTEGER)(Self__KSSK +  1);
    };
    __tmp__GLEK=((__STRING_CONSTANT *)Self__PJEK->code__WXZD)->count__XHB;
    Self__0SSK=beg__SJEK;
    while ((Self__0SSK <= __tmp__GLEK)) {
      add_last__YPK(buffer__QJEK,((__CHARACTER *)((__STRING_CONSTANT *)Self__PJEK->code__WXZD)->storage__C5K)[(__INTEGER)(Self__0SSK -  1)]);
      Self__0SSK=(__INTEGER)(Self__0SSK +  1);
    };
  } else {
    append__MOK(buffer__QJEK,Self__PJEK->code__WXZD);
  };
  if (((void *)((__TYPE_FULL *)Self__PJEK->static_type__UXZD)->parent_type__KTL != (void *)TYPE_VOID__)) {
    append__MOK(buffer__QJEK,(&__string_384));
  };
}

static void genere__AMEK(__PROTOTYPE_CST *Self__BMEK,void *buffer__CMEK)
// ({PROTOTYPE_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __TYPE_FULL *Self__JBKK;
  void *tb__LBKK,*__tmp__MCKK;
  void *__tmp__LCKK,*__tmp__YCKK,*__tmp__4CKK;
  __TYPE *Self__1ERQ,*Self__JQZK;
  __TYPE_VOID *Self__UGZQ,*Self__TQZK;
  __TYPE_CONTEXT *Self__WGZQ,*Self__ZQZK;
  __TYPE_GENERIC *Self__1BIQ,*Self__DRZK;
  __BOOLEAN __tmp__SCKK;
  Self__JBKK=((__TYPE_FULL *)Self__BMEK->parent_constant__E3LC.static_type__F4YD);
  tb__LBKK=NULL;
  if ((((((__UINTEGER_8)(Self__JBKK->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(Self__JBKK->flag__LTL &  16) !=  0))) && ((void *)Self__JBKK->parent_type__KTL != (void *)type_true__FJB)) && ((void *)Self__JBKK->parent_type__KTL != (void *)type_false__NJB))) {
    __tmp__LCKK=Self__JBKK->parent_type__KTL;
    if (__tmp__LCKK==NULL) {
      __tmp__MCKK=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__LCKK)->__id) {
      case __TYPE__: {
        __tmp__MCKK=NULL;
      } break;
      case __TYPE_NULL__: {
        __tmp__MCKK=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__MCKK=NULL;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__MCKK=NULL;
      } break;
      case __TYPE_ID__: {
        __tmp__MCKK=NULL;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__MCKK=NULL;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__MCKK=((void *)__tmp__LCKK);
      } break;
      }
    };
    tb__LBKK=__tmp__MCKK;
    __tmp__SCKK=((void *)__tmp__MCKK == (void *)NULL);
  } else {
    __tmp__SCKK=FALSE__;
  };
  if (__tmp__SCKK) {
    append__MOK(buffer__CMEK,(&__string_385));
    __tmp__YCKK=Self__JBKK->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__YCKK)->__id) {
    case __TYPE__: {
      Self__1ERQ=((__TYPE *)__tmp__YCKK);
      append__MOK(buffer__CMEK,((__PROTOTYPE *)Self__1ERQ->prototype__RD)->parent_named__QD.name__1QB);
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__MK5I(Self__1ERQ);
    } break;
    case __TYPE_NULL__: {
      append__MOK(buffer__CMEK,(&__string_59));
    } break;
    case __TYPE_VOID__: {
      Self__UGZQ=((__TYPE_VOID *)__tmp__YCKK);
      append__MOK(buffer__CMEK,(&__string_2));
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__GN5I(Self__UGZQ);
    } break;
    case __TYPE_CONTEXT__: {
      Self__WGZQ=((__TYPE_CONTEXT *)__tmp__YCKK);
      append__MOK(buffer__CMEK,(&__string_44));
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__TO5I(Self__WGZQ);
    } break;
    case __TYPE_ID__: {
      append_in__4VC(((__INTEGER_32 )((__TYPE_ID *)__tmp__YCKK)->parent_type__WIB.index__LJC),buffer__CMEK);
    } break;
    case __TYPE_GENERIC__: {
      Self__1BIQ=((__TYPE_GENERIC *)__tmp__YCKK);
      append__MOK(buffer__CMEK,Self__1BIQ->intern_name__FS2B);
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__BQ5I(Self__1BIQ);
    } break;
    case __PROFIL_BLOCK__: {
      append_in__4VC(((__INTEGER_32 )((__PROFIL_BLOCK *)__tmp__YCKK)->parent_type__HHAG.index__LJC),buffer__CMEK);
    } break;
    };
    add_last__YPK(buffer__CMEK,')');
  } else {
    __tmp__4CKK=Self__JBKK->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__4CKK)->__id) {
    case __TYPE__: {
      Self__JQZK=((__TYPE *)__tmp__4CKK);
      append__MOK(buffer__CMEK,((__PROTOTYPE *)Self__JQZK->prototype__RD)->parent_named__QD.name__1QB);
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__MK5I(Self__JQZK);
    } break;
    case __TYPE_NULL__: {
      append__MOK(buffer__CMEK,(&__string_59));
    } break;
    case __TYPE_VOID__: {
      Self__TQZK=((__TYPE_VOID *)__tmp__4CKK);
      append__MOK(buffer__CMEK,(&__string_2));
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__GN5I(Self__TQZK);
    } break;
    case __TYPE_CONTEXT__: {
      Self__ZQZK=((__TYPE_CONTEXT *)__tmp__4CKK);
      append__MOK(buffer__CMEK,(&__string_44));
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__TO5I(Self__ZQZK);
    } break;
    case __TYPE_ID__: {
      append_in__4VC(((__INTEGER_32 )((__TYPE_ID *)__tmp__4CKK)->parent_type__WIB.index__LJC),buffer__CMEK);
    } break;
    case __TYPE_GENERIC__: {
      Self__DRZK=((__TYPE_GENERIC *)__tmp__4CKK);
      append__MOK(buffer__CMEK,Self__DRZK->intern_name__FS2B);
      append__MOK(buffer__CMEK,(&__string_92));
      add_genere_list__BQ5I(Self__DRZK);
    } break;
    case __PROFIL_BLOCK__: {
      append_in__4VC(((__INTEGER_32 )((__PROFIL_BLOCK *)__tmp__4CKK)->parent_type__HHAG.index__LJC),buffer__CMEK);
    } break;
    };
  };
}

static void genere__EMEK(__INTEGER_CST *Self__FMEK,void *buffer__GMEK)
// ({INTEGER_CST},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __BOOLEAN __tmp__UMEK;
  add_last__YPK(buffer__GMEK,' ');
  append_in__PZWE(Self__FMEK->value__PAZD,buffer__GMEK);
  if ((Self__FMEK->value__PAZD >  4294967295LU)) {
    append__MOK(buffer__GMEK,(&__string_386));
    __tmp__UMEK=TRUE__;
  } else {
    __tmp__UMEK=FALSE__;
  };
  if ((! __tmp__UMEK)) {
    if ((Self__FMEK->value__PAZD >  2147483647)) {
      append__MOK(buffer__GMEK,(&__string_387));
    };
  };
}

static void genere__T3IM(__SWITCH *Self__U3IM,void *buffer__V3IM)
// ({SWITCH},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER first_case__X3IM,__tmp__QHIN,i__RLNN,__tmp__SCJM,Self__OPPM;
  void *wrt__03IM,*__tmp__P4IM;
  void *__tmp__O4IM;
  void *typ_first__Y3IM,*__tmp__NCJM,*__tmp__1CJM;
  void *__tmp__A5IM,*typ_id__Z3IM;
  void *__tmp__Q5IM,*__tmp__BAJM,*__tmp__HAJM,*__tmp__IAJM,*__tmp__OCJM;
  void *__tmp__R5IM,*__tmp__JAJM;
  __CHARACTER_CST *Self__ACIQ;
  __TYPE *Self__TFRQ,*Self__YTWM;
  __TYPE_GENERIC *Self__ICIQ,*Self__YUWM;
  __BOOLEAN __tmp__T4IM;
  __FAST_ARRAYoCASEo *Self__ZGIN;
  void **__tmp__PHIN,**Self__ILNN;
  first_case__X3IM= 0;
  wrt__03IM=NULL;
  if ((((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->id__QMAG == (void *)TYPE_NULL__) && (debug_level_option__3C ==  0))) {
    __tmp__O4IM=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
    if (__tmp__O4IM==NULL) {
      __tmp__P4IM=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__O4IM)->__id) {
      case __LIST__: {
        __tmp__P4IM=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__P4IM=NULL;
      } break;
      case __PUSH__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__P4IM=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__P4IM=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__P4IM=NULL;
      } break;
      case __SWITCH__: {
        __tmp__P4IM=NULL;
      } break;
      case __NODE_TYPE__: {
        __tmp__P4IM=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__P4IM=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__P4IM=NULL;
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__P4IM=((void *)__tmp__O4IM);
      } break;
      case __WRITE_SLOT__: {
        __tmp__P4IM=((void *)__tmp__O4IM);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__P4IM=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__P4IM=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__P4IM=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__P4IM=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__P4IM=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__P4IM=NULL;
      } break;
      case __ITEM__: {
        __tmp__P4IM=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__P4IM=NULL;
      } break;
      case __CAST__: {
        __tmp__P4IM=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__P4IM=NULL;
      } break;
      case __NOP__: {
        __tmp__P4IM=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__P4IM=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__P4IM=((void *)__tmp__O4IM);
      } break;
      case __READ_GLOBAL__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__P4IM=NULL;
      } break;
      case __LOOP__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__P4IM=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__P4IM=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__P4IM=NULL;
      } break;
      }
    };
    wrt__03IM=__tmp__P4IM;
    __tmp__T4IM=((void *)__tmp__P4IM == (void *)NULL);
  } else {
    __tmp__T4IM=FALSE__;
  };
  if (__tmp__T4IM) {
    Self__ZGIN=((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG);
    if ((Self__ZGIN->parent_arrayed_collection__CHAG.upper__HMAG ==  0)) {
      Self__ZGIN->parent_arrayed_collection__CHAG.storage__NYEJ=NULL;
      Self__ZGIN->parent_arrayed_collection__CHAG.capacity__Q2GJ= 0;
      Self__ZGIN->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(-  1);
    } else {
      __tmp__PHIN=Self__ZGIN->parent_arrayed_collection__CHAG.storage__NYEJ;
      __tmp__QHIN=Self__ZGIN->parent_arrayed_collection__CHAG.upper__HMAG;
      Self__ILNN=((void **)__tmp__PHIN);
      i__RLNN= 0;
      while ((i__RLNN != __tmp__QHIN)) {
        Self__ILNN[i__RLNN]=Self__ILNN[(__INTEGER)(i__RLNN +  1)];
        i__RLNN=(__INTEGER)(i__RLNN +  1);
      };
      Self__ZGIN->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(Self__ZGIN->parent_arrayed_collection__CHAG.upper__HMAG -  1);
    };
  };
  typ_first__Y3IM=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->id__QMAG;
  if (typ_first__Y3IM==NULL) {
    __tmp__A5IM=NULL;
  } else {
    switch (((struct ___OBJ *)typ_first__Y3IM)->__id) {
    case __TYPE__: {
      __tmp__A5IM=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__A5IM=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__A5IM=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__A5IM=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__A5IM=((void *)typ_first__Y3IM);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__A5IM=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__A5IM=NULL;
    } break;
    }
  };
  typ_id__Z3IM=__tmp__A5IM;
  if ((((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2) || ((void *)typ_first__Y3IM == (void *)TYPE_NULL__))) {
    append__MOK(buffer__V3IM,(&__string_388));
    __tmp__Q5IM=Self__U3IM->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__Q5IM)->__id) {
    case __LIST__: {
      __tmp__R5IM=static_type__GIQG(__tmp__Q5IM);
    } break;
    case __STRING_CST__: {
      __tmp__R5IM=((__STRING_CST *)__tmp__Q5IM)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__R5IM=((__EXTERNAL_C *)__tmp__Q5IM)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__R5IM=((__PROTOTYPE_CST *)__tmp__Q5IM)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__R5IM=((__INTEGER_CST *)__tmp__Q5IM)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__R5IM=((__LOCAL *)((__READ_LOCAL *)__tmp__Q5IM)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__R5IM=static_type__0N1H(__tmp__Q5IM);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__R5IM=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__R5IM=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__R5IM=((__REAL_CST *)__tmp__Q5IM)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__R5IM=((__CHARACTER_CST *)__tmp__Q5IM)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__R5IM=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__R5IM=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__R5IM=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__R5IM=static_type__MP1H(__tmp__Q5IM);
    } break;
    case __EXPR_MUL__: {
      __tmp__R5IM=static_type__SP1H(__tmp__Q5IM);
    } break;
    case __EXPR_DIV__: {
      __tmp__R5IM=static_type__XP1H(__tmp__Q5IM);
    } break;
    case __EXPR_AND__: {
      __tmp__R5IM=static_type__2P1H(__tmp__Q5IM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__R5IM=static_type__BQ1H(__tmp__Q5IM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__R5IM=static_type__GQ1H(__tmp__Q5IM);
    } break;
    case __PUT_TO__: {
      __tmp__R5IM=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__R5IM=static_type__PQ1H(__tmp__Q5IM);
    } break;
    case __SIZE_OF__: {
      __tmp__R5IM=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__R5IM=((__CAST *)__tmp__Q5IM)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__R5IM=static_type__GIKL(__tmp__Q5IM);
    } break;
    case __READ_SLOT__: {
      __tmp__R5IM=((__SLOT_DATA *)((__READ_SLOT *)__tmp__Q5IM)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__R5IM=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__Q5IM)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__R5IM=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__R5IM=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__R5IM=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__R5IM=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__R5IM=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__R5IM=static_type__Z2IM(__tmp__Q5IM);
    } break;
    case __EXPR_ADD__: {
      __tmp__R5IM=static_type__IXML(__tmp__Q5IM);
    } break;
    case __EXPR_NOT__: {
      __tmp__R5IM=static_type__BTXM(__tmp__Q5IM);
    } break;
    case __EXPR_MOD__: {
      __tmp__R5IM=static_type__5LEO(__tmp__Q5IM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__R5IM=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__R5IM=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__R5IM=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__R5IM=static_type__NOPN(__tmp__Q5IM);
    } break;
    case __EXPR_XOR__: {
      __tmp__R5IM=static_type__XCSO(__tmp__Q5IM);
    } break;
    };
    if ((((void *)((__TYPE_FULL *)__tmp__R5IM)->parent_type__KTL == (void *)type_block__BLB) && ((void *)typ_first__Y3IM == (void *)TYPE_NULL__))) {
      __tmp__BAJM=Self__U3IM->expr__MMFI;
      switch (((struct ___OBJ *)__tmp__BAJM)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__BAJM),buffer__V3IM);
        append__MOK(buffer__V3IM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__V3IM,((__REAL_CST *)__tmp__BAJM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__ACIQ=((__CHARACTER_CST *)__tmp__BAJM);
        add_last__YPK(buffer__V3IM,'\'');
        append__MOK(buffer__V3IM,Self__ACIQ->text__HO2H);
        add_last__YPK(buffer__V3IM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__BAJM,buffer__V3IM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__BAJM,buffer__V3IM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__BAJM,buffer__V3IM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__V3IM,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BAJM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__BAJM,buffer__V3IM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__BAJM,buffer__V3IM);
      } break;
      };
      append__MOK(buffer__V3IM,(&__string_389));
    } else {
      __tmp__HAJM=Self__U3IM->expr__MMFI;
      switch (((struct ___OBJ *)typ_first__Y3IM)->__id) {
      case __TYPE__: {
        put_access_id__in__5KPM(__tmp__HAJM,buffer__V3IM);
      } break;
      case __TYPE_NULL__: {
        put_access_id__in__5LPM(__tmp__HAJM,buffer__V3IM);
      } break;
      case __TYPE_VOID__: {
        put_access_id__in__DMPM(__tmp__HAJM,buffer__V3IM);
      } break;
      case __TYPE_CONTEXT__: {
        put_access_id__in__DNPM(__tmp__HAJM,buffer__V3IM);
      } break;
      case __TYPE_ID__: {
        put_access_id__in__DOPM(__tmp__HAJM,buffer__V3IM);
      } break;
      case __TYPE_GENERIC__: {
        put_access_id__in__HOPM(__tmp__HAJM,buffer__V3IM);
      } break;
      case __PROFIL_BLOCK__: {
        put_access_id__in__HPPM(__tmp__HAJM,buffer__V3IM);
      } break;
      };
      __tmp__IAJM=Self__U3IM->expr__MMFI;
      switch (((struct ___OBJ *)__tmp__IAJM)->__id) {
      case __LIST__: {
        __tmp__JAJM=static_type__GIQG(__tmp__IAJM);
      } break;
      case __STRING_CST__: {
        __tmp__JAJM=((__STRING_CST *)__tmp__IAJM)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__JAJM=((__EXTERNAL_C *)__tmp__IAJM)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__JAJM=((__PROTOTYPE_CST *)__tmp__IAJM)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__JAJM=((__INTEGER_CST *)__tmp__IAJM)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__JAJM=((__LOCAL *)((__READ_LOCAL *)__tmp__IAJM)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__JAJM=static_type__0N1H(__tmp__IAJM);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__JAJM=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__JAJM=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__JAJM=((__REAL_CST *)__tmp__IAJM)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__JAJM=((__CHARACTER_CST *)__tmp__IAJM)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__JAJM=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__JAJM=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__JAJM=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__JAJM=static_type__MP1H(__tmp__IAJM);
      } break;
      case __EXPR_MUL__: {
        __tmp__JAJM=static_type__SP1H(__tmp__IAJM);
      } break;
      case __EXPR_DIV__: {
        __tmp__JAJM=static_type__XP1H(__tmp__IAJM);
      } break;
      case __EXPR_AND__: {
        __tmp__JAJM=static_type__2P1H(__tmp__IAJM);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__JAJM=static_type__BQ1H(__tmp__IAJM);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__JAJM=static_type__GQ1H(__tmp__IAJM);
      } break;
      case __PUT_TO__: {
        __tmp__JAJM=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__JAJM=static_type__PQ1H(__tmp__IAJM);
      } break;
      case __SIZE_OF__: {
        __tmp__JAJM=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__JAJM=((__CAST *)__tmp__IAJM)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__JAJM=static_type__GIKL(__tmp__IAJM);
      } break;
      case __READ_SLOT__: {
        __tmp__JAJM=((__SLOT_DATA *)((__READ_SLOT *)__tmp__IAJM)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__JAJM=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__IAJM)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__JAJM=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__JAJM=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__JAJM=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__JAJM=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__JAJM=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__JAJM=static_type__Z2IM(__tmp__IAJM);
      } break;
      case __EXPR_ADD__: {
        __tmp__JAJM=static_type__IXML(__tmp__IAJM);
      } break;
      case __EXPR_NOT__: {
        __tmp__JAJM=static_type__BTXM(__tmp__IAJM);
      } break;
      case __EXPR_MOD__: {
        __tmp__JAJM=static_type__5LEO(__tmp__IAJM);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__JAJM=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__JAJM=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__JAJM=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__JAJM=static_type__NOPN(__tmp__IAJM);
      } break;
      case __EXPR_XOR__: {
        __tmp__JAJM=static_type__XCSO(__tmp__IAJM);
      } break;
      };
      if (((void *)((__TYPE_FULL *)__tmp__JAJM)->parent_type__KTL != (void *)type_boolean__VJB)) {
        append__MOK(buffer__V3IM,(&__string_349));
        switch (((struct ___OBJ *)typ_first__Y3IM)->__id) {
        case __TYPE__: {
          Self__TFRQ=((__TYPE *)typ_first__Y3IM);
          append__MOK(buffer__V3IM,(&__string_92));
          append__MOK(buffer__V3IM,((__PROTOTYPE *)Self__TFRQ->prototype__RD)->parent_named__QD.name__1QB);
          append__MOK(buffer__V3IM,(&__string_92));
        } break;
        case __TYPE_NULL__: {
          append__MOK(buffer__V3IM,(&__string_59));
        } break;
        case __TYPE_VOID__: {
          append__MOK(buffer__V3IM,(&__string_92));
          append__MOK(buffer__V3IM,(&__string_2));
          append__MOK(buffer__V3IM,(&__string_92));
        } break;
        case __TYPE_CONTEXT__: {
          append__MOK(buffer__V3IM,(&__string_92));
          append__MOK(buffer__V3IM,(&__string_44));
          append__MOK(buffer__V3IM,(&__string_92));
        } break;
        case __TYPE_ID__: {
          append_in__4VC(((__INTEGER_32 )((__TYPE_ID *)typ_first__Y3IM)->parent_type__WIB.index__LJC),buffer__V3IM);
        } break;
        case __TYPE_GENERIC__: {
          Self__ICIQ=((__TYPE_GENERIC *)typ_first__Y3IM);
          append__MOK(buffer__V3IM,(&__string_92));
          append__MOK(buffer__V3IM,Self__ICIQ->intern_name__FS2B);
          append__MOK(buffer__V3IM,(&__string_92));
        } break;
        case __PROFIL_BLOCK__: {
          append_in__4VC(((__INTEGER_32 )((__PROFIL_BLOCK *)typ_first__Y3IM)->parent_type__HHAG.index__LJC),buffer__V3IM);
        } break;
        };
      };
    };
    append__MOK(buffer__V3IM,(&__string_390));
    genere__SFEK(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG,buffer__V3IM);
    if (((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2)) {
      if ((! is_empty__UJVL(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG))) {
        append__MOK(buffer__V3IM,(&__string_391));
        genere__SFEK(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG,buffer__V3IM);
      };
      first_case__X3IM= 2;
    } else {
      append__MOK(buffer__V3IM,(&__string_392));
      append__MOK(indent__ZQOG,(&__string_143));
      append__MOK(buffer__V3IM,indent__ZQOG);
      first_case__X3IM= 1;
    };
  };
  if ((first_case__X3IM <= ((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG)) {
    polymorphic_counter__FI=(__INTEGER)(polymorphic_counter__FI +  1);
    append__MOK(buffer__V3IM,(&__string_393));
    __tmp__NCJM=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[first_case__X3IM])->id__QMAG;
    __tmp__OCJM=Self__U3IM->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__NCJM)->__id) {
    case __TYPE__: {
      put_access_id__in__5KPM(__tmp__OCJM,buffer__V3IM);
    } break;
    case __TYPE_NULL__: {
      put_access_id__in__5LPM(__tmp__OCJM,buffer__V3IM);
    } break;
    case __TYPE_VOID__: {
      put_access_id__in__DMPM(__tmp__OCJM,buffer__V3IM);
    } break;
    case __TYPE_CONTEXT__: {
      put_access_id__in__DNPM(__tmp__OCJM,buffer__V3IM);
    } break;
    case __TYPE_ID__: {
      put_access_id__in__DOPM(__tmp__OCJM,buffer__V3IM);
    } break;
    case __TYPE_GENERIC__: {
      put_access_id__in__HOPM(__tmp__OCJM,buffer__V3IM);
    } break;
    case __PROFIL_BLOCK__: {
      put_access_id__in__HPPM(__tmp__OCJM,buffer__V3IM);
    } break;
    };
    append__MOK(buffer__V3IM,(&__string_394));
    __tmp__SCJM=((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
    Self__OPPM=first_case__X3IM;
    while ((Self__OPPM <= __tmp__SCJM)) {
      append__MOK(buffer__V3IM,indent__ZQOG);
      append__MOK(buffer__V3IM,(&__string_395));
      __tmp__1CJM=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__OPPM])->id__QMAG;
      switch (((struct ___OBJ *)__tmp__1CJM)->__id) {
      case __TYPE__: {
        Self__YTWM=((__TYPE *)__tmp__1CJM);
        append__MOK(buffer__V3IM,(&__string_92));
        append__MOK(buffer__V3IM,((__PROTOTYPE *)Self__YTWM->prototype__RD)->parent_named__QD.name__1QB);
        append__MOK(buffer__V3IM,(&__string_92));
      } break;
      case __TYPE_NULL__: {
        append__MOK(buffer__V3IM,(&__string_59));
      } break;
      case __TYPE_VOID__: {
        append__MOK(buffer__V3IM,(&__string_92));
        append__MOK(buffer__V3IM,(&__string_2));
        append__MOK(buffer__V3IM,(&__string_92));
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(buffer__V3IM,(&__string_92));
        append__MOK(buffer__V3IM,(&__string_44));
        append__MOK(buffer__V3IM,(&__string_92));
      } break;
      case __TYPE_ID__: {
        append_in__4VC(((__INTEGER_32 )((__TYPE_ID *)__tmp__1CJM)->parent_type__WIB.index__LJC),buffer__V3IM);
      } break;
      case __TYPE_GENERIC__: {
        Self__YUWM=((__TYPE_GENERIC *)__tmp__1CJM);
        append__MOK(buffer__V3IM,(&__string_92));
        append__MOK(buffer__V3IM,Self__YUWM->intern_name__FS2B);
        append__MOK(buffer__V3IM,(&__string_92));
      } break;
      case __PROFIL_BLOCK__: {
        append_in__4VC(((__INTEGER_32 )((__PROFIL_BLOCK *)__tmp__1CJM)->parent_type__HHAG.index__LJC),buffer__V3IM);
      } break;
      };
      append__MOK(buffer__V3IM,(&__string_396));
      genere__SFEK(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__U3IM->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__OPPM])->code__BQAG,buffer__V3IM);
      add_last__YPK(buffer__V3IM,' ');
      append__MOK(buffer__V3IM,(&__string_397));
      Self__OPPM=(__INTEGER)(Self__OPPM +  1);
    };
    append__MOK(buffer__V3IM,indent__ZQOG);
    add_last__YPK(buffer__V3IM,'}');
    if ((first_case__X3IM !=  0)) {
      add_last__YPK(buffer__V3IM,'\n');
      remove_last__RLLB(indent__ZQOG, 2);
      append__MOK(buffer__V3IM,indent__ZQOG);
      add_last__YPK(buffer__V3IM,'}');
    };
  };
}

static void genere__FNEK(__READ_LOCAL *Self__GNEK,void *buffer__HNEK)
// ({READ_LOCAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__ZNEK;
  void *__tmp__0NEK,*tb__INEK;
  void *__tmp__AOEK;
  __POSITION pos__HS5K;
  void *t__XTSK;
  __INTEGER j__WTSK,__tmp__354Q,__tmp__CA5Q;
  void *tab__VTSK;
  void **__tmp__G25Q,**__tmp__H25Q,**__tmp__I25Q;
  if ((((__LOCAL *)Self__GNEK->local__ALZD)->parent_variable__B2LC.ensure_count__QEAG == (__INTEGER)(-  1))) {
    add_last__YPK(buffer__HNEK,'*');
  };
  append__MOK(buffer__HNEK,((__LOCAL *)Self__GNEK->local__ALZD)->parent_variable__B2LC.intern_name__025F);
  __tmp__ZNEK=((__TYPE_FULL *)((__LOCAL *)Self__GNEK->local__ALZD)->parent_variable__B2LC.type__125F)->parent_type__KTL;
  if (__tmp__ZNEK==NULL) {
    __tmp__0NEK=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__ZNEK)->__id) {
    case __TYPE__: {
      __tmp__0NEK=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__0NEK=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__0NEK=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__0NEK=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__0NEK=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__0NEK=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__0NEK=((void *)__tmp__ZNEK);
    } break;
    }
  };
  tb__INEK=__tmp__0NEK;
  if (((void *)__tmp__0NEK != (void *)NULL)) {
    __tmp__AOEK=Self__GNEK->local__ALZD;
    if ((((__LOCAL *)__tmp__AOEK)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '+')) {
      print__1ZE(((__LOCAL *)__tmp__AOEK)->parent_variable__B2LC.intern_name__025F);
      print__1ZE((&__string_376));
      fputc((int)(((__LOCAL *)__tmp__AOEK)->parent_variable__B2LC.parent_named__A2LC.style__LDGC),stdout);
      print__1ZE((&__string_377));
      pos__HS5K=((__LOCAL *)__tmp__AOEK)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      put_error__text__0AH( 2,(&__string_378));
      put_position__ECH(pos__HS5K);
      send_error__2FH();
    };
    t__XTSK=((__LOCAL *)__tmp__AOEK)->parent_variable__B2LC.type__125F;
    tab__VTSK=((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[size__P2BJ(((__LOCAL *)__tmp__AOEK)->parent_variable__B2LC.type__125F)];
    j__WTSK= 0;
    __tmp__354Q=((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.upper__TI4F;
    __tmp__G25Q=((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.storage__FXPG;
    while (((j__WTSK <= __tmp__354Q) && ((void *)((__LOCAL *)((void **)__tmp__G25Q)[j__WTSK])->parent_variable__B2LC.type__125F != (void *)t__XTSK))) {
      j__WTSK=(__INTEGER)(j__WTSK +  1);
    };
    if ((j__WTSK > ((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.upper__TI4F)) {
      add_last__T2FH(tab__VTSK,__tmp__AOEK);
    } else {
      __tmp__CA5Q=((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.upper__TI4F;
      __tmp__H25Q=((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.storage__FXPG;
      __tmp__I25Q=((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.storage__FXPG;
      while ((((j__WTSK <= __tmp__CA5Q) && ((void *)((void **)__tmp__H25Q)[j__WTSK] != (void *)__tmp__AOEK)) && ((void *)((__LOCAL *)((void **)__tmp__I25Q)[j__WTSK])->parent_variable__B2LC.type__125F == (void *)t__XTSK))) {
        j__WTSK=(__INTEGER)(j__WTSK +  1);
      };
      if (((j__WTSK > ((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.upper__TI4F) || ((void *)((void **)((__FAST_ARRAYoLOCALo *)tab__VTSK)->parent_arrayed_collection__QI4F.storage__FXPG)[j__WTSK] != (void *)__tmp__AOEK))) {
        add__to__DU5K(tab__VTSK,__tmp__AOEK,j__WTSK);
      };
    };
  };
}

static void genere__GPFK(__WRITE_GLOBAL *Self__HPFK,void *buffer__IPFK)
// ({WRITE_GLOBAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__KPFK;
  void *__tmp__OPFK;
  void *__tmp__PPFK;
  __tmp__KPFK=receiver_type__R12G(Self__HPFK->global__4U1H);
  switch (((struct ___OBJ *)__tmp__KPFK)->__id) {
  case __TYPE__: {
    add_genere_list__MK5I(__tmp__KPFK);
  } break;
  case __TYPE_NULL__: {
    add_genere_list__ZL5I(__tmp__KPFK);
  } break;
  case __TYPE_VOID__: {
    add_genere_list__GN5I(__tmp__KPFK);
  } break;
  case __TYPE_CONTEXT__: {
    add_genere_list__TO5I(__tmp__KPFK);
  } break;
  case __TYPE_ID__: {
  } break;
  case __TYPE_GENERIC__: {
    add_genere_list__BQ5I(__tmp__KPFK);
  } break;
  case __PROFIL_BLOCK__: {
    add_genere_list__NW0J(__tmp__KPFK);
  } break;
  };
  append__MOK(buffer__IPFK,((__SLOT_DATA *)Self__HPFK->global__4U1H)->parent_variable__AJZD.intern_name__025F);
  __tmp__OPFK=Self__HPFK->parent_write__QBGH.value__HBEH;
  switch (((struct ___OBJ *)__tmp__OPFK)->__id) {
  case __LIST__: {
    __tmp__PPFK=static_type__GIQG(__tmp__OPFK);
  } break;
  case __STRING_CST__: {
    __tmp__PPFK=((__STRING_CST *)__tmp__OPFK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__PPFK=((__EXTERNAL_C *)__tmp__OPFK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__PPFK=((__PROTOTYPE_CST *)__tmp__OPFK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__PPFK=((__INTEGER_CST *)__tmp__OPFK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__PPFK=((__LOCAL *)((__READ_LOCAL *)__tmp__OPFK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PPFK=static_type__0N1H(__tmp__OPFK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PPFK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PPFK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__PPFK=((__REAL_CST *)__tmp__OPFK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__PPFK=((__CHARACTER_CST *)__tmp__OPFK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__PPFK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__PPFK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__PPFK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__PPFK=static_type__MP1H(__tmp__OPFK);
  } break;
  case __EXPR_MUL__: {
    __tmp__PPFK=static_type__SP1H(__tmp__OPFK);
  } break;
  case __EXPR_DIV__: {
    __tmp__PPFK=static_type__XP1H(__tmp__OPFK);
  } break;
  case __EXPR_AND__: {
    __tmp__PPFK=static_type__2P1H(__tmp__OPFK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PPFK=static_type__BQ1H(__tmp__OPFK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PPFK=static_type__GQ1H(__tmp__OPFK);
  } break;
  case __PUT_TO__: {
    __tmp__PPFK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__PPFK=static_type__PQ1H(__tmp__OPFK);
  } break;
  case __SIZE_OF__: {
    __tmp__PPFK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__PPFK=((__CAST *)__tmp__OPFK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__PPFK=static_type__GIKL(__tmp__OPFK);
  } break;
  case __READ_SLOT__: {
    __tmp__PPFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__OPFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__PPFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__OPFK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PPFK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PPFK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PPFK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PPFK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PPFK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__PPFK=static_type__Z2IM(__tmp__OPFK);
  } break;
  case __EXPR_ADD__: {
    __tmp__PPFK=static_type__IXML(__tmp__OPFK);
  } break;
  case __EXPR_NOT__: {
    __tmp__PPFK=static_type__BTXM(__tmp__OPFK);
  } break;
  case __EXPR_MOD__: {
    __tmp__PPFK=static_type__5LEO(__tmp__OPFK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PPFK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__PPFK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PPFK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__PPFK=static_type__NOPN(__tmp__OPFK);
  } break;
  case __EXPR_XOR__: {
    __tmp__PPFK=static_type__XCSO(__tmp__OPFK);
  } break;
  };
  if ((((void *)((__TYPE_FULL *)__tmp__PPFK)->parent_type__KTL == (void *)TYPE_NULL__) && ((void *)((__TYPE_FULL *)((__SLOT_DATA *)Self__HPFK->global__4U1H)->parent_variable__AJZD.type__125F)->parent_type__KTL == (void *)type_block__BLB))) {
    append__MOK(buffer__IPFK,(&__string_398));
  } else {
    add_last__YPK(buffer__IPFK,'=');
    genere_value__0JTK(Self__HPFK,buffer__IPFK);
  };
}

static void genere__IQFK(__WRITE_SLOT *Self__JQFK,void *buffer__KQFK)
// ({WRITE_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *t__MQFK,*__tmp__OQFK;
  void *__tmp__PQFK,*__tmp__ARFK,*__tmp__ORFK,*__tmp__WRFK,*__tmp__1RFK;
  void *__tmp__QQFK,*__tmp__2RFK;
  __CHARACTER_CST *Self__JDIQ,*Self__SDIQ,*Self__4DIQ;
  __TYPE *Self__5FRQ;
  __TYPE_NULL *Self__CHZQ;
  __TYPE_VOID *Self__EHZQ;
  __TYPE_CONTEXT *Self__GHZQ;
  __PROFIL_BLOCK *Self__0DIQ;
  __BOOLEAN __tmp__CRFK;
  t__MQFK=NULL;
  __tmp__OQFK=receiver_type__R12G(Self__JQFK->slot__5T1H);
  switch (((struct ___OBJ *)__tmp__OQFK)->__id) {
  case __TYPE__: {
    add_genere_list__MK5I(__tmp__OQFK);
  } break;
  case __TYPE_NULL__: {
    add_genere_list__ZL5I(__tmp__OQFK);
  } break;
  case __TYPE_VOID__: {
    add_genere_list__GN5I(__tmp__OQFK);
  } break;
  case __TYPE_CONTEXT__: {
    add_genere_list__TO5I(__tmp__OQFK);
  } break;
  case __TYPE_ID__: {
  } break;
  case __TYPE_GENERIC__: {
    add_genere_list__BQ5I(__tmp__OQFK);
  } break;
  case __PROFIL_BLOCK__: {
    add_genere_list__NW0J(__tmp__OQFK);
  } break;
  };
  __tmp__PQFK=Self__JQFK->receiver__HU1H;
  switch (((struct ___OBJ *)__tmp__PQFK)->__id) {
  case __LIST__: {
    __tmp__QQFK=static_type__GIQG(__tmp__PQFK);
  } break;
  case __STRING_CST__: {
    __tmp__QQFK=((__STRING_CST *)__tmp__PQFK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__QQFK=((__EXTERNAL_C *)__tmp__PQFK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__QQFK=((__PROTOTYPE_CST *)__tmp__PQFK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__QQFK=((__INTEGER_CST *)__tmp__PQFK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__QQFK=((__LOCAL *)((__READ_LOCAL *)__tmp__PQFK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__QQFK=static_type__0N1H(__tmp__PQFK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__QQFK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__QQFK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__QQFK=((__REAL_CST *)__tmp__PQFK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__QQFK=((__CHARACTER_CST *)__tmp__PQFK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__QQFK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__QQFK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__QQFK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__QQFK=static_type__MP1H(__tmp__PQFK);
  } break;
  case __EXPR_MUL__: {
    __tmp__QQFK=static_type__SP1H(__tmp__PQFK);
  } break;
  case __EXPR_DIV__: {
    __tmp__QQFK=static_type__XP1H(__tmp__PQFK);
  } break;
  case __EXPR_AND__: {
    __tmp__QQFK=static_type__2P1H(__tmp__PQFK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__QQFK=static_type__BQ1H(__tmp__PQFK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__QQFK=static_type__GQ1H(__tmp__PQFK);
  } break;
  case __PUT_TO__: {
    __tmp__QQFK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__QQFK=static_type__PQ1H(__tmp__PQFK);
  } break;
  case __SIZE_OF__: {
    __tmp__QQFK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__QQFK=((__CAST *)__tmp__PQFK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__QQFK=static_type__GIKL(__tmp__PQFK);
  } break;
  case __READ_SLOT__: {
    __tmp__QQFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__PQFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__QQFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__PQFK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__QQFK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__QQFK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__QQFK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__QQFK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__QQFK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__QQFK=static_type__Z2IM(__tmp__PQFK);
  } break;
  case __EXPR_ADD__: {
    __tmp__QQFK=static_type__IXML(__tmp__PQFK);
  } break;
  case __EXPR_NOT__: {
    __tmp__QQFK=static_type__BTXM(__tmp__PQFK);
  } break;
  case __EXPR_MOD__: {
    __tmp__QQFK=static_type__5LEO(__tmp__PQFK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__QQFK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__QQFK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__QQFK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__QQFK=static_type__NOPN(__tmp__PQFK);
  } break;
  case __EXPR_XOR__: {
    __tmp__QQFK=static_type__XCSO(__tmp__PQFK);
  } break;
  };
  if ((((__UINTEGER_8)(((__TYPE_FULL *)__tmp__QQFK)->flag__LTL &  4) !=  0) || ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__QQFK)->flag__LTL &  16) !=  0))) {
    __tmp__ARFK=Self__JQFK->receiver__HU1H;
    switch (((struct ___OBJ *)__tmp__ARFK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__ARFK),buffer__KQFK);
      append__MOK(buffer__KQFK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__KQFK,((__REAL_CST *)__tmp__ARFK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__JDIQ=((__CHARACTER_CST *)__tmp__ARFK);
      add_last__YPK(buffer__KQFK,'\'');
      append__MOK(buffer__KQFK,Self__JDIQ->text__HO2H);
      add_last__YPK(buffer__KQFK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__ARFK,buffer__KQFK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__ARFK,buffer__KQFK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__ARFK,buffer__KQFK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__KQFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ARFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__ARFK,buffer__KQFK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__ARFK,buffer__KQFK);
    } break;
    };
    append__MOK(buffer__KQFK,(&__string_19));
    __tmp__CRFK=TRUE__;
  } else {
    __tmp__CRFK=FALSE__;
  };
  if ((! __tmp__CRFK)) {
    if (((__UINTEGER_8)(((__TYPE_FULL *)__tmp__QQFK)->flag__LTL &  1) !=  0)) {
      __tmp__ORFK=Self__JQFK->receiver__HU1H;
      switch (((struct ___OBJ *)__tmp__ORFK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__ORFK),buffer__KQFK);
        append__MOK(buffer__KQFK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__KQFK,((__REAL_CST *)__tmp__ORFK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__SDIQ=((__CHARACTER_CST *)__tmp__ORFK);
        add_last__YPK(buffer__KQFK,'\'');
        append__MOK(buffer__KQFK,Self__SDIQ->text__HO2H);
        add_last__YPK(buffer__KQFK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__ORFK,buffer__KQFK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__ORFK,buffer__KQFK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__ORFK,buffer__KQFK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__KQFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ORFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__ORFK,buffer__KQFK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__ORFK,buffer__KQFK);
      } break;
      };
      add_last__YPK(buffer__KQFK,'.');
    } else {
      append__MOK(buffer__KQFK,(&__string_382));
      t__MQFK=receiver_type__R12G(Self__JQFK->slot__5T1H);
      switch (((struct ___OBJ *)t__MQFK)->__id) {
      case __TYPE__: {
        Self__5FRQ=((__TYPE *)t__MQFK);
        append__MOK(buffer__KQFK,(&__string_92));
        append__MOK(buffer__KQFK,((__PROTOTYPE *)Self__5FRQ->prototype__RD)->parent_named__QD.name__1QB);
        add_genere_list__MK5I(Self__5FRQ);
      } break;
      case __TYPE_NULL__: {
        Self__CHZQ=((__TYPE_NULL *)t__MQFK);
        append__MOK(buffer__KQFK,(&__string_92));
        append__MOK(buffer__KQFK,(&__string_59));
        add_genere_list__ZL5I(Self__CHZQ);
      } break;
      case __TYPE_VOID__: {
        Self__EHZQ=((__TYPE_VOID *)t__MQFK);
        append__MOK(buffer__KQFK,(&__string_92));
        append__MOK(buffer__KQFK,(&__string_2));
        add_genere_list__GN5I(Self__EHZQ);
      } break;
      case __TYPE_CONTEXT__: {
        Self__GHZQ=((__TYPE_CONTEXT *)t__MQFK);
        append__MOK(buffer__KQFK,(&__string_92));
        append__MOK(buffer__KQFK,(&__string_44));
        add_genere_list__TO5I(Self__GHZQ);
      } break;
      case __TYPE_ID__: {
        append__MOK(buffer__KQFK,(&__string_92));
        append__MOK(buffer__KQFK,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        put_reference_declaration__55UJ(t__MQFK,buffer__KQFK);
      } break;
      case __PROFIL_BLOCK__: {
        Self__0DIQ=((__PROFIL_BLOCK *)t__MQFK);
        append__MOK(buffer__KQFK,(&__string_92));
        append__MOK(buffer__KQFK,Self__0DIQ->parent_profil__GHAG.name__XJEI);
        add_genere_list__NW0J(Self__0DIQ);
      } break;
      };
      add_last__YPK(buffer__KQFK,' ');
      switch (((struct ___OBJ *)t__MQFK)->__id) {
      case __TYPE__: {
        put_reference_star_declaration__TE3I(t__MQFK,buffer__KQFK);
      } break;
      case __TYPE_NULL__: {
        put_reference_star_declaration__4E3I(t__MQFK,buffer__KQFK);
      } break;
      case __TYPE_VOID__: {
        put_reference_star_declaration__JF3I(t__MQFK,buffer__KQFK);
      } break;
      case __TYPE_CONTEXT__: {
        put_reference_star_declaration__UF3I(t__MQFK,buffer__KQFK);
      } break;
      case __TYPE_ID__: {
      } break;
      case __TYPE_GENERIC__: {
        put_reference_star_declaration__AG3I(t__MQFK,buffer__KQFK);
      } break;
      case __PROFIL_BLOCK__: {
        put_reference_star_declaration__BDIJ(t__MQFK,buffer__KQFK);
      } break;
      };
      add_last__YPK(buffer__KQFK,')');
      __tmp__WRFK=Self__JQFK->receiver__HU1H;
      switch (((struct ___OBJ *)__tmp__WRFK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__WRFK),buffer__KQFK);
        append__MOK(buffer__KQFK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__KQFK,((__REAL_CST *)__tmp__WRFK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__4DIQ=((__CHARACTER_CST *)__tmp__WRFK);
        add_last__YPK(buffer__KQFK,'\'');
        append__MOK(buffer__KQFK,Self__4DIQ->text__HO2H);
        add_last__YPK(buffer__KQFK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__WRFK,buffer__KQFK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__WRFK,buffer__KQFK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__WRFK,buffer__KQFK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__KQFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__WRFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__WRFK,buffer__KQFK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__WRFK,buffer__KQFK);
      } break;
      };
      append__MOK(buffer__KQFK,(&__string_399));
    };
  };
  append__MOK(buffer__KQFK,((__SLOT_DATA *)Self__JQFK->slot__5T1H)->parent_variable__AJZD.intern_name__025F);
  __tmp__1RFK=Self__JQFK->parent_write__3BGH.value__HBEH;
  switch (((struct ___OBJ *)__tmp__1RFK)->__id) {
  case __LIST__: {
    __tmp__2RFK=static_type__GIQG(__tmp__1RFK);
  } break;
  case __STRING_CST__: {
    __tmp__2RFK=((__STRING_CST *)__tmp__1RFK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__2RFK=((__EXTERNAL_C *)__tmp__1RFK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__2RFK=((__PROTOTYPE_CST *)__tmp__1RFK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__2RFK=((__INTEGER_CST *)__tmp__1RFK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__2RFK=((__LOCAL *)((__READ_LOCAL *)__tmp__1RFK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2RFK=static_type__0N1H(__tmp__1RFK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2RFK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2RFK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__2RFK=((__REAL_CST *)__tmp__1RFK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__2RFK=((__CHARACTER_CST *)__tmp__1RFK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__2RFK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2RFK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__2RFK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__2RFK=static_type__MP1H(__tmp__1RFK);
  } break;
  case __EXPR_MUL__: {
    __tmp__2RFK=static_type__SP1H(__tmp__1RFK);
  } break;
  case __EXPR_DIV__: {
    __tmp__2RFK=static_type__XP1H(__tmp__1RFK);
  } break;
  case __EXPR_AND__: {
    __tmp__2RFK=static_type__2P1H(__tmp__1RFK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2RFK=static_type__BQ1H(__tmp__1RFK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2RFK=static_type__GQ1H(__tmp__1RFK);
  } break;
  case __PUT_TO__: {
    __tmp__2RFK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__2RFK=static_type__PQ1H(__tmp__1RFK);
  } break;
  case __SIZE_OF__: {
    __tmp__2RFK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__2RFK=((__CAST *)__tmp__1RFK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__2RFK=static_type__GIKL(__tmp__1RFK);
  } break;
  case __READ_SLOT__: {
    __tmp__2RFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__1RFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__2RFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1RFK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2RFK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2RFK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2RFK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2RFK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2RFK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__2RFK=static_type__Z2IM(__tmp__1RFK);
  } break;
  case __EXPR_ADD__: {
    __tmp__2RFK=static_type__IXML(__tmp__1RFK);
  } break;
  case __EXPR_NOT__: {
    __tmp__2RFK=static_type__BTXM(__tmp__1RFK);
  } break;
  case __EXPR_MOD__: {
    __tmp__2RFK=static_type__5LEO(__tmp__1RFK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2RFK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__2RFK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2RFK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__2RFK=static_type__NOPN(__tmp__1RFK);
  } break;
  case __EXPR_XOR__: {
    __tmp__2RFK=static_type__XCSO(__tmp__1RFK);
  } break;
  };
  if ((((void *)((__TYPE_FULL *)__tmp__2RFK)->parent_type__KTL == (void *)TYPE_NULL__) && ((void *)((__TYPE_FULL *)((__SLOT_DATA *)Self__JQFK->slot__5T1H)->parent_variable__AJZD.type__125F)->parent_type__KTL == (void *)type_block__BLB))) {
    append__MOK(buffer__KQFK,(&__string_398));
  } else {
    add_last__YPK(buffer__KQFK,'=');
    genere_value__LNTK(Self__JQFK,buffer__KQFK);
  };
}

static void genere__HOEK(__EXPR_EQUAL *Self__IOEK,void *buffer__JOEK)
// ({EXPR_EQUAL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__CPEK,*__tmp__OPEK,*__tmp__WPEK,*__tmp__HQEK,*__tmp__IQEK;
  void *__tmp__EREK,*__tmp__QREK,*__tmp__YREK,*__tmp__JSEK,*__tmp__KSEK;
  void *__tmp__DPEK,*__tmp__PPEK,*__tmp__XPEK,*__tmp__JQEK,*__tmp__FREK;
  void *__tmp__RREK,*__tmp__ZREK,*__tmp__LSEK;
  __CHARACTER_CST *Self__HEIQ,*Self__QEIQ;
  __BOOLEAN __tmp__3OEK,__tmp__2PEK,__tmp__5QEK,__tmp__4REK;
  if (((void *)((__TYPE_FULL *)static_type__TO1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__JOEK,(&__string_400));
  };
  add_last__YPK(buffer__JOEK,'(');
  if (((void *)((__TYPE_FULL *)static_type__TO1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__JOEK,(&__string_401));
    __tmp__3OEK=TRUE__;
  } else {
    __tmp__3OEK=FALSE__;
  };
  if ((! __tmp__3OEK)) {
    __tmp__CPEK=Self__IOEK->parent_expr_binary_cmp__1LJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__CPEK)->__id) {
    case __LIST__: {
      __tmp__DPEK=static_type__GIQG(__tmp__CPEK);
    } break;
    case __STRING_CST__: {
      __tmp__DPEK=((__STRING_CST *)__tmp__CPEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__DPEK=((__EXTERNAL_C *)__tmp__CPEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DPEK=((__PROTOTYPE_CST *)__tmp__CPEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__DPEK=((__INTEGER_CST *)__tmp__CPEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__DPEK=((__LOCAL *)((__READ_LOCAL *)__tmp__CPEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DPEK=static_type__0N1H(__tmp__CPEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DPEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DPEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__DPEK=((__REAL_CST *)__tmp__CPEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__DPEK=((__CHARACTER_CST *)__tmp__CPEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__DPEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DPEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__DPEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__DPEK=static_type__MP1H(__tmp__CPEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__DPEK=static_type__SP1H(__tmp__CPEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__DPEK=static_type__XP1H(__tmp__CPEK);
    } break;
    case __EXPR_AND__: {
      __tmp__DPEK=static_type__2P1H(__tmp__CPEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DPEK=static_type__BQ1H(__tmp__CPEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DPEK=static_type__GQ1H(__tmp__CPEK);
    } break;
    case __PUT_TO__: {
      __tmp__DPEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__DPEK=static_type__PQ1H(__tmp__CPEK);
    } break;
    case __SIZE_OF__: {
      __tmp__DPEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__DPEK=((__CAST *)__tmp__CPEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__DPEK=static_type__GIKL(__tmp__CPEK);
    } break;
    case __READ_SLOT__: {
      __tmp__DPEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__CPEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__DPEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__CPEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DPEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DPEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DPEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DPEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DPEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__DPEK=static_type__Z2IM(__tmp__CPEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__DPEK=static_type__IXML(__tmp__CPEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__DPEK=static_type__BTXM(__tmp__CPEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__DPEK=static_type__5LEO(__tmp__CPEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DPEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__DPEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DPEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__DPEK=static_type__NOPN(__tmp__CPEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__DPEK=static_type__XCSO(__tmp__CPEK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__DPEK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__JOEK,(&__string_400));
    };
  };
  __tmp__OPEK=Self__IOEK->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__OPEK)->__id) {
  case __LIST__: {
    __tmp__PPEK=static_type__GIQG(__tmp__OPEK);
  } break;
  case __STRING_CST__: {
    __tmp__PPEK=((__STRING_CST *)__tmp__OPEK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__PPEK=((__EXTERNAL_C *)__tmp__OPEK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__PPEK=((__PROTOTYPE_CST *)__tmp__OPEK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__PPEK=((__INTEGER_CST *)__tmp__OPEK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__PPEK=((__LOCAL *)((__READ_LOCAL *)__tmp__OPEK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PPEK=static_type__0N1H(__tmp__OPEK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PPEK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PPEK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__PPEK=((__REAL_CST *)__tmp__OPEK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__PPEK=((__CHARACTER_CST *)__tmp__OPEK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__PPEK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__PPEK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__PPEK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__PPEK=static_type__MP1H(__tmp__OPEK);
  } break;
  case __EXPR_MUL__: {
    __tmp__PPEK=static_type__SP1H(__tmp__OPEK);
  } break;
  case __EXPR_DIV__: {
    __tmp__PPEK=static_type__XP1H(__tmp__OPEK);
  } break;
  case __EXPR_AND__: {
    __tmp__PPEK=static_type__2P1H(__tmp__OPEK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PPEK=static_type__BQ1H(__tmp__OPEK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PPEK=static_type__GQ1H(__tmp__OPEK);
  } break;
  case __PUT_TO__: {
    __tmp__PPEK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__PPEK=static_type__PQ1H(__tmp__OPEK);
  } break;
  case __SIZE_OF__: {
    __tmp__PPEK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__PPEK=((__CAST *)__tmp__OPEK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__PPEK=static_type__GIKL(__tmp__OPEK);
  } break;
  case __READ_SLOT__: {
    __tmp__PPEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__OPEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__PPEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__OPEK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PPEK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PPEK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PPEK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PPEK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PPEK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__PPEK=static_type__Z2IM(__tmp__OPEK);
  } break;
  case __EXPR_ADD__: {
    __tmp__PPEK=static_type__IXML(__tmp__OPEK);
  } break;
  case __EXPR_NOT__: {
    __tmp__PPEK=static_type__BTXM(__tmp__OPEK);
  } break;
  case __EXPR_MOD__: {
    __tmp__PPEK=static_type__5LEO(__tmp__OPEK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PPEK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__PPEK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PPEK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__PPEK=static_type__NOPN(__tmp__OPEK);
  } break;
  case __EXPR_XOR__: {
    __tmp__PPEK=static_type__XCSO(__tmp__OPEK);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__PPEK)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__WPEK=Self__IOEK->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__WPEK)->__id) {
    case __LIST__: {
      __tmp__XPEK=static_type__GIQG(__tmp__WPEK);
    } break;
    case __STRING_CST__: {
      __tmp__XPEK=((__STRING_CST *)__tmp__WPEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__XPEK=((__EXTERNAL_C *)__tmp__WPEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__XPEK=((__PROTOTYPE_CST *)__tmp__WPEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__XPEK=((__INTEGER_CST *)__tmp__WPEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__XPEK=((__LOCAL *)((__READ_LOCAL *)__tmp__WPEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__XPEK=static_type__0N1H(__tmp__WPEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__XPEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__XPEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__XPEK=((__REAL_CST *)__tmp__WPEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__XPEK=((__CHARACTER_CST *)__tmp__WPEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__XPEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__XPEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__XPEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__XPEK=static_type__MP1H(__tmp__WPEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__XPEK=static_type__SP1H(__tmp__WPEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__XPEK=static_type__XP1H(__tmp__WPEK);
    } break;
    case __EXPR_AND__: {
      __tmp__XPEK=static_type__2P1H(__tmp__WPEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__XPEK=static_type__BQ1H(__tmp__WPEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__XPEK=static_type__GQ1H(__tmp__WPEK);
    } break;
    case __PUT_TO__: {
      __tmp__XPEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__XPEK=static_type__PQ1H(__tmp__WPEK);
    } break;
    case __SIZE_OF__: {
      __tmp__XPEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__XPEK=((__CAST *)__tmp__WPEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__XPEK=static_type__GIKL(__tmp__WPEK);
    } break;
    case __READ_SLOT__: {
      __tmp__XPEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__WPEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__XPEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__WPEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__XPEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__XPEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__XPEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__XPEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__XPEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__XPEK=static_type__Z2IM(__tmp__WPEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__XPEK=static_type__IXML(__tmp__WPEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__XPEK=static_type__BTXM(__tmp__WPEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__XPEK=static_type__5LEO(__tmp__WPEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__XPEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__XPEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__XPEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__XPEK=static_type__NOPN(__tmp__WPEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__XPEK=static_type__XCSO(__tmp__WPEK);
    } break;
    };
    __tmp__2PEK=((void *)((__TYPE_FULL *)__tmp__XPEK)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__2PEK=FALSE__;
  };
  if (__tmp__2PEK) {
    add_last__YPK(buffer__JOEK,'0');
  } else {
    __tmp__HQEK=Self__IOEK->parent_expr_binary_cmp__1LJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__HQEK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__HQEK),buffer__JOEK);
      append__MOK(buffer__JOEK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__JOEK,((__REAL_CST *)__tmp__HQEK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__HEIQ=((__CHARACTER_CST *)__tmp__HQEK);
      add_last__YPK(buffer__JOEK,'\'');
      append__MOK(buffer__JOEK,Self__HEIQ->text__HO2H);
      add_last__YPK(buffer__JOEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__HQEK,buffer__JOEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__HQEK,buffer__JOEK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__HQEK,buffer__JOEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__JOEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__HQEK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__HQEK,buffer__JOEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__HQEK,buffer__JOEK);
    } break;
    };
    __tmp__IQEK=Self__IOEK->parent_expr_binary_cmp__1LJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__IQEK)->__id) {
    case __LIST__: {
      __tmp__JQEK=static_type__GIQG(__tmp__IQEK);
    } break;
    case __STRING_CST__: {
      __tmp__JQEK=((__STRING_CST *)__tmp__IQEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__JQEK=((__EXTERNAL_C *)__tmp__IQEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JQEK=((__PROTOTYPE_CST *)__tmp__IQEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__JQEK=((__INTEGER_CST *)__tmp__IQEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__JQEK=((__LOCAL *)((__READ_LOCAL *)__tmp__IQEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JQEK=static_type__0N1H(__tmp__IQEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JQEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JQEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__JQEK=((__REAL_CST *)__tmp__IQEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__JQEK=((__CHARACTER_CST *)__tmp__IQEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__JQEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JQEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__JQEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__JQEK=static_type__MP1H(__tmp__IQEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__JQEK=static_type__SP1H(__tmp__IQEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__JQEK=static_type__XP1H(__tmp__IQEK);
    } break;
    case __EXPR_AND__: {
      __tmp__JQEK=static_type__2P1H(__tmp__IQEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JQEK=static_type__BQ1H(__tmp__IQEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JQEK=static_type__GQ1H(__tmp__IQEK);
    } break;
    case __PUT_TO__: {
      __tmp__JQEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__JQEK=static_type__PQ1H(__tmp__IQEK);
    } break;
    case __SIZE_OF__: {
      __tmp__JQEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__JQEK=((__CAST *)__tmp__IQEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__JQEK=static_type__GIKL(__tmp__IQEK);
    } break;
    case __READ_SLOT__: {
      __tmp__JQEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__IQEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__JQEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__IQEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JQEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JQEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JQEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JQEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JQEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__JQEK=static_type__Z2IM(__tmp__IQEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__JQEK=static_type__IXML(__tmp__IQEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__JQEK=static_type__BTXM(__tmp__IQEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__JQEK=static_type__5LEO(__tmp__IQEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JQEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__JQEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JQEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__JQEK=static_type__NOPN(__tmp__IQEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__JQEK=static_type__XCSO(__tmp__IQEK);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__JQEK)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__JOEK,(&__string_402));
    };
  };
  add_last__YPK(buffer__JOEK,' ');
  append__MOK(buffer__JOEK,(&__string_349));
  add_last__YPK(buffer__JOEK,' ');
  if (((void *)((__TYPE_FULL *)static_type__TO1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__JOEK,(&__string_401));
    __tmp__5QEK=TRUE__;
  } else {
    __tmp__5QEK=FALSE__;
  };
  if ((! __tmp__5QEK)) {
    __tmp__EREK=Self__IOEK->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__EREK)->__id) {
    case __LIST__: {
      __tmp__FREK=static_type__GIQG(__tmp__EREK);
    } break;
    case __STRING_CST__: {
      __tmp__FREK=((__STRING_CST *)__tmp__EREK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FREK=((__EXTERNAL_C *)__tmp__EREK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FREK=((__PROTOTYPE_CST *)__tmp__EREK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__FREK=((__INTEGER_CST *)__tmp__EREK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__FREK=((__LOCAL *)((__READ_LOCAL *)__tmp__EREK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FREK=static_type__0N1H(__tmp__EREK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FREK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FREK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__FREK=((__REAL_CST *)__tmp__EREK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__FREK=((__CHARACTER_CST *)__tmp__EREK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__FREK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FREK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__FREK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__FREK=static_type__MP1H(__tmp__EREK);
    } break;
    case __EXPR_MUL__: {
      __tmp__FREK=static_type__SP1H(__tmp__EREK);
    } break;
    case __EXPR_DIV__: {
      __tmp__FREK=static_type__XP1H(__tmp__EREK);
    } break;
    case __EXPR_AND__: {
      __tmp__FREK=static_type__2P1H(__tmp__EREK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FREK=static_type__BQ1H(__tmp__EREK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FREK=static_type__GQ1H(__tmp__EREK);
    } break;
    case __PUT_TO__: {
      __tmp__FREK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__FREK=static_type__PQ1H(__tmp__EREK);
    } break;
    case __SIZE_OF__: {
      __tmp__FREK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__FREK=((__CAST *)__tmp__EREK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__FREK=static_type__GIKL(__tmp__EREK);
    } break;
    case __READ_SLOT__: {
      __tmp__FREK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__EREK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__FREK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__EREK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FREK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FREK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FREK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FREK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FREK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__FREK=static_type__Z2IM(__tmp__EREK);
    } break;
    case __EXPR_ADD__: {
      __tmp__FREK=static_type__IXML(__tmp__EREK);
    } break;
    case __EXPR_NOT__: {
      __tmp__FREK=static_type__BTXM(__tmp__EREK);
    } break;
    case __EXPR_MOD__: {
      __tmp__FREK=static_type__5LEO(__tmp__EREK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FREK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__FREK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FREK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__FREK=static_type__NOPN(__tmp__EREK);
    } break;
    case __EXPR_XOR__: {
      __tmp__FREK=static_type__XCSO(__tmp__EREK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__FREK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__JOEK,(&__string_400));
    };
  };
  __tmp__QREK=Self__IOEK->parent_expr_binary_cmp__1LJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__QREK)->__id) {
  case __LIST__: {
    __tmp__RREK=static_type__GIQG(__tmp__QREK);
  } break;
  case __STRING_CST__: {
    __tmp__RREK=((__STRING_CST *)__tmp__QREK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__RREK=((__EXTERNAL_C *)__tmp__QREK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__RREK=((__PROTOTYPE_CST *)__tmp__QREK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__RREK=((__INTEGER_CST *)__tmp__QREK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__RREK=((__LOCAL *)((__READ_LOCAL *)__tmp__QREK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RREK=static_type__0N1H(__tmp__QREK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RREK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RREK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__RREK=((__REAL_CST *)__tmp__QREK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__RREK=((__CHARACTER_CST *)__tmp__QREK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__RREK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__RREK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__RREK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__RREK=static_type__MP1H(__tmp__QREK);
  } break;
  case __EXPR_MUL__: {
    __tmp__RREK=static_type__SP1H(__tmp__QREK);
  } break;
  case __EXPR_DIV__: {
    __tmp__RREK=static_type__XP1H(__tmp__QREK);
  } break;
  case __EXPR_AND__: {
    __tmp__RREK=static_type__2P1H(__tmp__QREK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RREK=static_type__BQ1H(__tmp__QREK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RREK=static_type__GQ1H(__tmp__QREK);
  } break;
  case __PUT_TO__: {
    __tmp__RREK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__RREK=static_type__PQ1H(__tmp__QREK);
  } break;
  case __SIZE_OF__: {
    __tmp__RREK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__RREK=((__CAST *)__tmp__QREK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__RREK=static_type__GIKL(__tmp__QREK);
  } break;
  case __READ_SLOT__: {
    __tmp__RREK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__QREK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__RREK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__QREK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RREK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RREK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RREK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RREK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RREK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__RREK=static_type__Z2IM(__tmp__QREK);
  } break;
  case __EXPR_ADD__: {
    __tmp__RREK=static_type__IXML(__tmp__QREK);
  } break;
  case __EXPR_NOT__: {
    __tmp__RREK=static_type__BTXM(__tmp__QREK);
  } break;
  case __EXPR_MOD__: {
    __tmp__RREK=static_type__5LEO(__tmp__QREK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RREK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__RREK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RREK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__RREK=static_type__NOPN(__tmp__QREK);
  } break;
  case __EXPR_XOR__: {
    __tmp__RREK=static_type__XCSO(__tmp__QREK);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__RREK)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__YREK=Self__IOEK->parent_expr_binary_cmp__1LJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__YREK)->__id) {
    case __LIST__: {
      __tmp__ZREK=static_type__GIQG(__tmp__YREK);
    } break;
    case __STRING_CST__: {
      __tmp__ZREK=((__STRING_CST *)__tmp__YREK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZREK=((__EXTERNAL_C *)__tmp__YREK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZREK=((__PROTOTYPE_CST *)__tmp__YREK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__ZREK=((__INTEGER_CST *)__tmp__YREK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZREK=((__LOCAL *)((__READ_LOCAL *)__tmp__YREK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZREK=static_type__0N1H(__tmp__YREK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZREK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZREK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__ZREK=((__REAL_CST *)__tmp__YREK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZREK=((__CHARACTER_CST *)__tmp__YREK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZREK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZREK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__ZREK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__ZREK=static_type__MP1H(__tmp__YREK);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZREK=static_type__SP1H(__tmp__YREK);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZREK=static_type__XP1H(__tmp__YREK);
    } break;
    case __EXPR_AND__: {
      __tmp__ZREK=static_type__2P1H(__tmp__YREK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZREK=static_type__BQ1H(__tmp__YREK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZREK=static_type__GQ1H(__tmp__YREK);
    } break;
    case __PUT_TO__: {
      __tmp__ZREK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__ZREK=static_type__PQ1H(__tmp__YREK);
    } break;
    case __SIZE_OF__: {
      __tmp__ZREK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__ZREK=((__CAST *)__tmp__YREK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZREK=static_type__GIKL(__tmp__YREK);
    } break;
    case __READ_SLOT__: {
      __tmp__ZREK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YREK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZREK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YREK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZREK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZREK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZREK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZREK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZREK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__ZREK=static_type__Z2IM(__tmp__YREK);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZREK=static_type__IXML(__tmp__YREK);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZREK=static_type__BTXM(__tmp__YREK);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZREK=static_type__5LEO(__tmp__YREK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZREK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__ZREK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZREK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__ZREK=static_type__NOPN(__tmp__YREK);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZREK=static_type__XCSO(__tmp__YREK);
    } break;
    };
    __tmp__4REK=((void *)((__TYPE_FULL *)__tmp__ZREK)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__4REK=FALSE__;
  };
  if (__tmp__4REK) {
    add_last__YPK(buffer__JOEK,'0');
  } else {
    __tmp__JSEK=Self__IOEK->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__JSEK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__JSEK),buffer__JOEK);
      append__MOK(buffer__JOEK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__JOEK,((__REAL_CST *)__tmp__JSEK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__QEIQ=((__CHARACTER_CST *)__tmp__JSEK);
      add_last__YPK(buffer__JOEK,'\'');
      append__MOK(buffer__JOEK,Self__QEIQ->text__HO2H);
      add_last__YPK(buffer__JOEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__JSEK,buffer__JOEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__JSEK,buffer__JOEK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__JSEK,buffer__JOEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__JOEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JSEK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__JSEK,buffer__JOEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__JSEK,buffer__JOEK);
    } break;
    };
    __tmp__KSEK=Self__IOEK->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__KSEK)->__id) {
    case __LIST__: {
      __tmp__LSEK=static_type__GIQG(__tmp__KSEK);
    } break;
    case __STRING_CST__: {
      __tmp__LSEK=((__STRING_CST *)__tmp__KSEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LSEK=((__EXTERNAL_C *)__tmp__KSEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LSEK=((__PROTOTYPE_CST *)__tmp__KSEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__LSEK=((__INTEGER_CST *)__tmp__KSEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__LSEK=((__LOCAL *)((__READ_LOCAL *)__tmp__KSEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LSEK=static_type__0N1H(__tmp__KSEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LSEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LSEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__LSEK=((__REAL_CST *)__tmp__KSEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LSEK=((__CHARACTER_CST *)__tmp__KSEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LSEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LSEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__LSEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__LSEK=static_type__MP1H(__tmp__KSEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__LSEK=static_type__SP1H(__tmp__KSEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__LSEK=static_type__XP1H(__tmp__KSEK);
    } break;
    case __EXPR_AND__: {
      __tmp__LSEK=static_type__2P1H(__tmp__KSEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LSEK=static_type__BQ1H(__tmp__KSEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LSEK=static_type__GQ1H(__tmp__KSEK);
    } break;
    case __PUT_TO__: {
      __tmp__LSEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__LSEK=static_type__PQ1H(__tmp__KSEK);
    } break;
    case __SIZE_OF__: {
      __tmp__LSEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__LSEK=((__CAST *)__tmp__KSEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__LSEK=static_type__GIKL(__tmp__KSEK);
    } break;
    case __READ_SLOT__: {
      __tmp__LSEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__KSEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LSEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KSEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LSEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LSEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LSEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LSEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LSEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__LSEK=static_type__Z2IM(__tmp__KSEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__LSEK=static_type__IXML(__tmp__KSEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__LSEK=static_type__BTXM(__tmp__KSEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__LSEK=static_type__5LEO(__tmp__KSEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LSEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__LSEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LSEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__LSEK=static_type__NOPN(__tmp__KSEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__LSEK=static_type__XCSO(__tmp__KSEK);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__LSEK)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__JOEK,(&__string_402));
    };
  };
  add_last__YPK(buffer__JOEK,')');
}

static void genere__WSEK(__EXPR_NOT_EQUAL *Self__XSEK,void *buffer__YSEK)
// ({EXPR_NOT_EQUAL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__RTEK,*__tmp__3TEK,*__tmp__FUEK,*__tmp__WUEK,*__tmp__XUEK;
  void *__tmp__TVEK,*__tmp__5VEK,*__tmp__HWEK,*__tmp__YWEK,*__tmp__ZWEK;
  void *__tmp__STEK,*__tmp__4TEK,*__tmp__GUEK,*__tmp__YUEK,*__tmp__UVEK;
  void *__tmp__AWEK,*__tmp__IWEK,*__tmp__0WEK;
  __CHARACTER_CST *Self__ZEIQ,*Self__KXEK;
  __BOOLEAN __tmp__MTEK,__tmp__LUEK,__tmp__OVEK,__tmp__NWEK;
  if (((void *)((__TYPE_FULL *)static_type__YO1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__YSEK,(&__string_400));
  };
  add_last__YPK(buffer__YSEK,'(');
  if (((void *)((__TYPE_FULL *)static_type__YO1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__YSEK,(&__string_401));
    __tmp__MTEK=TRUE__;
  } else {
    __tmp__MTEK=FALSE__;
  };
  if ((! __tmp__MTEK)) {
    __tmp__RTEK=Self__XSEK->parent_expr_binary_cmp__DMJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__RTEK)->__id) {
    case __LIST__: {
      __tmp__STEK=static_type__GIQG(__tmp__RTEK);
    } break;
    case __STRING_CST__: {
      __tmp__STEK=((__STRING_CST *)__tmp__RTEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__STEK=((__EXTERNAL_C *)__tmp__RTEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__STEK=((__PROTOTYPE_CST *)__tmp__RTEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__STEK=((__INTEGER_CST *)__tmp__RTEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__STEK=((__LOCAL *)((__READ_LOCAL *)__tmp__RTEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__STEK=static_type__0N1H(__tmp__RTEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__STEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__STEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__STEK=((__REAL_CST *)__tmp__RTEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__STEK=((__CHARACTER_CST *)__tmp__RTEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__STEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__STEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__STEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__STEK=static_type__MP1H(__tmp__RTEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__STEK=static_type__SP1H(__tmp__RTEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__STEK=static_type__XP1H(__tmp__RTEK);
    } break;
    case __EXPR_AND__: {
      __tmp__STEK=static_type__2P1H(__tmp__RTEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__STEK=static_type__BQ1H(__tmp__RTEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__STEK=static_type__GQ1H(__tmp__RTEK);
    } break;
    case __PUT_TO__: {
      __tmp__STEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__STEK=static_type__PQ1H(__tmp__RTEK);
    } break;
    case __SIZE_OF__: {
      __tmp__STEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__STEK=((__CAST *)__tmp__RTEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__STEK=static_type__GIKL(__tmp__RTEK);
    } break;
    case __READ_SLOT__: {
      __tmp__STEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__RTEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__STEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__RTEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__STEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__STEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__STEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__STEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__STEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__STEK=static_type__Z2IM(__tmp__RTEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__STEK=static_type__IXML(__tmp__RTEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__STEK=static_type__BTXM(__tmp__RTEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__STEK=static_type__5LEO(__tmp__RTEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__STEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__STEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__STEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__STEK=static_type__NOPN(__tmp__RTEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__STEK=static_type__XCSO(__tmp__RTEK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__STEK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__YSEK,(&__string_400));
    };
  };
  __tmp__3TEK=Self__XSEK->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__3TEK)->__id) {
  case __LIST__: {
    __tmp__4TEK=static_type__GIQG(__tmp__3TEK);
  } break;
  case __STRING_CST__: {
    __tmp__4TEK=((__STRING_CST *)__tmp__3TEK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__4TEK=((__EXTERNAL_C *)__tmp__3TEK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__4TEK=((__PROTOTYPE_CST *)__tmp__3TEK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__4TEK=((__INTEGER_CST *)__tmp__3TEK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__4TEK=((__LOCAL *)((__READ_LOCAL *)__tmp__3TEK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4TEK=static_type__0N1H(__tmp__3TEK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4TEK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4TEK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__4TEK=((__REAL_CST *)__tmp__3TEK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__4TEK=((__CHARACTER_CST *)__tmp__3TEK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__4TEK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__4TEK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__4TEK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__4TEK=static_type__MP1H(__tmp__3TEK);
  } break;
  case __EXPR_MUL__: {
    __tmp__4TEK=static_type__SP1H(__tmp__3TEK);
  } break;
  case __EXPR_DIV__: {
    __tmp__4TEK=static_type__XP1H(__tmp__3TEK);
  } break;
  case __EXPR_AND__: {
    __tmp__4TEK=static_type__2P1H(__tmp__3TEK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4TEK=static_type__BQ1H(__tmp__3TEK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4TEK=static_type__GQ1H(__tmp__3TEK);
  } break;
  case __PUT_TO__: {
    __tmp__4TEK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__4TEK=static_type__PQ1H(__tmp__3TEK);
  } break;
  case __SIZE_OF__: {
    __tmp__4TEK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__4TEK=((__CAST *)__tmp__3TEK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__4TEK=static_type__GIKL(__tmp__3TEK);
  } break;
  case __READ_SLOT__: {
    __tmp__4TEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__3TEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__4TEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__3TEK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4TEK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4TEK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4TEK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4TEK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4TEK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__4TEK=static_type__Z2IM(__tmp__3TEK);
  } break;
  case __EXPR_ADD__: {
    __tmp__4TEK=static_type__IXML(__tmp__3TEK);
  } break;
  case __EXPR_NOT__: {
    __tmp__4TEK=static_type__BTXM(__tmp__3TEK);
  } break;
  case __EXPR_MOD__: {
    __tmp__4TEK=static_type__5LEO(__tmp__3TEK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4TEK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__4TEK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4TEK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__4TEK=static_type__NOPN(__tmp__3TEK);
  } break;
  case __EXPR_XOR__: {
    __tmp__4TEK=static_type__XCSO(__tmp__3TEK);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__4TEK)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__FUEK=Self__XSEK->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__FUEK)->__id) {
    case __LIST__: {
      __tmp__GUEK=static_type__GIQG(__tmp__FUEK);
    } break;
    case __STRING_CST__: {
      __tmp__GUEK=((__STRING_CST *)__tmp__FUEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__GUEK=((__EXTERNAL_C *)__tmp__FUEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GUEK=((__PROTOTYPE_CST *)__tmp__FUEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__GUEK=((__INTEGER_CST *)__tmp__FUEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__GUEK=((__LOCAL *)((__READ_LOCAL *)__tmp__FUEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GUEK=static_type__0N1H(__tmp__FUEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GUEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GUEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__GUEK=((__REAL_CST *)__tmp__FUEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__GUEK=((__CHARACTER_CST *)__tmp__FUEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__GUEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GUEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__GUEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__GUEK=static_type__MP1H(__tmp__FUEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__GUEK=static_type__SP1H(__tmp__FUEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__GUEK=static_type__XP1H(__tmp__FUEK);
    } break;
    case __EXPR_AND__: {
      __tmp__GUEK=static_type__2P1H(__tmp__FUEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GUEK=static_type__BQ1H(__tmp__FUEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GUEK=static_type__GQ1H(__tmp__FUEK);
    } break;
    case __PUT_TO__: {
      __tmp__GUEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__GUEK=static_type__PQ1H(__tmp__FUEK);
    } break;
    case __SIZE_OF__: {
      __tmp__GUEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__GUEK=((__CAST *)__tmp__FUEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__GUEK=static_type__GIKL(__tmp__FUEK);
    } break;
    case __READ_SLOT__: {
      __tmp__GUEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__FUEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__GUEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__FUEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GUEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GUEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GUEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GUEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GUEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__GUEK=static_type__Z2IM(__tmp__FUEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__GUEK=static_type__IXML(__tmp__FUEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__GUEK=static_type__BTXM(__tmp__FUEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__GUEK=static_type__5LEO(__tmp__FUEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GUEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__GUEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GUEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__GUEK=static_type__NOPN(__tmp__FUEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__GUEK=static_type__XCSO(__tmp__FUEK);
    } break;
    };
    __tmp__LUEK=((void *)((__TYPE_FULL *)__tmp__GUEK)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__LUEK=FALSE__;
  };
  if (__tmp__LUEK) {
    add_last__YPK(buffer__YSEK,'0');
  } else {
    __tmp__WUEK=Self__XSEK->parent_expr_binary_cmp__DMJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__WUEK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__WUEK),buffer__YSEK);
      append__MOK(buffer__YSEK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__YSEK,((__REAL_CST *)__tmp__WUEK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__ZEIQ=((__CHARACTER_CST *)__tmp__WUEK);
      add_last__YPK(buffer__YSEK,'\'');
      append__MOK(buffer__YSEK,Self__ZEIQ->text__HO2H);
      add_last__YPK(buffer__YSEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__WUEK,buffer__YSEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__WUEK,buffer__YSEK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__WUEK,buffer__YSEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__YSEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__WUEK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__WUEK,buffer__YSEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__WUEK,buffer__YSEK);
    } break;
    };
    __tmp__XUEK=Self__XSEK->parent_expr_binary_cmp__DMJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__XUEK)->__id) {
    case __LIST__: {
      __tmp__YUEK=static_type__GIQG(__tmp__XUEK);
    } break;
    case __STRING_CST__: {
      __tmp__YUEK=((__STRING_CST *)__tmp__XUEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YUEK=((__EXTERNAL_C *)__tmp__XUEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YUEK=((__PROTOTYPE_CST *)__tmp__XUEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__YUEK=((__INTEGER_CST *)__tmp__XUEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__YUEK=((__LOCAL *)((__READ_LOCAL *)__tmp__XUEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YUEK=static_type__0N1H(__tmp__XUEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YUEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YUEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__YUEK=((__REAL_CST *)__tmp__XUEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YUEK=((__CHARACTER_CST *)__tmp__XUEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YUEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YUEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__YUEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__YUEK=static_type__MP1H(__tmp__XUEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__YUEK=static_type__SP1H(__tmp__XUEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__YUEK=static_type__XP1H(__tmp__XUEK);
    } break;
    case __EXPR_AND__: {
      __tmp__YUEK=static_type__2P1H(__tmp__XUEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YUEK=static_type__BQ1H(__tmp__XUEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YUEK=static_type__GQ1H(__tmp__XUEK);
    } break;
    case __PUT_TO__: {
      __tmp__YUEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__YUEK=static_type__PQ1H(__tmp__XUEK);
    } break;
    case __SIZE_OF__: {
      __tmp__YUEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__YUEK=((__CAST *)__tmp__XUEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__YUEK=static_type__GIKL(__tmp__XUEK);
    } break;
    case __READ_SLOT__: {
      __tmp__YUEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__XUEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__YUEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__XUEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YUEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YUEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YUEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YUEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YUEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__YUEK=static_type__Z2IM(__tmp__XUEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__YUEK=static_type__IXML(__tmp__XUEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__YUEK=static_type__BTXM(__tmp__XUEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__YUEK=static_type__5LEO(__tmp__XUEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YUEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__YUEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YUEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__YUEK=static_type__NOPN(__tmp__XUEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__YUEK=static_type__XCSO(__tmp__XUEK);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__YUEK)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__YSEK,(&__string_402));
    };
  };
  add_last__YPK(buffer__YSEK,' ');
  append__MOK(buffer__YSEK,(&__string_21));
  add_last__YPK(buffer__YSEK,' ');
  if (((void *)((__TYPE_FULL *)static_type__YO1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__YSEK,(&__string_401));
    __tmp__OVEK=TRUE__;
  } else {
    __tmp__OVEK=FALSE__;
  };
  if ((! __tmp__OVEK)) {
    __tmp__TVEK=Self__XSEK->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__TVEK)->__id) {
    case __LIST__: {
      __tmp__UVEK=static_type__GIQG(__tmp__TVEK);
    } break;
    case __STRING_CST__: {
      __tmp__UVEK=((__STRING_CST *)__tmp__TVEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__UVEK=((__EXTERNAL_C *)__tmp__TVEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__UVEK=((__PROTOTYPE_CST *)__tmp__TVEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__UVEK=((__INTEGER_CST *)__tmp__TVEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__UVEK=((__LOCAL *)((__READ_LOCAL *)__tmp__TVEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__UVEK=static_type__0N1H(__tmp__TVEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__UVEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__UVEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__UVEK=((__REAL_CST *)__tmp__TVEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__UVEK=((__CHARACTER_CST *)__tmp__TVEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__UVEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__UVEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__UVEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__UVEK=static_type__MP1H(__tmp__TVEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__UVEK=static_type__SP1H(__tmp__TVEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__UVEK=static_type__XP1H(__tmp__TVEK);
    } break;
    case __EXPR_AND__: {
      __tmp__UVEK=static_type__2P1H(__tmp__TVEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__UVEK=static_type__BQ1H(__tmp__TVEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__UVEK=static_type__GQ1H(__tmp__TVEK);
    } break;
    case __PUT_TO__: {
      __tmp__UVEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__UVEK=static_type__PQ1H(__tmp__TVEK);
    } break;
    case __SIZE_OF__: {
      __tmp__UVEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__UVEK=((__CAST *)__tmp__TVEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__UVEK=static_type__GIKL(__tmp__TVEK);
    } break;
    case __READ_SLOT__: {
      __tmp__UVEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__TVEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__UVEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TVEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__UVEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__UVEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__UVEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__UVEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__UVEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__UVEK=static_type__Z2IM(__tmp__TVEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__UVEK=static_type__IXML(__tmp__TVEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__UVEK=static_type__BTXM(__tmp__TVEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__UVEK=static_type__5LEO(__tmp__TVEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__UVEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__UVEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__UVEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__UVEK=static_type__NOPN(__tmp__TVEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__UVEK=static_type__XCSO(__tmp__TVEK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__UVEK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__YSEK,(&__string_400));
    };
  };
  __tmp__5VEK=Self__XSEK->parent_expr_binary_cmp__DMJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__5VEK)->__id) {
  case __LIST__: {
    __tmp__AWEK=static_type__GIQG(__tmp__5VEK);
  } break;
  case __STRING_CST__: {
    __tmp__AWEK=((__STRING_CST *)__tmp__5VEK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__AWEK=((__EXTERNAL_C *)__tmp__5VEK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__AWEK=((__PROTOTYPE_CST *)__tmp__5VEK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__AWEK=((__INTEGER_CST *)__tmp__5VEK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__AWEK=((__LOCAL *)((__READ_LOCAL *)__tmp__5VEK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__AWEK=static_type__0N1H(__tmp__5VEK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__AWEK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__AWEK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__AWEK=((__REAL_CST *)__tmp__5VEK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__AWEK=((__CHARACTER_CST *)__tmp__5VEK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__AWEK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__AWEK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__AWEK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__AWEK=static_type__MP1H(__tmp__5VEK);
  } break;
  case __EXPR_MUL__: {
    __tmp__AWEK=static_type__SP1H(__tmp__5VEK);
  } break;
  case __EXPR_DIV__: {
    __tmp__AWEK=static_type__XP1H(__tmp__5VEK);
  } break;
  case __EXPR_AND__: {
    __tmp__AWEK=static_type__2P1H(__tmp__5VEK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__AWEK=static_type__BQ1H(__tmp__5VEK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__AWEK=static_type__GQ1H(__tmp__5VEK);
  } break;
  case __PUT_TO__: {
    __tmp__AWEK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__AWEK=static_type__PQ1H(__tmp__5VEK);
  } break;
  case __SIZE_OF__: {
    __tmp__AWEK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__AWEK=((__CAST *)__tmp__5VEK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__AWEK=static_type__GIKL(__tmp__5VEK);
  } break;
  case __READ_SLOT__: {
    __tmp__AWEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__5VEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__AWEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__5VEK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__AWEK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__AWEK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__AWEK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__AWEK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__AWEK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__AWEK=static_type__Z2IM(__tmp__5VEK);
  } break;
  case __EXPR_ADD__: {
    __tmp__AWEK=static_type__IXML(__tmp__5VEK);
  } break;
  case __EXPR_NOT__: {
    __tmp__AWEK=static_type__BTXM(__tmp__5VEK);
  } break;
  case __EXPR_MOD__: {
    __tmp__AWEK=static_type__5LEO(__tmp__5VEK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__AWEK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__AWEK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__AWEK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__AWEK=static_type__NOPN(__tmp__5VEK);
  } break;
  case __EXPR_XOR__: {
    __tmp__AWEK=static_type__XCSO(__tmp__5VEK);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__AWEK)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__HWEK=Self__XSEK->parent_expr_binary_cmp__DMJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__HWEK)->__id) {
    case __LIST__: {
      __tmp__IWEK=static_type__GIQG(__tmp__HWEK);
    } break;
    case __STRING_CST__: {
      __tmp__IWEK=((__STRING_CST *)__tmp__HWEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__IWEK=((__EXTERNAL_C *)__tmp__HWEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__IWEK=((__PROTOTYPE_CST *)__tmp__HWEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__IWEK=((__INTEGER_CST *)__tmp__HWEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__IWEK=((__LOCAL *)((__READ_LOCAL *)__tmp__HWEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__IWEK=static_type__0N1H(__tmp__HWEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__IWEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__IWEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__IWEK=((__REAL_CST *)__tmp__HWEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__IWEK=((__CHARACTER_CST *)__tmp__HWEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__IWEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__IWEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__IWEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__IWEK=static_type__MP1H(__tmp__HWEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__IWEK=static_type__SP1H(__tmp__HWEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__IWEK=static_type__XP1H(__tmp__HWEK);
    } break;
    case __EXPR_AND__: {
      __tmp__IWEK=static_type__2P1H(__tmp__HWEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__IWEK=static_type__BQ1H(__tmp__HWEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__IWEK=static_type__GQ1H(__tmp__HWEK);
    } break;
    case __PUT_TO__: {
      __tmp__IWEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__IWEK=static_type__PQ1H(__tmp__HWEK);
    } break;
    case __SIZE_OF__: {
      __tmp__IWEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__IWEK=((__CAST *)__tmp__HWEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__IWEK=static_type__GIKL(__tmp__HWEK);
    } break;
    case __READ_SLOT__: {
      __tmp__IWEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__HWEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__IWEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__HWEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__IWEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__IWEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__IWEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__IWEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__IWEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__IWEK=static_type__Z2IM(__tmp__HWEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__IWEK=static_type__IXML(__tmp__HWEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__IWEK=static_type__BTXM(__tmp__HWEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__IWEK=static_type__5LEO(__tmp__HWEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__IWEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__IWEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__IWEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__IWEK=static_type__NOPN(__tmp__HWEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__IWEK=static_type__XCSO(__tmp__HWEK);
    } break;
    };
    __tmp__NWEK=((void *)((__TYPE_FULL *)__tmp__IWEK)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__NWEK=FALSE__;
  };
  if (__tmp__NWEK) {
    add_last__YPK(buffer__YSEK,'0');
  } else {
    __tmp__YWEK=Self__XSEK->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__YWEK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__YWEK),buffer__YSEK);
      append__MOK(buffer__YSEK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__YSEK,((__REAL_CST *)__tmp__YWEK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__KXEK=((__CHARACTER_CST *)__tmp__YWEK);
      add_last__YPK(buffer__YSEK,'\'');
      append__MOK(buffer__YSEK,Self__KXEK->text__HO2H);
      add_last__YPK(buffer__YSEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__YWEK,buffer__YSEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__YWEK,buffer__YSEK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__YWEK,buffer__YSEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__YSEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YWEK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__YWEK,buffer__YSEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__YWEK,buffer__YSEK);
    } break;
    };
    __tmp__ZWEK=Self__XSEK->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__ZWEK)->__id) {
    case __LIST__: {
      __tmp__0WEK=static_type__GIQG(__tmp__ZWEK);
    } break;
    case __STRING_CST__: {
      __tmp__0WEK=((__STRING_CST *)__tmp__ZWEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0WEK=((__EXTERNAL_C *)__tmp__ZWEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0WEK=((__PROTOTYPE_CST *)__tmp__ZWEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__0WEK=((__INTEGER_CST *)__tmp__ZWEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__0WEK=((__LOCAL *)((__READ_LOCAL *)__tmp__ZWEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0WEK=static_type__0N1H(__tmp__ZWEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0WEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0WEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__0WEK=((__REAL_CST *)__tmp__ZWEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__0WEK=((__CHARACTER_CST *)__tmp__ZWEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__0WEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0WEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__0WEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__0WEK=static_type__MP1H(__tmp__ZWEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__0WEK=static_type__SP1H(__tmp__ZWEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__0WEK=static_type__XP1H(__tmp__ZWEK);
    } break;
    case __EXPR_AND__: {
      __tmp__0WEK=static_type__2P1H(__tmp__ZWEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0WEK=static_type__BQ1H(__tmp__ZWEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0WEK=static_type__GQ1H(__tmp__ZWEK);
    } break;
    case __PUT_TO__: {
      __tmp__0WEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__0WEK=static_type__PQ1H(__tmp__ZWEK);
    } break;
    case __SIZE_OF__: {
      __tmp__0WEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__0WEK=((__CAST *)__tmp__ZWEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__0WEK=static_type__GIKL(__tmp__ZWEK);
    } break;
    case __READ_SLOT__: {
      __tmp__0WEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ZWEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__0WEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZWEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0WEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0WEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0WEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0WEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0WEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__0WEK=static_type__Z2IM(__tmp__ZWEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__0WEK=static_type__IXML(__tmp__ZWEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__0WEK=static_type__BTXM(__tmp__ZWEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__0WEK=static_type__5LEO(__tmp__ZWEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0WEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__0WEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0WEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__0WEK=static_type__NOPN(__tmp__ZWEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__0WEK=static_type__XCSO(__tmp__ZWEK);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__0WEK)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__YSEK,(&__string_402));
    };
  };
  add_last__YPK(buffer__YSEK,')');
}

static void genere__QXEK(__GET_TYPE_ID *Self__RXEK,void *buffer__SXEK)
// ({GET_TYPE_ID},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__TXEK,*__tmp__CYEK;
  void *__tmp__UXEK,*__tmp__DYEK;
  void *__tmp__EYEK;
  void *__tmp__FYEK;
  __tmp__TXEK=Self__RXEK->receiver__XO2H;
  switch (((struct ___OBJ *)__tmp__TXEK)->__id) {
  case __LIST__: {
    __tmp__UXEK=static_type__GIQG(__tmp__TXEK);
  } break;
  case __STRING_CST__: {
    __tmp__UXEK=((__STRING_CST *)__tmp__TXEK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__UXEK=((__EXTERNAL_C *)__tmp__TXEK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__UXEK=((__PROTOTYPE_CST *)__tmp__TXEK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__UXEK=((__INTEGER_CST *)__tmp__TXEK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__UXEK=((__LOCAL *)((__READ_LOCAL *)__tmp__TXEK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UXEK=static_type__0N1H(__tmp__TXEK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UXEK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UXEK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__UXEK=((__REAL_CST *)__tmp__TXEK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__UXEK=((__CHARACTER_CST *)__tmp__TXEK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__UXEK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UXEK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__UXEK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__UXEK=static_type__MP1H(__tmp__TXEK);
  } break;
  case __EXPR_MUL__: {
    __tmp__UXEK=static_type__SP1H(__tmp__TXEK);
  } break;
  case __EXPR_DIV__: {
    __tmp__UXEK=static_type__XP1H(__tmp__TXEK);
  } break;
  case __EXPR_AND__: {
    __tmp__UXEK=static_type__2P1H(__tmp__TXEK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UXEK=static_type__BQ1H(__tmp__TXEK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UXEK=static_type__GQ1H(__tmp__TXEK);
  } break;
  case __PUT_TO__: {
    __tmp__UXEK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__UXEK=static_type__PQ1H(__tmp__TXEK);
  } break;
  case __SIZE_OF__: {
    __tmp__UXEK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__UXEK=((__CAST *)__tmp__TXEK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__UXEK=static_type__GIKL(__tmp__TXEK);
  } break;
  case __READ_SLOT__: {
    __tmp__UXEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__TXEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__UXEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TXEK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UXEK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UXEK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UXEK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UXEK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UXEK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__UXEK=static_type__Z2IM(__tmp__TXEK);
  } break;
  case __EXPR_ADD__: {
    __tmp__UXEK=static_type__IXML(__tmp__TXEK);
  } break;
  case __EXPR_NOT__: {
    __tmp__UXEK=static_type__BTXM(__tmp__TXEK);
  } break;
  case __EXPR_MOD__: {
    __tmp__UXEK=static_type__5LEO(__tmp__TXEK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UXEK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__UXEK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UXEK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__UXEK=static_type__NOPN(__tmp__TXEK);
  } break;
  case __EXPR_XOR__: {
    __tmp__UXEK=static_type__XCSO(__tmp__TXEK);
  } break;
  };
  if (is_late_binding__LQSK(__tmp__UXEK)) {
    append__MOK(buffer__SXEK,(&__string_403));
  } else {
    append__MOK(buffer__SXEK,(&__string_92));
    __tmp__CYEK=Self__RXEK->receiver__XO2H;
    switch (((struct ___OBJ *)__tmp__CYEK)->__id) {
    case __LIST__: {
      __tmp__DYEK=static_type__GIQG(__tmp__CYEK);
    } break;
    case __STRING_CST__: {
      __tmp__DYEK=((__STRING_CST *)__tmp__CYEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__DYEK=((__EXTERNAL_C *)__tmp__CYEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DYEK=((__PROTOTYPE_CST *)__tmp__CYEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__DYEK=((__INTEGER_CST *)__tmp__CYEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__DYEK=((__LOCAL *)((__READ_LOCAL *)__tmp__CYEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DYEK=static_type__0N1H(__tmp__CYEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DYEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DYEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__DYEK=((__REAL_CST *)__tmp__CYEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__DYEK=((__CHARACTER_CST *)__tmp__CYEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__DYEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DYEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__DYEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__DYEK=static_type__MP1H(__tmp__CYEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__DYEK=static_type__SP1H(__tmp__CYEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__DYEK=static_type__XP1H(__tmp__CYEK);
    } break;
    case __EXPR_AND__: {
      __tmp__DYEK=static_type__2P1H(__tmp__CYEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DYEK=static_type__BQ1H(__tmp__CYEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DYEK=static_type__GQ1H(__tmp__CYEK);
    } break;
    case __PUT_TO__: {
      __tmp__DYEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__DYEK=static_type__PQ1H(__tmp__CYEK);
    } break;
    case __SIZE_OF__: {
      __tmp__DYEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__DYEK=((__CAST *)__tmp__CYEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__DYEK=static_type__GIKL(__tmp__CYEK);
    } break;
    case __READ_SLOT__: {
      __tmp__DYEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__CYEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__DYEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__CYEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DYEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DYEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DYEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DYEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DYEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__DYEK=static_type__Z2IM(__tmp__CYEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__DYEK=static_type__IXML(__tmp__CYEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__DYEK=static_type__BTXM(__tmp__CYEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__DYEK=static_type__5LEO(__tmp__CYEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DYEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__DYEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DYEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__DYEK=static_type__NOPN(__tmp__CYEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__DYEK=static_type__XCSO(__tmp__CYEK);
    } break;
    };
    __tmp__EYEK=((__TYPE_FULL *)__tmp__DYEK)->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__EYEK)->__id) {
    case __TYPE__: {
      __tmp__FYEK=((__PROTOTYPE *)((__TYPE *)__tmp__EYEK)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__FYEK=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__FYEK=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__FYEK=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__FYEK=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__FYEK=((__TYPE_GENERIC *)__tmp__EYEK)->intern_name__FS2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__FYEK=((__PROFIL_BLOCK *)__tmp__EYEK)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    append__MOK(buffer__SXEK,__tmp__FYEK);
    append__MOK(buffer__SXEK,(&__string_92));
  };
}

static void genere__KYEK(__EXPR_SUP *Self__LYEK,void *buffer__MYEK)
// ({EXPR_SUP},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__FZEK,*__tmp__RZEK,*__tmp__ZZEK,*__tmp__K0EK,*__tmp__L0EK;
  void *__tmp__H1EK,*__tmp__T1EK,*__tmp__11EK,*__tmp__M2EK,*__tmp__N2EK;
  void *__tmp__GZEK,*__tmp__SZEK,*__tmp__0ZEK,*__tmp__M0EK,*__tmp__I1EK;
  void *__tmp__U1EK,*__tmp__21EK,*__tmp__O2EK;
  __CHARACTER_CST *Self__Q0YP,*Self__U1YP;
  __BOOLEAN __tmp__AZEK,__tmp__5ZEK,__tmp__C1EK,__tmp__B2EK;
  if (((void *)((__TYPE_FULL *)static_type__HP1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__MYEK,(&__string_400));
  };
  add_last__YPK(buffer__MYEK,'(');
  if (((void *)((__TYPE_FULL *)static_type__HP1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__MYEK,(&__string_401));
    __tmp__AZEK=TRUE__;
  } else {
    __tmp__AZEK=FALSE__;
  };
  if ((! __tmp__AZEK)) {
    __tmp__FZEK=Self__LYEK->parent_expr_binary_cmp__TAKH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__FZEK)->__id) {
    case __LIST__: {
      __tmp__GZEK=static_type__GIQG(__tmp__FZEK);
    } break;
    case __STRING_CST__: {
      __tmp__GZEK=((__STRING_CST *)__tmp__FZEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__GZEK=((__EXTERNAL_C *)__tmp__FZEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GZEK=((__PROTOTYPE_CST *)__tmp__FZEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__GZEK=((__INTEGER_CST *)__tmp__FZEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__GZEK=((__LOCAL *)((__READ_LOCAL *)__tmp__FZEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GZEK=static_type__0N1H(__tmp__FZEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GZEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GZEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__GZEK=((__REAL_CST *)__tmp__FZEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__GZEK=((__CHARACTER_CST *)__tmp__FZEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__GZEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GZEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__GZEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__GZEK=static_type__MP1H(__tmp__FZEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__GZEK=static_type__SP1H(__tmp__FZEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__GZEK=static_type__XP1H(__tmp__FZEK);
    } break;
    case __EXPR_AND__: {
      __tmp__GZEK=static_type__2P1H(__tmp__FZEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GZEK=static_type__BQ1H(__tmp__FZEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GZEK=static_type__GQ1H(__tmp__FZEK);
    } break;
    case __PUT_TO__: {
      __tmp__GZEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__GZEK=static_type__PQ1H(__tmp__FZEK);
    } break;
    case __SIZE_OF__: {
      __tmp__GZEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__GZEK=((__CAST *)__tmp__FZEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__GZEK=static_type__GIKL(__tmp__FZEK);
    } break;
    case __READ_SLOT__: {
      __tmp__GZEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__FZEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__GZEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__FZEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GZEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GZEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GZEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GZEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GZEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__GZEK=static_type__Z2IM(__tmp__FZEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__GZEK=static_type__IXML(__tmp__FZEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__GZEK=static_type__BTXM(__tmp__FZEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__GZEK=static_type__5LEO(__tmp__FZEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GZEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__GZEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GZEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__GZEK=static_type__NOPN(__tmp__FZEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__GZEK=static_type__XCSO(__tmp__FZEK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__GZEK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__MYEK,(&__string_400));
    };
  };
  __tmp__RZEK=Self__LYEK->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__RZEK)->__id) {
  case __LIST__: {
    __tmp__SZEK=static_type__GIQG(__tmp__RZEK);
  } break;
  case __STRING_CST__: {
    __tmp__SZEK=((__STRING_CST *)__tmp__RZEK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__SZEK=((__EXTERNAL_C *)__tmp__RZEK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__SZEK=((__PROTOTYPE_CST *)__tmp__RZEK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__SZEK=((__INTEGER_CST *)__tmp__RZEK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__SZEK=((__LOCAL *)((__READ_LOCAL *)__tmp__RZEK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__SZEK=static_type__0N1H(__tmp__RZEK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__SZEK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__SZEK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__SZEK=((__REAL_CST *)__tmp__RZEK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__SZEK=((__CHARACTER_CST *)__tmp__RZEK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__SZEK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__SZEK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__SZEK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__SZEK=static_type__MP1H(__tmp__RZEK);
  } break;
  case __EXPR_MUL__: {
    __tmp__SZEK=static_type__SP1H(__tmp__RZEK);
  } break;
  case __EXPR_DIV__: {
    __tmp__SZEK=static_type__XP1H(__tmp__RZEK);
  } break;
  case __EXPR_AND__: {
    __tmp__SZEK=static_type__2P1H(__tmp__RZEK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__SZEK=static_type__BQ1H(__tmp__RZEK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__SZEK=static_type__GQ1H(__tmp__RZEK);
  } break;
  case __PUT_TO__: {
    __tmp__SZEK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__SZEK=static_type__PQ1H(__tmp__RZEK);
  } break;
  case __SIZE_OF__: {
    __tmp__SZEK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__SZEK=((__CAST *)__tmp__RZEK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__SZEK=static_type__GIKL(__tmp__RZEK);
  } break;
  case __READ_SLOT__: {
    __tmp__SZEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__RZEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__SZEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__RZEK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__SZEK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__SZEK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__SZEK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__SZEK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__SZEK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__SZEK=static_type__Z2IM(__tmp__RZEK);
  } break;
  case __EXPR_ADD__: {
    __tmp__SZEK=static_type__IXML(__tmp__RZEK);
  } break;
  case __EXPR_NOT__: {
    __tmp__SZEK=static_type__BTXM(__tmp__RZEK);
  } break;
  case __EXPR_MOD__: {
    __tmp__SZEK=static_type__5LEO(__tmp__RZEK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__SZEK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__SZEK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__SZEK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__SZEK=static_type__NOPN(__tmp__RZEK);
  } break;
  case __EXPR_XOR__: {
    __tmp__SZEK=static_type__XCSO(__tmp__RZEK);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__SZEK)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__ZZEK=Self__LYEK->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__ZZEK)->__id) {
    case __LIST__: {
      __tmp__0ZEK=static_type__GIQG(__tmp__ZZEK);
    } break;
    case __STRING_CST__: {
      __tmp__0ZEK=((__STRING_CST *)__tmp__ZZEK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0ZEK=((__EXTERNAL_C *)__tmp__ZZEK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0ZEK=((__PROTOTYPE_CST *)__tmp__ZZEK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__0ZEK=((__INTEGER_CST *)__tmp__ZZEK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__0ZEK=((__LOCAL *)((__READ_LOCAL *)__tmp__ZZEK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0ZEK=static_type__0N1H(__tmp__ZZEK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0ZEK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0ZEK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__0ZEK=((__REAL_CST *)__tmp__ZZEK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__0ZEK=((__CHARACTER_CST *)__tmp__ZZEK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__0ZEK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0ZEK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__0ZEK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__0ZEK=static_type__MP1H(__tmp__ZZEK);
    } break;
    case __EXPR_MUL__: {
      __tmp__0ZEK=static_type__SP1H(__tmp__ZZEK);
    } break;
    case __EXPR_DIV__: {
      __tmp__0ZEK=static_type__XP1H(__tmp__ZZEK);
    } break;
    case __EXPR_AND__: {
      __tmp__0ZEK=static_type__2P1H(__tmp__ZZEK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0ZEK=static_type__BQ1H(__tmp__ZZEK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0ZEK=static_type__GQ1H(__tmp__ZZEK);
    } break;
    case __PUT_TO__: {
      __tmp__0ZEK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__0ZEK=static_type__PQ1H(__tmp__ZZEK);
    } break;
    case __SIZE_OF__: {
      __tmp__0ZEK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__0ZEK=((__CAST *)__tmp__ZZEK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__0ZEK=static_type__GIKL(__tmp__ZZEK);
    } break;
    case __READ_SLOT__: {
      __tmp__0ZEK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ZZEK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__0ZEK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZZEK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0ZEK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0ZEK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0ZEK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0ZEK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0ZEK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__0ZEK=static_type__Z2IM(__tmp__ZZEK);
    } break;
    case __EXPR_ADD__: {
      __tmp__0ZEK=static_type__IXML(__tmp__ZZEK);
    } break;
    case __EXPR_NOT__: {
      __tmp__0ZEK=static_type__BTXM(__tmp__ZZEK);
    } break;
    case __EXPR_MOD__: {
      __tmp__0ZEK=static_type__5LEO(__tmp__ZZEK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0ZEK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__0ZEK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0ZEK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__0ZEK=static_type__NOPN(__tmp__ZZEK);
    } break;
    case __EXPR_XOR__: {
      __tmp__0ZEK=static_type__XCSO(__tmp__ZZEK);
    } break;
    };
    __tmp__5ZEK=((void *)((__TYPE_FULL *)__tmp__0ZEK)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__5ZEK=FALSE__;
  };
  if (__tmp__5ZEK) {
    add_last__YPK(buffer__MYEK,'0');
  } else {
    __tmp__K0EK=Self__LYEK->parent_expr_binary_cmp__TAKH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__K0EK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__K0EK),buffer__MYEK);
      append__MOK(buffer__MYEK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__MYEK,((__REAL_CST *)__tmp__K0EK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__Q0YP=((__CHARACTER_CST *)__tmp__K0EK);
      add_last__YPK(buffer__MYEK,'\'');
      append__MOK(buffer__MYEK,Self__Q0YP->text__HO2H);
      add_last__YPK(buffer__MYEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__K0EK,buffer__MYEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__K0EK,buffer__MYEK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__K0EK,buffer__MYEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__MYEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__K0EK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__K0EK,buffer__MYEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__K0EK,buffer__MYEK);
    } break;
    };
    __tmp__L0EK=Self__LYEK->parent_expr_binary_cmp__TAKH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__L0EK)->__id) {
    case __LIST__: {
      __tmp__M0EK=static_type__GIQG(__tmp__L0EK);
    } break;
    case __STRING_CST__: {
      __tmp__M0EK=((__STRING_CST *)__tmp__L0EK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__M0EK=((__EXTERNAL_C *)__tmp__L0EK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__M0EK=((__PROTOTYPE_CST *)__tmp__L0EK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__M0EK=((__INTEGER_CST *)__tmp__L0EK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__M0EK=((__LOCAL *)((__READ_LOCAL *)__tmp__L0EK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__M0EK=static_type__0N1H(__tmp__L0EK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__M0EK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__M0EK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__M0EK=((__REAL_CST *)__tmp__L0EK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__M0EK=((__CHARACTER_CST *)__tmp__L0EK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__M0EK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__M0EK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__M0EK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__M0EK=static_type__MP1H(__tmp__L0EK);
    } break;
    case __EXPR_MUL__: {
      __tmp__M0EK=static_type__SP1H(__tmp__L0EK);
    } break;
    case __EXPR_DIV__: {
      __tmp__M0EK=static_type__XP1H(__tmp__L0EK);
    } break;
    case __EXPR_AND__: {
      __tmp__M0EK=static_type__2P1H(__tmp__L0EK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__M0EK=static_type__BQ1H(__tmp__L0EK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__M0EK=static_type__GQ1H(__tmp__L0EK);
    } break;
    case __PUT_TO__: {
      __tmp__M0EK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__M0EK=static_type__PQ1H(__tmp__L0EK);
    } break;
    case __SIZE_OF__: {
      __tmp__M0EK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__M0EK=((__CAST *)__tmp__L0EK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__M0EK=static_type__GIKL(__tmp__L0EK);
    } break;
    case __READ_SLOT__: {
      __tmp__M0EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__L0EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__M0EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__L0EK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__M0EK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__M0EK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__M0EK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__M0EK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__M0EK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__M0EK=static_type__Z2IM(__tmp__L0EK);
    } break;
    case __EXPR_ADD__: {
      __tmp__M0EK=static_type__IXML(__tmp__L0EK);
    } break;
    case __EXPR_NOT__: {
      __tmp__M0EK=static_type__BTXM(__tmp__L0EK);
    } break;
    case __EXPR_MOD__: {
      __tmp__M0EK=static_type__5LEO(__tmp__L0EK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__M0EK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__M0EK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__M0EK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__M0EK=static_type__NOPN(__tmp__L0EK);
    } break;
    case __EXPR_XOR__: {
      __tmp__M0EK=static_type__XCSO(__tmp__L0EK);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__M0EK)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__MYEK,(&__string_402));
    };
  };
  add_last__YPK(buffer__MYEK,' ');
  append__MOK(buffer__MYEK,(&__string_262));
  add_last__YPK(buffer__MYEK,' ');
  if (((void *)((__TYPE_FULL *)static_type__HP1H())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__MYEK,(&__string_401));
    __tmp__C1EK=TRUE__;
  } else {
    __tmp__C1EK=FALSE__;
  };
  if ((! __tmp__C1EK)) {
    __tmp__H1EK=Self__LYEK->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__H1EK)->__id) {
    case __LIST__: {
      __tmp__I1EK=static_type__GIQG(__tmp__H1EK);
    } break;
    case __STRING_CST__: {
      __tmp__I1EK=((__STRING_CST *)__tmp__H1EK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__I1EK=((__EXTERNAL_C *)__tmp__H1EK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__I1EK=((__PROTOTYPE_CST *)__tmp__H1EK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__I1EK=((__INTEGER_CST *)__tmp__H1EK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__I1EK=((__LOCAL *)((__READ_LOCAL *)__tmp__H1EK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__I1EK=static_type__0N1H(__tmp__H1EK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__I1EK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__I1EK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__I1EK=((__REAL_CST *)__tmp__H1EK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__I1EK=((__CHARACTER_CST *)__tmp__H1EK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__I1EK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__I1EK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__I1EK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__I1EK=static_type__MP1H(__tmp__H1EK);
    } break;
    case __EXPR_MUL__: {
      __tmp__I1EK=static_type__SP1H(__tmp__H1EK);
    } break;
    case __EXPR_DIV__: {
      __tmp__I1EK=static_type__XP1H(__tmp__H1EK);
    } break;
    case __EXPR_AND__: {
      __tmp__I1EK=static_type__2P1H(__tmp__H1EK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__I1EK=static_type__BQ1H(__tmp__H1EK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__I1EK=static_type__GQ1H(__tmp__H1EK);
    } break;
    case __PUT_TO__: {
      __tmp__I1EK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__I1EK=static_type__PQ1H(__tmp__H1EK);
    } break;
    case __SIZE_OF__: {
      __tmp__I1EK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__I1EK=((__CAST *)__tmp__H1EK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__I1EK=static_type__GIKL(__tmp__H1EK);
    } break;
    case __READ_SLOT__: {
      __tmp__I1EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__H1EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__I1EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__H1EK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__I1EK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__I1EK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__I1EK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__I1EK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__I1EK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__I1EK=static_type__Z2IM(__tmp__H1EK);
    } break;
    case __EXPR_ADD__: {
      __tmp__I1EK=static_type__IXML(__tmp__H1EK);
    } break;
    case __EXPR_NOT__: {
      __tmp__I1EK=static_type__BTXM(__tmp__H1EK);
    } break;
    case __EXPR_MOD__: {
      __tmp__I1EK=static_type__5LEO(__tmp__H1EK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__I1EK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__I1EK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__I1EK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__I1EK=static_type__NOPN(__tmp__H1EK);
    } break;
    case __EXPR_XOR__: {
      __tmp__I1EK=static_type__XCSO(__tmp__H1EK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__I1EK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__MYEK,(&__string_400));
    };
  };
  __tmp__T1EK=Self__LYEK->parent_expr_binary_cmp__TAKH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__T1EK)->__id) {
  case __LIST__: {
    __tmp__U1EK=static_type__GIQG(__tmp__T1EK);
  } break;
  case __STRING_CST__: {
    __tmp__U1EK=((__STRING_CST *)__tmp__T1EK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__U1EK=((__EXTERNAL_C *)__tmp__T1EK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__U1EK=((__PROTOTYPE_CST *)__tmp__T1EK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__U1EK=((__INTEGER_CST *)__tmp__T1EK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__U1EK=((__LOCAL *)((__READ_LOCAL *)__tmp__T1EK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__U1EK=static_type__0N1H(__tmp__T1EK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__U1EK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__U1EK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__U1EK=((__REAL_CST *)__tmp__T1EK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__U1EK=((__CHARACTER_CST *)__tmp__T1EK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__U1EK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__U1EK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__U1EK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__U1EK=static_type__MP1H(__tmp__T1EK);
  } break;
  case __EXPR_MUL__: {
    __tmp__U1EK=static_type__SP1H(__tmp__T1EK);
  } break;
  case __EXPR_DIV__: {
    __tmp__U1EK=static_type__XP1H(__tmp__T1EK);
  } break;
  case __EXPR_AND__: {
    __tmp__U1EK=static_type__2P1H(__tmp__T1EK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__U1EK=static_type__BQ1H(__tmp__T1EK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__U1EK=static_type__GQ1H(__tmp__T1EK);
  } break;
  case __PUT_TO__: {
    __tmp__U1EK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__U1EK=static_type__PQ1H(__tmp__T1EK);
  } break;
  case __SIZE_OF__: {
    __tmp__U1EK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__U1EK=((__CAST *)__tmp__T1EK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__U1EK=static_type__GIKL(__tmp__T1EK);
  } break;
  case __READ_SLOT__: {
    __tmp__U1EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__T1EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__U1EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__T1EK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__U1EK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__U1EK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__U1EK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__U1EK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__U1EK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__U1EK=static_type__Z2IM(__tmp__T1EK);
  } break;
  case __EXPR_ADD__: {
    __tmp__U1EK=static_type__IXML(__tmp__T1EK);
  } break;
  case __EXPR_NOT__: {
    __tmp__U1EK=static_type__BTXM(__tmp__T1EK);
  } break;
  case __EXPR_MOD__: {
    __tmp__U1EK=static_type__5LEO(__tmp__T1EK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__U1EK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__U1EK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__U1EK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__U1EK=static_type__NOPN(__tmp__T1EK);
  } break;
  case __EXPR_XOR__: {
    __tmp__U1EK=static_type__XCSO(__tmp__T1EK);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__U1EK)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__11EK=Self__LYEK->parent_expr_binary_cmp__TAKH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__11EK)->__id) {
    case __LIST__: {
      __tmp__21EK=static_type__GIQG(__tmp__11EK);
    } break;
    case __STRING_CST__: {
      __tmp__21EK=((__STRING_CST *)__tmp__11EK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__21EK=((__EXTERNAL_C *)__tmp__11EK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__21EK=((__PROTOTYPE_CST *)__tmp__11EK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__21EK=((__INTEGER_CST *)__tmp__11EK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__21EK=((__LOCAL *)((__READ_LOCAL *)__tmp__11EK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__21EK=static_type__0N1H(__tmp__11EK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__21EK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__21EK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__21EK=((__REAL_CST *)__tmp__11EK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__21EK=((__CHARACTER_CST *)__tmp__11EK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__21EK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__21EK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__21EK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__21EK=static_type__MP1H(__tmp__11EK);
    } break;
    case __EXPR_MUL__: {
      __tmp__21EK=static_type__SP1H(__tmp__11EK);
    } break;
    case __EXPR_DIV__: {
      __tmp__21EK=static_type__XP1H(__tmp__11EK);
    } break;
    case __EXPR_AND__: {
      __tmp__21EK=static_type__2P1H(__tmp__11EK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__21EK=static_type__BQ1H(__tmp__11EK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__21EK=static_type__GQ1H(__tmp__11EK);
    } break;
    case __PUT_TO__: {
      __tmp__21EK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__21EK=static_type__PQ1H(__tmp__11EK);
    } break;
    case __SIZE_OF__: {
      __tmp__21EK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__21EK=((__CAST *)__tmp__11EK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__21EK=static_type__GIKL(__tmp__11EK);
    } break;
    case __READ_SLOT__: {
      __tmp__21EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__11EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__21EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__11EK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__21EK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__21EK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__21EK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__21EK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__21EK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__21EK=static_type__Z2IM(__tmp__11EK);
    } break;
    case __EXPR_ADD__: {
      __tmp__21EK=static_type__IXML(__tmp__11EK);
    } break;
    case __EXPR_NOT__: {
      __tmp__21EK=static_type__BTXM(__tmp__11EK);
    } break;
    case __EXPR_MOD__: {
      __tmp__21EK=static_type__5LEO(__tmp__11EK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__21EK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__21EK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__21EK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__21EK=static_type__NOPN(__tmp__11EK);
    } break;
    case __EXPR_XOR__: {
      __tmp__21EK=static_type__XCSO(__tmp__11EK);
    } break;
    };
    __tmp__B2EK=((void *)((__TYPE_FULL *)__tmp__21EK)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__B2EK=FALSE__;
  };
  if (__tmp__B2EK) {
    add_last__YPK(buffer__MYEK,'0');
  } else {
    __tmp__M2EK=Self__LYEK->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__M2EK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__M2EK),buffer__MYEK);
      append__MOK(buffer__MYEK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__MYEK,((__REAL_CST *)__tmp__M2EK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__U1YP=((__CHARACTER_CST *)__tmp__M2EK);
      add_last__YPK(buffer__MYEK,'\'');
      append__MOK(buffer__MYEK,Self__U1YP->text__HO2H);
      add_last__YPK(buffer__MYEK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__M2EK,buffer__MYEK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__M2EK,buffer__MYEK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__M2EK,buffer__MYEK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__MYEK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__M2EK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__M2EK,buffer__MYEK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__M2EK,buffer__MYEK);
    } break;
    };
    __tmp__N2EK=Self__LYEK->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__N2EK)->__id) {
    case __LIST__: {
      __tmp__O2EK=static_type__GIQG(__tmp__N2EK);
    } break;
    case __STRING_CST__: {
      __tmp__O2EK=((__STRING_CST *)__tmp__N2EK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__O2EK=((__EXTERNAL_C *)__tmp__N2EK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__O2EK=((__PROTOTYPE_CST *)__tmp__N2EK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__O2EK=((__INTEGER_CST *)__tmp__N2EK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__O2EK=((__LOCAL *)((__READ_LOCAL *)__tmp__N2EK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__O2EK=static_type__0N1H(__tmp__N2EK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__O2EK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__O2EK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__O2EK=((__REAL_CST *)__tmp__N2EK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__O2EK=((__CHARACTER_CST *)__tmp__N2EK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__O2EK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__O2EK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__O2EK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__O2EK=static_type__MP1H(__tmp__N2EK);
    } break;
    case __EXPR_MUL__: {
      __tmp__O2EK=static_type__SP1H(__tmp__N2EK);
    } break;
    case __EXPR_DIV__: {
      __tmp__O2EK=static_type__XP1H(__tmp__N2EK);
    } break;
    case __EXPR_AND__: {
      __tmp__O2EK=static_type__2P1H(__tmp__N2EK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__O2EK=static_type__BQ1H(__tmp__N2EK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__O2EK=static_type__GQ1H(__tmp__N2EK);
    } break;
    case __PUT_TO__: {
      __tmp__O2EK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__O2EK=static_type__PQ1H(__tmp__N2EK);
    } break;
    case __SIZE_OF__: {
      __tmp__O2EK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__O2EK=((__CAST *)__tmp__N2EK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__O2EK=static_type__GIKL(__tmp__N2EK);
    } break;
    case __READ_SLOT__: {
      __tmp__O2EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__N2EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__O2EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__N2EK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__O2EK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__O2EK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__O2EK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__O2EK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__O2EK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__O2EK=static_type__Z2IM(__tmp__N2EK);
    } break;
    case __EXPR_ADD__: {
      __tmp__O2EK=static_type__IXML(__tmp__N2EK);
    } break;
    case __EXPR_NOT__: {
      __tmp__O2EK=static_type__BTXM(__tmp__N2EK);
    } break;
    case __EXPR_MOD__: {
      __tmp__O2EK=static_type__5LEO(__tmp__N2EK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__O2EK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__O2EK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__O2EK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__O2EK=static_type__NOPN(__tmp__N2EK);
    } break;
    case __EXPR_XOR__: {
      __tmp__O2EK=static_type__XCSO(__tmp__N2EK);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__O2EK)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__MYEK,(&__string_402));
    };
  };
  add_last__YPK(buffer__MYEK,')');
}

static void genere__Z2EK(__EXPR_SUB *Self__02EK,void *buffer__12EK)
// ({EXPR_SUB},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__Z3EK,*__tmp__F4EK,*__tmp__W4EK,*__tmp__C5EK;
  void *__tmp__03EK,*__tmp__X4EK;
  __CHARACTER_CST *Self__M2YP,*Self__42YP;
  __BOOLEAN __tmp__U3EK,__tmp__R4EK;
  if (((void *)((__TYPE_FULL *)static_type__MP1H(Self__02EK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__12EK,(&__string_400));
  } else {
    add_last__YPK(buffer__12EK,'(');
    genere_declaration__Q2NI(static_type__MP1H(Self__02EK),buffer__12EK);
    add_last__YPK(buffer__12EK,')');
  };
  add_last__YPK(buffer__12EK,'(');
  if (((void *)((__TYPE_FULL *)static_type__MP1H(Self__02EK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__12EK,(&__string_401));
    __tmp__U3EK=TRUE__;
  } else {
    __tmp__U3EK=FALSE__;
  };
  if ((! __tmp__U3EK)) {
    __tmp__Z3EK=Self__02EK->parent_expr_binary__HBKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__Z3EK)->__id) {
    case __LIST__: {
      __tmp__03EK=static_type__GIQG(__tmp__Z3EK);
    } break;
    case __STRING_CST__: {
      __tmp__03EK=((__STRING_CST *)__tmp__Z3EK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__03EK=((__EXTERNAL_C *)__tmp__Z3EK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__03EK=((__PROTOTYPE_CST *)__tmp__Z3EK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__03EK=((__INTEGER_CST *)__tmp__Z3EK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__03EK=((__LOCAL *)((__READ_LOCAL *)__tmp__Z3EK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__03EK=static_type__0N1H(__tmp__Z3EK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__03EK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__03EK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__03EK=((__REAL_CST *)__tmp__Z3EK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__03EK=((__CHARACTER_CST *)__tmp__Z3EK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__03EK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__03EK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__03EK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__03EK=static_type__MP1H(__tmp__Z3EK);
    } break;
    case __EXPR_MUL__: {
      __tmp__03EK=static_type__SP1H(__tmp__Z3EK);
    } break;
    case __EXPR_DIV__: {
      __tmp__03EK=static_type__XP1H(__tmp__Z3EK);
    } break;
    case __EXPR_AND__: {
      __tmp__03EK=static_type__2P1H(__tmp__Z3EK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__03EK=static_type__BQ1H(__tmp__Z3EK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__03EK=static_type__GQ1H(__tmp__Z3EK);
    } break;
    case __PUT_TO__: {
      __tmp__03EK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__03EK=static_type__PQ1H(__tmp__Z3EK);
    } break;
    case __SIZE_OF__: {
      __tmp__03EK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__03EK=((__CAST *)__tmp__Z3EK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__03EK=static_type__GIKL(__tmp__Z3EK);
    } break;
    case __READ_SLOT__: {
      __tmp__03EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__Z3EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__03EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__Z3EK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__03EK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__03EK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__03EK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__03EK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__03EK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__03EK=static_type__Z2IM(__tmp__Z3EK);
    } break;
    case __EXPR_ADD__: {
      __tmp__03EK=static_type__IXML(__tmp__Z3EK);
    } break;
    case __EXPR_NOT__: {
      __tmp__03EK=static_type__BTXM(__tmp__Z3EK);
    } break;
    case __EXPR_MOD__: {
      __tmp__03EK=static_type__5LEO(__tmp__Z3EK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__03EK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__03EK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__03EK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__03EK=static_type__NOPN(__tmp__Z3EK);
    } break;
    case __EXPR_XOR__: {
      __tmp__03EK=static_type__XCSO(__tmp__Z3EK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__03EK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__12EK,(&__string_400));
    };
  };
  __tmp__F4EK=Self__02EK->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__F4EK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__F4EK),buffer__12EK);
    append__MOK(buffer__12EK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__12EK,((__REAL_CST *)__tmp__F4EK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__M2YP=((__CHARACTER_CST *)__tmp__F4EK);
    add_last__YPK(buffer__12EK,'\'');
    append__MOK(buffer__12EK,Self__M2YP->text__HO2H);
    add_last__YPK(buffer__12EK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__F4EK,buffer__12EK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__F4EK,buffer__12EK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__F4EK,buffer__12EK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__12EK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__F4EK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__F4EK,buffer__12EK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__F4EK,buffer__12EK);
  } break;
  };
  add_last__YPK(buffer__12EK,' ');
  append__MOK(buffer__12EK,(&__string_351));
  add_last__YPK(buffer__12EK,' ');
  if (((void *)((__TYPE_FULL *)static_type__MP1H(Self__02EK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__12EK,(&__string_401));
    __tmp__R4EK=TRUE__;
  } else {
    __tmp__R4EK=FALSE__;
  };
  if ((! __tmp__R4EK)) {
    __tmp__W4EK=Self__02EK->parent_expr_binary__HBKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__W4EK)->__id) {
    case __LIST__: {
      __tmp__X4EK=static_type__GIQG(__tmp__W4EK);
    } break;
    case __STRING_CST__: {
      __tmp__X4EK=((__STRING_CST *)__tmp__W4EK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__X4EK=((__EXTERNAL_C *)__tmp__W4EK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__X4EK=((__PROTOTYPE_CST *)__tmp__W4EK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__X4EK=((__INTEGER_CST *)__tmp__W4EK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__X4EK=((__LOCAL *)((__READ_LOCAL *)__tmp__W4EK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__X4EK=static_type__0N1H(__tmp__W4EK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__X4EK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__X4EK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__X4EK=((__REAL_CST *)__tmp__W4EK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__X4EK=((__CHARACTER_CST *)__tmp__W4EK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__X4EK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__X4EK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__X4EK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__X4EK=static_type__MP1H(__tmp__W4EK);
    } break;
    case __EXPR_MUL__: {
      __tmp__X4EK=static_type__SP1H(__tmp__W4EK);
    } break;
    case __EXPR_DIV__: {
      __tmp__X4EK=static_type__XP1H(__tmp__W4EK);
    } break;
    case __EXPR_AND__: {
      __tmp__X4EK=static_type__2P1H(__tmp__W4EK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__X4EK=static_type__BQ1H(__tmp__W4EK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__X4EK=static_type__GQ1H(__tmp__W4EK);
    } break;
    case __PUT_TO__: {
      __tmp__X4EK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__X4EK=static_type__PQ1H(__tmp__W4EK);
    } break;
    case __SIZE_OF__: {
      __tmp__X4EK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__X4EK=((__CAST *)__tmp__W4EK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__X4EK=static_type__GIKL(__tmp__W4EK);
    } break;
    case __READ_SLOT__: {
      __tmp__X4EK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__W4EK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__X4EK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__W4EK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__X4EK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__X4EK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__X4EK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__X4EK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__X4EK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__X4EK=static_type__Z2IM(__tmp__W4EK);
    } break;
    case __EXPR_ADD__: {
      __tmp__X4EK=static_type__IXML(__tmp__W4EK);
    } break;
    case __EXPR_NOT__: {
      __tmp__X4EK=static_type__BTXM(__tmp__W4EK);
    } break;
    case __EXPR_MOD__: {
      __tmp__X4EK=static_type__5LEO(__tmp__W4EK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__X4EK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__X4EK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__X4EK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__X4EK=static_type__NOPN(__tmp__W4EK);
    } break;
    case __EXPR_XOR__: {
      __tmp__X4EK=static_type__XCSO(__tmp__W4EK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__X4EK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__12EK,(&__string_400));
    };
  };
  __tmp__C5EK=Self__02EK->parent_expr_binary__HBKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__C5EK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__C5EK),buffer__12EK);
    append__MOK(buffer__12EK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__12EK,((__REAL_CST *)__tmp__C5EK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__42YP=((__CHARACTER_CST *)__tmp__C5EK);
    add_last__YPK(buffer__12EK,'\'');
    append__MOK(buffer__12EK,Self__42YP->text__HO2H);
    add_last__YPK(buffer__12EK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__C5EK,buffer__12EK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__C5EK,buffer__12EK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__C5EK,buffer__12EK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__12EK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__C5EK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__C5EK,buffer__12EK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__C5EK,buffer__12EK);
  } break;
  };
  add_last__YPK(buffer__12EK,')');
}

static void genere__D5EK(__EXPR_MUL *Self__E5EK,void *buffer__F5EK)
// ({EXPR_MUL},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__DAFK,*__tmp__PAFK,*__tmp__ABFK,*__tmp__MBFK;
  void *__tmp__EAFK,*__tmp__BBFK;
  __CHARACTER_CST *Self__Q3YP,*Self__C4YP;
  __BOOLEAN __tmp__45EK,__tmp__1AFK;
  if (((void *)((__TYPE_FULL *)static_type__SP1H(Self__E5EK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__F5EK,(&__string_400));
  } else {
    add_last__YPK(buffer__F5EK,'(');
    genere_declaration__Q2NI(static_type__SP1H(Self__E5EK),buffer__F5EK);
    add_last__YPK(buffer__F5EK,')');
  };
  add_last__YPK(buffer__F5EK,'(');
  if (((void *)((__TYPE_FULL *)static_type__SP1H(Self__E5EK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__F5EK,(&__string_401));
    __tmp__45EK=TRUE__;
  } else {
    __tmp__45EK=FALSE__;
  };
  if ((! __tmp__45EK)) {
    __tmp__DAFK=Self__E5EK->parent_expr_binary__0BKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__DAFK)->__id) {
    case __LIST__: {
      __tmp__EAFK=static_type__GIQG(__tmp__DAFK);
    } break;
    case __STRING_CST__: {
      __tmp__EAFK=((__STRING_CST *)__tmp__DAFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__EAFK=((__EXTERNAL_C *)__tmp__DAFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__EAFK=((__PROTOTYPE_CST *)__tmp__DAFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__EAFK=((__INTEGER_CST *)__tmp__DAFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__EAFK=((__LOCAL *)((__READ_LOCAL *)__tmp__DAFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__EAFK=static_type__0N1H(__tmp__DAFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__EAFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__EAFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__EAFK=((__REAL_CST *)__tmp__DAFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__EAFK=((__CHARACTER_CST *)__tmp__DAFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__EAFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__EAFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__EAFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__EAFK=static_type__MP1H(__tmp__DAFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__EAFK=static_type__SP1H(__tmp__DAFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__EAFK=static_type__XP1H(__tmp__DAFK);
    } break;
    case __EXPR_AND__: {
      __tmp__EAFK=static_type__2P1H(__tmp__DAFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__EAFK=static_type__BQ1H(__tmp__DAFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__EAFK=static_type__GQ1H(__tmp__DAFK);
    } break;
    case __PUT_TO__: {
      __tmp__EAFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__EAFK=static_type__PQ1H(__tmp__DAFK);
    } break;
    case __SIZE_OF__: {
      __tmp__EAFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__EAFK=((__CAST *)__tmp__DAFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__EAFK=static_type__GIKL(__tmp__DAFK);
    } break;
    case __READ_SLOT__: {
      __tmp__EAFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__DAFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__EAFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__DAFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__EAFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__EAFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__EAFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__EAFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__EAFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__EAFK=static_type__Z2IM(__tmp__DAFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__EAFK=static_type__IXML(__tmp__DAFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__EAFK=static_type__BTXM(__tmp__DAFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__EAFK=static_type__5LEO(__tmp__DAFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__EAFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__EAFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__EAFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__EAFK=static_type__NOPN(__tmp__DAFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__EAFK=static_type__XCSO(__tmp__DAFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__EAFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__F5EK,(&__string_400));
    };
  };
  __tmp__PAFK=Self__E5EK->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__PAFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__PAFK),buffer__F5EK);
    append__MOK(buffer__F5EK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__F5EK,((__REAL_CST *)__tmp__PAFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__Q3YP=((__CHARACTER_CST *)__tmp__PAFK);
    add_last__YPK(buffer__F5EK,'\'');
    append__MOK(buffer__F5EK,Self__Q3YP->text__HO2H);
    add_last__YPK(buffer__F5EK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__PAFK,buffer__F5EK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__PAFK,buffer__F5EK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__PAFK,buffer__F5EK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__F5EK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__PAFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__PAFK,buffer__F5EK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__PAFK,buffer__F5EK);
  } break;
  };
  add_last__YPK(buffer__F5EK,' ');
  append__MOK(buffer__F5EK,(&__string_158));
  add_last__YPK(buffer__F5EK,' ');
  if (((void *)((__TYPE_FULL *)static_type__SP1H(Self__E5EK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__F5EK,(&__string_401));
    __tmp__1AFK=TRUE__;
  } else {
    __tmp__1AFK=FALSE__;
  };
  if ((! __tmp__1AFK)) {
    __tmp__ABFK=Self__E5EK->parent_expr_binary__0BKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__ABFK)->__id) {
    case __LIST__: {
      __tmp__BBFK=static_type__GIQG(__tmp__ABFK);
    } break;
    case __STRING_CST__: {
      __tmp__BBFK=((__STRING_CST *)__tmp__ABFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BBFK=((__EXTERNAL_C *)__tmp__ABFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BBFK=((__PROTOTYPE_CST *)__tmp__ABFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__BBFK=((__INTEGER_CST *)__tmp__ABFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__BBFK=((__LOCAL *)((__READ_LOCAL *)__tmp__ABFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BBFK=static_type__0N1H(__tmp__ABFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BBFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BBFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__BBFK=((__REAL_CST *)__tmp__ABFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__BBFK=((__CHARACTER_CST *)__tmp__ABFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__BBFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BBFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__BBFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__BBFK=static_type__MP1H(__tmp__ABFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__BBFK=static_type__SP1H(__tmp__ABFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__BBFK=static_type__XP1H(__tmp__ABFK);
    } break;
    case __EXPR_AND__: {
      __tmp__BBFK=static_type__2P1H(__tmp__ABFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BBFK=static_type__BQ1H(__tmp__ABFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BBFK=static_type__GQ1H(__tmp__ABFK);
    } break;
    case __PUT_TO__: {
      __tmp__BBFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__BBFK=static_type__PQ1H(__tmp__ABFK);
    } break;
    case __SIZE_OF__: {
      __tmp__BBFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__BBFK=((__CAST *)__tmp__ABFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__BBFK=static_type__GIKL(__tmp__ABFK);
    } break;
    case __READ_SLOT__: {
      __tmp__BBFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ABFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__BBFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ABFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BBFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BBFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BBFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BBFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BBFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__BBFK=static_type__Z2IM(__tmp__ABFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__BBFK=static_type__IXML(__tmp__ABFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__BBFK=static_type__BTXM(__tmp__ABFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__BBFK=static_type__5LEO(__tmp__ABFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BBFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__BBFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BBFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__BBFK=static_type__NOPN(__tmp__ABFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__BBFK=static_type__XCSO(__tmp__ABFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__BBFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__F5EK,(&__string_400));
    };
  };
  __tmp__MBFK=Self__E5EK->parent_expr_binary__0BKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__MBFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__MBFK),buffer__F5EK);
    append__MOK(buffer__F5EK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__F5EK,((__REAL_CST *)__tmp__MBFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__C4YP=((__CHARACTER_CST *)__tmp__MBFK);
    add_last__YPK(buffer__F5EK,'\'');
    append__MOK(buffer__F5EK,Self__C4YP->text__HO2H);
    add_last__YPK(buffer__F5EK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__MBFK,buffer__F5EK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__MBFK,buffer__F5EK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__MBFK,buffer__F5EK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__F5EK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__MBFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__MBFK,buffer__F5EK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__MBFK,buffer__F5EK);
  } break;
  };
  add_last__YPK(buffer__F5EK,')');
}

static void genere__NBFK(__EXPR_DIV *Self__OBFK,void *buffer__PBFK)
// ({EXPR_DIV},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__NCFK,*__tmp__ZCFK,*__tmp__KDFK,*__tmp__WDFK;
  void *__tmp__OCFK,*__tmp__LDFK;
  __CHARACTER_CST *Self__U4YP,*Self__G5YP;
  __BOOLEAN __tmp__ICFK,__tmp__FDFK;
  if (((void *)((__TYPE_FULL *)static_type__XP1H(Self__OBFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__PBFK,(&__string_400));
  } else {
    add_last__YPK(buffer__PBFK,'(');
    genere_declaration__Q2NI(static_type__XP1H(Self__OBFK),buffer__PBFK);
    add_last__YPK(buffer__PBFK,')');
  };
  add_last__YPK(buffer__PBFK,'(');
  if (((void *)((__TYPE_FULL *)static_type__XP1H(Self__OBFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__PBFK,(&__string_401));
    __tmp__ICFK=TRUE__;
  } else {
    __tmp__ICFK=FALSE__;
  };
  if ((! __tmp__ICFK)) {
    __tmp__NCFK=Self__OBFK->parent_expr_binary__NCKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__NCFK)->__id) {
    case __LIST__: {
      __tmp__OCFK=static_type__GIQG(__tmp__NCFK);
    } break;
    case __STRING_CST__: {
      __tmp__OCFK=((__STRING_CST *)__tmp__NCFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OCFK=((__EXTERNAL_C *)__tmp__NCFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OCFK=((__PROTOTYPE_CST *)__tmp__NCFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__OCFK=((__INTEGER_CST *)__tmp__NCFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__OCFK=((__LOCAL *)((__READ_LOCAL *)__tmp__NCFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OCFK=static_type__0N1H(__tmp__NCFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OCFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OCFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__OCFK=((__REAL_CST *)__tmp__NCFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OCFK=((__CHARACTER_CST *)__tmp__NCFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OCFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OCFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__OCFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__OCFK=static_type__MP1H(__tmp__NCFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__OCFK=static_type__SP1H(__tmp__NCFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__OCFK=static_type__XP1H(__tmp__NCFK);
    } break;
    case __EXPR_AND__: {
      __tmp__OCFK=static_type__2P1H(__tmp__NCFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OCFK=static_type__BQ1H(__tmp__NCFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OCFK=static_type__GQ1H(__tmp__NCFK);
    } break;
    case __PUT_TO__: {
      __tmp__OCFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__OCFK=static_type__PQ1H(__tmp__NCFK);
    } break;
    case __SIZE_OF__: {
      __tmp__OCFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__OCFK=((__CAST *)__tmp__NCFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__OCFK=static_type__GIKL(__tmp__NCFK);
    } break;
    case __READ_SLOT__: {
      __tmp__OCFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__NCFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OCFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__NCFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OCFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OCFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OCFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OCFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OCFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__OCFK=static_type__Z2IM(__tmp__NCFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__OCFK=static_type__IXML(__tmp__NCFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__OCFK=static_type__BTXM(__tmp__NCFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__OCFK=static_type__5LEO(__tmp__NCFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OCFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__OCFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OCFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__OCFK=static_type__NOPN(__tmp__NCFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__OCFK=static_type__XCSO(__tmp__NCFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__OCFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__PBFK,(&__string_400));
    };
  };
  __tmp__ZCFK=Self__OBFK->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__ZCFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__ZCFK),buffer__PBFK);
    append__MOK(buffer__PBFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__PBFK,((__REAL_CST *)__tmp__ZCFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__U4YP=((__CHARACTER_CST *)__tmp__ZCFK);
    add_last__YPK(buffer__PBFK,'\'');
    append__MOK(buffer__PBFK,Self__U4YP->text__HO2H);
    add_last__YPK(buffer__PBFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__PBFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZCFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__ZCFK,buffer__PBFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__ZCFK,buffer__PBFK);
  } break;
  };
  add_last__YPK(buffer__PBFK,' ');
  append__MOK(buffer__PBFK,(&__string_352));
  add_last__YPK(buffer__PBFK,' ');
  if (((void *)((__TYPE_FULL *)static_type__XP1H(Self__OBFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__PBFK,(&__string_401));
    __tmp__FDFK=TRUE__;
  } else {
    __tmp__FDFK=FALSE__;
  };
  if ((! __tmp__FDFK)) {
    __tmp__KDFK=Self__OBFK->parent_expr_binary__NCKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__KDFK)->__id) {
    case __LIST__: {
      __tmp__LDFK=static_type__GIQG(__tmp__KDFK);
    } break;
    case __STRING_CST__: {
      __tmp__LDFK=((__STRING_CST *)__tmp__KDFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LDFK=((__EXTERNAL_C *)__tmp__KDFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LDFK=((__PROTOTYPE_CST *)__tmp__KDFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__LDFK=((__INTEGER_CST *)__tmp__KDFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__LDFK=((__LOCAL *)((__READ_LOCAL *)__tmp__KDFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LDFK=static_type__0N1H(__tmp__KDFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LDFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LDFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__LDFK=((__REAL_CST *)__tmp__KDFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LDFK=((__CHARACTER_CST *)__tmp__KDFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LDFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LDFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__LDFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__LDFK=static_type__MP1H(__tmp__KDFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__LDFK=static_type__SP1H(__tmp__KDFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__LDFK=static_type__XP1H(__tmp__KDFK);
    } break;
    case __EXPR_AND__: {
      __tmp__LDFK=static_type__2P1H(__tmp__KDFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LDFK=static_type__BQ1H(__tmp__KDFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LDFK=static_type__GQ1H(__tmp__KDFK);
    } break;
    case __PUT_TO__: {
      __tmp__LDFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__LDFK=static_type__PQ1H(__tmp__KDFK);
    } break;
    case __SIZE_OF__: {
      __tmp__LDFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__LDFK=((__CAST *)__tmp__KDFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__LDFK=static_type__GIKL(__tmp__KDFK);
    } break;
    case __READ_SLOT__: {
      __tmp__LDFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__KDFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LDFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KDFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LDFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LDFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LDFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LDFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LDFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__LDFK=static_type__Z2IM(__tmp__KDFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__LDFK=static_type__IXML(__tmp__KDFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__LDFK=static_type__BTXM(__tmp__KDFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__LDFK=static_type__5LEO(__tmp__KDFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LDFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__LDFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LDFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__LDFK=static_type__NOPN(__tmp__KDFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__LDFK=static_type__XCSO(__tmp__KDFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__LDFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__PBFK,(&__string_400));
    };
  };
  __tmp__WDFK=Self__OBFK->parent_expr_binary__NCKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__WDFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__WDFK),buffer__PBFK);
    append__MOK(buffer__PBFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__PBFK,((__REAL_CST *)__tmp__WDFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__G5YP=((__CHARACTER_CST *)__tmp__WDFK);
    add_last__YPK(buffer__PBFK,'\'');
    append__MOK(buffer__PBFK,Self__G5YP->text__HO2H);
    add_last__YPK(buffer__PBFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__WDFK,buffer__PBFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__WDFK,buffer__PBFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__WDFK,buffer__PBFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__PBFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__WDFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__WDFK,buffer__PBFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__WDFK,buffer__PBFK);
  } break;
  };
  add_last__YPK(buffer__PBFK,')');
}

static void genere__XDFK(__EXPR_AND *Self__YDFK,void *buffer__ZDFK)
// ({EXPR_AND},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__XEFK,*__tmp__DFFK,*__tmp__UFFK,*__tmp__AGFK;
  void *__tmp__YEFK,*__tmp__VFFK;
  __CHARACTER_CST *Self__Y5YP,*Self__KAZP;
  __BOOLEAN __tmp__SEFK,__tmp__PFFK;
  if (((void *)((__TYPE_FULL *)static_type__2P1H(Self__YDFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__ZDFK,(&__string_400));
  } else {
    add_last__YPK(buffer__ZDFK,'(');
    genere_declaration__Q2NI(static_type__2P1H(Self__YDFK),buffer__ZDFK);
    add_last__YPK(buffer__ZDFK,')');
  };
  add_last__YPK(buffer__ZDFK,'(');
  if (((void *)((__TYPE_FULL *)static_type__2P1H(Self__YDFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__ZDFK,(&__string_401));
    __tmp__SEFK=TRUE__;
  } else {
    __tmp__SEFK=FALSE__;
  };
  if ((! __tmp__SEFK)) {
    __tmp__XEFK=Self__YDFK->parent_expr_binary__ADKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__XEFK)->__id) {
    case __LIST__: {
      __tmp__YEFK=static_type__GIQG(__tmp__XEFK);
    } break;
    case __STRING_CST__: {
      __tmp__YEFK=((__STRING_CST *)__tmp__XEFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YEFK=((__EXTERNAL_C *)__tmp__XEFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YEFK=((__PROTOTYPE_CST *)__tmp__XEFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__YEFK=((__INTEGER_CST *)__tmp__XEFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__YEFK=((__LOCAL *)((__READ_LOCAL *)__tmp__XEFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YEFK=static_type__0N1H(__tmp__XEFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YEFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YEFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__YEFK=((__REAL_CST *)__tmp__XEFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YEFK=((__CHARACTER_CST *)__tmp__XEFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YEFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YEFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__YEFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__YEFK=static_type__MP1H(__tmp__XEFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__YEFK=static_type__SP1H(__tmp__XEFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__YEFK=static_type__XP1H(__tmp__XEFK);
    } break;
    case __EXPR_AND__: {
      __tmp__YEFK=static_type__2P1H(__tmp__XEFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YEFK=static_type__BQ1H(__tmp__XEFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YEFK=static_type__GQ1H(__tmp__XEFK);
    } break;
    case __PUT_TO__: {
      __tmp__YEFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__YEFK=static_type__PQ1H(__tmp__XEFK);
    } break;
    case __SIZE_OF__: {
      __tmp__YEFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__YEFK=((__CAST *)__tmp__XEFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__YEFK=static_type__GIKL(__tmp__XEFK);
    } break;
    case __READ_SLOT__: {
      __tmp__YEFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__XEFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__YEFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__XEFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YEFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YEFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YEFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YEFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YEFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__YEFK=static_type__Z2IM(__tmp__XEFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__YEFK=static_type__IXML(__tmp__XEFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__YEFK=static_type__BTXM(__tmp__XEFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__YEFK=static_type__5LEO(__tmp__XEFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YEFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__YEFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YEFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__YEFK=static_type__NOPN(__tmp__XEFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__YEFK=static_type__XCSO(__tmp__XEFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__YEFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__ZDFK,(&__string_400));
    };
  };
  __tmp__DFFK=Self__YDFK->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__DFFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__DFFK),buffer__ZDFK);
    append__MOK(buffer__ZDFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__ZDFK,((__REAL_CST *)__tmp__DFFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__Y5YP=((__CHARACTER_CST *)__tmp__DFFK);
    add_last__YPK(buffer__ZDFK,'\'');
    append__MOK(buffer__ZDFK,Self__Y5YP->text__HO2H);
    add_last__YPK(buffer__ZDFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__ZDFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__DFFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__DFFK,buffer__ZDFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__DFFK,buffer__ZDFK);
  } break;
  };
  add_last__YPK(buffer__ZDFK,' ');
  append__MOK(buffer__ZDFK,(&__string_353));
  add_last__YPK(buffer__ZDFK,' ');
  if (((void *)((__TYPE_FULL *)static_type__2P1H(Self__YDFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__ZDFK,(&__string_401));
    __tmp__PFFK=TRUE__;
  } else {
    __tmp__PFFK=FALSE__;
  };
  if ((! __tmp__PFFK)) {
    __tmp__UFFK=Self__YDFK->parent_expr_binary__ADKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__UFFK)->__id) {
    case __LIST__: {
      __tmp__VFFK=static_type__GIQG(__tmp__UFFK);
    } break;
    case __STRING_CST__: {
      __tmp__VFFK=((__STRING_CST *)__tmp__UFFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VFFK=((__EXTERNAL_C *)__tmp__UFFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VFFK=((__PROTOTYPE_CST *)__tmp__UFFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__VFFK=((__INTEGER_CST *)__tmp__UFFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__VFFK=((__LOCAL *)((__READ_LOCAL *)__tmp__UFFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VFFK=static_type__0N1H(__tmp__UFFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VFFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VFFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__VFFK=((__REAL_CST *)__tmp__UFFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VFFK=((__CHARACTER_CST *)__tmp__UFFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VFFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VFFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__VFFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__VFFK=static_type__MP1H(__tmp__UFFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__VFFK=static_type__SP1H(__tmp__UFFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__VFFK=static_type__XP1H(__tmp__UFFK);
    } break;
    case __EXPR_AND__: {
      __tmp__VFFK=static_type__2P1H(__tmp__UFFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VFFK=static_type__BQ1H(__tmp__UFFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VFFK=static_type__GQ1H(__tmp__UFFK);
    } break;
    case __PUT_TO__: {
      __tmp__VFFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__VFFK=static_type__PQ1H(__tmp__UFFK);
    } break;
    case __SIZE_OF__: {
      __tmp__VFFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__VFFK=((__CAST *)__tmp__UFFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__VFFK=static_type__GIKL(__tmp__UFFK);
    } break;
    case __READ_SLOT__: {
      __tmp__VFFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__UFFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VFFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__UFFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VFFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VFFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VFFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VFFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VFFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__VFFK=static_type__Z2IM(__tmp__UFFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__VFFK=static_type__IXML(__tmp__UFFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__VFFK=static_type__BTXM(__tmp__UFFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__VFFK=static_type__5LEO(__tmp__UFFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VFFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__VFFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VFFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__VFFK=static_type__NOPN(__tmp__UFFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__VFFK=static_type__XCSO(__tmp__UFFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__VFFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__ZDFK,(&__string_400));
    };
  };
  __tmp__AGFK=Self__YDFK->parent_expr_binary__ADKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__AGFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__AGFK),buffer__ZDFK);
    append__MOK(buffer__ZDFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__ZDFK,((__REAL_CST *)__tmp__AGFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__KAZP=((__CHARACTER_CST *)__tmp__AGFK);
    add_last__YPK(buffer__ZDFK,'\'');
    append__MOK(buffer__ZDFK,Self__KAZP->text__HO2H);
    add_last__YPK(buffer__ZDFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__ZDFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__AGFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__AGFK,buffer__ZDFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__AGFK,buffer__ZDFK);
  } break;
  };
  add_last__YPK(buffer__ZDFK,')');
}

static void genere__BGFK(__EXPR_SHIFT_R *Self__CGFK,void *buffer__DGFK)
// ({EXPR_SHIFT_R},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__BHFK,*__tmp__NHFK,*__tmp__4HFK,*__tmp__KIFK;
  void *__tmp__CHFK,*__tmp__5HFK;
  __CHARACTER_CST *Self__2AZP,*Self__OBZP;
  __BOOLEAN __tmp__2GFK,__tmp__ZHFK;
  if (((void *)((__TYPE_FULL *)static_type__BQ1H(Self__CGFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__DGFK,(&__string_400));
  } else {
    add_last__YPK(buffer__DGFK,'(');
    genere_declaration__Q2NI(static_type__BQ1H(Self__CGFK),buffer__DGFK);
    add_last__YPK(buffer__DGFK,')');
  };
  add_last__YPK(buffer__DGFK,'(');
  if (((void *)((__TYPE_FULL *)static_type__BQ1H(Self__CGFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__DGFK,(&__string_401));
    __tmp__2GFK=TRUE__;
  } else {
    __tmp__2GFK=FALSE__;
  };
  if ((! __tmp__2GFK)) {
    __tmp__BHFK=Self__CGFK->parent_expr_binary__TDKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__BHFK)->__id) {
    case __LIST__: {
      __tmp__CHFK=static_type__GIQG(__tmp__BHFK);
    } break;
    case __STRING_CST__: {
      __tmp__CHFK=((__STRING_CST *)__tmp__BHFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__CHFK=((__EXTERNAL_C *)__tmp__BHFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__CHFK=((__PROTOTYPE_CST *)__tmp__BHFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__CHFK=((__INTEGER_CST *)__tmp__BHFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__CHFK=((__LOCAL *)((__READ_LOCAL *)__tmp__BHFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__CHFK=static_type__0N1H(__tmp__BHFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__CHFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__CHFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__CHFK=((__REAL_CST *)__tmp__BHFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__CHFK=((__CHARACTER_CST *)__tmp__BHFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__CHFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__CHFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__CHFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__CHFK=static_type__MP1H(__tmp__BHFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__CHFK=static_type__SP1H(__tmp__BHFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__CHFK=static_type__XP1H(__tmp__BHFK);
    } break;
    case __EXPR_AND__: {
      __tmp__CHFK=static_type__2P1H(__tmp__BHFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__CHFK=static_type__BQ1H(__tmp__BHFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__CHFK=static_type__GQ1H(__tmp__BHFK);
    } break;
    case __PUT_TO__: {
      __tmp__CHFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__CHFK=static_type__PQ1H(__tmp__BHFK);
    } break;
    case __SIZE_OF__: {
      __tmp__CHFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__CHFK=((__CAST *)__tmp__BHFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__CHFK=static_type__GIKL(__tmp__BHFK);
    } break;
    case __READ_SLOT__: {
      __tmp__CHFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__BHFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__CHFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BHFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__CHFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__CHFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__CHFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__CHFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__CHFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__CHFK=static_type__Z2IM(__tmp__BHFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__CHFK=static_type__IXML(__tmp__BHFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__CHFK=static_type__BTXM(__tmp__BHFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__CHFK=static_type__5LEO(__tmp__BHFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__CHFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__CHFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__CHFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__CHFK=static_type__NOPN(__tmp__BHFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__CHFK=static_type__XCSO(__tmp__BHFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__CHFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__DGFK,(&__string_400));
    };
  };
  __tmp__NHFK=Self__CGFK->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__NHFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__NHFK),buffer__DGFK);
    append__MOK(buffer__DGFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__DGFK,((__REAL_CST *)__tmp__NHFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__2AZP=((__CHARACTER_CST *)__tmp__NHFK);
    add_last__YPK(buffer__DGFK,'\'');
    append__MOK(buffer__DGFK,Self__2AZP->text__HO2H);
    add_last__YPK(buffer__DGFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__NHFK,buffer__DGFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__NHFK,buffer__DGFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__NHFK,buffer__DGFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__DGFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__NHFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__NHFK,buffer__DGFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__NHFK,buffer__DGFK);
  } break;
  };
  add_last__YPK(buffer__DGFK,' ');
  append__MOK(buffer__DGFK,(&__string_354));
  add_last__YPK(buffer__DGFK,' ');
  if (((void *)((__TYPE_FULL *)static_type__BQ1H(Self__CGFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__DGFK,(&__string_401));
    __tmp__ZHFK=TRUE__;
  } else {
    __tmp__ZHFK=FALSE__;
  };
  if ((! __tmp__ZHFK)) {
    __tmp__4HFK=Self__CGFK->parent_expr_binary__TDKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__4HFK)->__id) {
    case __LIST__: {
      __tmp__5HFK=static_type__GIQG(__tmp__4HFK);
    } break;
    case __STRING_CST__: {
      __tmp__5HFK=((__STRING_CST *)__tmp__4HFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__5HFK=((__EXTERNAL_C *)__tmp__4HFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__5HFK=((__PROTOTYPE_CST *)__tmp__4HFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__5HFK=((__INTEGER_CST *)__tmp__4HFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__5HFK=((__LOCAL *)((__READ_LOCAL *)__tmp__4HFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__5HFK=static_type__0N1H(__tmp__4HFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__5HFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__5HFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__5HFK=((__REAL_CST *)__tmp__4HFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__5HFK=((__CHARACTER_CST *)__tmp__4HFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__5HFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__5HFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__5HFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__5HFK=static_type__MP1H(__tmp__4HFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__5HFK=static_type__SP1H(__tmp__4HFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__5HFK=static_type__XP1H(__tmp__4HFK);
    } break;
    case __EXPR_AND__: {
      __tmp__5HFK=static_type__2P1H(__tmp__4HFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__5HFK=static_type__BQ1H(__tmp__4HFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__5HFK=static_type__GQ1H(__tmp__4HFK);
    } break;
    case __PUT_TO__: {
      __tmp__5HFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__5HFK=static_type__PQ1H(__tmp__4HFK);
    } break;
    case __SIZE_OF__: {
      __tmp__5HFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__5HFK=((__CAST *)__tmp__4HFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__5HFK=static_type__GIKL(__tmp__4HFK);
    } break;
    case __READ_SLOT__: {
      __tmp__5HFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__4HFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__5HFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__4HFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__5HFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__5HFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__5HFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__5HFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__5HFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__5HFK=static_type__Z2IM(__tmp__4HFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__5HFK=static_type__IXML(__tmp__4HFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__5HFK=static_type__BTXM(__tmp__4HFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__5HFK=static_type__5LEO(__tmp__4HFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__5HFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__5HFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__5HFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__5HFK=static_type__NOPN(__tmp__4HFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__5HFK=static_type__XCSO(__tmp__4HFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__5HFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__DGFK,(&__string_400));
    };
  };
  __tmp__KIFK=Self__CGFK->parent_expr_binary__TDKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__KIFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__KIFK),buffer__DGFK);
    append__MOK(buffer__DGFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__DGFK,((__REAL_CST *)__tmp__KIFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__OBZP=((__CHARACTER_CST *)__tmp__KIFK);
    add_last__YPK(buffer__DGFK,'\'');
    append__MOK(buffer__DGFK,Self__OBZP->text__HO2H);
    add_last__YPK(buffer__DGFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__KIFK,buffer__DGFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__KIFK,buffer__DGFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__KIFK,buffer__DGFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__DGFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KIFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__KIFK,buffer__DGFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__KIFK,buffer__DGFK);
  } break;
  };
  add_last__YPK(buffer__DGFK,')');
}

static void genere__LIFK(__EXPR_SHIFT_L *Self__MIFK,void *buffer__NIFK)
// ({EXPR_SHIFT_L},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__LJFK,*__tmp__XJFK,*__tmp__IKFK,*__tmp__UKFK;
  void *__tmp__MJFK,*__tmp__JKFK;
  __CHARACTER_CST *Self__ACZP,*Self__SCZP;
  __BOOLEAN __tmp__GJFK,__tmp__DKFK;
  if (((void *)((__TYPE_FULL *)static_type__GQ1H(Self__MIFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__NIFK,(&__string_400));
  } else {
    add_last__YPK(buffer__NIFK,'(');
    genere_declaration__Q2NI(static_type__GQ1H(Self__MIFK),buffer__NIFK);
    add_last__YPK(buffer__NIFK,')');
  };
  add_last__YPK(buffer__NIFK,'(');
  if (((void *)((__TYPE_FULL *)static_type__GQ1H(Self__MIFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__NIFK,(&__string_401));
    __tmp__GJFK=TRUE__;
  } else {
    __tmp__GJFK=FALSE__;
  };
  if ((! __tmp__GJFK)) {
    __tmp__LJFK=Self__MIFK->parent_expr_binary__GEKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__LJFK)->__id) {
    case __LIST__: {
      __tmp__MJFK=static_type__GIQG(__tmp__LJFK);
    } break;
    case __STRING_CST__: {
      __tmp__MJFK=((__STRING_CST *)__tmp__LJFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__MJFK=((__EXTERNAL_C *)__tmp__LJFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__MJFK=((__PROTOTYPE_CST *)__tmp__LJFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__MJFK=((__INTEGER_CST *)__tmp__LJFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__MJFK=((__LOCAL *)((__READ_LOCAL *)__tmp__LJFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__MJFK=static_type__0N1H(__tmp__LJFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__MJFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__MJFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__MJFK=((__REAL_CST *)__tmp__LJFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__MJFK=((__CHARACTER_CST *)__tmp__LJFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__MJFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__MJFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__MJFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__MJFK=static_type__MP1H(__tmp__LJFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__MJFK=static_type__SP1H(__tmp__LJFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__MJFK=static_type__XP1H(__tmp__LJFK);
    } break;
    case __EXPR_AND__: {
      __tmp__MJFK=static_type__2P1H(__tmp__LJFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__MJFK=static_type__BQ1H(__tmp__LJFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__MJFK=static_type__GQ1H(__tmp__LJFK);
    } break;
    case __PUT_TO__: {
      __tmp__MJFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__MJFK=static_type__PQ1H(__tmp__LJFK);
    } break;
    case __SIZE_OF__: {
      __tmp__MJFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__MJFK=((__CAST *)__tmp__LJFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__MJFK=static_type__GIKL(__tmp__LJFK);
    } break;
    case __READ_SLOT__: {
      __tmp__MJFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__LJFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__MJFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__LJFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__MJFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__MJFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__MJFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__MJFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__MJFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__MJFK=static_type__Z2IM(__tmp__LJFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__MJFK=static_type__IXML(__tmp__LJFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__MJFK=static_type__BTXM(__tmp__LJFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__MJFK=static_type__5LEO(__tmp__LJFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__MJFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__MJFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__MJFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__MJFK=static_type__NOPN(__tmp__LJFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__MJFK=static_type__XCSO(__tmp__LJFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__MJFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__NIFK,(&__string_400));
    };
  };
  __tmp__XJFK=Self__MIFK->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__XJFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__XJFK),buffer__NIFK);
    append__MOK(buffer__NIFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__NIFK,((__REAL_CST *)__tmp__XJFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__ACZP=((__CHARACTER_CST *)__tmp__XJFK);
    add_last__YPK(buffer__NIFK,'\'');
    append__MOK(buffer__NIFK,Self__ACZP->text__HO2H);
    add_last__YPK(buffer__NIFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__XJFK,buffer__NIFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__XJFK,buffer__NIFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__XJFK,buffer__NIFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__NIFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__XJFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__XJFK,buffer__NIFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__XJFK,buffer__NIFK);
  } break;
  };
  add_last__YPK(buffer__NIFK,' ');
  append__MOK(buffer__NIFK,(&__string_355));
  add_last__YPK(buffer__NIFK,' ');
  if (((void *)((__TYPE_FULL *)static_type__GQ1H(Self__MIFK))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__NIFK,(&__string_401));
    __tmp__DKFK=TRUE__;
  } else {
    __tmp__DKFK=FALSE__;
  };
  if ((! __tmp__DKFK)) {
    __tmp__IKFK=Self__MIFK->parent_expr_binary__GEKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__IKFK)->__id) {
    case __LIST__: {
      __tmp__JKFK=static_type__GIQG(__tmp__IKFK);
    } break;
    case __STRING_CST__: {
      __tmp__JKFK=((__STRING_CST *)__tmp__IKFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__JKFK=((__EXTERNAL_C *)__tmp__IKFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JKFK=((__PROTOTYPE_CST *)__tmp__IKFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__JKFK=((__INTEGER_CST *)__tmp__IKFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__JKFK=((__LOCAL *)((__READ_LOCAL *)__tmp__IKFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JKFK=static_type__0N1H(__tmp__IKFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JKFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JKFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__JKFK=((__REAL_CST *)__tmp__IKFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__JKFK=((__CHARACTER_CST *)__tmp__IKFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__JKFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JKFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__JKFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__JKFK=static_type__MP1H(__tmp__IKFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__JKFK=static_type__SP1H(__tmp__IKFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__JKFK=static_type__XP1H(__tmp__IKFK);
    } break;
    case __EXPR_AND__: {
      __tmp__JKFK=static_type__2P1H(__tmp__IKFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JKFK=static_type__BQ1H(__tmp__IKFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JKFK=static_type__GQ1H(__tmp__IKFK);
    } break;
    case __PUT_TO__: {
      __tmp__JKFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__JKFK=static_type__PQ1H(__tmp__IKFK);
    } break;
    case __SIZE_OF__: {
      __tmp__JKFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__JKFK=((__CAST *)__tmp__IKFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__JKFK=static_type__GIKL(__tmp__IKFK);
    } break;
    case __READ_SLOT__: {
      __tmp__JKFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__IKFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__JKFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__IKFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JKFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JKFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JKFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JKFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JKFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__JKFK=static_type__Z2IM(__tmp__IKFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__JKFK=static_type__IXML(__tmp__IKFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__JKFK=static_type__BTXM(__tmp__IKFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__JKFK=static_type__5LEO(__tmp__IKFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JKFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__JKFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JKFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__JKFK=static_type__NOPN(__tmp__IKFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__JKFK=static_type__XCSO(__tmp__IKFK);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__JKFK)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__NIFK,(&__string_400));
    };
  };
  __tmp__UKFK=Self__MIFK->parent_expr_binary__GEKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__UKFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__UKFK),buffer__NIFK);
    append__MOK(buffer__NIFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__NIFK,((__REAL_CST *)__tmp__UKFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__SCZP=((__CHARACTER_CST *)__tmp__UKFK);
    add_last__YPK(buffer__NIFK,'\'');
    append__MOK(buffer__NIFK,Self__SCZP->text__HO2H);
    add_last__YPK(buffer__NIFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__UKFK,buffer__NIFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__UKFK,buffer__NIFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__UKFK,buffer__NIFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__NIFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__UKFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__UKFK,buffer__NIFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__UKFK,buffer__NIFK);
  } break;
  };
  add_last__YPK(buffer__NIFK,')');
}

static void genere__VKFK(__PUT_TO *Self__WKFK,void *buffer__XKFK)
// ({PUT_TO},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__0KFK,*__tmp__1KFK,*__tmp__2KFK,*__tmp__TLFK,*__tmp__1LFK;
  void *__tmp__BMFK,*__tmp__IMFK;
  __CHARACTER_CST *Self__0CZP,*Self__CDZP,*Self__0DZP,*Self__CEZP;
  __CHARACTER_CST *Self__KEZP;
  void *__tmp__3KFK,*first_type__ZKFK,*__tmp__ULFK;
  void *__tmp__5KFK;
  void *__tmp__ALFK,*type_generic__YKFK;
  __tmp__0KFK=Self__WKFK->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__0KFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__0KFK),buffer__XKFK);
    append__MOK(buffer__XKFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__XKFK,((__REAL_CST *)__tmp__0KFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__0CZP=((__CHARACTER_CST *)__tmp__0KFK);
    add_last__YPK(buffer__XKFK,'\'');
    append__MOK(buffer__XKFK,Self__0CZP->text__HO2H);
    add_last__YPK(buffer__XKFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__0KFK,buffer__XKFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__0KFK,buffer__XKFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__0KFK,buffer__XKFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__XKFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0KFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__0KFK,buffer__XKFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__0KFK,buffer__XKFK);
  } break;
  };
  add_last__YPK(buffer__XKFK,'[');
  __tmp__1KFK=Self__WKFK->index__SR2H;
  switch (((struct ___OBJ *)__tmp__1KFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__1KFK),buffer__XKFK);
    append__MOK(buffer__XKFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__XKFK,((__REAL_CST *)__tmp__1KFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__CDZP=((__CHARACTER_CST *)__tmp__1KFK);
    add_last__YPK(buffer__XKFK,'\'');
    append__MOK(buffer__XKFK,Self__CDZP->text__HO2H);
    add_last__YPK(buffer__XKFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__1KFK,buffer__XKFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__1KFK,buffer__XKFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__1KFK,buffer__XKFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__XKFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1KFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__1KFK,buffer__XKFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__1KFK,buffer__XKFK);
  } break;
  };
  append__MOK(buffer__XKFK,(&__string_356));
  __tmp__2KFK=Self__WKFK->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__2KFK)->__id) {
  case __LIST__: {
    __tmp__3KFK=static_type__GIQG(__tmp__2KFK);
  } break;
  case __STRING_CST__: {
    __tmp__3KFK=((__STRING_CST *)__tmp__2KFK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__3KFK=((__EXTERNAL_C *)__tmp__2KFK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__3KFK=((__PROTOTYPE_CST *)__tmp__2KFK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__3KFK=((__INTEGER_CST *)__tmp__2KFK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__3KFK=((__LOCAL *)((__READ_LOCAL *)__tmp__2KFK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3KFK=static_type__0N1H(__tmp__2KFK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3KFK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3KFK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__3KFK=((__REAL_CST *)__tmp__2KFK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__3KFK=((__CHARACTER_CST *)__tmp__2KFK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__3KFK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3KFK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__3KFK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__3KFK=static_type__MP1H(__tmp__2KFK);
  } break;
  case __EXPR_MUL__: {
    __tmp__3KFK=static_type__SP1H(__tmp__2KFK);
  } break;
  case __EXPR_DIV__: {
    __tmp__3KFK=static_type__XP1H(__tmp__2KFK);
  } break;
  case __EXPR_AND__: {
    __tmp__3KFK=static_type__2P1H(__tmp__2KFK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3KFK=static_type__BQ1H(__tmp__2KFK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3KFK=static_type__GQ1H(__tmp__2KFK);
  } break;
  case __PUT_TO__: {
    __tmp__3KFK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__3KFK=static_type__PQ1H(__tmp__2KFK);
  } break;
  case __SIZE_OF__: {
    __tmp__3KFK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__3KFK=((__CAST *)__tmp__2KFK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__3KFK=static_type__GIKL(__tmp__2KFK);
  } break;
  case __READ_SLOT__: {
    __tmp__3KFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__2KFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__3KFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__2KFK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3KFK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3KFK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3KFK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3KFK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3KFK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__3KFK=static_type__Z2IM(__tmp__2KFK);
  } break;
  case __EXPR_ADD__: {
    __tmp__3KFK=static_type__IXML(__tmp__2KFK);
  } break;
  case __EXPR_NOT__: {
    __tmp__3KFK=static_type__BTXM(__tmp__2KFK);
  } break;
  case __EXPR_MOD__: {
    __tmp__3KFK=static_type__5LEO(__tmp__2KFK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3KFK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__3KFK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3KFK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__3KFK=static_type__NOPN(__tmp__2KFK);
  } break;
  case __EXPR_XOR__: {
    __tmp__3KFK=static_type__XCSO(__tmp__2KFK);
  } break;
  };
  __tmp__5KFK=((__TYPE_FULL *)__tmp__3KFK)->parent_type__KTL;
  if (__tmp__5KFK==NULL) {
    __tmp__ALFK=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__5KFK)->__id) {
    case __TYPE__: {
      __tmp__ALFK=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__ALFK=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__ALFK=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__ALFK=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__ALFK=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__ALFK=((void *)__tmp__5KFK);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__ALFK=NULL;
    } break;
    }
  };
  type_generic__YKFK=__tmp__ALFK;
  first_type__ZKFK=((void **)((__FAST_ARRAYoTYPE_FULLo *)((__TYPE_GENERIC *)__tmp__ALFK)->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0];
  if ((((__UINTEGER_8)(((__TYPE_FULL *)first_type__ZKFK)->flag__LTL &  1) !=  0) && (! is_expanded_c__0ZWG(first_type__ZKFK)))) {
    __tmp__TLFK=Self__WKFK->value__WR2H;
    switch (((struct ___OBJ *)__tmp__TLFK)->__id) {
    case __LIST__: {
      __tmp__ULFK=static_type__GIQG(__tmp__TLFK);
    } break;
    case __STRING_CST__: {
      __tmp__ULFK=((__STRING_CST *)__tmp__TLFK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ULFK=((__EXTERNAL_C *)__tmp__TLFK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ULFK=((__PROTOTYPE_CST *)__tmp__TLFK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__ULFK=((__INTEGER_CST *)__tmp__TLFK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__ULFK=((__LOCAL *)((__READ_LOCAL *)__tmp__TLFK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ULFK=static_type__0N1H(__tmp__TLFK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ULFK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ULFK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__ULFK=((__REAL_CST *)__tmp__TLFK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ULFK=((__CHARACTER_CST *)__tmp__TLFK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ULFK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ULFK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__ULFK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__ULFK=static_type__MP1H(__tmp__TLFK);
    } break;
    case __EXPR_MUL__: {
      __tmp__ULFK=static_type__SP1H(__tmp__TLFK);
    } break;
    case __EXPR_DIV__: {
      __tmp__ULFK=static_type__XP1H(__tmp__TLFK);
    } break;
    case __EXPR_AND__: {
      __tmp__ULFK=static_type__2P1H(__tmp__TLFK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ULFK=static_type__BQ1H(__tmp__TLFK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ULFK=static_type__GQ1H(__tmp__TLFK);
    } break;
    case __PUT_TO__: {
      __tmp__ULFK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__ULFK=static_type__PQ1H(__tmp__TLFK);
    } break;
    case __SIZE_OF__: {
      __tmp__ULFK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__ULFK=((__CAST *)__tmp__TLFK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__ULFK=static_type__GIKL(__tmp__TLFK);
    } break;
    case __READ_SLOT__: {
      __tmp__ULFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__TLFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ULFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TLFK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ULFK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ULFK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ULFK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ULFK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ULFK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__ULFK=static_type__Z2IM(__tmp__TLFK);
    } break;
    case __EXPR_ADD__: {
      __tmp__ULFK=static_type__IXML(__tmp__TLFK);
    } break;
    case __EXPR_NOT__: {
      __tmp__ULFK=static_type__BTXM(__tmp__TLFK);
    } break;
    case __EXPR_MOD__: {
      __tmp__ULFK=static_type__5LEO(__tmp__TLFK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ULFK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__ULFK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ULFK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__ULFK=static_type__NOPN(__tmp__TLFK);
    } break;
    case __EXPR_XOR__: {
      __tmp__ULFK=static_type__XCSO(__tmp__TLFK);
    } break;
    };
    if (((__UINTEGER_8)(((__TYPE_FULL *)__tmp__ULFK)->flag__LTL &  16) !=  0)) {
      append__MOK(buffer__XKFK,(&__string_404));
      __tmp__1LFK=Self__WKFK->value__WR2H;
      switch (((struct ___OBJ *)__tmp__1LFK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__1LFK),buffer__XKFK);
        append__MOK(buffer__XKFK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__XKFK,((__REAL_CST *)__tmp__1LFK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__0DZP=((__CHARACTER_CST *)__tmp__1LFK);
        add_last__YPK(buffer__XKFK,'\'');
        append__MOK(buffer__XKFK,Self__0DZP->text__HO2H);
        add_last__YPK(buffer__XKFK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__1LFK,buffer__XKFK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__1LFK,buffer__XKFK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__1LFK,buffer__XKFK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__XKFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1LFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__1LFK,buffer__XKFK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__1LFK,buffer__XKFK);
      } break;
      };
      add_last__YPK(buffer__XKFK,')');
    } else {
      __tmp__BMFK=Self__WKFK->value__WR2H;
      switch (((struct ___OBJ *)__tmp__BMFK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__BMFK),buffer__XKFK);
        append__MOK(buffer__XKFK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__XKFK,((__REAL_CST *)__tmp__BMFK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__CEZP=((__CHARACTER_CST *)__tmp__BMFK);
        add_last__YPK(buffer__XKFK,'\'');
        append__MOK(buffer__XKFK,Self__CEZP->text__HO2H);
        add_last__YPK(buffer__XKFK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__BMFK,buffer__XKFK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__BMFK,buffer__XKFK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__BMFK,buffer__XKFK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__XKFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BMFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__BMFK,buffer__XKFK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__BMFK,buffer__XKFK);
      } break;
      };
    };
  } else {
    __tmp__IMFK=Self__WKFK->value__WR2H;
    switch (((struct ___OBJ *)__tmp__IMFK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__IMFK),buffer__XKFK);
      append__MOK(buffer__XKFK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__XKFK,((__REAL_CST *)__tmp__IMFK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__KEZP=((__CHARACTER_CST *)__tmp__IMFK);
      add_last__YPK(buffer__XKFK,'\'');
      append__MOK(buffer__XKFK,Self__KEZP->text__HO2H);
      add_last__YPK(buffer__XKFK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__IMFK,buffer__XKFK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__IMFK,buffer__XKFK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__IMFK,buffer__XKFK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__XKFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__IMFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__IMFK,buffer__XKFK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__IMFK,buffer__XKFK);
    } break;
    };
  };
}

static void genere__KMFK(__ITEM *Self__LMFK,void *buffer__MMFK)
// ({ITEM},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__NMFK,*__tmp__OMFK;
  __CHARACTER_CST *Self__SEZP,*Self__0EZP;
  __tmp__NMFK=Self__LMFK->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__NMFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__NMFK),buffer__MMFK);
    append__MOK(buffer__MMFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__MMFK,((__REAL_CST *)__tmp__NMFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__SEZP=((__CHARACTER_CST *)__tmp__NMFK);
    add_last__YPK(buffer__MMFK,'\'');
    append__MOK(buffer__MMFK,Self__SEZP->text__HO2H);
    add_last__YPK(buffer__MMFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__NMFK,buffer__MMFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__NMFK,buffer__MMFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__NMFK,buffer__MMFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__MMFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__NMFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__NMFK,buffer__MMFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__NMFK,buffer__MMFK);
  } break;
  };
  add_last__YPK(buffer__MMFK,'[');
  __tmp__OMFK=Self__LMFK->index__CS2H;
  switch (((struct ___OBJ *)__tmp__OMFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__OMFK),buffer__MMFK);
    append__MOK(buffer__MMFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__MMFK,((__REAL_CST *)__tmp__OMFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__0EZP=((__CHARACTER_CST *)__tmp__OMFK);
    add_last__YPK(buffer__MMFK,'\'');
    append__MOK(buffer__MMFK,Self__0EZP->text__HO2H);
    add_last__YPK(buffer__MMFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__OMFK,buffer__MMFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__OMFK,buffer__MMFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__OMFK,buffer__MMFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__MMFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__OMFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__OMFK,buffer__MMFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__OMFK,buffer__MMFK);
  } break;
  };
  add_last__YPK(buffer__MMFK,']');
}

static void genere__PMFK(__SIZE_OF *Self__QMFK,void *buffer__RMFK)
// ({SIZE_OF},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__TMFK;
  void *__tmp__UMFK;
  void *__tmp__VMFK;
  __TYPE *Self__QD3I;
  __TYPE_NULL *Self__UD3I;
  __TYPE_VOID *Self__YD3I;
  __TYPE_CONTEXT *Self__2D3I;
  __TYPE_GENERIC *Self__FE3I;
  append__MOK(buffer__RMFK,(&__string_405));
  __tmp__TMFK=Self__QMFK->receiver__LS2H;
  switch (((struct ___OBJ *)__tmp__TMFK)->__id) {
  case __LIST__: {
    __tmp__UMFK=static_type__GIQG(__tmp__TMFK);
  } break;
  case __STRING_CST__: {
    __tmp__UMFK=((__STRING_CST *)__tmp__TMFK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__UMFK=((__EXTERNAL_C *)__tmp__TMFK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__UMFK=((__PROTOTYPE_CST *)__tmp__TMFK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__UMFK=((__INTEGER_CST *)__tmp__TMFK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__UMFK=((__LOCAL *)((__READ_LOCAL *)__tmp__TMFK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UMFK=static_type__0N1H(__tmp__TMFK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UMFK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UMFK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__UMFK=((__REAL_CST *)__tmp__TMFK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__UMFK=((__CHARACTER_CST *)__tmp__TMFK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__UMFK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UMFK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__UMFK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__UMFK=static_type__MP1H(__tmp__TMFK);
  } break;
  case __EXPR_MUL__: {
    __tmp__UMFK=static_type__SP1H(__tmp__TMFK);
  } break;
  case __EXPR_DIV__: {
    __tmp__UMFK=static_type__XP1H(__tmp__TMFK);
  } break;
  case __EXPR_AND__: {
    __tmp__UMFK=static_type__2P1H(__tmp__TMFK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UMFK=static_type__BQ1H(__tmp__TMFK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UMFK=static_type__GQ1H(__tmp__TMFK);
  } break;
  case __PUT_TO__: {
    __tmp__UMFK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__UMFK=static_type__PQ1H(__tmp__TMFK);
  } break;
  case __SIZE_OF__: {
    __tmp__UMFK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__UMFK=((__CAST *)__tmp__TMFK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__UMFK=static_type__GIKL(__tmp__TMFK);
  } break;
  case __READ_SLOT__: {
    __tmp__UMFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__TMFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__UMFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TMFK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UMFK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UMFK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UMFK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UMFK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UMFK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__UMFK=static_type__Z2IM(__tmp__TMFK);
  } break;
  case __EXPR_ADD__: {
    __tmp__UMFK=static_type__IXML(__tmp__TMFK);
  } break;
  case __EXPR_NOT__: {
    __tmp__UMFK=static_type__BTXM(__tmp__TMFK);
  } break;
  case __EXPR_MOD__: {
    __tmp__UMFK=static_type__5LEO(__tmp__TMFK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UMFK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__UMFK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UMFK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__UMFK=static_type__NOPN(__tmp__TMFK);
  } break;
  case __EXPR_XOR__: {
    __tmp__UMFK=static_type__XCSO(__tmp__TMFK);
  } break;
  };
  __tmp__VMFK=((__TYPE_FULL *)__tmp__UMFK)->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__VMFK)->__id) {
  case __TYPE__: {
    Self__QD3I=((__TYPE *)__tmp__VMFK);
    append__MOK(buffer__RMFK,(&__string_92));
    append__MOK(buffer__RMFK,((__PROTOTYPE *)Self__QD3I->prototype__RD)->parent_named__QD.name__1QB);
    add_genere_list__MK5I(Self__QD3I);
  } break;
  case __TYPE_NULL__: {
    Self__UD3I=((__TYPE_NULL *)__tmp__VMFK);
    append__MOK(buffer__RMFK,(&__string_92));
    append__MOK(buffer__RMFK,(&__string_59));
    add_genere_list__ZL5I(Self__UD3I);
  } break;
  case __TYPE_VOID__: {
    Self__YD3I=((__TYPE_VOID *)__tmp__VMFK);
    append__MOK(buffer__RMFK,(&__string_92));
    append__MOK(buffer__RMFK,(&__string_2));
    add_genere_list__GN5I(Self__YD3I);
  } break;
  case __TYPE_CONTEXT__: {
    Self__2D3I=((__TYPE_CONTEXT *)__tmp__VMFK);
    append__MOK(buffer__RMFK,(&__string_92));
    append__MOK(buffer__RMFK,(&__string_44));
    add_genere_list__TO5I(Self__2D3I);
  } break;
  case __TYPE_ID__: {
    append__MOK(buffer__RMFK,(&__string_92));
    append__MOK(buffer__RMFK,(&__string_46));
  } break;
  case __TYPE_GENERIC__: {
    Self__FE3I=((__TYPE_GENERIC *)__tmp__VMFK);
    append__MOK(buffer__RMFK,(&__string_92));
    append__MOK(buffer__RMFK,Self__FE3I->intern_name__FS2B);
    add_genere_list__BQ5I(Self__FE3I);
  } break;
  case __PROFIL_BLOCK__: {
    append__MOK(buffer__RMFK,(&__string_369));
  } break;
  };
  add_last__YPK(buffer__RMFK,')');
}

static void genere__WMFK(__CAST *Self__XMFK,void *buffer__YMFK)
// ({CAST},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__1MFK;
  __CHARACTER_CST *Self__IFZP;
  add_last__YPK(buffer__YMFK,'(');
  add_last__YPK(buffer__YMFK,'(');
  genere_declaration__Q2NI(Self__XMFK->static_type__SO1H,buffer__YMFK);
  add_last__YPK(buffer__YMFK,' ');
  genere_star_declaration__Q3NI(Self__XMFK->static_type__SO1H,buffer__YMFK);
  add_last__YPK(buffer__YMFK,')');
  __tmp__1MFK=Self__XMFK->value__US2H;
  switch (((struct ___OBJ *)__tmp__1MFK)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__1MFK),buffer__YMFK);
    append__MOK(buffer__YMFK,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__YMFK,((__REAL_CST *)__tmp__1MFK)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__IFZP=((__CHARACTER_CST *)__tmp__1MFK);
    add_last__YPK(buffer__YMFK,'\'');
    append__MOK(buffer__YMFK,Self__IFZP->text__HO2H);
    add_last__YPK(buffer__YMFK,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__1MFK,buffer__YMFK);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__1MFK,buffer__YMFK);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__1MFK,buffer__YMFK);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__YMFK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1MFK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__1MFK,buffer__YMFK);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__1MFK,buffer__YMFK);
  } break;
  };
  add_last__YPK(buffer__YMFK,')');
}

static void genere__MJKL(__CALL_SLOT *Self__NJKL,void *buffer__OJKL)
// ({CALL_SLOT},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *val__PJKL,*__tmp__KKKL,*__tmp__RMKL;
  void *arg__QJKL,*loc__12WM,*loc__F3WM;
  void *__tmp__RJKL,*__tmp__GLKL;
  void *__tmp__SJKL;
  __POSITION __tmp__LKKL,__tmp__YAXM,__tmp__VEXM;
  __INTEGER __tmp__4KKL,Self__O4NM,__tmp__KMKL,Self__GLUM,j__GAXM;
  __INTEGER __tmp__YA5Q,__tmp__3A5Q,j__DEXM,__tmp__CB5Q,__tmp__HB5Q;
  __WRITE_GLOBAL *Self__Z2WM;
  __WRITE_SLOT *Self__D3WM;
  __WRITE_LOCAL *Self__N3WM;
  __STRING *Self__FD0Q;
  void *__tmp__HLKL,*tab__FAXM,*tab__CEXM;
  __BOOLEAN __tmp__PLKL;
  void **__tmp__J25Q,**__tmp__K25Q,**__tmp__L25Q,**__tmp__M25Q;
  void **__tmp__N25Q,**__tmp__O25Q;
  val__PJKL=NULL;
  arg__QJKL=NULL;
  __tmp__RJKL=Self__NJKL->profil__QA2H;
  if (((struct ___OBJ *)__tmp__RJKL)->__id==__PROFIL_SLOT__) {
    __tmp__SJKL=((__PROFIL_SLOT *)__tmp__RJKL)->parent_profil__51LC.name__XJEI;
  } else {
    __tmp__SJKL=((__PROFIL_BLOCK *)__tmp__RJKL)->parent_profil__GHAG.name__XJEI;
  };
  append__MOK(buffer__OJKL,__tmp__SJKL);
  if ((is_interrupt__2MQL(Self__NJKL) || is_external__23NM(Self__NJKL))) {
    if (((void *)((void **)((__FAST_ARRAYoWRITEo *)Self__NJKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0] != (void *)NULL)) {
      __tmp__KKKL=((void **)((__FAST_ARRAYoWRITEo *)Self__NJKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0];
      switch (((struct ___OBJ *)__tmp__KKKL)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__LKKL=((__WRITE_GLOBAL *)__tmp__KKKL)->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
      } break;
      case __WRITE_SLOT__: {
        __tmp__LKKL=((__WRITE_SLOT *)__tmp__KKKL)->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__LKKL=((__WRITE_LOCAL *)__tmp__KKKL)->parent_write__X50I.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
      } break;
      };
      put_error__text__0AH( 1,(&__string_406));
      put_position__ECH(__tmp__LKKL);
      send_error__2FH();
    };
  };
  if ((! is_interrupt__2MQL(Self__NJKL))) {
    add_last__YPK(buffer__OJKL,'(');
    __tmp__4KKL=((__FAST_ARRAYoWRITEo *)Self__NJKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
    Self__O4NM= 0;
    while ((Self__O4NM <= __tmp__4KKL)) {
      val__PJKL=((void **)((__FAST_ARRAYoWRITEo *)Self__NJKL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__O4NM];
      __tmp__GLKL=Self__NJKL->profil__QA2H;
      if (((struct ___OBJ *)__tmp__GLKL)->__id==__PROFIL_SLOT__) {
        __tmp__HLKL=((__PROFIL_SLOT *)__tmp__GLKL)->parent_profil__51LC.argument_list__N5JH;
      } else {
        __tmp__HLKL=((__PROFIL_BLOCK *)__tmp__GLKL)->parent_profil__GHAG.argument_list__N5JH;
      };
      arg__QJKL=((void **)((__FAST_ARRAYoLOCALo *)__tmp__HLKL)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__O4NM];
      if (((void *)val__PJKL != (void *)NULL)) {
        switch (((struct ___OBJ *)val__PJKL)->__id) {
        case __WRITE_GLOBAL__: {
          genere_value__0JTK(val__PJKL,buffer__OJKL);
        } break;
        case __WRITE_SLOT__: {
          genere_value__LNTK(val__PJKL,buffer__OJKL);
        } break;
        case __WRITE_LOCAL__: {
          genere_value__HRTK(val__PJKL,buffer__OJKL);
        } break;
        };
        add_last__YPK(buffer__OJKL,',');
        __tmp__PLKL=TRUE__;
      } else {
        __tmp__PLKL=FALSE__;
      };
      if ((! __tmp__PLKL)) {
        if (((void *)arg__QJKL != (void *)NULL)) {
          append__MOK(buffer__OJKL,((__LOCAL *)arg__QJKL)->parent_variable__B2LC.intern_name__025F);
          add_last__YPK(buffer__OJKL,',');
        };
      };
      Self__O4NM=(__INTEGER)(Self__O4NM +  1);
    };
    if (((void *)Self__NJKL->result_list__1A2H != (void *)NULL)) {
      __tmp__KMKL=((__FAST_ARRAYoWRITEo *)Self__NJKL->result_list__1A2H)->parent_arrayed_collection__TAEH.upper__NPDI;
      Self__GLUM= 0;
      while ((Self__GLUM <= __tmp__KMKL)) {
        __tmp__RMKL=((void **)((__FAST_ARRAYoWRITEo *)Self__NJKL->result_list__1A2H)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__GLUM];
        switch (((struct ___OBJ *)__tmp__RMKL)->__id) {
        case __WRITE_GLOBAL__: {
          Self__Z2WM=((__WRITE_GLOBAL *)__tmp__RMKL);
          add_last__YPK(buffer__OJKL,'&');
          append__MOK(buffer__OJKL,((__SLOT_DATA *)Self__Z2WM->global__4U1H)->parent_variable__AJZD.intern_name__025F);
          loc__12WM=NULL;
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          if (('\0' != '+')) {
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            print__1ZE((&__string_376));
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            fputc((int)('\0'),stdout);
            print__1ZE((&__string_377));
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            __tmp__YAXM=((__POSITION ) 0);
            put_error__text__0AH( 2,(&__string_378));
            put_position__ECH(__tmp__YAXM);
            send_error__2FH();
          };
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          tab__FAXM=((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[ 0];
          j__GAXM= 0;
          __tmp__YA5Q=((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.upper__TI4F;
          __tmp__J25Q=((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.storage__FXPG;
          while (((j__GAXM <= __tmp__YA5Q) && ((void *)((__LOCAL *)((void **)__tmp__J25Q)[j__GAXM])->parent_variable__B2LC.type__125F != (void *)NULL))) {
            j__GAXM=(__INTEGER)(j__GAXM +  1);
          };
          if ((j__GAXM > ((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.upper__TI4F)) {
            add_last__T2FH(tab__FAXM,NULL);
          } else {
            __tmp__3A5Q=((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.upper__TI4F;
            __tmp__K25Q=((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.storage__FXPG;
            __tmp__L25Q=((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.storage__FXPG;
            while ((((j__GAXM <= __tmp__3A5Q) && ((void *)((void **)__tmp__K25Q)[j__GAXM] != (void *)NULL)) && ((void *)((__LOCAL *)((void **)__tmp__L25Q)[j__GAXM])->parent_variable__B2LC.type__125F == (void *)NULL))) {
              j__GAXM=(__INTEGER)(j__GAXM +  1);
            };
            if (((j__GAXM > ((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.upper__TI4F) || ((void *)((void **)((__FAST_ARRAYoLOCALo *)tab__FAXM)->parent_arrayed_collection__QI4F.storage__FXPG)[j__GAXM] != (void *)NULL))) {
              add__to__DU5K(tab__FAXM,NULL,j__GAXM);
            };
          };
        } break;
        case __WRITE_SLOT__: {
          Self__D3WM=((__WRITE_SLOT *)__tmp__RMKL);
          add_last__YPK(buffer__OJKL,'&');
          append__MOK(buffer__OJKL,((__SLOT_DATA *)Self__D3WM->slot__5T1H)->parent_variable__AJZD.intern_name__025F);
          loc__F3WM=NULL;
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          if (('\0' != '+')) {
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            print__1ZE((&__string_376));
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            fputc((int)('\0'),stdout);
            print__1ZE((&__string_377));
            print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
            __tmp__VEXM=((__POSITION ) 0);
            put_error__text__0AH( 2,(&__string_378));
            put_position__ECH(__tmp__VEXM);
            send_error__2FH();
          };
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          tab__CEXM=((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[ 0];
          j__DEXM= 0;
          __tmp__CB5Q=((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.upper__TI4F;
          __tmp__M25Q=((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.storage__FXPG;
          while (((j__DEXM <= __tmp__CB5Q) && ((void *)((__LOCAL *)((void **)__tmp__M25Q)[j__DEXM])->parent_variable__B2LC.type__125F != (void *)NULL))) {
            j__DEXM=(__INTEGER)(j__DEXM +  1);
          };
          if ((j__DEXM > ((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.upper__TI4F)) {
            add_last__T2FH(tab__CEXM,NULL);
          } else {
            __tmp__HB5Q=((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.upper__TI4F;
            __tmp__N25Q=((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.storage__FXPG;
            __tmp__O25Q=((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.storage__FXPG;
            while ((((j__DEXM <= __tmp__HB5Q) && ((void *)((void **)__tmp__N25Q)[j__DEXM] != (void *)NULL)) && ((void *)((__LOCAL *)((void **)__tmp__O25Q)[j__DEXM])->parent_variable__B2LC.type__125F == (void *)NULL))) {
              j__DEXM=(__INTEGER)(j__DEXM +  1);
            };
            if (((j__DEXM > ((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.upper__TI4F) || ((void *)((void **)((__FAST_ARRAYoLOCALo *)tab__CEXM)->parent_arrayed_collection__QI4F.storage__FXPG)[j__DEXM] != (void *)NULL))) {
              add__to__DU5K(tab__CEXM,NULL,j__DEXM);
            };
          };
        } break;
        case __WRITE_LOCAL__: {
          Self__N3WM=((__WRITE_LOCAL *)__tmp__RMKL);
          add_last__YPK(buffer__OJKL,'&');
          append__MOK(buffer__OJKL,((__LOCAL *)Self__N3WM->local__2RIJ)->parent_variable__B2LC.intern_name__025F);
          ((__LOCAL *)Self__N3WM->local__2RIJ)->parent_variable__B2LC.ensure_count__QEAG= 1;
          add_var_size__5JLK(Self__N3WM->local__2RIJ);
        } break;
        };
        add_last__YPK(buffer__OJKL,',');
        Self__GLUM=(__INTEGER)(Self__GLUM +  1);
      };
    };
    Self__FD0Q=((__STRING *)buffer__OJKL);
    if ((((__CHARACTER *)Self__FD0Q->storage__XNK)[(__INTEGER)(Self__FD0Q->count__VF -  1)] == ',')) {
      remove_last__RLLB(buffer__OJKL, 1);
    };
    add_last__YPK(buffer__OJKL,')');
  };
}

static void genere__NUNL(__READ_SLOT *Self__OUNL,void *buffer__PUNL)
// ({READ_SLOT},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *tf__QUNL,*__tmp__DVNL;
  void *t__RUNL;
  void *__tmp__2UNL,*__tmp__CVNL,*__tmp__TVNL,*__tmp__BWNL,*__tmp__JWNL;
  __CHARACTER_CST *Self__ZGZP,*Self__LHZP,*Self__XHZP,*Self__5HZP;
  __TYPE *Self__M5UJ;
  __TYPE_NULL *Self__Q5UJ;
  __TYPE_VOID *Self__U5UJ;
  __TYPE_CONTEXT *Self__Y5UJ;
  __PROFIL_BLOCK *Self__FBVJ;
  __BOOLEAN __tmp__VVNL;
  tf__QUNL=NULL;
  t__RUNL=NULL;
  if (((void *)((__SLOT_DATA *)Self__OUNL->slot__EVGK)->parent_variable__AJZD.intern_name__025F == (void *)(&__string_80))) {
    append__MOK(buffer__PUNL,(&__string_382));
    tf__QUNL=((__SLOT_DATA *)Self__OUNL->slot__EVGK)->parent_variable__AJZD.type__125F;
    genere_declaration__Q2NI(tf__QUNL,buffer__PUNL);
    add_last__YPK(buffer__PUNL,' ');
    genere_star_declaration__Q3NI(tf__QUNL,buffer__PUNL);
    add_last__YPK(buffer__PUNL,')');
    __tmp__2UNL=Self__OUNL->receiver__I1TI;
    switch (((struct ___OBJ *)__tmp__2UNL)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__2UNL),buffer__PUNL);
      append__MOK(buffer__PUNL,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__PUNL,((__REAL_CST *)__tmp__2UNL)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__ZGZP=((__CHARACTER_CST *)__tmp__2UNL);
      add_last__YPK(buffer__PUNL,'\'');
      append__MOK(buffer__PUNL,Self__ZGZP->text__HO2H);
      add_last__YPK(buffer__PUNL,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__2UNL,buffer__PUNL);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__2UNL,buffer__PUNL);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__2UNL,buffer__PUNL);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__PUNL,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__2UNL)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__2UNL,buffer__PUNL);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__2UNL,buffer__PUNL);
    } break;
    };
    append__MOK(buffer__PUNL,(&__string_407));
  } else {
    __tmp__CVNL=Self__OUNL->receiver__I1TI;
    switch (((struct ___OBJ *)__tmp__CVNL)->__id) {
    case __LIST__: {
      __tmp__DVNL=static_type__GIQG(__tmp__CVNL);
    } break;
    case __STRING_CST__: {
      __tmp__DVNL=((__STRING_CST *)__tmp__CVNL)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__DVNL=((__EXTERNAL_C *)__tmp__CVNL)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DVNL=((__PROTOTYPE_CST *)__tmp__CVNL)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__DVNL=((__INTEGER_CST *)__tmp__CVNL)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__DVNL=((__LOCAL *)((__READ_LOCAL *)__tmp__CVNL)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DVNL=static_type__0N1H(__tmp__CVNL);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DVNL=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DVNL=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__DVNL=((__REAL_CST *)__tmp__CVNL)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__DVNL=((__CHARACTER_CST *)__tmp__CVNL)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__DVNL=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DVNL=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__DVNL=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__DVNL=static_type__MP1H(__tmp__CVNL);
    } break;
    case __EXPR_MUL__: {
      __tmp__DVNL=static_type__SP1H(__tmp__CVNL);
    } break;
    case __EXPR_DIV__: {
      __tmp__DVNL=static_type__XP1H(__tmp__CVNL);
    } break;
    case __EXPR_AND__: {
      __tmp__DVNL=static_type__2P1H(__tmp__CVNL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DVNL=static_type__BQ1H(__tmp__CVNL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DVNL=static_type__GQ1H(__tmp__CVNL);
    } break;
    case __PUT_TO__: {
      __tmp__DVNL=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__DVNL=static_type__PQ1H(__tmp__CVNL);
    } break;
    case __SIZE_OF__: {
      __tmp__DVNL=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__DVNL=((__CAST *)__tmp__CVNL)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__DVNL=static_type__GIKL(__tmp__CVNL);
    } break;
    case __READ_SLOT__: {
      __tmp__DVNL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__CVNL)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__DVNL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__CVNL)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DVNL=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DVNL=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DVNL=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DVNL=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DVNL=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__DVNL=static_type__Z2IM(__tmp__CVNL);
    } break;
    case __EXPR_ADD__: {
      __tmp__DVNL=static_type__IXML(__tmp__CVNL);
    } break;
    case __EXPR_NOT__: {
      __tmp__DVNL=static_type__BTXM(__tmp__CVNL);
    } break;
    case __EXPR_MOD__: {
      __tmp__DVNL=static_type__5LEO(__tmp__CVNL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DVNL=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__DVNL=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DVNL=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__DVNL=static_type__NOPN(__tmp__CVNL);
    } break;
    case __EXPR_XOR__: {
      __tmp__DVNL=static_type__XCSO(__tmp__CVNL);
    } break;
    };
    tf__QUNL=__tmp__DVNL;
    if ((((__UINTEGER_8)(((__TYPE_FULL *)__tmp__DVNL)->flag__LTL &  4) !=  0) || ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__DVNL)->flag__LTL &  16) !=  0))) {
      __tmp__TVNL=Self__OUNL->receiver__I1TI;
      switch (((struct ___OBJ *)__tmp__TVNL)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__TVNL),buffer__PUNL);
        append__MOK(buffer__PUNL,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__PUNL,((__REAL_CST *)__tmp__TVNL)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__LHZP=((__CHARACTER_CST *)__tmp__TVNL);
        add_last__YPK(buffer__PUNL,'\'');
        append__MOK(buffer__PUNL,Self__LHZP->text__HO2H);
        add_last__YPK(buffer__PUNL,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__TVNL,buffer__PUNL);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__TVNL,buffer__PUNL);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__TVNL,buffer__PUNL);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__PUNL,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TVNL)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__TVNL,buffer__PUNL);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__TVNL,buffer__PUNL);
      } break;
      };
      append__MOK(buffer__PUNL,(&__string_19));
      __tmp__VVNL=TRUE__;
    } else {
      __tmp__VVNL=FALSE__;
    };
    if ((! __tmp__VVNL)) {
      if (((__UINTEGER_8)(((__TYPE_FULL *)__tmp__DVNL)->flag__LTL &  1) !=  0)) {
        __tmp__BWNL=Self__OUNL->receiver__I1TI;
        switch (((struct ___OBJ *)__tmp__BWNL)->__id) {
        case __LIST__: {
          genere__SFEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __STRING_CST__: {
          genere__EGEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXTERNAL_C__: {
          genere__OJEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __PROTOTYPE_CST__: {
          genere__AMEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __INTEGER_CST__: {
          genere__EMEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __READ_LOCAL__: {
          genere__FNEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(((__EXPR_MULTIPLE *)__tmp__BWNL),buffer__PUNL);
          append__MOK(buffer__PUNL,(&__string_270));
        } break;
        case __EXPR_EQUAL__: {
          genere__HOEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          genere__WSEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __REAL_CST__: {
          append__MOK(buffer__PUNL,((__REAL_CST *)__tmp__BWNL)->value__5N2H);
        } break;
        case __CHARACTER_CST__: {
          Self__XHZP=((__CHARACTER_CST *)__tmp__BWNL);
          add_last__YPK(buffer__PUNL,'\'');
          append__MOK(buffer__PUNL,Self__XHZP->text__HO2H);
          add_last__YPK(buffer__PUNL,'\'');
        } break;
        case __IS_EXPANDED__: {
          print__1ZE((&__string_271));
          fputc((int)('\n'),stdout);
          exit(( 1));
        } break;
        case __GET_TYPE_ID__: {
          genere__QXEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_SUP__: {
          genere__KYEK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_SUB__: {
          genere__Z2EK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_MUL__: {
          genere__D5EK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_DIV__: {
          genere__NBFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_AND__: {
          genere__XDFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_SHIFT_R__: {
          genere__BGFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_SHIFT_L__: {
          genere__LIFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __PUT_TO__: {
          genere__VKFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __ITEM__: {
          genere__KMFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __SIZE_OF__: {
          genere__PMFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __CAST__: {
          genere__WMFK(__tmp__BWNL,buffer__PUNL);
        } break;
        case __CALL_SLOT__: {
          genere__MJKL(__tmp__BWNL,buffer__PUNL);
        } break;
        case __READ_SLOT__: {
          genere__NUNL(__tmp__BWNL,buffer__PUNL);
        } break;
        case __READ_GLOBAL__: {
          append__MOK(buffer__PUNL,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BWNL)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
        } break;
        case __EXPR_NOT_LOGIC__: {
          genere__GZ0M(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_OR_LOGIC__: {
          genere__XVEO(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          genere__J2KO(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_AND_LOGIC__: {
          genere__4VEO(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          genere__R2KO(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_NEG__: {
          genere__CXJM(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_ADD__: {
          genere__VYML(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_NOT__: {
          genere__4JZM(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_MOD__: {
          genere__FWEO(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_SUP_EQ__: {
          genere__PCEP(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_INF__: {
          genere__LNRN(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_INF_EQ__: {
          genere__ZRRN(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_OR__: {
          genere__W0PN(__tmp__BWNL,buffer__PUNL);
        } break;
        case __EXPR_XOR__: {
          genere__YAUO(__tmp__BWNL,buffer__PUNL);
        } break;
        };
        add_last__YPK(buffer__PUNL,'.');
      } else {
        append__MOK(buffer__PUNL,(&__string_382));
        t__RUNL=receiver_type__R12G(Self__OUNL->slot__EVGK);
        switch (((struct ___OBJ *)t__RUNL)->__id) {
        case __TYPE__: {
          Self__M5UJ=((__TYPE *)t__RUNL);
          append__MOK(buffer__PUNL,(&__string_92));
          append__MOK(buffer__PUNL,((__PROTOTYPE *)Self__M5UJ->prototype__RD)->parent_named__QD.name__1QB);
          add_genere_list__MK5I(Self__M5UJ);
        } break;
        case __TYPE_NULL__: {
          Self__Q5UJ=((__TYPE_NULL *)t__RUNL);
          append__MOK(buffer__PUNL,(&__string_92));
          append__MOK(buffer__PUNL,(&__string_59));
          add_genere_list__ZL5I(Self__Q5UJ);
        } break;
        case __TYPE_VOID__: {
          Self__U5UJ=((__TYPE_VOID *)t__RUNL);
          append__MOK(buffer__PUNL,(&__string_92));
          append__MOK(buffer__PUNL,(&__string_2));
          add_genere_list__GN5I(Self__U5UJ);
        } break;
        case __TYPE_CONTEXT__: {
          Self__Y5UJ=((__TYPE_CONTEXT *)t__RUNL);
          append__MOK(buffer__PUNL,(&__string_92));
          append__MOK(buffer__PUNL,(&__string_44));
          add_genere_list__TO5I(Self__Y5UJ);
        } break;
        case __TYPE_ID__: {
          append__MOK(buffer__PUNL,(&__string_92));
          append__MOK(buffer__PUNL,(&__string_46));
        } break;
        case __TYPE_GENERIC__: {
          put_reference_declaration__55UJ(t__RUNL,buffer__PUNL);
        } break;
        case __PROFIL_BLOCK__: {
          Self__FBVJ=((__PROFIL_BLOCK *)t__RUNL);
          append__MOK(buffer__PUNL,(&__string_92));
          append__MOK(buffer__PUNL,Self__FBVJ->parent_profil__GHAG.name__XJEI);
          add_genere_list__NW0J(Self__FBVJ);
        } break;
        };
        add_last__YPK(buffer__PUNL,' ');
        switch (((struct ___OBJ *)t__RUNL)->__id) {
        case __TYPE__: {
          put_reference_star_declaration__TE3I(t__RUNL,buffer__PUNL);
        } break;
        case __TYPE_NULL__: {
          put_reference_star_declaration__4E3I(t__RUNL,buffer__PUNL);
        } break;
        case __TYPE_VOID__: {
          put_reference_star_declaration__JF3I(t__RUNL,buffer__PUNL);
        } break;
        case __TYPE_CONTEXT__: {
          put_reference_star_declaration__UF3I(t__RUNL,buffer__PUNL);
        } break;
        case __TYPE_ID__: {
        } break;
        case __TYPE_GENERIC__: {
          put_reference_star_declaration__AG3I(t__RUNL,buffer__PUNL);
        } break;
        case __PROFIL_BLOCK__: {
          put_reference_star_declaration__BDIJ(t__RUNL,buffer__PUNL);
        } break;
        };
        add_last__YPK(buffer__PUNL,')');
        __tmp__JWNL=Self__OUNL->receiver__I1TI;
        switch (((struct ___OBJ *)__tmp__JWNL)->__id) {
        case __LIST__: {
          genere__SFEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __STRING_CST__: {
          genere__EGEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXTERNAL_C__: {
          genere__OJEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __PROTOTYPE_CST__: {
          genere__AMEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __INTEGER_CST__: {
          genere__EMEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __READ_LOCAL__: {
          genere__FNEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(((__EXPR_MULTIPLE *)__tmp__JWNL),buffer__PUNL);
          append__MOK(buffer__PUNL,(&__string_270));
        } break;
        case __EXPR_EQUAL__: {
          genere__HOEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          genere__WSEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __REAL_CST__: {
          append__MOK(buffer__PUNL,((__REAL_CST *)__tmp__JWNL)->value__5N2H);
        } break;
        case __CHARACTER_CST__: {
          Self__5HZP=((__CHARACTER_CST *)__tmp__JWNL);
          add_last__YPK(buffer__PUNL,'\'');
          append__MOK(buffer__PUNL,Self__5HZP->text__HO2H);
          add_last__YPK(buffer__PUNL,'\'');
        } break;
        case __IS_EXPANDED__: {
          print__1ZE((&__string_271));
          fputc((int)('\n'),stdout);
          exit(( 1));
        } break;
        case __GET_TYPE_ID__: {
          genere__QXEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_SUP__: {
          genere__KYEK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_SUB__: {
          genere__Z2EK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_MUL__: {
          genere__D5EK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_DIV__: {
          genere__NBFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_AND__: {
          genere__XDFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_SHIFT_R__: {
          genere__BGFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_SHIFT_L__: {
          genere__LIFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __PUT_TO__: {
          genere__VKFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __ITEM__: {
          genere__KMFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __SIZE_OF__: {
          genere__PMFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __CAST__: {
          genere__WMFK(__tmp__JWNL,buffer__PUNL);
        } break;
        case __CALL_SLOT__: {
          genere__MJKL(__tmp__JWNL,buffer__PUNL);
        } break;
        case __READ_SLOT__: {
          genere__NUNL(__tmp__JWNL,buffer__PUNL);
        } break;
        case __READ_GLOBAL__: {
          append__MOK(buffer__PUNL,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JWNL)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
        } break;
        case __EXPR_NOT_LOGIC__: {
          genere__GZ0M(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_OR_LOGIC__: {
          genere__XVEO(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          genere__J2KO(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_AND_LOGIC__: {
          genere__4VEO(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          genere__R2KO(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_NEG__: {
          genere__CXJM(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_ADD__: {
          genere__VYML(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_NOT__: {
          genere__4JZM(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_MOD__: {
          genere__FWEO(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_SUP_EQ__: {
          genere__PCEP(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_INF__: {
          genere__LNRN(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_INF_EQ__: {
          genere__ZRRN(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_OR__: {
          genere__W0PN(__tmp__JWNL,buffer__PUNL);
        } break;
        case __EXPR_XOR__: {
          genere__YAUO(__tmp__JWNL,buffer__PUNL);
        } break;
        };
        append__MOK(buffer__PUNL,(&__string_399));
      };
    };
    append__MOK(buffer__PUNL,((__SLOT_DATA *)Self__OUNL->slot__EVGK)->parent_variable__AJZD.intern_name__025F);
  };
}

static void genere__ZSFK(__WRITE_LOCAL *Self__0SFK,void *buffer__1SFK)
// ({WRITE_LOCAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__KTFK;
  void *__tmp__LTFK;
  add_var_size__5JLK(Self__0SFK->local__2RIJ);
  if ((((__LOCAL *)Self__0SFK->local__2RIJ)->parent_variable__B2LC.ensure_count__QEAG == (__INTEGER)(-  1))) {
    add_last__YPK(buffer__1SFK,'*');
  };
  append__MOK(buffer__1SFK,((__LOCAL *)Self__0SFK->local__2RIJ)->parent_variable__B2LC.intern_name__025F);
  __tmp__KTFK=Self__0SFK->parent_write__X50I.value__HBEH;
  switch (((struct ___OBJ *)__tmp__KTFK)->__id) {
  case __LIST__: {
    __tmp__LTFK=static_type__GIQG(__tmp__KTFK);
  } break;
  case __STRING_CST__: {
    __tmp__LTFK=((__STRING_CST *)__tmp__KTFK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__LTFK=((__EXTERNAL_C *)__tmp__KTFK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__LTFK=((__PROTOTYPE_CST *)__tmp__KTFK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__LTFK=((__INTEGER_CST *)__tmp__KTFK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__LTFK=((__LOCAL *)((__READ_LOCAL *)__tmp__KTFK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__LTFK=static_type__0N1H(__tmp__KTFK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__LTFK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__LTFK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__LTFK=((__REAL_CST *)__tmp__KTFK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__LTFK=((__CHARACTER_CST *)__tmp__KTFK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__LTFK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__LTFK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__LTFK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__LTFK=static_type__MP1H(__tmp__KTFK);
  } break;
  case __EXPR_MUL__: {
    __tmp__LTFK=static_type__SP1H(__tmp__KTFK);
  } break;
  case __EXPR_DIV__: {
    __tmp__LTFK=static_type__XP1H(__tmp__KTFK);
  } break;
  case __EXPR_AND__: {
    __tmp__LTFK=static_type__2P1H(__tmp__KTFK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__LTFK=static_type__BQ1H(__tmp__KTFK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__LTFK=static_type__GQ1H(__tmp__KTFK);
  } break;
  case __PUT_TO__: {
    __tmp__LTFK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__LTFK=static_type__PQ1H(__tmp__KTFK);
  } break;
  case __SIZE_OF__: {
    __tmp__LTFK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__LTFK=((__CAST *)__tmp__KTFK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__LTFK=static_type__GIKL(__tmp__KTFK);
  } break;
  case __READ_SLOT__: {
    __tmp__LTFK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__KTFK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__LTFK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KTFK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__LTFK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__LTFK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__LTFK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__LTFK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__LTFK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__LTFK=static_type__Z2IM(__tmp__KTFK);
  } break;
  case __EXPR_ADD__: {
    __tmp__LTFK=static_type__IXML(__tmp__KTFK);
  } break;
  case __EXPR_NOT__: {
    __tmp__LTFK=static_type__BTXM(__tmp__KTFK);
  } break;
  case __EXPR_MOD__: {
    __tmp__LTFK=static_type__5LEO(__tmp__KTFK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__LTFK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__LTFK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__LTFK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__LTFK=static_type__NOPN(__tmp__KTFK);
  } break;
  case __EXPR_XOR__: {
    __tmp__LTFK=static_type__XCSO(__tmp__KTFK);
  } break;
  };
  if ((((void *)((__TYPE_FULL *)__tmp__LTFK)->parent_type__KTL == (void *)TYPE_NULL__) && ((void *)((__TYPE_FULL *)((__LOCAL *)Self__0SFK->local__2RIJ)->parent_variable__B2LC.type__125F)->parent_type__KTL == (void *)type_block__BLB))) {
    append__MOK(buffer__1SFK,(&__string_398));
  } else {
    add_last__YPK(buffer__1SFK,'=');
    genere_value__HRTK(Self__0SFK,buffer__1SFK);
  };
}

static void genere__GZ0M(__EXPR_NOT_LOGIC *Self__HZ0M,void *buffer__IZ0M)
// ({EXPR_NOT_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__KZ0M;
  __CHARACTER_CST *Self__QIZP;
  add_last__YPK(buffer__IZ0M,'(');
  add_last__YPK(buffer__IZ0M,'!');
  add_last__YPK(buffer__IZ0M,' ');
  __tmp__KZ0M=Self__HZ0M->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__KZ0M)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__KZ0M),buffer__IZ0M);
    append__MOK(buffer__IZ0M,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__IZ0M,((__REAL_CST *)__tmp__KZ0M)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__QIZP=((__CHARACTER_CST *)__tmp__KZ0M);
    add_last__YPK(buffer__IZ0M,'\'');
    append__MOK(buffer__IZ0M,Self__QIZP->text__HO2H);
    add_last__YPK(buffer__IZ0M,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__IZ0M,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KZ0M)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__KZ0M,buffer__IZ0M);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__KZ0M,buffer__IZ0M);
  } break;
  };
  add_last__YPK(buffer__IZ0M,')');
}

static void genere__WTXM(__LOOP *Self__XTXM,void *buffer__YTXM)
// ({LOOP},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *lst_true__150M,*lst_false__250M,*lst__350M;
  __POSITION pos__XHIQ;
  void *__tmp__WA1M;
  void *__tmp__XA1M,*switch__050M;
  void *__tmp__MD1M,*__tmp__NE1M;
  __CHARACTER_CST *Self__5IZP,*Self__KJZP;
  __BOOLEAN inverse__450M,result__550M,__tmp__RD1M;
  lst_true__150M=NULL;
  lst_false__250M=NULL;
  lst__350M=NULL;
  inverse__450M=FALSE__;
  result__550M=FALSE__;
  if (((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__XTXM->body__5ALM)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) <  1)) {
    pos__XHIQ=Self__XTXM->parent_instr__QKAL.parent_itm_object__TE.position__BJM;
    put_error__text__0AH( 1,(&__string_408));
    put_position__ECH(pos__XHIQ);
    send_error__2FH();
  };
  __tmp__WA1M=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)Self__XTXM->body__5ALM)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__XTXM->body__5ALM)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
  if (__tmp__WA1M==NULL) {
    __tmp__XA1M=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__WA1M)->__id) {
    case __LIST__: {
      __tmp__XA1M=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__XA1M=NULL;
    } break;
    case __PUSH__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__XA1M=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__XA1M=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__XA1M=NULL;
    } break;
    case __SWITCH__: {
      __tmp__XA1M=((void *)__tmp__WA1M);
    } break;
    case __NODE_TYPE__: {
      __tmp__XA1M=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__XA1M=NULL;
    } break;
    case __NODE_STYLE__: {
      __tmp__XA1M=NULL;
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__XA1M=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__XA1M=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__XA1M=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__XA1M=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__XA1M=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__XA1M=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__XA1M=NULL;
    } break;
    case __ITEM__: {
      __tmp__XA1M=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__XA1M=NULL;
    } break;
    case __CAST__: {
      __tmp__XA1M=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__XA1M=NULL;
    } break;
    case __NOP__: {
      __tmp__XA1M=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__XA1M=NULL;
    } break;
    case __WRITE_LOCAL__: {
      __tmp__XA1M=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__XA1M=NULL;
    } break;
    case __LOOP__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__XA1M=NULL;
    } break;
    case __LOOP_END__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__XA1M=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__XA1M=NULL;
    } break;
    }
  };
  switch__050M=__tmp__XA1M;
  if ((((((void *)__tmp__XA1M != (void *)NULL) && ((__INTEGER)(((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__XA1M)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2)) && ((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__XA1M)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->id__QMAG == (void *)type_true__FJB)) && ((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__XA1M)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->id__QMAG == (void *)type_false__NJB))) {
    lst_true__150M=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__XA1M)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG;
    lst_false__250M=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__XA1M)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG;
    if ((is_empty__UJVL(lst_true__150M) || is_empty__UJVL(lst_false__250M))) {
      if ((! is_empty__UJVL(lst_false__250M))) {
        inverse__450M=TRUE__;
        lst__350M=lst_true__150M;
        lst_true__150M=lst_false__250M;
        lst_false__250M=lst__350M;
      };
      if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__XTXM->body__5ALM)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) ==  2)) {
        result__550M=TRUE__;
        if (inverse__450M) {
          append__MOK(buffer__YTXM,(&__string_409));
        } else {
          append__MOK(buffer__YTXM,(&__string_410));
        };
        __tmp__MD1M=((__SWITCH *)__tmp__XA1M)->expr__MMFI;
        switch (((struct ___OBJ *)__tmp__MD1M)->__id) {
        case __LIST__: {
          genere__SFEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __STRING_CST__: {
          genere__EGEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXTERNAL_C__: {
          genere__OJEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __PROTOTYPE_CST__: {
          genere__AMEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __INTEGER_CST__: {
          genere__EMEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __READ_LOCAL__: {
          genere__FNEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_MULTIPLE__: {
          display__UYFK(((__EXPR_MULTIPLE *)__tmp__MD1M),buffer__YTXM);
          append__MOK(buffer__YTXM,(&__string_270));
        } break;
        case __EXPR_EQUAL__: {
          genere__HOEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          genere__WSEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __REAL_CST__: {
          append__MOK(buffer__YTXM,((__REAL_CST *)__tmp__MD1M)->value__5N2H);
        } break;
        case __CHARACTER_CST__: {
          Self__5IZP=((__CHARACTER_CST *)__tmp__MD1M);
          add_last__YPK(buffer__YTXM,'\'');
          append__MOK(buffer__YTXM,Self__5IZP->text__HO2H);
          add_last__YPK(buffer__YTXM,'\'');
        } break;
        case __IS_EXPANDED__: {
          print__1ZE((&__string_271));
          fputc((int)('\n'),stdout);
          exit(( 1));
        } break;
        case __GET_TYPE_ID__: {
          genere__QXEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_SUP__: {
          genere__KYEK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_SUB__: {
          genere__Z2EK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_MUL__: {
          genere__D5EK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_DIV__: {
          genere__NBFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_AND__: {
          genere__XDFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_SHIFT_R__: {
          genere__BGFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_SHIFT_L__: {
          genere__LIFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __PUT_TO__: {
          genere__VKFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __ITEM__: {
          genere__KMFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __SIZE_OF__: {
          genere__PMFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __CAST__: {
          genere__WMFK(__tmp__MD1M,buffer__YTXM);
        } break;
        case __CALL_SLOT__: {
          genere__MJKL(__tmp__MD1M,buffer__YTXM);
        } break;
        case __READ_SLOT__: {
          genere__NUNL(__tmp__MD1M,buffer__YTXM);
        } break;
        case __READ_GLOBAL__: {
          append__MOK(buffer__YTXM,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__MD1M)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
        } break;
        case __EXPR_NOT_LOGIC__: {
          genere__GZ0M(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_OR_LOGIC__: {
          genere__XVEO(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          genere__J2KO(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_AND_LOGIC__: {
          genere__4VEO(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          genere__R2KO(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_NEG__: {
          genere__CXJM(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_ADD__: {
          genere__VYML(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_NOT__: {
          genere__4JZM(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_MOD__: {
          genere__FWEO(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_SUP_EQ__: {
          genere__PCEP(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_INF__: {
          genere__LNRN(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_INF_EQ__: {
          genere__ZRRN(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_OR__: {
          genere__W0PN(__tmp__MD1M,buffer__YTXM);
        } break;
        case __EXPR_XOR__: {
          genere__YAUO(__tmp__MD1M,buffer__YTXM);
        } break;
        };
        append__MOK(buffer__YTXM,(&__string_390));
        remove_index__MD1G(lst_true__150M,(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)lst_true__150M)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1));
        genere__SFEK(lst_true__150M,buffer__YTXM);
        __tmp__RD1M=TRUE__;
      } else {
        __tmp__RD1M=FALSE__;
      };
      if ((! __tmp__RD1M)) {
        if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)lst_true__150M)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) ==  2)) {
          result__550M=TRUE__;
          append__MOK(buffer__YTXM,(&__string_411));
          remove_index__MD1G(Self__XTXM->body__5ALM,(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__XTXM->body__5ALM)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1));
          genere__SFEK(Self__XTXM->body__5ALM,buffer__YTXM);
          if (inverse__450M) {
            append__MOK(buffer__YTXM,(&__string_412));
          } else {
            append__MOK(buffer__YTXM,(&__string_413));
          };
          __tmp__NE1M=((__SWITCH *)__tmp__XA1M)->expr__MMFI;
          switch (((struct ___OBJ *)__tmp__NE1M)->__id) {
          case __LIST__: {
            genere__SFEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __STRING_CST__: {
            genere__EGEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXTERNAL_C__: {
            genere__OJEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __PROTOTYPE_CST__: {
            genere__AMEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __INTEGER_CST__: {
            genere__EMEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __READ_LOCAL__: {
            genere__FNEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_MULTIPLE__: {
            display__UYFK(((__EXPR_MULTIPLE *)__tmp__NE1M),buffer__YTXM);
            append__MOK(buffer__YTXM,(&__string_270));
          } break;
          case __EXPR_EQUAL__: {
            genere__HOEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_NOT_EQUAL__: {
            genere__WSEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __REAL_CST__: {
            append__MOK(buffer__YTXM,((__REAL_CST *)__tmp__NE1M)->value__5N2H);
          } break;
          case __CHARACTER_CST__: {
            Self__KJZP=((__CHARACTER_CST *)__tmp__NE1M);
            add_last__YPK(buffer__YTXM,'\'');
            append__MOK(buffer__YTXM,Self__KJZP->text__HO2H);
            add_last__YPK(buffer__YTXM,'\'');
          } break;
          case __IS_EXPANDED__: {
            print__1ZE((&__string_271));
            fputc((int)('\n'),stdout);
            exit(( 1));
          } break;
          case __GET_TYPE_ID__: {
            genere__QXEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_SUP__: {
            genere__KYEK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_SUB__: {
            genere__Z2EK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_MUL__: {
            genere__D5EK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_DIV__: {
            genere__NBFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_AND__: {
            genere__XDFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_SHIFT_R__: {
            genere__BGFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_SHIFT_L__: {
            genere__LIFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __PUT_TO__: {
            genere__VKFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __ITEM__: {
            genere__KMFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __SIZE_OF__: {
            genere__PMFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __CAST__: {
            genere__WMFK(__tmp__NE1M,buffer__YTXM);
          } break;
          case __CALL_SLOT__: {
            genere__MJKL(__tmp__NE1M,buffer__YTXM);
          } break;
          case __READ_SLOT__: {
            genere__NUNL(__tmp__NE1M,buffer__YTXM);
          } break;
          case __READ_GLOBAL__: {
            append__MOK(buffer__YTXM,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__NE1M)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
          } break;
          case __EXPR_NOT_LOGIC__: {
            genere__GZ0M(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_OR_LOGIC__: {
            genere__XVEO(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            genere__J2KO(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_AND_LOGIC__: {
            genere__4VEO(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            genere__R2KO(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_NEG__: {
            genere__CXJM(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_ADD__: {
            genere__VYML(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_NOT__: {
            genere__4JZM(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_MOD__: {
            genere__FWEO(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_SUP_EQ__: {
            genere__PCEP(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_INF__: {
            genere__LNRN(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_INF_EQ__: {
            genere__ZRRN(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_OR__: {
            genere__W0PN(__tmp__NE1M,buffer__YTXM);
          } break;
          case __EXPR_XOR__: {
            genere__YAUO(__tmp__NE1M,buffer__YTXM);
          } break;
          };
          add_last__YPK(buffer__YTXM,')');
        };
      };
    };
  };
  if ((! result__550M)) {
    append__MOK(buffer__YTXM,Self__XTXM->name__DILM);
    append__MOK(buffer__YTXM,(&__string_263));
    append__MOK(buffer__YTXM,indent__ZQOG);
    genere__SFEK(Self__XTXM->body__5ALM,buffer__YTXM);
  };
}

static void genere__XVEO(__EXPR_OR_LOGIC *Self__YVEO,void *buffer__ZVEO)
// ({EXPR_OR_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__0VEO,*__tmp__3VEO;
  __CHARACTER_CST *Self__VJZP,*Self__AKZP;
  add_last__YPK(buffer__ZVEO,'(');
  __tmp__0VEO=Self__YVEO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__0VEO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__0VEO),buffer__ZVEO);
    append__MOK(buffer__ZVEO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__ZVEO,((__REAL_CST *)__tmp__0VEO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__VJZP=((__CHARACTER_CST *)__tmp__0VEO);
    add_last__YPK(buffer__ZVEO,'\'');
    append__MOK(buffer__ZVEO,Self__VJZP->text__HO2H);
    add_last__YPK(buffer__ZVEO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__ZVEO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0VEO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__0VEO,buffer__ZVEO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__0VEO,buffer__ZVEO);
  } break;
  };
  add_last__YPK(buffer__ZVEO,' ');
  append__MOK(buffer__ZVEO,(&__string_361));
  add_last__YPK(buffer__ZVEO,' ');
  __tmp__3VEO=Self__YVEO->parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__3VEO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__3VEO),buffer__ZVEO);
    append__MOK(buffer__ZVEO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__ZVEO,((__REAL_CST *)__tmp__3VEO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__AKZP=((__CHARACTER_CST *)__tmp__3VEO);
    add_last__YPK(buffer__ZVEO,'\'');
    append__MOK(buffer__ZVEO,Self__AKZP->text__HO2H);
    add_last__YPK(buffer__ZVEO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__ZVEO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__3VEO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__3VEO,buffer__ZVEO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__3VEO,buffer__ZVEO);
  } break;
  };
  add_last__YPK(buffer__ZVEO,')');
}

static void genere__J2KO(__EXPR_OR_OR_LOGIC *Self__K2KO,void *buffer__L2KO)
// ({EXPR_OR_OR_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__M2KO,*__tmp__P2KO;
  __CHARACTER_CST *Self__LKZP,*Self__WKZP;
  add_last__YPK(buffer__L2KO,'(');
  __tmp__M2KO=Self__K2KO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__M2KO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__M2KO),buffer__L2KO);
    append__MOK(buffer__L2KO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__L2KO,((__REAL_CST *)__tmp__M2KO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__LKZP=((__CHARACTER_CST *)__tmp__M2KO);
    add_last__YPK(buffer__L2KO,'\'');
    append__MOK(buffer__L2KO,Self__LKZP->text__HO2H);
    add_last__YPK(buffer__L2KO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__M2KO,buffer__L2KO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__M2KO,buffer__L2KO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__M2KO,buffer__L2KO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__L2KO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__M2KO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__M2KO,buffer__L2KO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__M2KO,buffer__L2KO);
  } break;
  };
  add_last__YPK(buffer__L2KO,' ');
  append__MOK(buffer__L2KO,(&__string_362));
  add_last__YPK(buffer__L2KO,' ');
  __tmp__P2KO=Self__K2KO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__P2KO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__P2KO),buffer__L2KO);
    append__MOK(buffer__L2KO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__L2KO,((__REAL_CST *)__tmp__P2KO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__WKZP=((__CHARACTER_CST *)__tmp__P2KO);
    add_last__YPK(buffer__L2KO,'\'');
    append__MOK(buffer__L2KO,Self__WKZP->text__HO2H);
    add_last__YPK(buffer__L2KO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__P2KO,buffer__L2KO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__P2KO,buffer__L2KO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__P2KO,buffer__L2KO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__L2KO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__P2KO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__P2KO,buffer__L2KO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__P2KO,buffer__L2KO);
  } break;
  };
  add_last__YPK(buffer__L2KO,')');
}

static void genere__4VEO(__EXPR_AND_LOGIC *Self__5VEO,void *buffer__AWEO)
// ({EXPR_AND_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__BWEO,*__tmp__EWEO;
  __CHARACTER_CST *Self__BLZP,*Self__MLZP;
  add_last__YPK(buffer__AWEO,'(');
  __tmp__BWEO=Self__5VEO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__BWEO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__BWEO),buffer__AWEO);
    append__MOK(buffer__AWEO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__AWEO,((__REAL_CST *)__tmp__BWEO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__BLZP=((__CHARACTER_CST *)__tmp__BWEO);
    add_last__YPK(buffer__AWEO,'\'');
    append__MOK(buffer__AWEO,Self__BLZP->text__HO2H);
    add_last__YPK(buffer__AWEO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__BWEO,buffer__AWEO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__BWEO,buffer__AWEO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__BWEO,buffer__AWEO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__AWEO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BWEO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__BWEO,buffer__AWEO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__BWEO,buffer__AWEO);
  } break;
  };
  add_last__YPK(buffer__AWEO,' ');
  append__MOK(buffer__AWEO,(&__string_353));
  add_last__YPK(buffer__AWEO,' ');
  __tmp__EWEO=Self__5VEO->parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__EWEO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__EWEO),buffer__AWEO);
    append__MOK(buffer__AWEO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__AWEO,((__REAL_CST *)__tmp__EWEO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__MLZP=((__CHARACTER_CST *)__tmp__EWEO);
    add_last__YPK(buffer__AWEO,'\'');
    append__MOK(buffer__AWEO,Self__MLZP->text__HO2H);
    add_last__YPK(buffer__AWEO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__EWEO,buffer__AWEO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__EWEO,buffer__AWEO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__EWEO,buffer__AWEO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__AWEO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__EWEO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__EWEO,buffer__AWEO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__EWEO,buffer__AWEO);
  } break;
  };
  add_last__YPK(buffer__AWEO,')');
}

static void genere__R2KO(__EXPR_AND_AND_LOGIC *Self__S2KO,void *buffer__T2KO)
// ({EXPR_AND_AND_LOGIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__U2KO,*__tmp__X2KO;
  __CHARACTER_CST *Self__XLZP,*Self__CMZP;
  add_last__YPK(buffer__T2KO,'(');
  __tmp__U2KO=Self__S2KO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__U2KO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__U2KO),buffer__T2KO);
    append__MOK(buffer__T2KO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__T2KO,((__REAL_CST *)__tmp__U2KO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__XLZP=((__CHARACTER_CST *)__tmp__U2KO);
    add_last__YPK(buffer__T2KO,'\'');
    append__MOK(buffer__T2KO,Self__XLZP->text__HO2H);
    add_last__YPK(buffer__T2KO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__U2KO,buffer__T2KO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__U2KO,buffer__T2KO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__U2KO,buffer__T2KO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__T2KO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__U2KO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__U2KO,buffer__T2KO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__U2KO,buffer__T2KO);
  } break;
  };
  add_last__YPK(buffer__T2KO,' ');
  append__MOK(buffer__T2KO,(&__string_363));
  add_last__YPK(buffer__T2KO,' ');
  __tmp__X2KO=Self__S2KO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__X2KO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__X2KO),buffer__T2KO);
    append__MOK(buffer__T2KO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__T2KO,((__REAL_CST *)__tmp__X2KO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__CMZP=((__CHARACTER_CST *)__tmp__X2KO);
    add_last__YPK(buffer__T2KO,'\'');
    append__MOK(buffer__T2KO,Self__CMZP->text__HO2H);
    add_last__YPK(buffer__T2KO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__X2KO,buffer__T2KO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__X2KO,buffer__T2KO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__X2KO,buffer__T2KO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__T2KO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__X2KO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__X2KO,buffer__T2KO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__X2KO,buffer__T2KO);
  } break;
  };
  add_last__YPK(buffer__T2KO,')');
}

static void genere__CXJM(__EXPR_NEG *Self__DXJM,void *buffer__EXJM)
// ({EXPR_NEG},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__HXJM;
  __CHARACTER_CST *Self__NMZP;
  add_last__YPK(buffer__EXJM,'(');
  genere_declaration__Q2NI(static_type__Z2IM(Self__DXJM),buffer__EXJM);
  add_last__YPK(buffer__EXJM,')');
  add_last__YPK(buffer__EXJM,'(');
  add_last__YPK(buffer__EXJM,'-');
  add_last__YPK(buffer__EXJM,' ');
  __tmp__HXJM=Self__DXJM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__HXJM)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__HXJM),buffer__EXJM);
    append__MOK(buffer__EXJM,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__EXJM,((__REAL_CST *)__tmp__HXJM)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__NMZP=((__CHARACTER_CST *)__tmp__HXJM);
    add_last__YPK(buffer__EXJM,'\'');
    append__MOK(buffer__EXJM,Self__NMZP->text__HO2H);
    add_last__YPK(buffer__EXJM,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__HXJM,buffer__EXJM);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__HXJM,buffer__EXJM);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__HXJM,buffer__EXJM);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__EXJM,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__HXJM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__HXJM,buffer__EXJM);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__HXJM,buffer__EXJM);
  } break;
  };
  add_last__YPK(buffer__EXJM,')');
}

static void genere__VYML(__EXPR_ADD *Self__WYML,void *buffer__XYML)
// ({EXPR_ADD},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__VZML,*__tmp__B0ML,*__tmp__S0ML,*__tmp__40ML;
  void *__tmp__WZML,*__tmp__T0ML;
  __CHARACTER_CST *Self__CNZP,*Self__XNZP;
  __BOOLEAN __tmp__QZML,__tmp__N0ML;
  if (((void *)((__TYPE_FULL *)static_type__IXML(Self__WYML))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__XYML,(&__string_400));
  } else {
    add_last__YPK(buffer__XYML,'(');
    genere_declaration__Q2NI(static_type__IXML(Self__WYML),buffer__XYML);
    add_last__YPK(buffer__XYML,')');
  };
  add_last__YPK(buffer__XYML,'(');
  if (((void *)((__TYPE_FULL *)static_type__IXML(Self__WYML))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__XYML,(&__string_401));
    __tmp__QZML=TRUE__;
  } else {
    __tmp__QZML=FALSE__;
  };
  if ((! __tmp__QZML)) {
    __tmp__VZML=Self__WYML->parent_expr_binary__UZDL.left__PP1H;
    switch (((struct ___OBJ *)__tmp__VZML)->__id) {
    case __LIST__: {
      __tmp__WZML=static_type__GIQG(__tmp__VZML);
    } break;
    case __STRING_CST__: {
      __tmp__WZML=((__STRING_CST *)__tmp__VZML)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WZML=((__EXTERNAL_C *)__tmp__VZML)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WZML=((__PROTOTYPE_CST *)__tmp__VZML)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__WZML=((__INTEGER_CST *)__tmp__VZML)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__WZML=((__LOCAL *)((__READ_LOCAL *)__tmp__VZML)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WZML=static_type__0N1H(__tmp__VZML);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WZML=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WZML=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__WZML=((__REAL_CST *)__tmp__VZML)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WZML=((__CHARACTER_CST *)__tmp__VZML)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WZML=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WZML=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__WZML=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__WZML=static_type__MP1H(__tmp__VZML);
    } break;
    case __EXPR_MUL__: {
      __tmp__WZML=static_type__SP1H(__tmp__VZML);
    } break;
    case __EXPR_DIV__: {
      __tmp__WZML=static_type__XP1H(__tmp__VZML);
    } break;
    case __EXPR_AND__: {
      __tmp__WZML=static_type__2P1H(__tmp__VZML);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WZML=static_type__BQ1H(__tmp__VZML);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WZML=static_type__GQ1H(__tmp__VZML);
    } break;
    case __PUT_TO__: {
      __tmp__WZML=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__WZML=static_type__PQ1H(__tmp__VZML);
    } break;
    case __SIZE_OF__: {
      __tmp__WZML=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__WZML=((__CAST *)__tmp__VZML)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__WZML=static_type__GIKL(__tmp__VZML);
    } break;
    case __READ_SLOT__: {
      __tmp__WZML=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VZML)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WZML=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VZML)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WZML=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WZML=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WZML=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WZML=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WZML=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__WZML=static_type__Z2IM(__tmp__VZML);
    } break;
    case __EXPR_ADD__: {
      __tmp__WZML=static_type__IXML(__tmp__VZML);
    } break;
    case __EXPR_NOT__: {
      __tmp__WZML=static_type__BTXM(__tmp__VZML);
    } break;
    case __EXPR_MOD__: {
      __tmp__WZML=static_type__5LEO(__tmp__VZML);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WZML=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__WZML=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WZML=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__WZML=static_type__NOPN(__tmp__VZML);
    } break;
    case __EXPR_XOR__: {
      __tmp__WZML=static_type__XCSO(__tmp__VZML);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__WZML)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__XYML,(&__string_400));
    };
  };
  __tmp__B0ML=Self__WYML->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__B0ML)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__B0ML),buffer__XYML);
    append__MOK(buffer__XYML,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__XYML,((__REAL_CST *)__tmp__B0ML)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__CNZP=((__CHARACTER_CST *)__tmp__B0ML);
    add_last__YPK(buffer__XYML,'\'');
    append__MOK(buffer__XYML,Self__CNZP->text__HO2H);
    add_last__YPK(buffer__XYML,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__B0ML,buffer__XYML);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__B0ML,buffer__XYML);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__B0ML,buffer__XYML);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__XYML,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__B0ML)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__B0ML,buffer__XYML);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__B0ML,buffer__XYML);
  } break;
  };
  add_last__YPK(buffer__XYML,' ');
  append__MOK(buffer__XYML,(&__string_364));
  add_last__YPK(buffer__XYML,' ');
  if (((void *)((__TYPE_FULL *)static_type__IXML(Self__WYML))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__XYML,(&__string_401));
    __tmp__N0ML=TRUE__;
  } else {
    __tmp__N0ML=FALSE__;
  };
  if ((! __tmp__N0ML)) {
    __tmp__S0ML=Self__WYML->parent_expr_binary__UZDL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__S0ML)->__id) {
    case __LIST__: {
      __tmp__T0ML=static_type__GIQG(__tmp__S0ML);
    } break;
    case __STRING_CST__: {
      __tmp__T0ML=((__STRING_CST *)__tmp__S0ML)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__T0ML=((__EXTERNAL_C *)__tmp__S0ML)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__T0ML=((__PROTOTYPE_CST *)__tmp__S0ML)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__T0ML=((__INTEGER_CST *)__tmp__S0ML)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__T0ML=((__LOCAL *)((__READ_LOCAL *)__tmp__S0ML)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__T0ML=static_type__0N1H(__tmp__S0ML);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__T0ML=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__T0ML=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__T0ML=((__REAL_CST *)__tmp__S0ML)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__T0ML=((__CHARACTER_CST *)__tmp__S0ML)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__T0ML=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__T0ML=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__T0ML=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__T0ML=static_type__MP1H(__tmp__S0ML);
    } break;
    case __EXPR_MUL__: {
      __tmp__T0ML=static_type__SP1H(__tmp__S0ML);
    } break;
    case __EXPR_DIV__: {
      __tmp__T0ML=static_type__XP1H(__tmp__S0ML);
    } break;
    case __EXPR_AND__: {
      __tmp__T0ML=static_type__2P1H(__tmp__S0ML);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__T0ML=static_type__BQ1H(__tmp__S0ML);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__T0ML=static_type__GQ1H(__tmp__S0ML);
    } break;
    case __PUT_TO__: {
      __tmp__T0ML=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__T0ML=static_type__PQ1H(__tmp__S0ML);
    } break;
    case __SIZE_OF__: {
      __tmp__T0ML=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__T0ML=((__CAST *)__tmp__S0ML)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__T0ML=static_type__GIKL(__tmp__S0ML);
    } break;
    case __READ_SLOT__: {
      __tmp__T0ML=((__SLOT_DATA *)((__READ_SLOT *)__tmp__S0ML)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__T0ML=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__S0ML)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__T0ML=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__T0ML=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__T0ML=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__T0ML=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__T0ML=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__T0ML=static_type__Z2IM(__tmp__S0ML);
    } break;
    case __EXPR_ADD__: {
      __tmp__T0ML=static_type__IXML(__tmp__S0ML);
    } break;
    case __EXPR_NOT__: {
      __tmp__T0ML=static_type__BTXM(__tmp__S0ML);
    } break;
    case __EXPR_MOD__: {
      __tmp__T0ML=static_type__5LEO(__tmp__S0ML);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__T0ML=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__T0ML=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__T0ML=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__T0ML=static_type__NOPN(__tmp__S0ML);
    } break;
    case __EXPR_XOR__: {
      __tmp__T0ML=static_type__XCSO(__tmp__S0ML);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__T0ML)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__XYML,(&__string_400));
    };
  };
  __tmp__40ML=Self__WYML->parent_expr_binary__UZDL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__40ML)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__40ML,buffer__XYML);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__40ML,buffer__XYML);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__40ML,buffer__XYML);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__40ML,buffer__XYML);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__40ML),buffer__XYML);
    append__MOK(buffer__XYML,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__40ML,buffer__XYML);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__XYML,((__REAL_CST *)__tmp__40ML)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__XNZP=((__CHARACTER_CST *)__tmp__40ML);
    add_last__YPK(buffer__XYML,'\'');
    append__MOK(buffer__XYML,Self__XNZP->text__HO2H);
    add_last__YPK(buffer__XYML,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__40ML,buffer__XYML);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__40ML,buffer__XYML);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__40ML,buffer__XYML);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__40ML,buffer__XYML);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__40ML,buffer__XYML);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__40ML,buffer__XYML);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__40ML,buffer__XYML);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__XYML,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__40ML)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__40ML,buffer__XYML);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__40ML,buffer__XYML);
  } break;
  };
  add_last__YPK(buffer__XYML,')');
}

static void genere__4JZM(__EXPR_NOT *Self__5JZM,void *buffer__AKZM)
// ({EXPR_NOT},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__DKZM;
  __CHARACTER_CST *Self__COZP;
  add_last__YPK(buffer__AKZM,'(');
  genere_declaration__Q2NI(static_type__BTXM(Self__5JZM),buffer__AKZM);
  add_last__YPK(buffer__AKZM,')');
  add_last__YPK(buffer__AKZM,'(');
  add_last__YPK(buffer__AKZM,'~');
  add_last__YPK(buffer__AKZM,' ');
  __tmp__DKZM=Self__5JZM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__DKZM)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__DKZM),buffer__AKZM);
    append__MOK(buffer__AKZM,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__AKZM,((__REAL_CST *)__tmp__DKZM)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__COZP=((__CHARACTER_CST *)__tmp__DKZM);
    add_last__YPK(buffer__AKZM,'\'');
    append__MOK(buffer__AKZM,Self__COZP->text__HO2H);
    add_last__YPK(buffer__AKZM,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__DKZM,buffer__AKZM);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__DKZM,buffer__AKZM);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__DKZM,buffer__AKZM);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__AKZM,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__DKZM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__DKZM,buffer__AKZM);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__DKZM,buffer__AKZM);
  } break;
  };
  add_last__YPK(buffer__AKZM,')');
}

static void genere__FWEO(__EXPR_MOD *Self__GWEO,void *buffer__HWEO)
// ({EXPR_MOD},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__FXEO,*__tmp__RXEO,*__tmp__CYEO,*__tmp__OYEO;
  void *__tmp__GXEO,*__tmp__DYEO;
  __CHARACTER_CST *Self__XOZP,*Self__MPZP;
  __BOOLEAN __tmp__AXEO,__tmp__3XEO;
  if (((void *)((__TYPE_FULL *)static_type__5LEO(Self__GWEO))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__HWEO,(&__string_400));
  } else {
    add_last__YPK(buffer__HWEO,'(');
    genere_declaration__Q2NI(static_type__5LEO(Self__GWEO),buffer__HWEO);
    add_last__YPK(buffer__HWEO,')');
  };
  add_last__YPK(buffer__HWEO,'(');
  if (((void *)((__TYPE_FULL *)static_type__5LEO(Self__GWEO))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__HWEO,(&__string_401));
    __tmp__AXEO=TRUE__;
  } else {
    __tmp__AXEO=FALSE__;
  };
  if ((! __tmp__AXEO)) {
    __tmp__FXEO=Self__GWEO->parent_expr_binary__PDWL.left__PP1H;
    switch (((struct ___OBJ *)__tmp__FXEO)->__id) {
    case __LIST__: {
      __tmp__GXEO=static_type__GIQG(__tmp__FXEO);
    } break;
    case __STRING_CST__: {
      __tmp__GXEO=((__STRING_CST *)__tmp__FXEO)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__GXEO=((__EXTERNAL_C *)__tmp__FXEO)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GXEO=((__PROTOTYPE_CST *)__tmp__FXEO)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__GXEO=((__INTEGER_CST *)__tmp__FXEO)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__GXEO=((__LOCAL *)((__READ_LOCAL *)__tmp__FXEO)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GXEO=static_type__0N1H(__tmp__FXEO);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GXEO=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GXEO=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__GXEO=((__REAL_CST *)__tmp__FXEO)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__GXEO=((__CHARACTER_CST *)__tmp__FXEO)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__GXEO=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GXEO=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__GXEO=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__GXEO=static_type__MP1H(__tmp__FXEO);
    } break;
    case __EXPR_MUL__: {
      __tmp__GXEO=static_type__SP1H(__tmp__FXEO);
    } break;
    case __EXPR_DIV__: {
      __tmp__GXEO=static_type__XP1H(__tmp__FXEO);
    } break;
    case __EXPR_AND__: {
      __tmp__GXEO=static_type__2P1H(__tmp__FXEO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GXEO=static_type__BQ1H(__tmp__FXEO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GXEO=static_type__GQ1H(__tmp__FXEO);
    } break;
    case __PUT_TO__: {
      __tmp__GXEO=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__GXEO=static_type__PQ1H(__tmp__FXEO);
    } break;
    case __SIZE_OF__: {
      __tmp__GXEO=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__GXEO=((__CAST *)__tmp__FXEO)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__GXEO=static_type__GIKL(__tmp__FXEO);
    } break;
    case __READ_SLOT__: {
      __tmp__GXEO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__FXEO)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__GXEO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__FXEO)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GXEO=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GXEO=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GXEO=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GXEO=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GXEO=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__GXEO=static_type__Z2IM(__tmp__FXEO);
    } break;
    case __EXPR_ADD__: {
      __tmp__GXEO=static_type__IXML(__tmp__FXEO);
    } break;
    case __EXPR_NOT__: {
      __tmp__GXEO=static_type__BTXM(__tmp__FXEO);
    } break;
    case __EXPR_MOD__: {
      __tmp__GXEO=static_type__5LEO(__tmp__FXEO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GXEO=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__GXEO=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GXEO=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__GXEO=static_type__NOPN(__tmp__FXEO);
    } break;
    case __EXPR_XOR__: {
      __tmp__GXEO=static_type__XCSO(__tmp__FXEO);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__GXEO)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__HWEO,(&__string_400));
    };
  };
  __tmp__RXEO=Self__GWEO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__RXEO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__RXEO),buffer__HWEO);
    append__MOK(buffer__HWEO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__HWEO,((__REAL_CST *)__tmp__RXEO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__XOZP=((__CHARACTER_CST *)__tmp__RXEO);
    add_last__YPK(buffer__HWEO,'\'');
    append__MOK(buffer__HWEO,Self__XOZP->text__HO2H);
    add_last__YPK(buffer__HWEO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__RXEO,buffer__HWEO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__RXEO,buffer__HWEO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__RXEO,buffer__HWEO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__HWEO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__RXEO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__RXEO,buffer__HWEO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__RXEO,buffer__HWEO);
  } break;
  };
  add_last__YPK(buffer__HWEO,' ');
  append__MOK(buffer__HWEO,(&__string_365));
  add_last__YPK(buffer__HWEO,' ');
  if (((void *)((__TYPE_FULL *)static_type__5LEO(Self__GWEO))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__HWEO,(&__string_401));
    __tmp__3XEO=TRUE__;
  } else {
    __tmp__3XEO=FALSE__;
  };
  if ((! __tmp__3XEO)) {
    __tmp__CYEO=Self__GWEO->parent_expr_binary__PDWL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__CYEO)->__id) {
    case __LIST__: {
      __tmp__DYEO=static_type__GIQG(__tmp__CYEO);
    } break;
    case __STRING_CST__: {
      __tmp__DYEO=((__STRING_CST *)__tmp__CYEO)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__DYEO=((__EXTERNAL_C *)__tmp__CYEO)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DYEO=((__PROTOTYPE_CST *)__tmp__CYEO)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__DYEO=((__INTEGER_CST *)__tmp__CYEO)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__DYEO=((__LOCAL *)((__READ_LOCAL *)__tmp__CYEO)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DYEO=static_type__0N1H(__tmp__CYEO);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DYEO=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DYEO=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__DYEO=((__REAL_CST *)__tmp__CYEO)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__DYEO=((__CHARACTER_CST *)__tmp__CYEO)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__DYEO=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DYEO=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__DYEO=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__DYEO=static_type__MP1H(__tmp__CYEO);
    } break;
    case __EXPR_MUL__: {
      __tmp__DYEO=static_type__SP1H(__tmp__CYEO);
    } break;
    case __EXPR_DIV__: {
      __tmp__DYEO=static_type__XP1H(__tmp__CYEO);
    } break;
    case __EXPR_AND__: {
      __tmp__DYEO=static_type__2P1H(__tmp__CYEO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DYEO=static_type__BQ1H(__tmp__CYEO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DYEO=static_type__GQ1H(__tmp__CYEO);
    } break;
    case __PUT_TO__: {
      __tmp__DYEO=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__DYEO=static_type__PQ1H(__tmp__CYEO);
    } break;
    case __SIZE_OF__: {
      __tmp__DYEO=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__DYEO=((__CAST *)__tmp__CYEO)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__DYEO=static_type__GIKL(__tmp__CYEO);
    } break;
    case __READ_SLOT__: {
      __tmp__DYEO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__CYEO)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__DYEO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__CYEO)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DYEO=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DYEO=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DYEO=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DYEO=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DYEO=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__DYEO=static_type__Z2IM(__tmp__CYEO);
    } break;
    case __EXPR_ADD__: {
      __tmp__DYEO=static_type__IXML(__tmp__CYEO);
    } break;
    case __EXPR_NOT__: {
      __tmp__DYEO=static_type__BTXM(__tmp__CYEO);
    } break;
    case __EXPR_MOD__: {
      __tmp__DYEO=static_type__5LEO(__tmp__CYEO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DYEO=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__DYEO=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DYEO=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__DYEO=static_type__NOPN(__tmp__CYEO);
    } break;
    case __EXPR_XOR__: {
      __tmp__DYEO=static_type__XCSO(__tmp__CYEO);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__DYEO)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__HWEO,(&__string_400));
    };
  };
  __tmp__OYEO=Self__GWEO->parent_expr_binary__PDWL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__OYEO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__OYEO),buffer__HWEO);
    append__MOK(buffer__HWEO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__HWEO,((__REAL_CST *)__tmp__OYEO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__MPZP=((__CHARACTER_CST *)__tmp__OYEO);
    add_last__YPK(buffer__HWEO,'\'');
    append__MOK(buffer__HWEO,Self__MPZP->text__HO2H);
    add_last__YPK(buffer__HWEO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__OYEO,buffer__HWEO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__OYEO,buffer__HWEO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__OYEO,buffer__HWEO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__HWEO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__OYEO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__OYEO,buffer__HWEO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__OYEO,buffer__HWEO);
  } break;
  };
  add_last__YPK(buffer__HWEO,')');
}

static void genere__PCEP(__EXPR_SUP_EQ *Self__QCEP,void *buffer__RCEP)
// ({EXPR_SUP_EQ},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__KDEP,*__tmp__WDEP,*__tmp__4DEP,*__tmp__PEEP,*__tmp__QEEP;
  void *__tmp__MFEP,*__tmp__YFEP,*__tmp__AGEP,*__tmp__RGEP,*__tmp__SGEP;
  void *__tmp__LDEP,*__tmp__XDEP,*__tmp__5DEP,*__tmp__REEP,*__tmp__NFEP;
  void *__tmp__ZFEP,*__tmp__BGEP,*__tmp__TGEP;
  __CHARACTER_CST *Self__NQZP,*Self__URZP;
  __BOOLEAN __tmp__FDEP,__tmp__EEEP,__tmp__HFEP,__tmp__GGEP;
  if (((void *)((__TYPE_FULL *)static_type__W2DP())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__RCEP,(&__string_400));
  };
  add_last__YPK(buffer__RCEP,'(');
  if (((void *)((__TYPE_FULL *)static_type__W2DP())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__RCEP,(&__string_401));
    __tmp__FDEP=TRUE__;
  } else {
    __tmp__FDEP=FALSE__;
  };
  if ((! __tmp__FDEP)) {
    __tmp__KDEP=Self__QCEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__KDEP)->__id) {
    case __LIST__: {
      __tmp__LDEP=static_type__GIQG(__tmp__KDEP);
    } break;
    case __STRING_CST__: {
      __tmp__LDEP=((__STRING_CST *)__tmp__KDEP)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LDEP=((__EXTERNAL_C *)__tmp__KDEP)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LDEP=((__PROTOTYPE_CST *)__tmp__KDEP)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__LDEP=((__INTEGER_CST *)__tmp__KDEP)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__LDEP=((__LOCAL *)((__READ_LOCAL *)__tmp__KDEP)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LDEP=static_type__0N1H(__tmp__KDEP);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LDEP=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LDEP=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__LDEP=((__REAL_CST *)__tmp__KDEP)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LDEP=((__CHARACTER_CST *)__tmp__KDEP)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LDEP=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LDEP=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__LDEP=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__LDEP=static_type__MP1H(__tmp__KDEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__LDEP=static_type__SP1H(__tmp__KDEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__LDEP=static_type__XP1H(__tmp__KDEP);
    } break;
    case __EXPR_AND__: {
      __tmp__LDEP=static_type__2P1H(__tmp__KDEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LDEP=static_type__BQ1H(__tmp__KDEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LDEP=static_type__GQ1H(__tmp__KDEP);
    } break;
    case __PUT_TO__: {
      __tmp__LDEP=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__LDEP=static_type__PQ1H(__tmp__KDEP);
    } break;
    case __SIZE_OF__: {
      __tmp__LDEP=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__LDEP=((__CAST *)__tmp__KDEP)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__LDEP=static_type__GIKL(__tmp__KDEP);
    } break;
    case __READ_SLOT__: {
      __tmp__LDEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__KDEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LDEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KDEP)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LDEP=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LDEP=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LDEP=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LDEP=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LDEP=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__LDEP=static_type__Z2IM(__tmp__KDEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__LDEP=static_type__IXML(__tmp__KDEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__LDEP=static_type__BTXM(__tmp__KDEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__LDEP=static_type__5LEO(__tmp__KDEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LDEP=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__LDEP=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LDEP=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__LDEP=static_type__NOPN(__tmp__KDEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__LDEP=static_type__XCSO(__tmp__KDEP);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__LDEP)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__RCEP,(&__string_400));
    };
  };
  __tmp__WDEP=Self__QCEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__WDEP)->__id) {
  case __LIST__: {
    __tmp__XDEP=static_type__GIQG(__tmp__WDEP);
  } break;
  case __STRING_CST__: {
    __tmp__XDEP=((__STRING_CST *)__tmp__WDEP)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__XDEP=((__EXTERNAL_C *)__tmp__WDEP)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__XDEP=((__PROTOTYPE_CST *)__tmp__WDEP)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__XDEP=((__INTEGER_CST *)__tmp__WDEP)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__XDEP=((__LOCAL *)((__READ_LOCAL *)__tmp__WDEP)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__XDEP=static_type__0N1H(__tmp__WDEP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__XDEP=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__XDEP=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__XDEP=((__REAL_CST *)__tmp__WDEP)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__XDEP=((__CHARACTER_CST *)__tmp__WDEP)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__XDEP=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__XDEP=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__XDEP=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__XDEP=static_type__MP1H(__tmp__WDEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__XDEP=static_type__SP1H(__tmp__WDEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__XDEP=static_type__XP1H(__tmp__WDEP);
  } break;
  case __EXPR_AND__: {
    __tmp__XDEP=static_type__2P1H(__tmp__WDEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__XDEP=static_type__BQ1H(__tmp__WDEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__XDEP=static_type__GQ1H(__tmp__WDEP);
  } break;
  case __PUT_TO__: {
    __tmp__XDEP=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__XDEP=static_type__PQ1H(__tmp__WDEP);
  } break;
  case __SIZE_OF__: {
    __tmp__XDEP=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__XDEP=((__CAST *)__tmp__WDEP)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__XDEP=static_type__GIKL(__tmp__WDEP);
  } break;
  case __READ_SLOT__: {
    __tmp__XDEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__WDEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__XDEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__WDEP)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__XDEP=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__XDEP=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__XDEP=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__XDEP=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__XDEP=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__XDEP=static_type__Z2IM(__tmp__WDEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__XDEP=static_type__IXML(__tmp__WDEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__XDEP=static_type__BTXM(__tmp__WDEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__XDEP=static_type__5LEO(__tmp__WDEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__XDEP=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__XDEP=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__XDEP=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__XDEP=static_type__NOPN(__tmp__WDEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__XDEP=static_type__XCSO(__tmp__WDEP);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__XDEP)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__4DEP=Self__QCEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__4DEP)->__id) {
    case __LIST__: {
      __tmp__5DEP=static_type__GIQG(__tmp__4DEP);
    } break;
    case __STRING_CST__: {
      __tmp__5DEP=((__STRING_CST *)__tmp__4DEP)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__5DEP=((__EXTERNAL_C *)__tmp__4DEP)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__5DEP=((__PROTOTYPE_CST *)__tmp__4DEP)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__5DEP=((__INTEGER_CST *)__tmp__4DEP)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__5DEP=((__LOCAL *)((__READ_LOCAL *)__tmp__4DEP)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__5DEP=static_type__0N1H(__tmp__4DEP);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__5DEP=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__5DEP=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__5DEP=((__REAL_CST *)__tmp__4DEP)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__5DEP=((__CHARACTER_CST *)__tmp__4DEP)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__5DEP=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__5DEP=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__5DEP=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__5DEP=static_type__MP1H(__tmp__4DEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__5DEP=static_type__SP1H(__tmp__4DEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__5DEP=static_type__XP1H(__tmp__4DEP);
    } break;
    case __EXPR_AND__: {
      __tmp__5DEP=static_type__2P1H(__tmp__4DEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__5DEP=static_type__BQ1H(__tmp__4DEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__5DEP=static_type__GQ1H(__tmp__4DEP);
    } break;
    case __PUT_TO__: {
      __tmp__5DEP=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__5DEP=static_type__PQ1H(__tmp__4DEP);
    } break;
    case __SIZE_OF__: {
      __tmp__5DEP=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__5DEP=((__CAST *)__tmp__4DEP)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__5DEP=static_type__GIKL(__tmp__4DEP);
    } break;
    case __READ_SLOT__: {
      __tmp__5DEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__4DEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__5DEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__4DEP)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__5DEP=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__5DEP=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__5DEP=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__5DEP=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__5DEP=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__5DEP=static_type__Z2IM(__tmp__4DEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__5DEP=static_type__IXML(__tmp__4DEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__5DEP=static_type__BTXM(__tmp__4DEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__5DEP=static_type__5LEO(__tmp__4DEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__5DEP=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__5DEP=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__5DEP=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__5DEP=static_type__NOPN(__tmp__4DEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__5DEP=static_type__XCSO(__tmp__4DEP);
    } break;
    };
    __tmp__EEEP=((void *)((__TYPE_FULL *)__tmp__5DEP)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__EEEP=FALSE__;
  };
  if (__tmp__EEEP) {
    add_last__YPK(buffer__RCEP,'0');
  } else {
    __tmp__PEEP=Self__QCEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__PEEP)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__PEEP),buffer__RCEP);
      append__MOK(buffer__RCEP,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__RCEP,((__REAL_CST *)__tmp__PEEP)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__NQZP=((__CHARACTER_CST *)__tmp__PEEP);
      add_last__YPK(buffer__RCEP,'\'');
      append__MOK(buffer__RCEP,Self__NQZP->text__HO2H);
      add_last__YPK(buffer__RCEP,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__PEEP,buffer__RCEP);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__PEEP,buffer__RCEP);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__PEEP,buffer__RCEP);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__RCEP,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__PEEP)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__PEEP,buffer__RCEP);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__PEEP,buffer__RCEP);
    } break;
    };
    __tmp__QEEP=Self__QCEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__QEEP)->__id) {
    case __LIST__: {
      __tmp__REEP=static_type__GIQG(__tmp__QEEP);
    } break;
    case __STRING_CST__: {
      __tmp__REEP=((__STRING_CST *)__tmp__QEEP)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__REEP=((__EXTERNAL_C *)__tmp__QEEP)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__REEP=((__PROTOTYPE_CST *)__tmp__QEEP)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__REEP=((__INTEGER_CST *)__tmp__QEEP)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__REEP=((__LOCAL *)((__READ_LOCAL *)__tmp__QEEP)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__REEP=static_type__0N1H(__tmp__QEEP);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__REEP=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__REEP=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__REEP=((__REAL_CST *)__tmp__QEEP)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__REEP=((__CHARACTER_CST *)__tmp__QEEP)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__REEP=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__REEP=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__REEP=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__REEP=static_type__MP1H(__tmp__QEEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__REEP=static_type__SP1H(__tmp__QEEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__REEP=static_type__XP1H(__tmp__QEEP);
    } break;
    case __EXPR_AND__: {
      __tmp__REEP=static_type__2P1H(__tmp__QEEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__REEP=static_type__BQ1H(__tmp__QEEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__REEP=static_type__GQ1H(__tmp__QEEP);
    } break;
    case __PUT_TO__: {
      __tmp__REEP=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__REEP=static_type__PQ1H(__tmp__QEEP);
    } break;
    case __SIZE_OF__: {
      __tmp__REEP=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__REEP=((__CAST *)__tmp__QEEP)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__REEP=static_type__GIKL(__tmp__QEEP);
    } break;
    case __READ_SLOT__: {
      __tmp__REEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__QEEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__REEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__QEEP)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__REEP=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__REEP=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__REEP=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__REEP=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__REEP=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__REEP=static_type__Z2IM(__tmp__QEEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__REEP=static_type__IXML(__tmp__QEEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__REEP=static_type__BTXM(__tmp__QEEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__REEP=static_type__5LEO(__tmp__QEEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__REEP=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__REEP=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__REEP=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__REEP=static_type__NOPN(__tmp__QEEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__REEP=static_type__XCSO(__tmp__QEEP);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__REEP)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__RCEP,(&__string_402));
    };
  };
  add_last__YPK(buffer__RCEP,' ');
  append__MOK(buffer__RCEP,(&__string_366));
  add_last__YPK(buffer__RCEP,' ');
  if (((void *)((__TYPE_FULL *)static_type__W2DP())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__RCEP,(&__string_401));
    __tmp__HFEP=TRUE__;
  } else {
    __tmp__HFEP=FALSE__;
  };
  if ((! __tmp__HFEP)) {
    __tmp__MFEP=Self__QCEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__MFEP)->__id) {
    case __LIST__: {
      __tmp__NFEP=static_type__GIQG(__tmp__MFEP);
    } break;
    case __STRING_CST__: {
      __tmp__NFEP=((__STRING_CST *)__tmp__MFEP)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__NFEP=((__EXTERNAL_C *)__tmp__MFEP)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__NFEP=((__PROTOTYPE_CST *)__tmp__MFEP)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__NFEP=((__INTEGER_CST *)__tmp__MFEP)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__NFEP=((__LOCAL *)((__READ_LOCAL *)__tmp__MFEP)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__NFEP=static_type__0N1H(__tmp__MFEP);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__NFEP=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__NFEP=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__NFEP=((__REAL_CST *)__tmp__MFEP)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__NFEP=((__CHARACTER_CST *)__tmp__MFEP)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__NFEP=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__NFEP=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__NFEP=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__NFEP=static_type__MP1H(__tmp__MFEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__NFEP=static_type__SP1H(__tmp__MFEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__NFEP=static_type__XP1H(__tmp__MFEP);
    } break;
    case __EXPR_AND__: {
      __tmp__NFEP=static_type__2P1H(__tmp__MFEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__NFEP=static_type__BQ1H(__tmp__MFEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__NFEP=static_type__GQ1H(__tmp__MFEP);
    } break;
    case __PUT_TO__: {
      __tmp__NFEP=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__NFEP=static_type__PQ1H(__tmp__MFEP);
    } break;
    case __SIZE_OF__: {
      __tmp__NFEP=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__NFEP=((__CAST *)__tmp__MFEP)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__NFEP=static_type__GIKL(__tmp__MFEP);
    } break;
    case __READ_SLOT__: {
      __tmp__NFEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__MFEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__NFEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__MFEP)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__NFEP=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__NFEP=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__NFEP=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__NFEP=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__NFEP=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__NFEP=static_type__Z2IM(__tmp__MFEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__NFEP=static_type__IXML(__tmp__MFEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__NFEP=static_type__BTXM(__tmp__MFEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__NFEP=static_type__5LEO(__tmp__MFEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__NFEP=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__NFEP=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__NFEP=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__NFEP=static_type__NOPN(__tmp__MFEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__NFEP=static_type__XCSO(__tmp__MFEP);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__NFEP)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__RCEP,(&__string_400));
    };
  };
  __tmp__YFEP=Self__QCEP->parent_expr_binary_cmp__EP1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__YFEP)->__id) {
  case __LIST__: {
    __tmp__ZFEP=static_type__GIQG(__tmp__YFEP);
  } break;
  case __STRING_CST__: {
    __tmp__ZFEP=((__STRING_CST *)__tmp__YFEP)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZFEP=((__EXTERNAL_C *)__tmp__YFEP)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__ZFEP=((__PROTOTYPE_CST *)__tmp__YFEP)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__ZFEP=((__INTEGER_CST *)__tmp__YFEP)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__ZFEP=((__LOCAL *)((__READ_LOCAL *)__tmp__YFEP)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZFEP=static_type__0N1H(__tmp__YFEP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZFEP=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZFEP=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__ZFEP=((__REAL_CST *)__tmp__YFEP)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__ZFEP=((__CHARACTER_CST *)__tmp__YFEP)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__ZFEP=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ZFEP=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__ZFEP=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__ZFEP=static_type__MP1H(__tmp__YFEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZFEP=static_type__SP1H(__tmp__YFEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZFEP=static_type__XP1H(__tmp__YFEP);
  } break;
  case __EXPR_AND__: {
    __tmp__ZFEP=static_type__2P1H(__tmp__YFEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZFEP=static_type__BQ1H(__tmp__YFEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZFEP=static_type__GQ1H(__tmp__YFEP);
  } break;
  case __PUT_TO__: {
    __tmp__ZFEP=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__ZFEP=static_type__PQ1H(__tmp__YFEP);
  } break;
  case __SIZE_OF__: {
    __tmp__ZFEP=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__ZFEP=((__CAST *)__tmp__YFEP)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__ZFEP=static_type__GIKL(__tmp__YFEP);
  } break;
  case __READ_SLOT__: {
    __tmp__ZFEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YFEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__ZFEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YFEP)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZFEP=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZFEP=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZFEP=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZFEP=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZFEP=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__ZFEP=static_type__Z2IM(__tmp__YFEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZFEP=static_type__IXML(__tmp__YFEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZFEP=static_type__BTXM(__tmp__YFEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZFEP=static_type__5LEO(__tmp__YFEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZFEP=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__ZFEP=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZFEP=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__ZFEP=static_type__NOPN(__tmp__YFEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZFEP=static_type__XCSO(__tmp__YFEP);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__ZFEP)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__AGEP=Self__QCEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__AGEP)->__id) {
    case __LIST__: {
      __tmp__BGEP=static_type__GIQG(__tmp__AGEP);
    } break;
    case __STRING_CST__: {
      __tmp__BGEP=((__STRING_CST *)__tmp__AGEP)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BGEP=((__EXTERNAL_C *)__tmp__AGEP)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BGEP=((__PROTOTYPE_CST *)__tmp__AGEP)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__BGEP=((__INTEGER_CST *)__tmp__AGEP)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__BGEP=((__LOCAL *)((__READ_LOCAL *)__tmp__AGEP)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BGEP=static_type__0N1H(__tmp__AGEP);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BGEP=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BGEP=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__BGEP=((__REAL_CST *)__tmp__AGEP)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__BGEP=((__CHARACTER_CST *)__tmp__AGEP)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__BGEP=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BGEP=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__BGEP=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__BGEP=static_type__MP1H(__tmp__AGEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__BGEP=static_type__SP1H(__tmp__AGEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__BGEP=static_type__XP1H(__tmp__AGEP);
    } break;
    case __EXPR_AND__: {
      __tmp__BGEP=static_type__2P1H(__tmp__AGEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BGEP=static_type__BQ1H(__tmp__AGEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BGEP=static_type__GQ1H(__tmp__AGEP);
    } break;
    case __PUT_TO__: {
      __tmp__BGEP=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__BGEP=static_type__PQ1H(__tmp__AGEP);
    } break;
    case __SIZE_OF__: {
      __tmp__BGEP=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__BGEP=((__CAST *)__tmp__AGEP)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__BGEP=static_type__GIKL(__tmp__AGEP);
    } break;
    case __READ_SLOT__: {
      __tmp__BGEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__AGEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__BGEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__AGEP)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BGEP=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BGEP=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BGEP=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BGEP=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BGEP=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__BGEP=static_type__Z2IM(__tmp__AGEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__BGEP=static_type__IXML(__tmp__AGEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__BGEP=static_type__BTXM(__tmp__AGEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__BGEP=static_type__5LEO(__tmp__AGEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BGEP=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__BGEP=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BGEP=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__BGEP=static_type__NOPN(__tmp__AGEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__BGEP=static_type__XCSO(__tmp__AGEP);
    } break;
    };
    __tmp__GGEP=((void *)((__TYPE_FULL *)__tmp__BGEP)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__GGEP=FALSE__;
  };
  if (__tmp__GGEP) {
    add_last__YPK(buffer__RCEP,'0');
  } else {
    __tmp__RGEP=Self__QCEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__RGEP)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__RGEP),buffer__RCEP);
      append__MOK(buffer__RCEP,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__RCEP,((__REAL_CST *)__tmp__RGEP)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__URZP=((__CHARACTER_CST *)__tmp__RGEP);
      add_last__YPK(buffer__RCEP,'\'');
      append__MOK(buffer__RCEP,Self__URZP->text__HO2H);
      add_last__YPK(buffer__RCEP,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__RGEP,buffer__RCEP);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__RGEP,buffer__RCEP);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__RGEP,buffer__RCEP);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__RCEP,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__RGEP)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__RGEP,buffer__RCEP);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__RGEP,buffer__RCEP);
    } break;
    };
    __tmp__SGEP=Self__QCEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__SGEP)->__id) {
    case __LIST__: {
      __tmp__TGEP=static_type__GIQG(__tmp__SGEP);
    } break;
    case __STRING_CST__: {
      __tmp__TGEP=((__STRING_CST *)__tmp__SGEP)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__TGEP=((__EXTERNAL_C *)__tmp__SGEP)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__TGEP=((__PROTOTYPE_CST *)__tmp__SGEP)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__TGEP=((__INTEGER_CST *)__tmp__SGEP)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__TGEP=((__LOCAL *)((__READ_LOCAL *)__tmp__SGEP)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__TGEP=static_type__0N1H(__tmp__SGEP);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__TGEP=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__TGEP=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__TGEP=((__REAL_CST *)__tmp__SGEP)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__TGEP=((__CHARACTER_CST *)__tmp__SGEP)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__TGEP=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__TGEP=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__TGEP=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__TGEP=static_type__MP1H(__tmp__SGEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__TGEP=static_type__SP1H(__tmp__SGEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__TGEP=static_type__XP1H(__tmp__SGEP);
    } break;
    case __EXPR_AND__: {
      __tmp__TGEP=static_type__2P1H(__tmp__SGEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__TGEP=static_type__BQ1H(__tmp__SGEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__TGEP=static_type__GQ1H(__tmp__SGEP);
    } break;
    case __PUT_TO__: {
      __tmp__TGEP=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__TGEP=static_type__PQ1H(__tmp__SGEP);
    } break;
    case __SIZE_OF__: {
      __tmp__TGEP=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__TGEP=((__CAST *)__tmp__SGEP)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__TGEP=static_type__GIKL(__tmp__SGEP);
    } break;
    case __READ_SLOT__: {
      __tmp__TGEP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__SGEP)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__TGEP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__SGEP)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__TGEP=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__TGEP=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__TGEP=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__TGEP=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__TGEP=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__TGEP=static_type__Z2IM(__tmp__SGEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__TGEP=static_type__IXML(__tmp__SGEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__TGEP=static_type__BTXM(__tmp__SGEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__TGEP=static_type__5LEO(__tmp__SGEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__TGEP=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__TGEP=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__TGEP=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__TGEP=static_type__NOPN(__tmp__SGEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__TGEP=static_type__XCSO(__tmp__SGEP);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__TGEP)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__RCEP,(&__string_402));
    };
  };
  add_last__YPK(buffer__RCEP,')');
}

static void genere__LNRN(__EXPR_INF *Self__MNRN,void *buffer__NNRN)
// ({EXPR_INF},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__GORN,*__tmp__SORN,*__tmp__0ORN,*__tmp__LPRN,*__tmp__MPRN;
  void *__tmp__HQRN,*__tmp__TQRN,*__tmp__1QRN,*__tmp__MRRN,*__tmp__NRRN;
  void *__tmp__HORN,*__tmp__TORN,*__tmp__1ORN,*__tmp__NPRN,*__tmp__IQRN;
  void *__tmp__UQRN,*__tmp__2QRN,*__tmp__ORRN;
  __CHARACTER_CST *Self__1SZP,*Self__CUZP;
  __BOOLEAN __tmp__BORN,__tmp__APRN,__tmp__CQRN,__tmp__BRRN;
  if (((void *)((__TYPE_FULL *)static_type__FQQN())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__NNRN,(&__string_400));
  };
  add_last__YPK(buffer__NNRN,'(');
  if (((void *)((__TYPE_FULL *)static_type__FQQN())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__NNRN,(&__string_401));
    __tmp__BORN=TRUE__;
  } else {
    __tmp__BORN=FALSE__;
  };
  if ((! __tmp__BORN)) {
    __tmp__GORN=Self__MNRN->parent_expr_binary_cmp__WQ1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__GORN)->__id) {
    case __LIST__: {
      __tmp__HORN=static_type__GIQG(__tmp__GORN);
    } break;
    case __STRING_CST__: {
      __tmp__HORN=((__STRING_CST *)__tmp__GORN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__HORN=((__EXTERNAL_C *)__tmp__GORN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__HORN=((__PROTOTYPE_CST *)__tmp__GORN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__HORN=((__INTEGER_CST *)__tmp__GORN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__HORN=((__LOCAL *)((__READ_LOCAL *)__tmp__GORN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HORN=static_type__0N1H(__tmp__GORN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HORN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HORN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__HORN=((__REAL_CST *)__tmp__GORN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__HORN=((__CHARACTER_CST *)__tmp__GORN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__HORN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__HORN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__HORN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__HORN=static_type__MP1H(__tmp__GORN);
    } break;
    case __EXPR_MUL__: {
      __tmp__HORN=static_type__SP1H(__tmp__GORN);
    } break;
    case __EXPR_DIV__: {
      __tmp__HORN=static_type__XP1H(__tmp__GORN);
    } break;
    case __EXPR_AND__: {
      __tmp__HORN=static_type__2P1H(__tmp__GORN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HORN=static_type__BQ1H(__tmp__GORN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HORN=static_type__GQ1H(__tmp__GORN);
    } break;
    case __PUT_TO__: {
      __tmp__HORN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__HORN=static_type__PQ1H(__tmp__GORN);
    } break;
    case __SIZE_OF__: {
      __tmp__HORN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__HORN=((__CAST *)__tmp__GORN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__HORN=static_type__GIKL(__tmp__GORN);
    } break;
    case __READ_SLOT__: {
      __tmp__HORN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__GORN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__HORN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__GORN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HORN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HORN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HORN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HORN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HORN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__HORN=static_type__Z2IM(__tmp__GORN);
    } break;
    case __EXPR_ADD__: {
      __tmp__HORN=static_type__IXML(__tmp__GORN);
    } break;
    case __EXPR_NOT__: {
      __tmp__HORN=static_type__BTXM(__tmp__GORN);
    } break;
    case __EXPR_MOD__: {
      __tmp__HORN=static_type__5LEO(__tmp__GORN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HORN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__HORN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HORN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__HORN=static_type__NOPN(__tmp__GORN);
    } break;
    case __EXPR_XOR__: {
      __tmp__HORN=static_type__XCSO(__tmp__GORN);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__HORN)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__NNRN,(&__string_400));
    };
  };
  __tmp__SORN=Self__MNRN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__SORN)->__id) {
  case __LIST__: {
    __tmp__TORN=static_type__GIQG(__tmp__SORN);
  } break;
  case __STRING_CST__: {
    __tmp__TORN=((__STRING_CST *)__tmp__SORN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__TORN=((__EXTERNAL_C *)__tmp__SORN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__TORN=((__PROTOTYPE_CST *)__tmp__SORN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__TORN=((__INTEGER_CST *)__tmp__SORN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__TORN=((__LOCAL *)((__READ_LOCAL *)__tmp__SORN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TORN=static_type__0N1H(__tmp__SORN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TORN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TORN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__TORN=((__REAL_CST *)__tmp__SORN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__TORN=((__CHARACTER_CST *)__tmp__SORN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__TORN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TORN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__TORN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__TORN=static_type__MP1H(__tmp__SORN);
  } break;
  case __EXPR_MUL__: {
    __tmp__TORN=static_type__SP1H(__tmp__SORN);
  } break;
  case __EXPR_DIV__: {
    __tmp__TORN=static_type__XP1H(__tmp__SORN);
  } break;
  case __EXPR_AND__: {
    __tmp__TORN=static_type__2P1H(__tmp__SORN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TORN=static_type__BQ1H(__tmp__SORN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TORN=static_type__GQ1H(__tmp__SORN);
  } break;
  case __PUT_TO__: {
    __tmp__TORN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__TORN=static_type__PQ1H(__tmp__SORN);
  } break;
  case __SIZE_OF__: {
    __tmp__TORN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__TORN=((__CAST *)__tmp__SORN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__TORN=static_type__GIKL(__tmp__SORN);
  } break;
  case __READ_SLOT__: {
    __tmp__TORN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__SORN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__TORN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__SORN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TORN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TORN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TORN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TORN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TORN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__TORN=static_type__Z2IM(__tmp__SORN);
  } break;
  case __EXPR_ADD__: {
    __tmp__TORN=static_type__IXML(__tmp__SORN);
  } break;
  case __EXPR_NOT__: {
    __tmp__TORN=static_type__BTXM(__tmp__SORN);
  } break;
  case __EXPR_MOD__: {
    __tmp__TORN=static_type__5LEO(__tmp__SORN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TORN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__TORN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TORN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__TORN=static_type__NOPN(__tmp__SORN);
  } break;
  case __EXPR_XOR__: {
    __tmp__TORN=static_type__XCSO(__tmp__SORN);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__TORN)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__0ORN=Self__MNRN->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__0ORN)->__id) {
    case __LIST__: {
      __tmp__1ORN=static_type__GIQG(__tmp__0ORN);
    } break;
    case __STRING_CST__: {
      __tmp__1ORN=((__STRING_CST *)__tmp__0ORN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__1ORN=((__EXTERNAL_C *)__tmp__0ORN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__1ORN=((__PROTOTYPE_CST *)__tmp__0ORN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__1ORN=((__INTEGER_CST *)__tmp__0ORN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__1ORN=((__LOCAL *)((__READ_LOCAL *)__tmp__0ORN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__1ORN=static_type__0N1H(__tmp__0ORN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__1ORN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__1ORN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__1ORN=((__REAL_CST *)__tmp__0ORN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__1ORN=((__CHARACTER_CST *)__tmp__0ORN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__1ORN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__1ORN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__1ORN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__1ORN=static_type__MP1H(__tmp__0ORN);
    } break;
    case __EXPR_MUL__: {
      __tmp__1ORN=static_type__SP1H(__tmp__0ORN);
    } break;
    case __EXPR_DIV__: {
      __tmp__1ORN=static_type__XP1H(__tmp__0ORN);
    } break;
    case __EXPR_AND__: {
      __tmp__1ORN=static_type__2P1H(__tmp__0ORN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__1ORN=static_type__BQ1H(__tmp__0ORN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__1ORN=static_type__GQ1H(__tmp__0ORN);
    } break;
    case __PUT_TO__: {
      __tmp__1ORN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__1ORN=static_type__PQ1H(__tmp__0ORN);
    } break;
    case __SIZE_OF__: {
      __tmp__1ORN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__1ORN=((__CAST *)__tmp__0ORN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__1ORN=static_type__GIKL(__tmp__0ORN);
    } break;
    case __READ_SLOT__: {
      __tmp__1ORN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0ORN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__1ORN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0ORN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__1ORN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__1ORN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__1ORN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__1ORN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__1ORN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__1ORN=static_type__Z2IM(__tmp__0ORN);
    } break;
    case __EXPR_ADD__: {
      __tmp__1ORN=static_type__IXML(__tmp__0ORN);
    } break;
    case __EXPR_NOT__: {
      __tmp__1ORN=static_type__BTXM(__tmp__0ORN);
    } break;
    case __EXPR_MOD__: {
      __tmp__1ORN=static_type__5LEO(__tmp__0ORN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__1ORN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__1ORN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__1ORN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__1ORN=static_type__NOPN(__tmp__0ORN);
    } break;
    case __EXPR_XOR__: {
      __tmp__1ORN=static_type__XCSO(__tmp__0ORN);
    } break;
    };
    __tmp__APRN=((void *)((__TYPE_FULL *)__tmp__1ORN)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__APRN=FALSE__;
  };
  if (__tmp__APRN) {
    add_last__YPK(buffer__NNRN,'0');
  } else {
    __tmp__LPRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__LPRN)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__LPRN),buffer__NNRN);
      append__MOK(buffer__NNRN,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__NNRN,((__REAL_CST *)__tmp__LPRN)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__1SZP=((__CHARACTER_CST *)__tmp__LPRN);
      add_last__YPK(buffer__NNRN,'\'');
      append__MOK(buffer__NNRN,Self__1SZP->text__HO2H);
      add_last__YPK(buffer__NNRN,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__LPRN,buffer__NNRN);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__LPRN,buffer__NNRN);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__LPRN,buffer__NNRN);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__NNRN,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__LPRN)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__LPRN,buffer__NNRN);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__LPRN,buffer__NNRN);
    } break;
    };
    __tmp__MPRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__MPRN)->__id) {
    case __LIST__: {
      __tmp__NPRN=static_type__GIQG(__tmp__MPRN);
    } break;
    case __STRING_CST__: {
      __tmp__NPRN=((__STRING_CST *)__tmp__MPRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__NPRN=((__EXTERNAL_C *)__tmp__MPRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__NPRN=((__PROTOTYPE_CST *)__tmp__MPRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__NPRN=((__INTEGER_CST *)__tmp__MPRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__NPRN=((__LOCAL *)((__READ_LOCAL *)__tmp__MPRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__NPRN=static_type__0N1H(__tmp__MPRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__NPRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__NPRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__NPRN=((__REAL_CST *)__tmp__MPRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__NPRN=((__CHARACTER_CST *)__tmp__MPRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__NPRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__NPRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__NPRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__NPRN=static_type__MP1H(__tmp__MPRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__NPRN=static_type__SP1H(__tmp__MPRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__NPRN=static_type__XP1H(__tmp__MPRN);
    } break;
    case __EXPR_AND__: {
      __tmp__NPRN=static_type__2P1H(__tmp__MPRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__NPRN=static_type__BQ1H(__tmp__MPRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__NPRN=static_type__GQ1H(__tmp__MPRN);
    } break;
    case __PUT_TO__: {
      __tmp__NPRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__NPRN=static_type__PQ1H(__tmp__MPRN);
    } break;
    case __SIZE_OF__: {
      __tmp__NPRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__NPRN=((__CAST *)__tmp__MPRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__NPRN=static_type__GIKL(__tmp__MPRN);
    } break;
    case __READ_SLOT__: {
      __tmp__NPRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__MPRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__NPRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__MPRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__NPRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__NPRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__NPRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__NPRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__NPRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__NPRN=static_type__Z2IM(__tmp__MPRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__NPRN=static_type__IXML(__tmp__MPRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__NPRN=static_type__BTXM(__tmp__MPRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__NPRN=static_type__5LEO(__tmp__MPRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__NPRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__NPRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__NPRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__NPRN=static_type__NOPN(__tmp__MPRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__NPRN=static_type__XCSO(__tmp__MPRN);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__NPRN)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__NNRN,(&__string_402));
    };
  };
  add_last__YPK(buffer__NNRN,' ');
  append__MOK(buffer__NNRN,(&__string_261));
  add_last__YPK(buffer__NNRN,' ');
  if (((void *)((__TYPE_FULL *)static_type__FQQN())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__NNRN,(&__string_401));
    __tmp__CQRN=TRUE__;
  } else {
    __tmp__CQRN=FALSE__;
  };
  if ((! __tmp__CQRN)) {
    __tmp__HQRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__HQRN)->__id) {
    case __LIST__: {
      __tmp__IQRN=static_type__GIQG(__tmp__HQRN);
    } break;
    case __STRING_CST__: {
      __tmp__IQRN=((__STRING_CST *)__tmp__HQRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__IQRN=((__EXTERNAL_C *)__tmp__HQRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__IQRN=((__PROTOTYPE_CST *)__tmp__HQRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__IQRN=((__INTEGER_CST *)__tmp__HQRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__IQRN=((__LOCAL *)((__READ_LOCAL *)__tmp__HQRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__IQRN=static_type__0N1H(__tmp__HQRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__IQRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__IQRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__IQRN=((__REAL_CST *)__tmp__HQRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__IQRN=((__CHARACTER_CST *)__tmp__HQRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__IQRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__IQRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__IQRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__IQRN=static_type__MP1H(__tmp__HQRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__IQRN=static_type__SP1H(__tmp__HQRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__IQRN=static_type__XP1H(__tmp__HQRN);
    } break;
    case __EXPR_AND__: {
      __tmp__IQRN=static_type__2P1H(__tmp__HQRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__IQRN=static_type__BQ1H(__tmp__HQRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__IQRN=static_type__GQ1H(__tmp__HQRN);
    } break;
    case __PUT_TO__: {
      __tmp__IQRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__IQRN=static_type__PQ1H(__tmp__HQRN);
    } break;
    case __SIZE_OF__: {
      __tmp__IQRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__IQRN=((__CAST *)__tmp__HQRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__IQRN=static_type__GIKL(__tmp__HQRN);
    } break;
    case __READ_SLOT__: {
      __tmp__IQRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__HQRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__IQRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__HQRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__IQRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__IQRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__IQRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__IQRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__IQRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__IQRN=static_type__Z2IM(__tmp__HQRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__IQRN=static_type__IXML(__tmp__HQRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__IQRN=static_type__BTXM(__tmp__HQRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__IQRN=static_type__5LEO(__tmp__HQRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__IQRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__IQRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__IQRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__IQRN=static_type__NOPN(__tmp__HQRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__IQRN=static_type__XCSO(__tmp__HQRN);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__IQRN)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__NNRN,(&__string_400));
    };
  };
  __tmp__TQRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__TQRN)->__id) {
  case __LIST__: {
    __tmp__UQRN=static_type__GIQG(__tmp__TQRN);
  } break;
  case __STRING_CST__: {
    __tmp__UQRN=((__STRING_CST *)__tmp__TQRN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__UQRN=((__EXTERNAL_C *)__tmp__TQRN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__UQRN=((__PROTOTYPE_CST *)__tmp__TQRN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__UQRN=((__INTEGER_CST *)__tmp__TQRN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__UQRN=((__LOCAL *)((__READ_LOCAL *)__tmp__TQRN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UQRN=static_type__0N1H(__tmp__TQRN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UQRN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UQRN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__UQRN=((__REAL_CST *)__tmp__TQRN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__UQRN=((__CHARACTER_CST *)__tmp__TQRN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__UQRN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UQRN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__UQRN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__UQRN=static_type__MP1H(__tmp__TQRN);
  } break;
  case __EXPR_MUL__: {
    __tmp__UQRN=static_type__SP1H(__tmp__TQRN);
  } break;
  case __EXPR_DIV__: {
    __tmp__UQRN=static_type__XP1H(__tmp__TQRN);
  } break;
  case __EXPR_AND__: {
    __tmp__UQRN=static_type__2P1H(__tmp__TQRN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UQRN=static_type__BQ1H(__tmp__TQRN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UQRN=static_type__GQ1H(__tmp__TQRN);
  } break;
  case __PUT_TO__: {
    __tmp__UQRN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__UQRN=static_type__PQ1H(__tmp__TQRN);
  } break;
  case __SIZE_OF__: {
    __tmp__UQRN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__UQRN=((__CAST *)__tmp__TQRN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__UQRN=static_type__GIKL(__tmp__TQRN);
  } break;
  case __READ_SLOT__: {
    __tmp__UQRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__TQRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__UQRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TQRN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UQRN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UQRN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UQRN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UQRN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UQRN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__UQRN=static_type__Z2IM(__tmp__TQRN);
  } break;
  case __EXPR_ADD__: {
    __tmp__UQRN=static_type__IXML(__tmp__TQRN);
  } break;
  case __EXPR_NOT__: {
    __tmp__UQRN=static_type__BTXM(__tmp__TQRN);
  } break;
  case __EXPR_MOD__: {
    __tmp__UQRN=static_type__5LEO(__tmp__TQRN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UQRN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__UQRN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UQRN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__UQRN=static_type__NOPN(__tmp__TQRN);
  } break;
  case __EXPR_XOR__: {
    __tmp__UQRN=static_type__XCSO(__tmp__TQRN);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__UQRN)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__1QRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__1QRN)->__id) {
    case __LIST__: {
      __tmp__2QRN=static_type__GIQG(__tmp__1QRN);
    } break;
    case __STRING_CST__: {
      __tmp__2QRN=((__STRING_CST *)__tmp__1QRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__2QRN=((__EXTERNAL_C *)__tmp__1QRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2QRN=((__PROTOTYPE_CST *)__tmp__1QRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__2QRN=((__INTEGER_CST *)__tmp__1QRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__2QRN=((__LOCAL *)((__READ_LOCAL *)__tmp__1QRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2QRN=static_type__0N1H(__tmp__1QRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2QRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2QRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__2QRN=((__REAL_CST *)__tmp__1QRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2QRN=((__CHARACTER_CST *)__tmp__1QRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2QRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2QRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__2QRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__2QRN=static_type__MP1H(__tmp__1QRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__2QRN=static_type__SP1H(__tmp__1QRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__2QRN=static_type__XP1H(__tmp__1QRN);
    } break;
    case __EXPR_AND__: {
      __tmp__2QRN=static_type__2P1H(__tmp__1QRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2QRN=static_type__BQ1H(__tmp__1QRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2QRN=static_type__GQ1H(__tmp__1QRN);
    } break;
    case __PUT_TO__: {
      __tmp__2QRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__2QRN=static_type__PQ1H(__tmp__1QRN);
    } break;
    case __SIZE_OF__: {
      __tmp__2QRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__2QRN=((__CAST *)__tmp__1QRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__2QRN=static_type__GIKL(__tmp__1QRN);
    } break;
    case __READ_SLOT__: {
      __tmp__2QRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__1QRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__2QRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1QRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2QRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2QRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2QRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2QRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2QRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__2QRN=static_type__Z2IM(__tmp__1QRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__2QRN=static_type__IXML(__tmp__1QRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__2QRN=static_type__BTXM(__tmp__1QRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__2QRN=static_type__5LEO(__tmp__1QRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2QRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__2QRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2QRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__2QRN=static_type__NOPN(__tmp__1QRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__2QRN=static_type__XCSO(__tmp__1QRN);
    } break;
    };
    __tmp__BRRN=((void *)((__TYPE_FULL *)__tmp__2QRN)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__BRRN=FALSE__;
  };
  if (__tmp__BRRN) {
    add_last__YPK(buffer__NNRN,'0');
  } else {
    __tmp__MRRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__MRRN)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__MRRN),buffer__NNRN);
      append__MOK(buffer__NNRN,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__NNRN,((__REAL_CST *)__tmp__MRRN)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__CUZP=((__CHARACTER_CST *)__tmp__MRRN);
      add_last__YPK(buffer__NNRN,'\'');
      append__MOK(buffer__NNRN,Self__CUZP->text__HO2H);
      add_last__YPK(buffer__NNRN,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__MRRN,buffer__NNRN);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__MRRN,buffer__NNRN);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__MRRN,buffer__NNRN);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__NNRN,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__MRRN)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__MRRN,buffer__NNRN);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__MRRN,buffer__NNRN);
    } break;
    };
    __tmp__NRRN=Self__MNRN->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__NRRN)->__id) {
    case __LIST__: {
      __tmp__ORRN=static_type__GIQG(__tmp__NRRN);
    } break;
    case __STRING_CST__: {
      __tmp__ORRN=((__STRING_CST *)__tmp__NRRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ORRN=((__EXTERNAL_C *)__tmp__NRRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ORRN=((__PROTOTYPE_CST *)__tmp__NRRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__ORRN=((__INTEGER_CST *)__tmp__NRRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__ORRN=((__LOCAL *)((__READ_LOCAL *)__tmp__NRRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ORRN=static_type__0N1H(__tmp__NRRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ORRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ORRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__ORRN=((__REAL_CST *)__tmp__NRRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ORRN=((__CHARACTER_CST *)__tmp__NRRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ORRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ORRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__ORRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__ORRN=static_type__MP1H(__tmp__NRRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__ORRN=static_type__SP1H(__tmp__NRRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__ORRN=static_type__XP1H(__tmp__NRRN);
    } break;
    case __EXPR_AND__: {
      __tmp__ORRN=static_type__2P1H(__tmp__NRRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ORRN=static_type__BQ1H(__tmp__NRRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ORRN=static_type__GQ1H(__tmp__NRRN);
    } break;
    case __PUT_TO__: {
      __tmp__ORRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__ORRN=static_type__PQ1H(__tmp__NRRN);
    } break;
    case __SIZE_OF__: {
      __tmp__ORRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__ORRN=((__CAST *)__tmp__NRRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__ORRN=static_type__GIKL(__tmp__NRRN);
    } break;
    case __READ_SLOT__: {
      __tmp__ORRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__NRRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ORRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__NRRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ORRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ORRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ORRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ORRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ORRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__ORRN=static_type__Z2IM(__tmp__NRRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__ORRN=static_type__IXML(__tmp__NRRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__ORRN=static_type__BTXM(__tmp__NRRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__ORRN=static_type__5LEO(__tmp__NRRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ORRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__ORRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ORRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__ORRN=static_type__NOPN(__tmp__NRRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__ORRN=static_type__XCSO(__tmp__NRRN);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__ORRN)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__NNRN,(&__string_402));
    };
  };
  add_last__YPK(buffer__NNRN,')');
}

static void genere__ZRRN(__EXPR_INF_EQ *Self__0RRN,void *buffer__1RRN)
// ({EXPR_INF_EQ},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__USRN,*__tmp__ATRN,*__tmp__ITRN,*__tmp__ZTRN,*__tmp__0TRN;
  void *__tmp__VURN,*__tmp__BVRN,*__tmp__JVRN,*__tmp__0VRN,*__tmp__1VRN;
  void *__tmp__VSRN,*__tmp__BTRN,*__tmp__JTRN,*__tmp__1TRN,*__tmp__WURN;
  void *__tmp__CVRN,*__tmp__KVRN,*__tmp__2VRN;
  __CHARACTER_CST *Self__JVZP,*Self__QWZP;
  __BOOLEAN __tmp__PSRN,__tmp__OTRN,__tmp__QURN,__tmp__PVRN;
  if (((void *)((__TYPE_FULL *)static_type__KQQN())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__1RRN,(&__string_400));
  };
  add_last__YPK(buffer__1RRN,'(');
  if (((void *)((__TYPE_FULL *)static_type__KQQN())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__1RRN,(&__string_401));
    __tmp__PSRN=TRUE__;
  } else {
    __tmp__PSRN=FALSE__;
  };
  if ((! __tmp__PSRN)) {
    __tmp__USRN=Self__0RRN->parent_expr_binary_cmp__MR1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__USRN)->__id) {
    case __LIST__: {
      __tmp__VSRN=static_type__GIQG(__tmp__USRN);
    } break;
    case __STRING_CST__: {
      __tmp__VSRN=((__STRING_CST *)__tmp__USRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VSRN=((__EXTERNAL_C *)__tmp__USRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VSRN=((__PROTOTYPE_CST *)__tmp__USRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__VSRN=((__INTEGER_CST *)__tmp__USRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__VSRN=((__LOCAL *)((__READ_LOCAL *)__tmp__USRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VSRN=static_type__0N1H(__tmp__USRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VSRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VSRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__VSRN=((__REAL_CST *)__tmp__USRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VSRN=((__CHARACTER_CST *)__tmp__USRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VSRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VSRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__VSRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__VSRN=static_type__MP1H(__tmp__USRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__VSRN=static_type__SP1H(__tmp__USRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__VSRN=static_type__XP1H(__tmp__USRN);
    } break;
    case __EXPR_AND__: {
      __tmp__VSRN=static_type__2P1H(__tmp__USRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VSRN=static_type__BQ1H(__tmp__USRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VSRN=static_type__GQ1H(__tmp__USRN);
    } break;
    case __PUT_TO__: {
      __tmp__VSRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__VSRN=static_type__PQ1H(__tmp__USRN);
    } break;
    case __SIZE_OF__: {
      __tmp__VSRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__VSRN=((__CAST *)__tmp__USRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__VSRN=static_type__GIKL(__tmp__USRN);
    } break;
    case __READ_SLOT__: {
      __tmp__VSRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__USRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VSRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__USRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VSRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VSRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VSRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VSRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VSRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__VSRN=static_type__Z2IM(__tmp__USRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__VSRN=static_type__IXML(__tmp__USRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__VSRN=static_type__BTXM(__tmp__USRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__VSRN=static_type__5LEO(__tmp__USRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VSRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__VSRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VSRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__VSRN=static_type__NOPN(__tmp__USRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__VSRN=static_type__XCSO(__tmp__USRN);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__VSRN)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__1RRN,(&__string_400));
    };
  };
  __tmp__ATRN=Self__0RRN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__ATRN)->__id) {
  case __LIST__: {
    __tmp__BTRN=static_type__GIQG(__tmp__ATRN);
  } break;
  case __STRING_CST__: {
    __tmp__BTRN=((__STRING_CST *)__tmp__ATRN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__BTRN=((__EXTERNAL_C *)__tmp__ATRN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__BTRN=((__PROTOTYPE_CST *)__tmp__ATRN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__BTRN=((__INTEGER_CST *)__tmp__ATRN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__BTRN=((__LOCAL *)((__READ_LOCAL *)__tmp__ATRN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BTRN=static_type__0N1H(__tmp__ATRN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BTRN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BTRN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__BTRN=((__REAL_CST *)__tmp__ATRN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__BTRN=((__CHARACTER_CST *)__tmp__ATRN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__BTRN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BTRN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__BTRN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__BTRN=static_type__MP1H(__tmp__ATRN);
  } break;
  case __EXPR_MUL__: {
    __tmp__BTRN=static_type__SP1H(__tmp__ATRN);
  } break;
  case __EXPR_DIV__: {
    __tmp__BTRN=static_type__XP1H(__tmp__ATRN);
  } break;
  case __EXPR_AND__: {
    __tmp__BTRN=static_type__2P1H(__tmp__ATRN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BTRN=static_type__BQ1H(__tmp__ATRN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BTRN=static_type__GQ1H(__tmp__ATRN);
  } break;
  case __PUT_TO__: {
    __tmp__BTRN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__BTRN=static_type__PQ1H(__tmp__ATRN);
  } break;
  case __SIZE_OF__: {
    __tmp__BTRN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__BTRN=((__CAST *)__tmp__ATRN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__BTRN=static_type__GIKL(__tmp__ATRN);
  } break;
  case __READ_SLOT__: {
    __tmp__BTRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ATRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__BTRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ATRN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BTRN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BTRN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BTRN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BTRN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BTRN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__BTRN=static_type__Z2IM(__tmp__ATRN);
  } break;
  case __EXPR_ADD__: {
    __tmp__BTRN=static_type__IXML(__tmp__ATRN);
  } break;
  case __EXPR_NOT__: {
    __tmp__BTRN=static_type__BTXM(__tmp__ATRN);
  } break;
  case __EXPR_MOD__: {
    __tmp__BTRN=static_type__5LEO(__tmp__ATRN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BTRN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__BTRN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BTRN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__BTRN=static_type__NOPN(__tmp__ATRN);
  } break;
  case __EXPR_XOR__: {
    __tmp__BTRN=static_type__XCSO(__tmp__ATRN);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__BTRN)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__ITRN=Self__0RRN->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__ITRN)->__id) {
    case __LIST__: {
      __tmp__JTRN=static_type__GIQG(__tmp__ITRN);
    } break;
    case __STRING_CST__: {
      __tmp__JTRN=((__STRING_CST *)__tmp__ITRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__JTRN=((__EXTERNAL_C *)__tmp__ITRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JTRN=((__PROTOTYPE_CST *)__tmp__ITRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__JTRN=((__INTEGER_CST *)__tmp__ITRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__JTRN=((__LOCAL *)((__READ_LOCAL *)__tmp__ITRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JTRN=static_type__0N1H(__tmp__ITRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JTRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JTRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__JTRN=((__REAL_CST *)__tmp__ITRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__JTRN=((__CHARACTER_CST *)__tmp__ITRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__JTRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JTRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__JTRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__JTRN=static_type__MP1H(__tmp__ITRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__JTRN=static_type__SP1H(__tmp__ITRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__JTRN=static_type__XP1H(__tmp__ITRN);
    } break;
    case __EXPR_AND__: {
      __tmp__JTRN=static_type__2P1H(__tmp__ITRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JTRN=static_type__BQ1H(__tmp__ITRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JTRN=static_type__GQ1H(__tmp__ITRN);
    } break;
    case __PUT_TO__: {
      __tmp__JTRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__JTRN=static_type__PQ1H(__tmp__ITRN);
    } break;
    case __SIZE_OF__: {
      __tmp__JTRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__JTRN=((__CAST *)__tmp__ITRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__JTRN=static_type__GIKL(__tmp__ITRN);
    } break;
    case __READ_SLOT__: {
      __tmp__JTRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ITRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__JTRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ITRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JTRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JTRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JTRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JTRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JTRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__JTRN=static_type__Z2IM(__tmp__ITRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__JTRN=static_type__IXML(__tmp__ITRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__JTRN=static_type__BTXM(__tmp__ITRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__JTRN=static_type__5LEO(__tmp__ITRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JTRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__JTRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JTRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__JTRN=static_type__NOPN(__tmp__ITRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__JTRN=static_type__XCSO(__tmp__ITRN);
    } break;
    };
    __tmp__OTRN=((void *)((__TYPE_FULL *)__tmp__JTRN)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__OTRN=FALSE__;
  };
  if (__tmp__OTRN) {
    add_last__YPK(buffer__1RRN,'0');
  } else {
    __tmp__ZTRN=Self__0RRN->parent_expr_binary_cmp__MR1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__ZTRN)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__ZTRN),buffer__1RRN);
      append__MOK(buffer__1RRN,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__1RRN,((__REAL_CST *)__tmp__ZTRN)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__JVZP=((__CHARACTER_CST *)__tmp__ZTRN);
      add_last__YPK(buffer__1RRN,'\'');
      append__MOK(buffer__1RRN,Self__JVZP->text__HO2H);
      add_last__YPK(buffer__1RRN,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__1RRN,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZTRN)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__ZTRN,buffer__1RRN);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__ZTRN,buffer__1RRN);
    } break;
    };
    __tmp__0TRN=Self__0RRN->parent_expr_binary_cmp__MR1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__0TRN)->__id) {
    case __LIST__: {
      __tmp__1TRN=static_type__GIQG(__tmp__0TRN);
    } break;
    case __STRING_CST__: {
      __tmp__1TRN=((__STRING_CST *)__tmp__0TRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__1TRN=((__EXTERNAL_C *)__tmp__0TRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__1TRN=((__PROTOTYPE_CST *)__tmp__0TRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__1TRN=((__INTEGER_CST *)__tmp__0TRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__1TRN=((__LOCAL *)((__READ_LOCAL *)__tmp__0TRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__1TRN=static_type__0N1H(__tmp__0TRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__1TRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__1TRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__1TRN=((__REAL_CST *)__tmp__0TRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__1TRN=((__CHARACTER_CST *)__tmp__0TRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__1TRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__1TRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__1TRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__1TRN=static_type__MP1H(__tmp__0TRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__1TRN=static_type__SP1H(__tmp__0TRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__1TRN=static_type__XP1H(__tmp__0TRN);
    } break;
    case __EXPR_AND__: {
      __tmp__1TRN=static_type__2P1H(__tmp__0TRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__1TRN=static_type__BQ1H(__tmp__0TRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__1TRN=static_type__GQ1H(__tmp__0TRN);
    } break;
    case __PUT_TO__: {
      __tmp__1TRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__1TRN=static_type__PQ1H(__tmp__0TRN);
    } break;
    case __SIZE_OF__: {
      __tmp__1TRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__1TRN=((__CAST *)__tmp__0TRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__1TRN=static_type__GIKL(__tmp__0TRN);
    } break;
    case __READ_SLOT__: {
      __tmp__1TRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0TRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__1TRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0TRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__1TRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__1TRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__1TRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__1TRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__1TRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__1TRN=static_type__Z2IM(__tmp__0TRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__1TRN=static_type__IXML(__tmp__0TRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__1TRN=static_type__BTXM(__tmp__0TRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__1TRN=static_type__5LEO(__tmp__0TRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__1TRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__1TRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__1TRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__1TRN=static_type__NOPN(__tmp__0TRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__1TRN=static_type__XCSO(__tmp__0TRN);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__1TRN)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__1RRN,(&__string_402));
    };
  };
  add_last__YPK(buffer__1RRN,' ');
  append__MOK(buffer__1RRN,(&__string_367));
  add_last__YPK(buffer__1RRN,' ');
  if (((void *)((__TYPE_FULL *)static_type__KQQN())->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__1RRN,(&__string_401));
    __tmp__QURN=TRUE__;
  } else {
    __tmp__QURN=FALSE__;
  };
  if ((! __tmp__QURN)) {
    __tmp__VURN=Self__0RRN->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__VURN)->__id) {
    case __LIST__: {
      __tmp__WURN=static_type__GIQG(__tmp__VURN);
    } break;
    case __STRING_CST__: {
      __tmp__WURN=((__STRING_CST *)__tmp__VURN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WURN=((__EXTERNAL_C *)__tmp__VURN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WURN=((__PROTOTYPE_CST *)__tmp__VURN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__WURN=((__INTEGER_CST *)__tmp__VURN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__WURN=((__LOCAL *)((__READ_LOCAL *)__tmp__VURN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WURN=static_type__0N1H(__tmp__VURN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WURN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WURN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__WURN=((__REAL_CST *)__tmp__VURN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WURN=((__CHARACTER_CST *)__tmp__VURN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WURN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WURN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__WURN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__WURN=static_type__MP1H(__tmp__VURN);
    } break;
    case __EXPR_MUL__: {
      __tmp__WURN=static_type__SP1H(__tmp__VURN);
    } break;
    case __EXPR_DIV__: {
      __tmp__WURN=static_type__XP1H(__tmp__VURN);
    } break;
    case __EXPR_AND__: {
      __tmp__WURN=static_type__2P1H(__tmp__VURN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WURN=static_type__BQ1H(__tmp__VURN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WURN=static_type__GQ1H(__tmp__VURN);
    } break;
    case __PUT_TO__: {
      __tmp__WURN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__WURN=static_type__PQ1H(__tmp__VURN);
    } break;
    case __SIZE_OF__: {
      __tmp__WURN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__WURN=((__CAST *)__tmp__VURN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__WURN=static_type__GIKL(__tmp__VURN);
    } break;
    case __READ_SLOT__: {
      __tmp__WURN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VURN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WURN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VURN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WURN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WURN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WURN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WURN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WURN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__WURN=static_type__Z2IM(__tmp__VURN);
    } break;
    case __EXPR_ADD__: {
      __tmp__WURN=static_type__IXML(__tmp__VURN);
    } break;
    case __EXPR_NOT__: {
      __tmp__WURN=static_type__BTXM(__tmp__VURN);
    } break;
    case __EXPR_MOD__: {
      __tmp__WURN=static_type__5LEO(__tmp__VURN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WURN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__WURN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WURN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__WURN=static_type__NOPN(__tmp__VURN);
    } break;
    case __EXPR_XOR__: {
      __tmp__WURN=static_type__XCSO(__tmp__VURN);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__WURN)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__1RRN,(&__string_400));
    };
  };
  __tmp__BVRN=Self__0RRN->parent_expr_binary_cmp__MR1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__BVRN)->__id) {
  case __LIST__: {
    __tmp__CVRN=static_type__GIQG(__tmp__BVRN);
  } break;
  case __STRING_CST__: {
    __tmp__CVRN=((__STRING_CST *)__tmp__BVRN)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__CVRN=((__EXTERNAL_C *)__tmp__BVRN)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__CVRN=((__PROTOTYPE_CST *)__tmp__BVRN)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__CVRN=((__INTEGER_CST *)__tmp__BVRN)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__CVRN=((__LOCAL *)((__READ_LOCAL *)__tmp__BVRN)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__CVRN=static_type__0N1H(__tmp__BVRN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__CVRN=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__CVRN=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__CVRN=((__REAL_CST *)__tmp__BVRN)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__CVRN=((__CHARACTER_CST *)__tmp__BVRN)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__CVRN=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__CVRN=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__CVRN=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__CVRN=static_type__MP1H(__tmp__BVRN);
  } break;
  case __EXPR_MUL__: {
    __tmp__CVRN=static_type__SP1H(__tmp__BVRN);
  } break;
  case __EXPR_DIV__: {
    __tmp__CVRN=static_type__XP1H(__tmp__BVRN);
  } break;
  case __EXPR_AND__: {
    __tmp__CVRN=static_type__2P1H(__tmp__BVRN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__CVRN=static_type__BQ1H(__tmp__BVRN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__CVRN=static_type__GQ1H(__tmp__BVRN);
  } break;
  case __PUT_TO__: {
    __tmp__CVRN=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__CVRN=static_type__PQ1H(__tmp__BVRN);
  } break;
  case __SIZE_OF__: {
    __tmp__CVRN=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__CVRN=((__CAST *)__tmp__BVRN)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__CVRN=static_type__GIKL(__tmp__BVRN);
  } break;
  case __READ_SLOT__: {
    __tmp__CVRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__BVRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__CVRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BVRN)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__CVRN=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__CVRN=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__CVRN=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__CVRN=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__CVRN=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__CVRN=static_type__Z2IM(__tmp__BVRN);
  } break;
  case __EXPR_ADD__: {
    __tmp__CVRN=static_type__IXML(__tmp__BVRN);
  } break;
  case __EXPR_NOT__: {
    __tmp__CVRN=static_type__BTXM(__tmp__BVRN);
  } break;
  case __EXPR_MOD__: {
    __tmp__CVRN=static_type__5LEO(__tmp__BVRN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__CVRN=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__CVRN=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__CVRN=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__CVRN=static_type__NOPN(__tmp__BVRN);
  } break;
  case __EXPR_XOR__: {
    __tmp__CVRN=static_type__XCSO(__tmp__BVRN);
  } break;
  };
  if (((void *)((__TYPE_FULL *)__tmp__CVRN)->parent_type__KTL == (void *)TYPE_NULL__)) {
    __tmp__JVRN=Self__0RRN->parent_expr_binary_cmp__MR1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__JVRN)->__id) {
    case __LIST__: {
      __tmp__KVRN=static_type__GIQG(__tmp__JVRN);
    } break;
    case __STRING_CST__: {
      __tmp__KVRN=((__STRING_CST *)__tmp__JVRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__KVRN=((__EXTERNAL_C *)__tmp__JVRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__KVRN=((__PROTOTYPE_CST *)__tmp__JVRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__KVRN=((__INTEGER_CST *)__tmp__JVRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__KVRN=((__LOCAL *)((__READ_LOCAL *)__tmp__JVRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__KVRN=static_type__0N1H(__tmp__JVRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__KVRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__KVRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__KVRN=((__REAL_CST *)__tmp__JVRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__KVRN=((__CHARACTER_CST *)__tmp__JVRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__KVRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__KVRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__KVRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__KVRN=static_type__MP1H(__tmp__JVRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__KVRN=static_type__SP1H(__tmp__JVRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__KVRN=static_type__XP1H(__tmp__JVRN);
    } break;
    case __EXPR_AND__: {
      __tmp__KVRN=static_type__2P1H(__tmp__JVRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__KVRN=static_type__BQ1H(__tmp__JVRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__KVRN=static_type__GQ1H(__tmp__JVRN);
    } break;
    case __PUT_TO__: {
      __tmp__KVRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__KVRN=static_type__PQ1H(__tmp__JVRN);
    } break;
    case __SIZE_OF__: {
      __tmp__KVRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__KVRN=((__CAST *)__tmp__JVRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__KVRN=static_type__GIKL(__tmp__JVRN);
    } break;
    case __READ_SLOT__: {
      __tmp__KVRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__JVRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__KVRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__JVRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__KVRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__KVRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__KVRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__KVRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__KVRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__KVRN=static_type__Z2IM(__tmp__JVRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__KVRN=static_type__IXML(__tmp__JVRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__KVRN=static_type__BTXM(__tmp__JVRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__KVRN=static_type__5LEO(__tmp__JVRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__KVRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__KVRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__KVRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__KVRN=static_type__NOPN(__tmp__JVRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__KVRN=static_type__XCSO(__tmp__JVRN);
    } break;
    };
    __tmp__PVRN=((void *)((__TYPE_FULL *)__tmp__KVRN)->parent_type__KTL == (void *)type_block__BLB);
  } else {
    __tmp__PVRN=FALSE__;
  };
  if (__tmp__PVRN) {
    add_last__YPK(buffer__1RRN,'0');
  } else {
    __tmp__0VRN=Self__0RRN->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__0VRN)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__0VRN),buffer__1RRN);
      append__MOK(buffer__1RRN,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__1RRN,((__REAL_CST *)__tmp__0VRN)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__QWZP=((__CHARACTER_CST *)__tmp__0VRN);
      add_last__YPK(buffer__1RRN,'\'');
      append__MOK(buffer__1RRN,Self__QWZP->text__HO2H);
      add_last__YPK(buffer__1RRN,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__0VRN,buffer__1RRN);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__0VRN,buffer__1RRN);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__0VRN,buffer__1RRN);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__1RRN,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0VRN)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__0VRN,buffer__1RRN);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__0VRN,buffer__1RRN);
    } break;
    };
    __tmp__1VRN=Self__0RRN->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__1VRN)->__id) {
    case __LIST__: {
      __tmp__2VRN=static_type__GIQG(__tmp__1VRN);
    } break;
    case __STRING_CST__: {
      __tmp__2VRN=((__STRING_CST *)__tmp__1VRN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__2VRN=((__EXTERNAL_C *)__tmp__1VRN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2VRN=((__PROTOTYPE_CST *)__tmp__1VRN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__2VRN=((__INTEGER_CST *)__tmp__1VRN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__2VRN=((__LOCAL *)((__READ_LOCAL *)__tmp__1VRN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2VRN=static_type__0N1H(__tmp__1VRN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2VRN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2VRN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__2VRN=((__REAL_CST *)__tmp__1VRN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2VRN=((__CHARACTER_CST *)__tmp__1VRN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2VRN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2VRN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__2VRN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__2VRN=static_type__MP1H(__tmp__1VRN);
    } break;
    case __EXPR_MUL__: {
      __tmp__2VRN=static_type__SP1H(__tmp__1VRN);
    } break;
    case __EXPR_DIV__: {
      __tmp__2VRN=static_type__XP1H(__tmp__1VRN);
    } break;
    case __EXPR_AND__: {
      __tmp__2VRN=static_type__2P1H(__tmp__1VRN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2VRN=static_type__BQ1H(__tmp__1VRN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2VRN=static_type__GQ1H(__tmp__1VRN);
    } break;
    case __PUT_TO__: {
      __tmp__2VRN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__2VRN=static_type__PQ1H(__tmp__1VRN);
    } break;
    case __SIZE_OF__: {
      __tmp__2VRN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__2VRN=((__CAST *)__tmp__1VRN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__2VRN=static_type__GIKL(__tmp__1VRN);
    } break;
    case __READ_SLOT__: {
      __tmp__2VRN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__1VRN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__2VRN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1VRN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2VRN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2VRN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2VRN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2VRN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2VRN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__2VRN=static_type__Z2IM(__tmp__1VRN);
    } break;
    case __EXPR_ADD__: {
      __tmp__2VRN=static_type__IXML(__tmp__1VRN);
    } break;
    case __EXPR_NOT__: {
      __tmp__2VRN=static_type__BTXM(__tmp__1VRN);
    } break;
    case __EXPR_MOD__: {
      __tmp__2VRN=static_type__5LEO(__tmp__1VRN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2VRN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__2VRN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2VRN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__2VRN=static_type__NOPN(__tmp__1VRN);
    } break;
    case __EXPR_XOR__: {
      __tmp__2VRN=static_type__XCSO(__tmp__1VRN);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__2VRN)->parent_type__KTL == (void *)type_block__BLB)) {
      append__MOK(buffer__1RRN,(&__string_402));
    };
  };
  add_last__YPK(buffer__1RRN,')');
}

static void genere__W0PN(__EXPR_OR *Self__X0PN,void *buffer__Y0PN)
// ({EXPR_OR},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__W1PN,*__tmp__C2PN,*__tmp__T2PN,*__tmp__52PN;
  void *__tmp__X1PN,*__tmp__U2PN;
  __CHARACTER_CST *Self__LXZP,*Self__AYZP;
  __BOOLEAN __tmp__R1PN,__tmp__O2PN;
  if (((void *)((__TYPE_FULL *)static_type__NOPN(Self__X0PN))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__Y0PN,(&__string_400));
  } else {
    add_last__YPK(buffer__Y0PN,'(');
    genere_declaration__Q2NI(static_type__NOPN(Self__X0PN),buffer__Y0PN);
    add_last__YPK(buffer__Y0PN,')');
  };
  add_last__YPK(buffer__Y0PN,'(');
  if (((void *)((__TYPE_FULL *)static_type__NOPN(Self__X0PN))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__Y0PN,(&__string_401));
    __tmp__R1PN=TRUE__;
  } else {
    __tmp__R1PN=FALSE__;
  };
  if ((! __tmp__R1PN)) {
    __tmp__W1PN=Self__X0PN->parent_expr_binary__ET1M.left__PP1H;
    switch (((struct ___OBJ *)__tmp__W1PN)->__id) {
    case __LIST__: {
      __tmp__X1PN=static_type__GIQG(__tmp__W1PN);
    } break;
    case __STRING_CST__: {
      __tmp__X1PN=((__STRING_CST *)__tmp__W1PN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__X1PN=((__EXTERNAL_C *)__tmp__W1PN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__X1PN=((__PROTOTYPE_CST *)__tmp__W1PN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__X1PN=((__INTEGER_CST *)__tmp__W1PN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__X1PN=((__LOCAL *)((__READ_LOCAL *)__tmp__W1PN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__X1PN=static_type__0N1H(__tmp__W1PN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__X1PN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__X1PN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__X1PN=((__REAL_CST *)__tmp__W1PN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__X1PN=((__CHARACTER_CST *)__tmp__W1PN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__X1PN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__X1PN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__X1PN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__X1PN=static_type__MP1H(__tmp__W1PN);
    } break;
    case __EXPR_MUL__: {
      __tmp__X1PN=static_type__SP1H(__tmp__W1PN);
    } break;
    case __EXPR_DIV__: {
      __tmp__X1PN=static_type__XP1H(__tmp__W1PN);
    } break;
    case __EXPR_AND__: {
      __tmp__X1PN=static_type__2P1H(__tmp__W1PN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__X1PN=static_type__BQ1H(__tmp__W1PN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__X1PN=static_type__GQ1H(__tmp__W1PN);
    } break;
    case __PUT_TO__: {
      __tmp__X1PN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__X1PN=static_type__PQ1H(__tmp__W1PN);
    } break;
    case __SIZE_OF__: {
      __tmp__X1PN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__X1PN=((__CAST *)__tmp__W1PN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__X1PN=static_type__GIKL(__tmp__W1PN);
    } break;
    case __READ_SLOT__: {
      __tmp__X1PN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__W1PN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__X1PN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__W1PN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__X1PN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__X1PN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__X1PN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__X1PN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__X1PN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__X1PN=static_type__Z2IM(__tmp__W1PN);
    } break;
    case __EXPR_ADD__: {
      __tmp__X1PN=static_type__IXML(__tmp__W1PN);
    } break;
    case __EXPR_NOT__: {
      __tmp__X1PN=static_type__BTXM(__tmp__W1PN);
    } break;
    case __EXPR_MOD__: {
      __tmp__X1PN=static_type__5LEO(__tmp__W1PN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__X1PN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__X1PN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__X1PN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__X1PN=static_type__NOPN(__tmp__W1PN);
    } break;
    case __EXPR_XOR__: {
      __tmp__X1PN=static_type__XCSO(__tmp__W1PN);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__X1PN)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__Y0PN,(&__string_400));
    };
  };
  __tmp__C2PN=Self__X0PN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__C2PN)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__C2PN),buffer__Y0PN);
    append__MOK(buffer__Y0PN,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__Y0PN,((__REAL_CST *)__tmp__C2PN)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__LXZP=((__CHARACTER_CST *)__tmp__C2PN);
    add_last__YPK(buffer__Y0PN,'\'');
    append__MOK(buffer__Y0PN,Self__LXZP->text__HO2H);
    add_last__YPK(buffer__Y0PN,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__Y0PN,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__C2PN)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__C2PN,buffer__Y0PN);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__C2PN,buffer__Y0PN);
  } break;
  };
  add_last__YPK(buffer__Y0PN,' ');
  append__MOK(buffer__Y0PN,(&__string_361));
  add_last__YPK(buffer__Y0PN,' ');
  if (((void *)((__TYPE_FULL *)static_type__NOPN(Self__X0PN))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__Y0PN,(&__string_401));
    __tmp__O2PN=TRUE__;
  } else {
    __tmp__O2PN=FALSE__;
  };
  if ((! __tmp__O2PN)) {
    __tmp__T2PN=Self__X0PN->parent_expr_binary__ET1M.right__OP2H;
    switch (((struct ___OBJ *)__tmp__T2PN)->__id) {
    case __LIST__: {
      __tmp__U2PN=static_type__GIQG(__tmp__T2PN);
    } break;
    case __STRING_CST__: {
      __tmp__U2PN=((__STRING_CST *)__tmp__T2PN)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__U2PN=((__EXTERNAL_C *)__tmp__T2PN)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__U2PN=((__PROTOTYPE_CST *)__tmp__T2PN)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__U2PN=((__INTEGER_CST *)__tmp__T2PN)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__U2PN=((__LOCAL *)((__READ_LOCAL *)__tmp__T2PN)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__U2PN=static_type__0N1H(__tmp__T2PN);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__U2PN=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__U2PN=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__U2PN=((__REAL_CST *)__tmp__T2PN)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__U2PN=((__CHARACTER_CST *)__tmp__T2PN)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__U2PN=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__U2PN=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__U2PN=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__U2PN=static_type__MP1H(__tmp__T2PN);
    } break;
    case __EXPR_MUL__: {
      __tmp__U2PN=static_type__SP1H(__tmp__T2PN);
    } break;
    case __EXPR_DIV__: {
      __tmp__U2PN=static_type__XP1H(__tmp__T2PN);
    } break;
    case __EXPR_AND__: {
      __tmp__U2PN=static_type__2P1H(__tmp__T2PN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__U2PN=static_type__BQ1H(__tmp__T2PN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__U2PN=static_type__GQ1H(__tmp__T2PN);
    } break;
    case __PUT_TO__: {
      __tmp__U2PN=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__U2PN=static_type__PQ1H(__tmp__T2PN);
    } break;
    case __SIZE_OF__: {
      __tmp__U2PN=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__U2PN=((__CAST *)__tmp__T2PN)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__U2PN=static_type__GIKL(__tmp__T2PN);
    } break;
    case __READ_SLOT__: {
      __tmp__U2PN=((__SLOT_DATA *)((__READ_SLOT *)__tmp__T2PN)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__U2PN=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__T2PN)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__U2PN=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__U2PN=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__U2PN=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__U2PN=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__U2PN=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__U2PN=static_type__Z2IM(__tmp__T2PN);
    } break;
    case __EXPR_ADD__: {
      __tmp__U2PN=static_type__IXML(__tmp__T2PN);
    } break;
    case __EXPR_NOT__: {
      __tmp__U2PN=static_type__BTXM(__tmp__T2PN);
    } break;
    case __EXPR_MOD__: {
      __tmp__U2PN=static_type__5LEO(__tmp__T2PN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__U2PN=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__U2PN=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__U2PN=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__U2PN=static_type__NOPN(__tmp__T2PN);
    } break;
    case __EXPR_XOR__: {
      __tmp__U2PN=static_type__XCSO(__tmp__T2PN);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__U2PN)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__Y0PN,(&__string_400));
    };
  };
  __tmp__52PN=Self__X0PN->parent_expr_binary__ET1M.right__OP2H;
  switch (((struct ___OBJ *)__tmp__52PN)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__52PN),buffer__Y0PN);
    append__MOK(buffer__Y0PN,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__Y0PN,((__REAL_CST *)__tmp__52PN)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__AYZP=((__CHARACTER_CST *)__tmp__52PN);
    add_last__YPK(buffer__Y0PN,'\'');
    append__MOK(buffer__Y0PN,Self__AYZP->text__HO2H);
    add_last__YPK(buffer__Y0PN,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__52PN,buffer__Y0PN);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__52PN,buffer__Y0PN);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__52PN,buffer__Y0PN);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__Y0PN,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__52PN)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__52PN,buffer__Y0PN);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__52PN,buffer__Y0PN);
  } break;
  };
  add_last__YPK(buffer__Y0PN,')');
}

static void genere__YAUO(__EXPR_XOR *Self__ZAUO,void *buffer__0AUO)
// ({EXPR_XOR},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  void *__tmp__YBUO,*__tmp__ECUO,*__tmp__VCUO,*__tmp__BDUO;
  void *__tmp__ZBUO,*__tmp__WCUO;
  __CHARACTER_CST *Self__VYZP,*Self__KZZP;
  __BOOLEAN __tmp__TBUO,__tmp__QCUO;
  if (((void *)((__TYPE_FULL *)static_type__XCSO(Self__ZAUO))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__0AUO,(&__string_400));
  } else {
    add_last__YPK(buffer__0AUO,'(');
    genere_declaration__Q2NI(static_type__XCSO(Self__ZAUO),buffer__0AUO);
    add_last__YPK(buffer__0AUO,')');
  };
  add_last__YPK(buffer__0AUO,'(');
  if (((void *)((__TYPE_FULL *)static_type__XCSO(Self__ZAUO))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__0AUO,(&__string_401));
    __tmp__TBUO=TRUE__;
  } else {
    __tmp__TBUO=FALSE__;
  };
  if ((! __tmp__TBUO)) {
    __tmp__YBUO=Self__ZAUO->parent_expr_binary__UA5N.left__PP1H;
    switch (((struct ___OBJ *)__tmp__YBUO)->__id) {
    case __LIST__: {
      __tmp__ZBUO=static_type__GIQG(__tmp__YBUO);
    } break;
    case __STRING_CST__: {
      __tmp__ZBUO=((__STRING_CST *)__tmp__YBUO)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZBUO=((__EXTERNAL_C *)__tmp__YBUO)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZBUO=((__PROTOTYPE_CST *)__tmp__YBUO)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__ZBUO=((__INTEGER_CST *)__tmp__YBUO)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZBUO=((__LOCAL *)((__READ_LOCAL *)__tmp__YBUO)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZBUO=static_type__0N1H(__tmp__YBUO);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZBUO=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZBUO=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__ZBUO=((__REAL_CST *)__tmp__YBUO)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZBUO=((__CHARACTER_CST *)__tmp__YBUO)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZBUO=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZBUO=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__ZBUO=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__ZBUO=static_type__MP1H(__tmp__YBUO);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZBUO=static_type__SP1H(__tmp__YBUO);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZBUO=static_type__XP1H(__tmp__YBUO);
    } break;
    case __EXPR_AND__: {
      __tmp__ZBUO=static_type__2P1H(__tmp__YBUO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZBUO=static_type__BQ1H(__tmp__YBUO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZBUO=static_type__GQ1H(__tmp__YBUO);
    } break;
    case __PUT_TO__: {
      __tmp__ZBUO=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__ZBUO=static_type__PQ1H(__tmp__YBUO);
    } break;
    case __SIZE_OF__: {
      __tmp__ZBUO=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__ZBUO=((__CAST *)__tmp__YBUO)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZBUO=static_type__GIKL(__tmp__YBUO);
    } break;
    case __READ_SLOT__: {
      __tmp__ZBUO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YBUO)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZBUO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YBUO)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZBUO=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZBUO=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZBUO=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZBUO=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZBUO=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__ZBUO=static_type__Z2IM(__tmp__YBUO);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZBUO=static_type__IXML(__tmp__YBUO);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZBUO=static_type__BTXM(__tmp__YBUO);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZBUO=static_type__5LEO(__tmp__YBUO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZBUO=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__ZBUO=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZBUO=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__ZBUO=static_type__NOPN(__tmp__YBUO);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZBUO=static_type__XCSO(__tmp__YBUO);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__ZBUO)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__0AUO,(&__string_400));
    };
  };
  __tmp__ECUO=Self__ZAUO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__ECUO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__ECUO),buffer__0AUO);
    append__MOK(buffer__0AUO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__0AUO,((__REAL_CST *)__tmp__ECUO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__VYZP=((__CHARACTER_CST *)__tmp__ECUO);
    add_last__YPK(buffer__0AUO,'\'');
    append__MOK(buffer__0AUO,Self__VYZP->text__HO2H);
    add_last__YPK(buffer__0AUO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__ECUO,buffer__0AUO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__ECUO,buffer__0AUO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__ECUO,buffer__0AUO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__0AUO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ECUO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__ECUO,buffer__0AUO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__ECUO,buffer__0AUO);
  } break;
  };
  add_last__YPK(buffer__0AUO,' ');
  append__MOK(buffer__0AUO,(&__string_368));
  add_last__YPK(buffer__0AUO,' ');
  if (((void *)((__TYPE_FULL *)static_type__XCSO(Self__ZAUO))->parent_type__KTL == (void *)type_pointer__HLB)) {
    append__MOK(buffer__0AUO,(&__string_401));
    __tmp__QCUO=TRUE__;
  } else {
    __tmp__QCUO=FALSE__;
  };
  if ((! __tmp__QCUO)) {
    __tmp__VCUO=Self__ZAUO->parent_expr_binary__UA5N.right__OP2H;
    switch (((struct ___OBJ *)__tmp__VCUO)->__id) {
    case __LIST__: {
      __tmp__WCUO=static_type__GIQG(__tmp__VCUO);
    } break;
    case __STRING_CST__: {
      __tmp__WCUO=((__STRING_CST *)__tmp__VCUO)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WCUO=((__EXTERNAL_C *)__tmp__VCUO)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WCUO=((__PROTOTYPE_CST *)__tmp__VCUO)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__WCUO=((__INTEGER_CST *)__tmp__VCUO)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__WCUO=((__LOCAL *)((__READ_LOCAL *)__tmp__VCUO)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WCUO=static_type__0N1H(__tmp__VCUO);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WCUO=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WCUO=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__WCUO=((__REAL_CST *)__tmp__VCUO)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WCUO=((__CHARACTER_CST *)__tmp__VCUO)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WCUO=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WCUO=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__WCUO=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__WCUO=static_type__MP1H(__tmp__VCUO);
    } break;
    case __EXPR_MUL__: {
      __tmp__WCUO=static_type__SP1H(__tmp__VCUO);
    } break;
    case __EXPR_DIV__: {
      __tmp__WCUO=static_type__XP1H(__tmp__VCUO);
    } break;
    case __EXPR_AND__: {
      __tmp__WCUO=static_type__2P1H(__tmp__VCUO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WCUO=static_type__BQ1H(__tmp__VCUO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WCUO=static_type__GQ1H(__tmp__VCUO);
    } break;
    case __PUT_TO__: {
      __tmp__WCUO=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__WCUO=static_type__PQ1H(__tmp__VCUO);
    } break;
    case __SIZE_OF__: {
      __tmp__WCUO=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__WCUO=((__CAST *)__tmp__VCUO)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__WCUO=static_type__GIKL(__tmp__VCUO);
    } break;
    case __READ_SLOT__: {
      __tmp__WCUO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VCUO)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WCUO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VCUO)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WCUO=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WCUO=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WCUO=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WCUO=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WCUO=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__WCUO=static_type__Z2IM(__tmp__VCUO);
    } break;
    case __EXPR_ADD__: {
      __tmp__WCUO=static_type__IXML(__tmp__VCUO);
    } break;
    case __EXPR_NOT__: {
      __tmp__WCUO=static_type__BTXM(__tmp__VCUO);
    } break;
    case __EXPR_MOD__: {
      __tmp__WCUO=static_type__5LEO(__tmp__VCUO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WCUO=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__WCUO=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WCUO=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__WCUO=static_type__NOPN(__tmp__VCUO);
    } break;
    case __EXPR_XOR__: {
      __tmp__WCUO=static_type__XCSO(__tmp__VCUO);
    } break;
    };
    if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__WCUO)->flag__LTL &  1) !=  0))) {
      append__MOK(buffer__0AUO,(&__string_400));
    };
  };
  __tmp__BDUO=Self__ZAUO->parent_expr_binary__UA5N.right__OP2H;
  switch (((struct ___OBJ *)__tmp__BDUO)->__id) {
  case __LIST__: {
    genere__SFEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __STRING_CST__: {
    genere__EGEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)__tmp__BDUO),buffer__0AUO);
    append__MOK(buffer__0AUO,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__0AUO,((__REAL_CST *)__tmp__BDUO)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__KZZP=((__CHARACTER_CST *)__tmp__BDUO);
    add_last__YPK(buffer__0AUO,'\'');
    append__MOK(buffer__0AUO,Self__KZZP->text__HO2H);
    add_last__YPK(buffer__0AUO,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __PUT_TO__: {
    genere__VKFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __ITEM__: {
    genere__KMFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __CAST__: {
    genere__WMFK(__tmp__BDUO,buffer__0AUO);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(__tmp__BDUO,buffer__0AUO);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(__tmp__BDUO,buffer__0AUO);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__0AUO,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BDUO)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(__tmp__BDUO,buffer__0AUO);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(__tmp__BDUO,buffer__0AUO);
  } break;
  };
  add_last__YPK(buffer__0AUO,')');
}

static __BOOLEAN is_expanded_c__0ZWG(__TYPE_FULL *Self__1ZWG)
// ({TYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *__tmp__D0WG;
  void *__tmp__E0WG;
  __BOOLEAN __tmp__H0WG;
  if (((__UINTEGER_8)(Self__1ZWG->flag__LTL &  1) !=  0)) {
    __tmp__D0WG=Self__1ZWG->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__D0WG)->__id) {
    case __TYPE__: {
      __tmp__E0WG=((__PROTOTYPE *)((__TYPE *)__tmp__D0WG)->prototype__RD)->type_c__EPDC;
    } break;
    case __TYPE_NULL__: {
      __tmp__E0WG=((__PROTOTYPE *)((__TYPE_NULL *)__tmp__D0WG)->parent_type__TIB.prototype__RD)->type_c__EPDC;
    } break;
    case __TYPE_VOID__: {
      __tmp__E0WG=((__PROTOTYPE *)((__TYPE_VOID *)__tmp__D0WG)->parent_type__UIB.prototype__RD)->type_c__EPDC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__E0WG=(&__string_414);
    } break;
    case __TYPE_ID__: {
      __tmp__E0WG=((__PROTOTYPE *)((__TYPE_ID *)__tmp__D0WG)->parent_type__WIB.prototype__RD)->type_c__EPDC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__E0WG=((__PROTOTYPE *)((__TYPE_GENERIC *)__tmp__D0WG)->parent_type__T2IB.prototype__RD)->type_c__EPDC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__E0WG=(&__string_369);
    } break;
    };
    __tmp__H0WG=((void *)__tmp__E0WG != (void *)NULL);
  } else {
    __tmp__H0WG=FALSE__;
  };
  return(__tmp__H0WG);
}

static void add_local__in__LJQG(void *tab__NJQG,void *buf__OJQG)
// ({NULLxFAST_ARRAYoLOCALo},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *loc__PJQG;
  void *t__QJQG;
  __INTEGER cur__RJQG,__tmp__3JQG,Self__05WG;
  loc__PJQG=NULL;
  t__QJQG=NULL;
  cur__RJQG= 0;
  if ((! (((__FAST_ARRAYoLOCALo *)tab__NJQG)->parent_arrayed_collection__QI4F.upper__TI4F <  0))) {
    __tmp__3JQG=((__FAST_ARRAYoLOCALo *)tab__NJQG)->parent_arrayed_collection__QI4F.upper__TI4F;
    Self__05WG= 0;
    while ((Self__05WG <= __tmp__3JQG)) {
      loc__PJQG=((void **)((__FAST_ARRAYoLOCALo *)tab__NJQG)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__05WG];
      if ((((__INTEGER)((__INTEGER)(((__STRING *)buf__OJQG)->count__VF + ((__STRING_CONSTANT *)((__LOCAL *)loc__PJQG)->parent_variable__B2LC.intern_name__025F)->count__XHB) - cur__RJQG) >  70) || ((void *)t__QJQG != (void *)((__LOCAL *)loc__PJQG)->parent_variable__B2LC.type__125F))) {
        if (((void *)t__QJQG != (void *)NULL)) {
          append__MOK(buf__OJQG,(&__string_272));
        };
        cur__RJQG=((__STRING *)buf__OJQG)->count__VF;
        t__QJQG=((__LOCAL *)loc__PJQG)->parent_variable__B2LC.type__125F;
        append__MOK(buf__OJQG,indent__ZQOG);
        genere_declaration__Q2NI(t__QJQG,buf__OJQG);
        add_last__YPK(buf__OJQG,' ');
      } else {
        add_last__YPK(buf__OJQG,',');
      };
      genere_star_declaration__Q3NI(t__QJQG,buf__OJQG);
      append__MOK(buf__OJQG,((__LOCAL *)loc__PJQG)->parent_variable__B2LC.intern_name__025F);
      Self__05WG=(__INTEGER)(Self__05WG +  1);
    };
    append__MOK(buf__OJQG,(&__string_272));
    ((__FAST_ARRAYoLOCALo *)tab__NJQG)->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(-  1);
  };
}

static void insert_string__to__KMQG(__STRING *Self__LMQG,void *s__MMQG,__INTEGER i__NMQG)
// ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER j__OMQG,__tmp__BNQG,__tmp__DNQG,old_nb_elts__SD0Q;
  __INTEGER __tmp__MNQG,__tmp__ONQG,offset__PCXG,Self__PC1G,Self__4C1G;
  __CHARACTER *Self__RD0Q,*new__UD0Q,*__tmp__KNQG,*Self__MCXG;
  __CHARACTER *__tmp__RNQG,*__tmp__SNQG;
  j__OMQG=Self__LMQG->count__VF;
  if (((struct ___OBJ *)s__MMQG)->__id==__STRING_CONSTANT__) {
    __tmp__BNQG=((__STRING_CONSTANT *)s__MMQG)->count__XHB;
  } else {
    __tmp__BNQG=((__STRING *)s__MMQG)->count__VF;
  };
  __tmp__DNQG=(__INTEGER)(j__OMQG + __tmp__BNQG);
  if ((! (__tmp__DNQG <= Self__LMQG->count__VF))) {
    if ((Self__LMQG->capacity__MNK < __tmp__DNQG)) {
      if ((Self__LMQG->capacity__MNK ==  0)) {
        Self__LMQG->storage__XNK=create__5UX(__tmp__DNQG);
      } else {
        Self__RD0Q=((__CHARACTER *)Self__LMQG->storage__XNK);
        old_nb_elts__SD0Q=Self__LMQG->capacity__MNK;
        new__UD0Q=((__CHARACTER *)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__RD0Q),((__UINTEGER_32 )old_nb_elts__SD0Q),((__UINTEGER_32 )__tmp__DNQG)));
        clear__to__SCNC(new__UD0Q,old_nb_elts__SD0Q,(__INTEGER)(__tmp__DNQG -  1));
        Self__LMQG->storage__XNK=new__UD0Q;
      };
      Self__LMQG->capacity__MNK=__tmp__DNQG;
    } else {
      clear__to__SCNC(Self__LMQG->storage__XNK,Self__LMQG->count__VF,(__INTEGER)(__tmp__DNQG -  1));
    };
  };
  Self__LMQG->count__VF=__tmp__DNQG;
  if ((i__NMQG <= j__OMQG)) {
    __tmp__KNQG=Self__LMQG->storage__XNK;
    __tmp__MNQG=(__INTEGER)(i__NMQG -  1);
    __tmp__ONQG=(__INTEGER)(j__OMQG -  1);
    Self__MCXG=((__CHARACTER *)__tmp__KNQG);
    offset__PCXG=__tmp__BNQG;
    if ((__tmp__BNQG !=  0)) {
      if ((__tmp__BNQG <  0)) {
        Self__PC1G=__tmp__MNQG;
        while ((Self__PC1G <= __tmp__ONQG)) {
          Self__MCXG[(__INTEGER)(Self__PC1G + offset__PCXG)]=Self__MCXG[Self__PC1G];
          Self__PC1G=(__INTEGER)(Self__PC1G +  1);
        };
      } else {
        Self__4C1G=__tmp__ONQG;
        while ((Self__4C1G >= __tmp__MNQG)) {
          Self__MCXG[(__INTEGER)(Self__4C1G + offset__PCXG)]=Self__MCXG[Self__4C1G];
          Self__4C1G=(__INTEGER)(Self__4C1G -  1);
        };
      };
    };
  };
  __tmp__RNQG=Self__LMQG->storage__XNK;
  if (((struct ___OBJ *)s__MMQG)->__id==__STRING_CONSTANT__) {
    __tmp__SNQG=((__STRING_CONSTANT *)s__MMQG)->storage__C5K;
  } else {
    __tmp__SNQG=((__STRING *)s__MMQG)->storage__XNK;
  };
  copy__to__until__FCJB(__tmp__RNQG,__tmp__SNQG,(__INTEGER)(i__NMQG -  1),__tmp__BNQG);
}

static void display_type__3QBK(__LOCAL *Self__4QBK,void *buffer__5QBK)
// ({LOCAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__NRBK,Self__4IDK;
  void *__tmp__URBK,*__tmp__ZRBK;
  void *__tmp__VRBK,*__tmp__0RBK;
  __TYPES *Self__NJDK;
  add_last__YPK(buffer__5QBK,'{');
  if ((((__TYPES *)Self__4QBK->parent_variable__B2LC.type_list__HKZD)->upper__4LAG != (__INTEGER)(-  1))) {
    __tmp__NRBK=(__INTEGER)(((__TYPES *)Self__4QBK->parent_variable__B2LC.type_list__HKZD)->upper__4LAG -  1);
    Self__4IDK= 0;
    while ((Self__4IDK <= __tmp__NRBK)) {
      __tmp__URBK=((void **)((__TYPES *)Self__4QBK->parent_variable__B2LC.type_list__HKZD)->storage__WWFJ)[Self__4IDK];
      switch (((struct ___OBJ *)__tmp__URBK)->__id) {
      case __TYPE__: {
        __tmp__VRBK=((__PROTOTYPE *)((__TYPE *)__tmp__URBK)->prototype__RD)->parent_named__QD.name__1QB;
      } break;
      case __TYPE_NULL__: {
        __tmp__VRBK=(&__string_59);
      } break;
      case __TYPE_VOID__: {
        __tmp__VRBK=(&__string_2);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__VRBK=(&__string_44);
      } break;
      case __TYPE_ID__: {
        __tmp__VRBK=(&__string_46);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__VRBK=((__TYPE_GENERIC *)__tmp__URBK)->intern_name__FS2B;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__VRBK=((__PROFIL_BLOCK *)__tmp__URBK)->parent_profil__GHAG.name__XJEI;
      } break;
      };
      append__MOK(buffer__5QBK,__tmp__VRBK);
      add_last__YPK(buffer__5QBK,'x');
      Self__4IDK=(__INTEGER)(Self__4IDK +  1);
    };
    Self__NJDK=((__TYPES *)Self__4QBK->parent_variable__B2LC.type_list__HKZD);
    __tmp__ZRBK=((void **)Self__NJDK->storage__WWFJ)[Self__NJDK->upper__4LAG];
    switch (((struct ___OBJ *)__tmp__ZRBK)->__id) {
    case __TYPE__: {
      __tmp__0RBK=((__PROTOTYPE *)((__TYPE *)__tmp__ZRBK)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__0RBK=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__0RBK=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__0RBK=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__0RBK=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__0RBK=((__TYPE_GENERIC *)__tmp__ZRBK)->intern_name__FS2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__0RBK=((__PROFIL_BLOCK *)__tmp__ZRBK)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    append__MOK(buffer__5QBK,__tmp__0RBK);
  };
  add_last__YPK(buffer__5QBK,'}');
}

static __INTEGER lower_style__DSPH(__SLOT_DATA *Self__ESPH)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  __INTEGER result__GSPH;
  result__GSPH= 0;
  if (((void *)((__SLOT *)Self__ESPH->parent_slot__BJZD)->slot_data_intern__1JZD == (void *)NULL)) {
    result__GSPH= 1;
  };
  return(result__GSPH);
}

static __INTEGER lower_style__PSPH(__SLOT_CODE *Self__QSPH)
// ({SLOT_CODE}) With resultNo recursive, No inlinable.
{
  __INTEGER result__SSPH;
  result__SSPH= 0;
  if (((void *)((__SLOT *)Self__QSPH->parent_slot__Y22F)->slot_data_intern__1JZD == (void *)NULL)) {
    result__SSPH= 1;
  };
  return(result__SSPH);
}

static void add_slot_struct__TURI(__TYPE *Self__UURI,void *s__VURI)
// ({TYPE},{NULLxSLOT_DATA}) VoidNo recursive, No inlinable.
{
  __POSITION pos__B2BJ;
  if (((__PROTOTYPE *)Self__UURI->prototype__RD)->is_mapping__1RMC) {
    if (((void *)((__SECTION_ *)id_section__UG4F(s__VURI))->name__1I0D == (void *)(&__string_28))) {
      add_last__W35F(((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[ 0],s__VURI);
    } else {
      pos__B2BJ=((__SLOT_DATA *)s__VURI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      put_error__text__0AH( 1,(&__string_415));
      put_position__ECH(pos__B2BJ);
      send_error__2FH();
    };
  } else {
    if ((((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)s__VURI)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)s__VURI)->parent_variable__AJZD.type__125F)->flag__LTL &  2) !=  0)))) {
      add_last__W35F(((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[ 4],s__VURI);
    } else {
      add_last__W35F(((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[size__P2BJ(((__SLOT_DATA *)s__VURI)->parent_variable__AJZD.type__125F)],s__VURI);
    };
  };
}

static void genere__KRFI(__SLOT_DATA *Self__LRFI,void *buffer__MRFI)
// ({SLOT_DATA},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  genere_declaration__Q2NI(Self__LRFI->parent_variable__AJZD.type__125F,buffer__MRFI);
  add_last__YPK(buffer__MRFI,' ');
  genere_star_declaration__Q3NI(Self__LRFI->parent_variable__AJZD.type__125F,buffer__MRFI);
  append__MOK(buffer__MRFI,Self__LRFI->parent_variable__AJZD.intern_name__025F);
  append__MOK(buffer__MRFI,(&__string_272));
}

static void* slot_data__Z4TH(__SLOT_DATA *Self__04TH)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  void *__tmp__OTYH;
  void *type_mono__2RYH,*__tmp__VSYH,*__tmp__2SYH,*__tmp__ITYH;
  void *type_self__0RYH,*__tmp__WSYH,*__tmp__S2ZP,*__tmp__3SYH;
  void *__tmp__Y2ZP,*__tmp__JTYH,*__tmp__12ZP,*t__2IIQ;
  void *__tmp__CSYH,*__tmp__HTYH;
  void *__tmp__DSYH,*type_multiple__1RYH;
  __INTEGER __tmp__LSYH,Self__EZ0H;
  __ITM_TYPE_STYLE *Self__R2ZP,*Self__X2ZP,*Self__02ZP;
  void *b__FIIQ,*b__MIIQ,*b__SIIQ,*b__YIIQ;
  __POSITION __tmp__EIIQ,__tmp__LIIQ,__tmp__RIIQ,__tmp__XIIQ;
  void *__tmp__GIIQ,*__tmp__NIIQ,*__tmp__TIIQ,*__tmp__ZIIQ;
  __SLOT_DATA *result__IIIQ,*result__PIIQ,*result__VIIQ,*result__1IIQ;
  __CHARACTER __tmp__HIIQ,__tmp__OIIQ,__tmp__UIIQ,__tmp__0IIQ;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__CC5Q;
  if (((void *)((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_data_intern__1JZD == (void *)NULL)) {
    __tmp__OTYH=self_up__LKEF;
    type_mono__2RYH=NULL;
    type_self__0RYH=run_value__FMQC;
    self_up__LKEF=receiver_type__R12G(Self__04TH);
    run_value__FMQC=NULL;
    last_position__GG1=Self__04TH->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    __tmp__CSYH=((__ITM_SLOT *)((__SLOT *)Self__04TH->parent_slot__BJZD)->base_slot__P22F)->type__PD2D;
    if (__tmp__CSYH==NULL) {
      __tmp__DSYH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__CSYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__DSYH=NULL;
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__DSYH=NULL;
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__DSYH=NULL;
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__DSYH=NULL;
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__DSYH=NULL;
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__DSYH=((void *)__tmp__CSYH);
      } break;
      }
    };
    type_multiple__1RYH=__tmp__DSYH;
    if (((void *)__tmp__DSYH != (void *)NULL)) {
      __tmp__LSYH=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__DSYH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK -  1);
      Self__EZ0H= 0;
      while ((Self__EZ0H <= __tmp__LSYH)) {
        ((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_data_list__CL3F=create_with_capacity__TB4F((__INTEGER)((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__1RYH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1) -  1));
        __tmp__VSYH=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__1RYH)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__EZ0H];
        switch (((struct ___OBJ *)__tmp__VSYH)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          if (((__ITM_TYPE_SIMPLE *)__tmp__VSYH)->to_run__2VK==0) {
            __tmp__WSYH=((__ITM_TYPE_SIMPLE *)__tmp__VSYH)->to_run__1VK;
          } else {
            __tmp__WSYH=to_run__XVK(__tmp__VSYH);
          };
        } break;
        case __ITM_TYPE_STYLE__: {
          if (((__ITM_TYPE_STYLE *)__tmp__VSYH)->to_run__V1IB==0) {
            __tmp__WSYH=((__ITM_TYPE_STYLE *)__tmp__VSYH)->to_run__U1IB;
          } else {
            Self__R2ZP=((__ITM_TYPE_STYLE *)__tmp__VSYH);
            __tmp__S2ZP=get__XUN(Self__R2ZP);
            Self__R2ZP->to_run__U1IB=__tmp__S2ZP;
            Self__R2ZP->to_run__V1IB=0;
            __tmp__WSYH=__tmp__S2ZP;
          };
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__WSYH=to_run__W1IB(__tmp__VSYH);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__WSYH=to_run__MPXD();
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__WSYH=to_run__DKEF(__tmp__VSYH);
        } break;
        };
        b__FIIQ=Self__04TH->parent_slot__BJZD;
        __tmp__EIIQ=ITM_OBJECT__->position__BJM;
        __tmp__GIIQ=((__ITM_SLOT *)((__SLOT *)b__FIIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
        __tmp__HIIQ=((__ITM_SLOT *)((__SLOT *)b__FIIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
        result__IIIQ=clone__K53F();
        make__name__style__base__type__P25F(result__IIIQ,__tmp__EIIQ,__tmp__GIIQ,__tmp__HIIQ,b__FIIQ,__tmp__WSYH);
        add_last__W35F(((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_data_list__CL3F,result__IIIQ);
        Self__EZ0H=(__INTEGER)(Self__EZ0H +  1);
      };
      Self__CC5Q=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__DSYH)->list_type__VZVD);
      __tmp__2SYH=((void **)Self__CC5Q->parent_arrayed_collection__PIB.storage__5WK)[Self__CC5Q->parent_arrayed_collection__PIB.upper__BWK];
      switch (((struct ___OBJ *)__tmp__2SYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__2SYH)->to_run__2VK==0) {
          __tmp__3SYH=((__ITM_TYPE_SIMPLE *)__tmp__2SYH)->to_run__1VK;
        } else {
          __tmp__3SYH=to_run__XVK(__tmp__2SYH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__2SYH)->to_run__V1IB==0) {
          __tmp__3SYH=((__ITM_TYPE_STYLE *)__tmp__2SYH)->to_run__U1IB;
        } else {
          Self__X2ZP=((__ITM_TYPE_STYLE *)__tmp__2SYH);
          __tmp__Y2ZP=get__XUN(Self__X2ZP);
          Self__X2ZP->to_run__U1IB=__tmp__Y2ZP;
          Self__X2ZP->to_run__V1IB=0;
          __tmp__3SYH=__tmp__Y2ZP;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__3SYH=to_run__W1IB(__tmp__2SYH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__3SYH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__3SYH=to_run__DKEF(__tmp__2SYH);
      } break;
      };
      b__MIIQ=Self__04TH->parent_slot__BJZD;
      __tmp__LIIQ=ITM_OBJECT__->position__BJM;
      __tmp__NIIQ=((__ITM_SLOT *)((__SLOT *)b__MIIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__OIIQ=((__ITM_SLOT *)((__SLOT *)b__MIIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__PIIQ=clone__K53F();
      make__name__style__base__type__P25F(result__PIIQ,__tmp__LIIQ,__tmp__NIIQ,__tmp__OIIQ,b__MIIQ,__tmp__3SYH);
      ((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_data_intern__1JZD=result__PIIQ;
    } else {
      __tmp__HTYH=((__ITM_SLOT *)((__SLOT *)Self__04TH->parent_slot__BJZD)->base_slot__P22F)->type__PD2D;
      if (__tmp__HTYH==NULL) {
        __tmp__ITYH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__HTYH)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__ITYH=((void *)__tmp__HTYH);
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__ITYH=((void *)__tmp__HTYH);
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__ITYH=((void *)__tmp__HTYH);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__ITYH=((void *)__tmp__HTYH);
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__ITYH=((void *)__tmp__HTYH);
        } break;
        case __ITM_TYPE_MULTI__: {
          __tmp__ITYH=NULL;
        } break;
        }
      };
      type_mono__2RYH=__tmp__ITYH;
      switch (((struct ___OBJ *)__tmp__ITYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__ITYH)->to_run__2VK==0) {
          __tmp__JTYH=((__ITM_TYPE_SIMPLE *)__tmp__ITYH)->to_run__1VK;
        } else {
          __tmp__JTYH=to_run__XVK(__tmp__ITYH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__ITYH)->to_run__V1IB==0) {
          __tmp__JTYH=((__ITM_TYPE_STYLE *)__tmp__ITYH)->to_run__U1IB;
        } else {
          Self__02ZP=((__ITM_TYPE_STYLE *)__tmp__ITYH);
          __tmp__12ZP=get__XUN(Self__02ZP);
          Self__02ZP->to_run__U1IB=__tmp__12ZP;
          Self__02ZP->to_run__V1IB=0;
          __tmp__JTYH=__tmp__12ZP;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__JTYH=to_run__W1IB(__tmp__ITYH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__JTYH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__JTYH=to_run__DKEF(__tmp__ITYH);
      } break;
      };
      b__SIIQ=Self__04TH->parent_slot__BJZD;
      __tmp__RIIQ=ITM_OBJECT__->position__BJM;
      __tmp__TIIQ=((__ITM_SLOT *)((__SLOT *)b__SIIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__UIIQ=((__ITM_SLOT *)((__SLOT *)b__SIIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__VIIQ=clone__K53F();
      make__name__style__base__type__P25F(result__VIIQ,__tmp__RIIQ,__tmp__TIIQ,__tmp__UIIQ,b__SIIQ,__tmp__JTYH);
      ((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_data_intern__1JZD=result__VIIQ;
    };
    run_value__FMQC=type_self__0RYH;
    self_up__LKEF=__tmp__OTYH;
    if (((void *)((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_id__04OG == (void *)NULL)) {
      b__YIIQ=Self__04TH->parent_slot__BJZD;
      t__2IIQ=((__TYPE_ID *)get_index__B3ZH( 1))->parent_type__WIB.default__AKC;
      __tmp__XIIQ=ITM_OBJECT__->position__BJM;
      __tmp__ZIIQ=((__ITM_SLOT *)((__SLOT *)b__YIIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__0IIQ=((__ITM_SLOT *)((__SLOT *)b__YIIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__1IIQ=clone__K53F();
      make__name__style__base__type__P25F(result__1IIQ,__tmp__XIIQ,__tmp__ZIIQ,__tmp__0IIQ,b__YIIQ,t__2IIQ);
      ((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_id__04OG=result__1IIQ;
      init__C4OG(((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_id__04OG);
    };
  };
  return(((__SLOT *)Self__04TH->parent_slot__BJZD)->slot_data_intern__1JZD);
}

static void* slot_data__T5TH(__SLOT_CODE *Self__U5TH)
// ({SLOT_CODE}) With resultNo recursive, No inlinable.
{
  void *__tmp__RVYH;
  void *type_mono__5TYH,*__tmp__YUYH,*__tmp__5UYH,*__tmp__LVYH;
  void *type_self__3TYH,*__tmp__ZUYH,*__tmp__A3ZP,*__tmp__AVYH;
  void *__tmp__G3ZP,*__tmp__MVYH,*__tmp__J3ZP,*t__YJIQ;
  void *__tmp__FUYH,*__tmp__KVYH;
  void *__tmp__GUYH,*type_multiple__4TYH;
  __INTEGER __tmp__OUYH,Self__B00H;
  __ITM_TYPE_STYLE *Self__52ZP,*Self__F3ZP,*Self__I3ZP;
  void *b__BJIQ,*b__IJIQ,*b__OJIQ,*b__UJIQ;
  __POSITION __tmp__AJIQ,__tmp__HJIQ,__tmp__NJIQ,__tmp__TJIQ;
  void *__tmp__CJIQ,*__tmp__JJIQ,*__tmp__PJIQ,*__tmp__VJIQ;
  __SLOT_DATA *result__EJIQ,*result__LJIQ,*result__RJIQ,*result__XJIQ;
  __CHARACTER __tmp__DJIQ,__tmp__KJIQ,__tmp__QJIQ,__tmp__WJIQ;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__FC5Q;
  if (((void *)((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_data_intern__1JZD == (void *)NULL)) {
    __tmp__RVYH=self_up__LKEF;
    type_mono__5TYH=NULL;
    type_self__3TYH=run_value__FMQC;
    self_up__LKEF=((__SLOT *)Self__U5TH->parent_slot__Y22F)->receiver_type__Q22F;
    run_value__FMQC=NULL;
    last_position__GG1=((__ITM_SLOT *)((__SLOT *)Self__U5TH->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
    __tmp__FUYH=((__ITM_SLOT *)((__SLOT *)Self__U5TH->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
    if (__tmp__FUYH==NULL) {
      __tmp__GUYH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__FUYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__GUYH=NULL;
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__GUYH=NULL;
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__GUYH=NULL;
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__GUYH=NULL;
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__GUYH=NULL;
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__GUYH=((void *)__tmp__FUYH);
      } break;
      }
    };
    type_multiple__4TYH=__tmp__GUYH;
    if (((void *)__tmp__GUYH != (void *)NULL)) {
      __tmp__OUYH=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__GUYH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK -  1);
      Self__B00H= 0;
      while ((Self__B00H <= __tmp__OUYH)) {
        ((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_data_list__CL3F=create_with_capacity__TB4F((__INTEGER)((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__4TYH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1) -  1));
        __tmp__YUYH=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__4TYH)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__B00H];
        switch (((struct ___OBJ *)__tmp__YUYH)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          if (((__ITM_TYPE_SIMPLE *)__tmp__YUYH)->to_run__2VK==0) {
            __tmp__ZUYH=((__ITM_TYPE_SIMPLE *)__tmp__YUYH)->to_run__1VK;
          } else {
            __tmp__ZUYH=to_run__XVK(__tmp__YUYH);
          };
        } break;
        case __ITM_TYPE_STYLE__: {
          if (((__ITM_TYPE_STYLE *)__tmp__YUYH)->to_run__V1IB==0) {
            __tmp__ZUYH=((__ITM_TYPE_STYLE *)__tmp__YUYH)->to_run__U1IB;
          } else {
            Self__52ZP=((__ITM_TYPE_STYLE *)__tmp__YUYH);
            __tmp__A3ZP=get__XUN(Self__52ZP);
            Self__52ZP->to_run__U1IB=__tmp__A3ZP;
            Self__52ZP->to_run__V1IB=0;
            __tmp__ZUYH=__tmp__A3ZP;
          };
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__ZUYH=to_run__W1IB(__tmp__YUYH);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__ZUYH=to_run__MPXD();
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__ZUYH=to_run__DKEF(__tmp__YUYH);
        } break;
        };
        b__BJIQ=Self__U5TH->parent_slot__Y22F;
        __tmp__AJIQ=ITM_OBJECT__->position__BJM;
        __tmp__CJIQ=((__ITM_SLOT *)((__SLOT *)b__BJIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
        __tmp__DJIQ=((__ITM_SLOT *)((__SLOT *)b__BJIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
        result__EJIQ=clone__K53F();
        make__name__style__base__type__P25F(result__EJIQ,__tmp__AJIQ,__tmp__CJIQ,__tmp__DJIQ,b__BJIQ,__tmp__ZUYH);
        add_last__W35F(((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_data_list__CL3F,result__EJIQ);
        Self__B00H=(__INTEGER)(Self__B00H +  1);
      };
      Self__FC5Q=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__GUYH)->list_type__VZVD);
      __tmp__5UYH=((void **)Self__FC5Q->parent_arrayed_collection__PIB.storage__5WK)[Self__FC5Q->parent_arrayed_collection__PIB.upper__BWK];
      switch (((struct ___OBJ *)__tmp__5UYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__5UYH)->to_run__2VK==0) {
          __tmp__AVYH=((__ITM_TYPE_SIMPLE *)__tmp__5UYH)->to_run__1VK;
        } else {
          __tmp__AVYH=to_run__XVK(__tmp__5UYH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__5UYH)->to_run__V1IB==0) {
          __tmp__AVYH=((__ITM_TYPE_STYLE *)__tmp__5UYH)->to_run__U1IB;
        } else {
          Self__F3ZP=((__ITM_TYPE_STYLE *)__tmp__5UYH);
          __tmp__G3ZP=get__XUN(Self__F3ZP);
          Self__F3ZP->to_run__U1IB=__tmp__G3ZP;
          Self__F3ZP->to_run__V1IB=0;
          __tmp__AVYH=__tmp__G3ZP;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__AVYH=to_run__W1IB(__tmp__5UYH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__AVYH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__AVYH=to_run__DKEF(__tmp__5UYH);
      } break;
      };
      b__IJIQ=Self__U5TH->parent_slot__Y22F;
      __tmp__HJIQ=ITM_OBJECT__->position__BJM;
      __tmp__JJIQ=((__ITM_SLOT *)((__SLOT *)b__IJIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__KJIQ=((__ITM_SLOT *)((__SLOT *)b__IJIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__LJIQ=clone__K53F();
      make__name__style__base__type__P25F(result__LJIQ,__tmp__HJIQ,__tmp__JJIQ,__tmp__KJIQ,b__IJIQ,__tmp__AVYH);
      ((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_data_intern__1JZD=result__LJIQ;
    } else {
      __tmp__KVYH=((__ITM_SLOT *)((__SLOT *)Self__U5TH->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
      if (__tmp__KVYH==NULL) {
        __tmp__LVYH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__KVYH)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__LVYH=((void *)__tmp__KVYH);
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__LVYH=((void *)__tmp__KVYH);
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__LVYH=((void *)__tmp__KVYH);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__LVYH=((void *)__tmp__KVYH);
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__LVYH=((void *)__tmp__KVYH);
        } break;
        case __ITM_TYPE_MULTI__: {
          __tmp__LVYH=NULL;
        } break;
        }
      };
      type_mono__5TYH=__tmp__LVYH;
      switch (((struct ___OBJ *)__tmp__LVYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__LVYH)->to_run__2VK==0) {
          __tmp__MVYH=((__ITM_TYPE_SIMPLE *)__tmp__LVYH)->to_run__1VK;
        } else {
          __tmp__MVYH=to_run__XVK(__tmp__LVYH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__LVYH)->to_run__V1IB==0) {
          __tmp__MVYH=((__ITM_TYPE_STYLE *)__tmp__LVYH)->to_run__U1IB;
        } else {
          Self__I3ZP=((__ITM_TYPE_STYLE *)__tmp__LVYH);
          __tmp__J3ZP=get__XUN(Self__I3ZP);
          Self__I3ZP->to_run__U1IB=__tmp__J3ZP;
          Self__I3ZP->to_run__V1IB=0;
          __tmp__MVYH=__tmp__J3ZP;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__MVYH=to_run__W1IB(__tmp__LVYH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__MVYH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__MVYH=to_run__DKEF(__tmp__LVYH);
      } break;
      };
      b__OJIQ=Self__U5TH->parent_slot__Y22F;
      __tmp__NJIQ=ITM_OBJECT__->position__BJM;
      __tmp__PJIQ=((__ITM_SLOT *)((__SLOT *)b__OJIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__QJIQ=((__ITM_SLOT *)((__SLOT *)b__OJIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__RJIQ=clone__K53F();
      make__name__style__base__type__P25F(result__RJIQ,__tmp__NJIQ,__tmp__PJIQ,__tmp__QJIQ,b__OJIQ,__tmp__MVYH);
      ((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_data_intern__1JZD=result__RJIQ;
    };
    run_value__FMQC=type_self__3TYH;
    self_up__LKEF=__tmp__RVYH;
    if (((void *)((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_id__04OG == (void *)NULL)) {
      b__UJIQ=Self__U5TH->parent_slot__Y22F;
      t__YJIQ=((__TYPE_ID *)get_index__B3ZH( 1))->parent_type__WIB.default__AKC;
      __tmp__TJIQ=ITM_OBJECT__->position__BJM;
      __tmp__VJIQ=((__ITM_SLOT *)((__SLOT *)b__UJIQ)->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__WJIQ=((__ITM_SLOT *)((__SLOT *)b__UJIQ)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__XJIQ=clone__K53F();
      make__name__style__base__type__P25F(result__XJIQ,__tmp__TJIQ,__tmp__VJIQ,__tmp__WJIQ,b__UJIQ,t__YJIQ);
      ((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_id__04OG=result__XJIQ;
      init__C4OG(((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_id__04OG);
    };
  };
  return(((__SLOT *)Self__U5TH->parent_slot__Y22F)->slot_data_intern__1JZD);
}

static void force__to__IDDH(__FAST_ARRAYoSLOTo *Self__JDDH)
// ({FAST_ARRAYoSLOTo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__WXNH,old_nb_elts__NC5Q;
  __BOOLEAN __tmp__3DDH,__tmp__GYNH,__tmp__IZNH;
  void **Self__MC5Q,**new__PC5Q;
  if (( 0 <= Self__JDDH->parent_arrayed_collection__ZJC.upper__WSL)) {
    ((void **)Self__JDDH->parent_arrayed_collection__ZJC.storage__SSL)[ 0]=NULL;
    __tmp__3DDH=TRUE__;
  } else {
    __tmp__3DDH=FALSE__;
  };
  if ((! __tmp__3DDH)) {
    if (( 0 == (__INTEGER)(Self__JDDH->parent_arrayed_collection__ZJC.upper__WSL +  1))) {
      add_last__BV2F(Self__JDDH,NULL);
    } else {
      new_capacity__WXNH= 0;
      if (( 1 > (__INTEGER)(Self__JDDH->parent_arrayed_collection__ZJC.upper__WSL +  1))) {
        if ((Self__JDDH->parent_arrayed_collection__ZJC.capacity__HSL ==  0)) {
          Self__JDDH->parent_arrayed_collection__ZJC.storage__SSL=create__IRSB( 1);
          Self__JDDH->parent_arrayed_collection__ZJC.capacity__HSL= 1;
          __tmp__GYNH=TRUE__;
        } else {
          __tmp__GYNH=FALSE__;
        };
        if ((! __tmp__GYNH)) {
          if ((Self__JDDH->parent_arrayed_collection__ZJC.capacity__HSL <  1)) {
            new_capacity__WXNH=(__INTEGER)(Self__JDDH->parent_arrayed_collection__ZJC.capacity__HSL <<  1);
            while ((new_capacity__WXNH <  1)) {
              new_capacity__WXNH=(__INTEGER)(new_capacity__WXNH <<  1);
            };
            Self__MC5Q=((void **)Self__JDDH->parent_arrayed_collection__ZJC.storage__SSL);
            old_nb_elts__NC5Q=Self__JDDH->parent_arrayed_collection__ZJC.capacity__HSL;
            new__PC5Q=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__MC5Q),((__UINTEGER_32 )(__INTEGER)(old_nb_elts__NC5Q * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__WXNH * ((__INTEGER )(sizeof(void *)))))));
            clear__to__K15F(new__PC5Q,old_nb_elts__NC5Q,(__INTEGER)(new_capacity__WXNH -  1));
            Self__JDDH->parent_arrayed_collection__ZJC.storage__SSL=new__PC5Q;
            Self__JDDH->parent_arrayed_collection__ZJC.capacity__HSL=new_capacity__WXNH;
          };
        };
        __tmp__IZNH=TRUE__;
      } else {
        __tmp__IZNH=FALSE__;
      };
      if ((! __tmp__IZNH)) {
        if (( 1 != (__INTEGER)(Self__JDDH->parent_arrayed_collection__ZJC.upper__WSL +  1))) {
          clear__to__K15F(Self__JDDH->parent_arrayed_collection__ZJC.storage__SSL, 1,(__INTEGER)((__INTEGER)(Self__JDDH->parent_arrayed_collection__ZJC.upper__WSL +  1) -  1));
        };
      };
      Self__JDDH->parent_arrayed_collection__ZJC.upper__WSL= 0;
      ((void **)Self__JDDH->parent_arrayed_collection__ZJC.storage__SSL)[ 0]=NULL;
    };
  };
}

static void add_slot_struct__XWRI(__TYPE_GENERIC *Self__YWRI,void *s__ZWRI)
// ({TYPE_GENERIC},{NULLxSLOT_DATA}) VoidNo recursive, No inlinable.
{
  __POSITION pos__42BJ;
  if (((__PROTOTYPE *)Self__YWRI->parent_type__T2IB.prototype__RD)->is_mapping__1RMC) {
    if (((void *)((__SECTION_ *)id_section__UG4F(s__ZWRI))->name__1I0D == (void *)(&__string_28))) {
      add_last__W35F(((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[ 0],s__ZWRI);
    } else {
      pos__42BJ=((__SLOT_DATA *)s__ZWRI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      put_error__text__0AH( 1,(&__string_415));
      put_position__ECH(pos__42BJ);
      send_error__2FH();
    };
  } else {
    if ((((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)s__ZWRI)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)s__ZWRI)->parent_variable__AJZD.type__125F)->flag__LTL &  2) !=  0)))) {
      add_last__W35F(((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[ 4],s__ZWRI);
    } else {
      add_last__W35F(((void **)((__FAST_ARRAYoFAST_ARRAYoSLOT_DATAoo *)slot_size__4H3G)->parent_arrayed_collection__3H3G.storage__5ZIJ)[size__P2BJ(((__SLOT_DATA *)s__ZWRI)->parent_variable__AJZD.type__125F)],s__ZWRI);
    };
  };
}

static void print_positif__HQSE(__INTEGER Self__IQSE)
// ({INTEGER}) VoidRecursive, No inlinable.
{
  __INTEGER val__RQSE;
  __CHARACTER char__QQSE;
  char__QQSE=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__IQSE %  10)) + ((__INTEGER_8 )'0')))));
  val__RQSE=(__INTEGER)(Self__IQSE /  10);
  if ((val__RQSE !=  0)) {
    print_positif__HQSE(val__RQSE);
  };
  fputc((int)(char__QQSE),stdout);
}

static __MEMORY* new_page__2IU()
// () With resultNo recursive, No inlinable.
{
  __POINTER mem__PG4;
  __UINTEGER_32 cap__MG4,old_size__5IU;
  __MEMORY *block__FJU;
  if ((capacity_max__GJU ==  0)) {
    mem__PG4=((__POINTER )(NULL));
    cap__MG4= 33554432;
    do {
      cap__MG4=(__UINTEGER_32)(cap__MG4 <<  1);
      mem__PG4=((__POINTER )(malloc((cap__MG4))));
      if ((mem__PG4 != (void *)NULL)) {
        free((mem__PG4));
      };
    } while ((! ((mem__PG4 == (void *)NULL) || (cap__MG4 ==  2147483648LU))));
    if ((mem__PG4 == (void *)NULL)) {
      cap__MG4=(__UINTEGER_32)(cap__MG4 >>  1);
    };
    capacity_max__GJU=cap__MG4;
    begin_memory__4PI=((__POINTER )(malloc((cap__MG4))));
  };
  old_size__5IU=(__UINTEGER_32)(nb_page__OQJ <<  26);
  nb_page__OQJ=(__UINTEGER_32)(nb_page__OQJ +  1);
  if (((__UINTEGER_32)(old_size__5IU +  67108864) > capacity_max__GJU)) {
    print__1ZE((&__string_416));
    exit(( 1));
  };
  block__FJU=((__MEMORY *)(void *)((unsigned long)begin_memory__4PI - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )old_size__5IU))));
  block__FJU->previous_linear__20C= 4294967295LU;
  block__FJU->size_and_id__30C= 67108858;
  add_link_free__SDKB(block__FJU);
  last_block[((__UINTEGER_32)(nb_page__OQJ -  1))] = (block__FJU);
  return(block__FJU);
}

static __BOOLEAN fast_has__RKP(__HASHED_SEToABSTRACT_STRINGo *Self__SKP,void *e__TKP)
// ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *node__2KP;
  node__2KP=((void **)Self__SKP->buckets__YRK)[(__INTEGER)(hash_code__WPN(e__TKP) % Self__SKP->capacity__TRK)];
  while ((! (((void *)node__2KP == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__2KP)->item__ESK == (void *)e__TKP)))) {
    node__2KP=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__2KP)->next__QSK;
  };
  return(((void *)node__2KP != (void *)NULL));
}

static __BOOLEAN read_string__BLIB()
// () With resultNo recursive, No inlinable.
{
  __POSITION pos__ZF0P;
  __BOOLEAN result__ELIB;
  result__ELIB=FALSE__;
  if ((read_space__UAF() && (last_character__0OF() == '"'))) {
    last_len_string__VLIB= 0;
    position__ZFD=(__INTEGER)(position__ZFD +  1);
    ((__STRING *)string_tmp__RB)->count__VF= 0;
    while ((! (((last_character__0OF() == ((__CHARACTER )(( 0)))) || (last_character__0OF() == '\n')) || (last_character__0OF() == '"')))) {
      add_last__YPK(string_tmp__RB,last_character__0OF());
      if ((last_character__0OF() == '\\')) {
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        read_escape_character__BH0E();
      } else {
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        last_len_string__VLIB=(__INTEGER)(last_len_string__VLIB +  1);
      };
    };
    if ((last_character__0OF() == '"')) {
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      last_string__V1G=get__QEC(string_tmp__RB);
      result__ELIB=TRUE__;
    } else {
      position__ZFD=begin_position__SOF;
      pos__ZF0P=current_position__EJG();
      put_error__text__0AH( 0,(&__string_417));
      put_position__ECH(pos__ZF0P);
      send_error__2FH();
    };
  };
  return(result__ELIB);
}

static __BOOLEAN read_slot_header__R1CC(__BOOLEAN first__T1CC)
// ({TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *t__W1CC;
  void *v__Y1CC;
  __POSITION pos__XI0P,pos__ZI0P,pos__1I0P,pos__BJ0P,pos__DJ0P;
  __POSITION pos__FJ0P,pos__HJ0P,pos__JJ0P,pos__LJ0P,pos__NJ0P;
  __POSITION pos__PJ0P,pos__RJ0P,pos__TJ0P,pos__VJ0P,pos__1J0P;
  __POSITION pos__3J0P,pos__5J0P,pos__BK0P,pos__DK0P,pos__FK0P;
  __POSITION pos__HK0P,pos__QKIQ,pos__JK0P,pos__LK0P,pos__0RJD;
  __POSITION pos__NK0P,pos__PK0P,pos__RK0P,pos__TK0P,pos__VK0P;
  __POSITION pos__XK0P;
  __BOOLEAN result__V1CC,is_export__21CC,__tmp__5HDC,__tmp__FKDC;
  __BOOLEAN __tmp__RIDC,__tmp__1LDC,result__X1EC,__tmp__XNDC;
  __BOOLEAN result__J2EC,__tmp__TPDC,result__12EC,__tmp__ARDC;
  __BOOLEAN result__N3EC;
  void *cast__Z1CC;
  __CHARACTER parameter_type__11CC,style__01CC;
  result__V1CC=FALSE__;
  t__W1CC=NULL;
  v__Y1CC=NULL;
  cast__Z1CC=NULL;
  parameter_type__11CC='\0';
  is_export__21CC=FALSE__;
  style__01CC=read_style__GDEC();
  if ((style__01CC != ' ')) {
    result__V1CC=TRUE__;
    if (((! first__T1CC) && (style__01CC == '+'))) {
      pos__XI0P=current_position__EJG();
      put_error__text__0AH( 2,(&__string_418));
      put_position__ECH(pos__XI0P);
      send_error__2FH();
    };
    if (first__T1CC) {
      if (read_word__NWH((&__string_65))) {
        if ((style__01CC == '-')) {
          pos__ZI0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_419));
          put_position__ECH(pos__ZI0P);
          send_error__2FH();
        };
        ((__PROTOTYPE *)object__ODD)->parent_named__QD.parent_itm_object__PD.position__BJM=current_position__EJG();
        ((__PROTOTYPE *)object__ODD)->parent_named__QD.style__LDGC=style__01CC;
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__1I0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__1I0P);
          send_error__2FH();
        };
        if ((read_word__NWH((&__string_13)) || read_word__NWH((&__string_14)))) {
          ((__PROTOTYPE *)object__ODD)->type_style__ZNY=last_string__V1G;
        };
        if ((! read_cap_identifier__Y45())) {
          pos__BJ0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_421));
          put_position__ECH(pos__BJ0P);
          send_error__2FH();
        };
        if (((void *)last_string__V1G != (void *)((__PROTOTYPE *)object__ODD)->parent_named__QD.name__1QB)) {
          pos__DJ0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_422));
          put_position__ECH(pos__DJ0P);
          send_error__2FH();
        };
        if ((((__STRING_CONSTANT *)last_string__V1G)->count__XHB ==  1)) {
          pos__FJ0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_423));
          put_position__ECH(pos__FJ0P);
          send_error__2FH();
        };
        if (read_character__EQ3('[')) {
          if ((((__PROTOTYPE *)object__ODD)->generic_count__DIM ==  0)) {
            pos__HJ0P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_424));
            put_position__ECH(pos__HJ0P);
            send_error__2FH();
          };
          parameter_type__11CC=read_cap_character__IPGC();
          if ((parameter_type__11CC == '\0')) {
            pos__JJ0P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_425));
            put_position__ECH(pos__JJ0P);
            send_error__2FH();
          };
          add_last__NRGC(((__PROTOTYPE *)object__ODD)->idf_generic_list__KIM,parameter_type__11CC);
          last_string__V1G=NULL;
          while ((read_character__EQ3(',') || read_identifier__OLEB())) {
            if (((void *)last_string__V1G != (void *)NULL)) {
              pos__LJ0P=current_position__EJG();
              put_error__text__0AH( 2,(&__string_426));
              put_position__ECH(pos__LJ0P);
              send_error__2FH();
            };
            parameter_type__11CC=read_cap_character__IPGC();
            if ((parameter_type__11CC == '\0')) {
              pos__NJ0P=current_position__EJG();
              put_error__text__0AH( 0,(&__string_425));
              put_position__ECH(pos__NJ0P);
              send_error__2FH();
            };
            add_last__NRGC(((__PROTOTYPE *)object__ODD)->idf_generic_list__KIM,parameter_type__11CC);
          };
          if ((! read_character__EQ3(']'))) {
            pos__PJ0P=current_position__EJG();
            put_error__text__0AH( 2,(&__string_427));
            put_position__ECH(pos__PJ0P);
            send_error__2FH();
          };
          if (((__INTEGER)(((__FAST_ARRAYoExpanded_CHARACTERo *)((__PROTOTYPE *)object__ODD)->idf_generic_list__KIM)->parent_arrayed_collection__IIM.upper__WTJB +  1) != ((__PROTOTYPE *)object__ODD)->generic_count__DIM)) {
            pos__RJ0P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_428));
            put_position__ECH(pos__RJ0P);
            send_error__2FH();
          };
        };
        while_do__4EGC:
        {
          is_export__21CC=read_symbol__5OEB((&__string_19));
          if ((is_export__21CC || read_symbol__5OEB((&__string_18)))) {
            if (is_export__21CC) {
              cast__Z1CC=((__PROTOTYPE *)object__ODD)->export_list__SFDC;
            } else {
              cast__Z1CC=((__PROTOTYPE *)object__ODD)->import_list__0FDC;
            };
            if (((void *)cast__Z1CC == (void *)NULL)) {
              cast__Z1CC=create_with_capacity__L0F( 4);
            };
            t__W1CC=read_type__YKLC(PARSER__,TRUE__);
            if (((void *)t__W1CC == (void *)NULL)) {
              pos__TJ0P=current_position__EJG();
              put_error__text__0AH( 0,(&__string_429));
              put_position__ECH(pos__TJ0P);
              send_error__2FH();
            };
            while (read_character__EQ3(',')) {
              add_last__3VK(cast__Z1CC,t__W1CC);
              t__W1CC=read_type__YKLC(PARSER__,TRUE__);
              if (((void *)t__W1CC == (void *)NULL)) {
                pos__VJ0P=current_position__EJG();
                put_error__text__0AH( 0,(&__string_429));
                put_position__ECH(pos__VJ0P);
                send_error__2FH();
              };
            };
            add_last__3VK(cast__Z1CC,t__W1CC);
            if (is_export__21CC) {
              ((__PROTOTYPE *)object__ODD)->export_list__SFDC=cast__Z1CC;
            } else {
              ((__PROTOTYPE *)object__ODD)->import_list__0FDC=cast__Z1CC;
            };
            goto while_do__4EGC;
          };
        };
      } else {
        pos__1J0P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_430));
        put_position__ECH(pos__1J0P);
        send_error__2FH();
      };
      __tmp__5HDC=TRUE__;
    } else {
      __tmp__5HDC=FALSE__;
    };
    if (__tmp__5HDC) {
      __tmp__FKDC=TRUE__;
    } else {
      is_export__21CC=read_word__NWH((&__string_66));
      __tmp__RIDC=(is_export__21CC || read_word__NWH((&__string_67)));
      if (__tmp__RIDC) {
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__3J0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__3J0P);
          send_error__2FH();
        };
        cast__Z1CC=read_type_list__BWAD(PARSER__,FALSE__);
        if (((void *)cast__Z1CC == (void *)NULL)) {
          pos__5J0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_431));
          put_position__ECH(pos__5J0P);
          send_error__2FH();
        };
        if (is_export__21CC) {
          ((__PROTOTYPE *)object__ODD)->export_list__SFDC=cast__Z1CC;
        } else {
          ((__PROTOTYPE *)object__ODD)->import_list__0FDC=cast__Z1CC;
        };
      };
      __tmp__FKDC=__tmp__RIDC;
    };
    if (__tmp__FKDC) {
      __tmp__1LDC=TRUE__;
    } else {
      result__X1EC=read_word__NWH((&__string_68));
      if (result__X1EC) {
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__BK0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__BK0P);
          send_error__2FH();
        };
        if ((! read_external__JWKC())) {
          pos__DK0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_432));
          put_position__ECH(pos__DK0P);
          send_error__2FH();
        };
        append__MOK(output_decl__1C,(&__string_277));
        append__MOK(output_decl__1C,((__PROTOTYPE *)object__ODD)->parent_named__QD.name__1QB);
        add_last__YPK(output_decl__1C,'\n');
        append__MOK(output_decl__1C,last_string__V1G);
        add_last__YPK(output_decl__1C,'\n');
      };
      __tmp__1LDC=result__X1EC;
    };
    if (__tmp__1LDC) {
      __tmp__XNDC=TRUE__;
    } else {
      result__J2EC=read_word__NWH((&__string_69));
      if (result__J2EC) {
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__FK0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__FK0P);
          send_error__2FH();
        };
        v__Y1CC=read_expr_primary__EXIC(PARSER__);
        if (((void *)v__Y1CC == (void *)NULL)) {
          pos__HK0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_433));
          put_position__ECH(pos__HK0P);
          send_error__2FH();
        };
        if (((void *)((__PROTOTYPE *)object__ODD)->default_value__JNDC != (void *)NULL)) {
          pos__QKIQ=current_position__EJG();
          put_error__text__0AH( 1,(&__string_434));
          put_position__ECH(pos__QKIQ);
          send_error__2FH();
        };
        ((__PROTOTYPE *)object__ODD)->default_value__JNDC=v__Y1CC;
      };
      __tmp__XNDC=result__J2EC;
    };
    if (__tmp__XNDC) {
      __tmp__TPDC=TRUE__;
    } else {
      result__12EC=read_word__NWH((&__string_70));
      if (result__12EC) {
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__JK0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__JK0P);
          send_error__2FH();
        };
        if ((! read_external__JWKC())) {
          pos__LK0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_432));
          put_position__ECH(pos__LK0P);
          send_error__2FH();
        };
        if (((void *)((__PROTOTYPE *)object__ODD)->type_c__EPDC != (void *)NULL)) {
          pos__0RJD=current_position__EJG();
          put_error__text__0AH( 1,(&__string_435));
          put_position__ECH(pos__0RJD);
          send_error__2FH();
        };
        ((__PROTOTYPE *)object__ODD)->type_c__EPDC=last_string__V1G;
      };
      __tmp__TPDC=result__12EC;
    };
    if (__tmp__TPDC) {
      __tmp__ARDC=TRUE__;
    } else {
      result__N3EC=read_word__NWH((&__string_71));
      if (result__N3EC) {
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__NK0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__NK0P);
          send_error__2FH();
        };
        if ((! read_integer__4MKC())) {
          pos__PK0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_436));
          put_position__ECH(pos__PK0P);
          send_error__2FH();
        };
      };
      __tmp__ARDC=result__N3EC;
    };
    if ((! __tmp__ARDC)) {
      if (((((((read_word__NWH((&__string_72)) || read_word__NWH((&__string_73))) || read_word__NWH((&__string_74))) || read_word__NWH((&__string_75))) || read_word__NWH((&__string_76))) || read_word__NWH((&__string_77))) || read_word__NWH((&__string_78)))) {
        if ((! read_symbol__5OEB((&__string_16)))) {
          pos__RK0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_420));
          put_position__ECH(pos__RK0P);
          send_error__2FH();
        };
        if ((! read_string__BLIB())) {
          pos__TK0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_437));
          put_position__ECH(pos__TK0P);
          send_error__2FH();
        };
      } else {
        pos__VK0P=current_position__EJG();
        put_error__text__0AH( 2,(&__string_438));
        put_position__ECH(pos__VK0P);
        send_error__2FH();
      };
    };
    if ((! read_character__EQ3(';'))) {
      pos__XK0P=current_position__EJG();
      put_error__text__0AH( 2,(&__string_320));
      put_position__ECH(pos__XK0P);
      send_error__2FH();
    };
  };
  return(result__V1CC);
}

static void* get_name__DEJD(void *n__FEJD)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__P30D,*result__HEJD;
  __SECTION_ *Self__GY1D;
  __INTEGER h__UY1D,idx__VY1D,idx__NI2E,new_capacity__OI2E,i__PI2E;
  __INTEGER typ_id__2K2E;
  __POINTER ptr__XK2E;
  __UINTEGER_32 sz__ZK2E,a__ZF0Q,new_size__XF0Q,t__3F0Q,a__5F0Q;
  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__D30D,*Self__LY1D;
  void *node__O30D,*node__WY1D,*node1__RI2E,*node2__SI2E,*__tmp__E01D;
  void **old_buckets__QI2E;
  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__WK2E;
  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__ZCHF;
  Self__D30D=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__MEJD);
  result__P30D=NULL;
  node__O30D=((void **)Self__D30D->buckets__W30D)[(__INTEGER)(hash_code__WPN(n__FEJD) % Self__D30D->capacity__R30D)];
  while ((! (((void *)node__O30D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__O30D)->key__C40D == (void *)n__FEJD)))) {
    node__O30D=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__O30D)->next__N40D;
  };
  if (((void *)node__O30D != (void *)NULL)) {
    result__P30D=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__O30D)->item__V40D;
  };
  result__HEJD=result__P30D;
  if (((void *)result__P30D == (void *)NULL)) {
    result__HEJD=clone__QXPD();
    Self__GY1D=((__SECTION_ *)result__HEJD);
    Self__GY1D->name__1I0D=n__FEJD;
    Self__GY1D->type_list__JY1D=NULL;
    Self__LY1D=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__MEJD);
    h__UY1D=hash_code__WPN(n__FEJD);
    idx__VY1D=(__INTEGER)(h__UY1D % Self__LY1D->capacity__R30D);
    node__WY1D=((void **)Self__LY1D->buckets__W30D)[idx__VY1D];
    while ((! (((void *)node__WY1D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__WY1D)->key__C40D == (void *)n__FEJD)))) {
      node__WY1D=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__WY1D)->next__N40D;
    };
    if (((void *)node__WY1D == (void *)NULL)) {
      if ((Self__LY1D->capacity__R30D == Self__LY1D->count__XZ1D)) {
        idx__NI2E= 0;
        node1__RI2E=NULL;
        node2__SI2E=NULL;
        old_buckets__QI2E=Self__LY1D->buckets__W30D;
        new_capacity__OI2E=prime_number_ceiling__A4Q((__INTEGER)(Self__LY1D->capacity__R30D +  1));
        Self__LY1D->buckets__W30D=create__54KE(new_capacity__OI2E);
        i__PI2E=(__INTEGER)(Self__LY1D->capacity__R30D -  1);
        Self__LY1D->capacity__R30D=new_capacity__OI2E;
        while ((i__PI2E >=  0)) {
          node1__RI2E=((void **)old_buckets__QI2E)[i__PI2E];
          while (((void *)node1__RI2E != (void *)NULL)) {
            node2__SI2E=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__RI2E)->next__N40D;
            idx__NI2E=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__RI2E)->key__C40D) % Self__LY1D->capacity__R30D);
            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__RI2E)->next__N40D=((void **)Self__LY1D->buckets__W30D)[idx__NI2E];
            ((void **)Self__LY1D->buckets__W30D)[idx__NI2E]=node1__RI2E;
            node1__RI2E=node2__SI2E;
          };
          i__PI2E=(__INTEGER)(i__PI2E -  1);
        };
        idx__VY1D=(__INTEGER)(h__UY1D % Self__LY1D->capacity__R30D);
      };
      __tmp__E01D=((void **)Self__LY1D->buckets__W30D)[idx__VY1D];
      result__WK2E=NULL;
      ptr__XK2E=((__POINTER )(NULL));
      typ_id__2K2E= 0;
      sz__ZK2E=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
      if ((sz__ZK2E ==  0)) {
        result__WK2E=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
      } else {
        typ_id__2K2E=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ZK2E);
        if ((typ_id__2K2E == (__INTEGER)(-  1))) {
          a__ZF0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__XF0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__ZK2E + a__ZF0Q) & (__UINTEGER_32)(~ a__ZF0Q));
          ptr__XK2E=micro_alloc__table__lab__BOI(new_size__XF0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XF0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__XF0Q);
        } else {
          t__3F0Q=((__UINTEGER_32 )typ_id__2K2E);
          a__5F0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__XK2E=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ZK2E + a__5F0Q) & (__UINTEGER_32)(~ a__5F0Q)),((__POINTER )(&(table_type[(t__3F0Q)]))),(__UINTEGER_32)(t__3F0Q |  1));
        };
        result__WK2E=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__XK2E);
        *(result__WK2E) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
      };
      Self__ZCHF=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__WK2E);
      Self__ZCHF->item__V40D=result__HEJD;
      Self__ZCHF->key__C40D=n__FEJD;
      Self__ZCHF->next__N40D=__tmp__E01D;
      node__WY1D=result__WK2E;
      ((void **)Self__LY1D->buckets__W30D)[idx__VY1D]=result__WK2E;
      Self__LY1D->count__XZ1D=(__INTEGER)(Self__LY1D->count__XZ1D +  1);
    } else {
      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__WY1D)->item__V40D=result__HEJD;
    };
  };
  return(result__HEJD);
}

static void* read_type_list__BWAD(__PARSER *Self__CWAD,__BOOLEAN is_section__DWAD)
// ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *ts__HWAD,*__tmp__UWAD,*__tmp__4XAD;
  void *t__GWAD;
  __POSITION pos__EN0P,pos__GN0P,pos__IN0P;
  void *lst__FWAD;
  lst__FWAD=NULL;
  ts__HWAD=NULL;
  t__GWAD=read_type__YKLC(Self__CWAD,FALSE__);
  if (((void *)t__GWAD != (void *)NULL)) {
    if (is_section__DWAD) {
      if (t__GWAD==NULL) {
        __tmp__UWAD=NULL;
      } else {
        switch (((struct ___OBJ *)t__GWAD)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__UWAD=((void *)t__GWAD);
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__UWAD=((void *)t__GWAD);
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__UWAD=((void *)t__GWAD);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__UWAD=((void *)t__GWAD);
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__UWAD=NULL;
        } break;
        }
      };
      ts__HWAD=__tmp__UWAD;
      if (((void *)__tmp__UWAD == (void *)NULL)) {
        pos__EN0P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_439));
        put_position__ECH(pos__EN0P);
        send_error__2FH();
      };
    };
    lst__FWAD=new__JOC();
    add_last__3VK(lst__FWAD,t__GWAD);
    while (read_character__EQ3(',')) {
      t__GWAD=read_type__YKLC(Self__CWAD,FALSE__);
      if (((void *)t__GWAD == (void *)NULL)) {
        pos__GN0P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_431));
        put_position__ECH(pos__GN0P);
        send_error__2FH();
      };
      if (is_section__DWAD) {
        if (t__GWAD==NULL) {
          __tmp__4XAD=NULL;
        } else {
          switch (((struct ___OBJ *)t__GWAD)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            __tmp__4XAD=((void *)t__GWAD);
          } break;
          case __ITM_TYPE_STYLE__: {
            __tmp__4XAD=((void *)t__GWAD);
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__4XAD=((void *)t__GWAD);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__4XAD=((void *)t__GWAD);
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__4XAD=NULL;
          } break;
          }
        };
        ts__HWAD=__tmp__4XAD;
        if (((void *)__tmp__4XAD == (void *)NULL)) {
          pos__IN0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_439));
          put_position__ECH(pos__IN0P);
          send_error__2FH();
        };
      };
      add_last__3VK(lst__FWAD,t__GWAD);
    };
    lst__FWAD=alias__EPC(lst__FWAD);
  };
  return(lst__FWAD);
}

static __SECTION_* clone__QXPD()
// () With resultNo recursive, No inlinable.
{
  __SECTION_ *result__TXPD;
  __POINTER ptr__UXPD;
  __INTEGER typ_id__ZXPD;
  __UINTEGER_32 sz__WXPD,a__HG0Q,new_size__FG0Q,t__LG0Q,a__NG0Q;
  result__TXPD=NULL;
  ptr__UXPD=((__POINTER )(NULL));
  typ_id__ZXPD= 0;
  sz__WXPD=((__UINTEGER_32 )sizeof(__SECTION_));
  if ((sz__WXPD ==  0)) {
    result__TXPD=SECTION___;
  } else {
    typ_id__ZXPD=__SECTION___;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__WXPD);
    if ((typ_id__ZXPD == (__INTEGER)(-  1))) {
      a__HG0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__FG0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__WXPD + a__HG0Q) & (__UINTEGER_32)(~ a__HG0Q));
      ptr__UXPD=micro_alloc__table__lab__BOI(new_size__FG0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FG0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__FG0Q);
    } else {
      t__LG0Q=((__UINTEGER_32 )typ_id__ZXPD);
      a__NG0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__UXPD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__WXPD + a__NG0Q) & (__UINTEGER_32)(~ a__NG0Q)),((__POINTER )(&(table_type[(t__LG0Q)]))),(__UINTEGER_32)(t__LG0Q |  1));
    };
    result__TXPD=((__SECTION_ *)ptr__UXPD);
    *(result__TXPD) = *(SECTION___);
  };
  return(result__TXPD);
}

static __CHARACTER read_style__GDEC()
// () With resultNo recursive, No inlinable.
{
  __CHARACTER result__JDEC;
  __BOOLEAN __tmp__WDEC;
  result__JDEC='\0';
  if (read_character__EQ3('-')) {
    result__JDEC='-';
    __tmp__WDEC=TRUE__;
  } else {
    __tmp__WDEC=FALSE__;
  };
  if ((! __tmp__WDEC)) {
    if (read_character__EQ3('+')) {
      result__JDEC='+';
    } else {
      result__JDEC=' ';
    };
  };
  return(result__JDEC);
}

static void* new__Q0PD()
// () With resultNo recursive, No inlinable.
{
  void *result__T0PD;
  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__55LE,*Self__VAME;
  result__T0PD=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__Z0PD)->parent_arrayed_collection__Y0PD.upper__ET2D <  0)) {
    result__T0PD=create_with_capacity__FTRD( 16);
  } else {
    Self__55LE=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__Z0PD);
    result__T0PD=((void **)Self__55LE->parent_arrayed_collection__Y0PD.storage__FZ2D)[Self__55LE->parent_arrayed_collection__Y0PD.upper__ET2D];
    Self__VAME=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__Z0PD);
    Self__VAME->parent_arrayed_collection__Y0PD.upper__ET2D=(__INTEGER)(Self__VAME->parent_arrayed_collection__Y0PD.upper__ET2D -  1);
  };
  return(result__T0PD);
}

static void* read_local_arg__with_self__5PSD(__PARSER *Self__AQSD,__BOOLEAN m__BQSD,__BOOLEAN s__CQSD)
// ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *t__EQSD,*tmp__CQWD;
  void *tm__FQSD;
  __INTEGER beg__IQSD,Self__WQME,limit_up__XQME,Self__SCDF,Self__EOXD;
  __INTEGER typ_id__FCWD;
  void *result__KQSD;
  __POSITION pos__3N0P,pos__5N0P,pos__MO0P,p__W0VD;
  void *tmp__1J3E;
  __ITM_ARGS *result__5BWD,*Self__BH3D;
  __POINTER ptr__ACWD;
  __UINTEGER_32 sz__CCWD,a__RH0Q,new_size__PH0Q,t__VH0Q,a__XH0Q;
  void *type__GQSD;
  void *name__HQSD;
  __BOOLEAN mute__JQSD;
  __FAST_ARRAYoSTRING_CONSTANTo *Self__XE3D;
  void **__tmp__ME5Q,**__tmp__NE5Q,**__tmp__OE5Q;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__RWVD;
  void **__tmp__Y25Q,**__tmp__Z25Q,**__tmp__025Q;
  t__EQSD=NULL;
  tm__FQSD=NULL;
  type__GQSD=NULL;
  name__HQSD=NULL;
  beg__IQSD= 0;
  result__KQSD=NULL;
  mute__JQSD=m__BQSD;
  if (read_identifier__OLEB()) {
    name__HQSD=new__B2GC();
    type__GQSD=new__JOC();
    beg__IQSD= 0;
    do {
      if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD)->parent_arrayed_collection__VTFC.upper__RSSD +  1) !=  0) && (! read_identifier__OLEB())) && (! mute__JQSD))) {
        pos__3N0P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_440));
        put_position__ECH(pos__3N0P);
        send_error__2FH();
      };
      add_last__4B1D(name__HQSD,last_string__V1G);
      if ((read_character__EQ3(':') && (last_character__0OF() != '='))) {
        mute__JQSD=FALSE__;
        t__EQSD=read_type__YKLC(Self__AQSD,TRUE__);
        if (((void *)t__EQSD == (void *)NULL)) {
          pos__5N0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_441));
          put_position__ECH(pos__5N0P);
          send_error__2FH();
        };
        Self__WQME=beg__IQSD;
        limit_up__XQME=((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD)->parent_arrayed_collection__VTFC.upper__RSSD;
        while ((Self__WQME <= limit_up__XQME)) {
          add_last__3VK(type__GQSD,t__EQSD);
          Self__WQME=(__INTEGER)(Self__WQME +  1);
        };
        beg__IQSD=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
      };
    } while (read_character__EQ3(','));
    if ((beg__IQSD != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD)->parent_arrayed_collection__VTFC.upper__RSSD +  1))) {
      if ((! mute__JQSD)) {
        pos__MO0P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_441));
        put_position__ECH(pos__MO0P);
        send_error__2FH();
      };
      free__XXZC(name__HQSD);
      free__EMD(type__GQSD);
    } else {
      if (s__CQSD) {
        Self__XE3D=((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD);
        add_last__4B1D(Self__XE3D,(&__string_57));
        if ((Self__XE3D->parent_arrayed_collection__VTFC.upper__RSSD !=  0)) {
          if ((Self__XE3D->parent_arrayed_collection__VTFC.upper__RSSD ==  1)) {
            tmp__1J3E=((void **)Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D)[ 0];
            ((void **)Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D)[ 0]=((void **)Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D)[ 1];
            ((void **)Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D)[ 1]=tmp__1J3E;
          } else {
            Self__SCDF=(__INTEGER)(Self__XE3D->parent_arrayed_collection__VTFC.upper__RSSD -  1);
            __tmp__ME5Q=Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D;
            __tmp__NE5Q=Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D;
            __tmp__OE5Q=Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D;
            while ((Self__SCDF >=  0)) {
              ((void **)__tmp__NE5Q)[(__INTEGER)(Self__SCDF +  1)]=((void **)__tmp__ME5Q)[Self__SCDF];
              ((void **)__tmp__OE5Q)[Self__SCDF]=NULL;
              Self__SCDF=(__INTEGER)(Self__SCDF -  1);
            };
            ((void **)Self__XE3D->parent_arrayed_collection__VTFC.storage__FB0D)[ 0]=(&__string_57);
          };
        };
        Self__RWVD=((__FAST_ARRAYoITM_TYPE_MONOo *)type__GQSD);
        add_last__3VK(Self__RWVD,ITM_TYPE_SELF__);
        if ((Self__RWVD->parent_arrayed_collection__PIB.upper__BWK !=  0)) {
          if ((Self__RWVD->parent_arrayed_collection__PIB.upper__BWK ==  1)) {
            tmp__CQWD=((void **)Self__RWVD->parent_arrayed_collection__PIB.storage__5WK)[ 0];
            ((void **)Self__RWVD->parent_arrayed_collection__PIB.storage__5WK)[ 0]=((void **)Self__RWVD->parent_arrayed_collection__PIB.storage__5WK)[ 1];
            ((void **)Self__RWVD->parent_arrayed_collection__PIB.storage__5WK)[ 1]=tmp__CQWD;
          } else {
            Self__EOXD=(__INTEGER)(Self__RWVD->parent_arrayed_collection__PIB.upper__BWK -  1);
            __tmp__Y25Q=Self__RWVD->parent_arrayed_collection__PIB.storage__5WK;
            __tmp__Z25Q=Self__RWVD->parent_arrayed_collection__PIB.storage__5WK;
            __tmp__025Q=Self__RWVD->parent_arrayed_collection__PIB.storage__5WK;
            while ((Self__EOXD >=  0)) {
              ((void **)__tmp__Z25Q)[(__INTEGER)(Self__EOXD +  1)]=((void **)__tmp__Y25Q)[Self__EOXD];
              ((void **)__tmp__025Q)[Self__EOXD]=NULL;
              Self__EOXD=(__INTEGER)(Self__EOXD -  1);
            };
            ((void **)Self__RWVD->parent_arrayed_collection__PIB.storage__5WK)[ 0]=ITM_TYPE_SELF__;
          };
        };
      };
      if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD)->parent_arrayed_collection__VTFC.upper__RSSD +  1) ==  1)) {
        result__KQSD=create__name__type__AWSD(current_position__EJG(),((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__HQSD)->parent_arrayed_collection__VTFC.storage__FB0D)[ 0],((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)type__GQSD)->parent_arrayed_collection__PIB.storage__5WK)[ 0]);
        free__XXZC(name__HQSD);
        free__EMD(type__GQSD);
      } else {
        name__HQSD=alias__1XGD(name__HQSD);
        type__GQSD=alias__EPC(type__GQSD);
        tm__FQSD=get__XYVD(type__GQSD);
        p__W0VD=current_position__EJG();
        result__5BWD=NULL;
        ptr__ACWD=((__POINTER )(NULL));
        typ_id__FCWD= 0;
        sz__CCWD=((__UINTEGER_32 )sizeof(__ITM_ARGS));
        if ((sz__CCWD ==  0)) {
          result__5BWD=ITM_ARGS__;
        } else {
          typ_id__FCWD=-1;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__CCWD);
          if ((typ_id__FCWD == (__INTEGER)(-  1))) {
            a__RH0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__PH0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__CCWD + a__RH0Q) & (__UINTEGER_32)(~ a__RH0Q));
            ptr__ACWD=micro_alloc__table__lab__BOI(new_size__PH0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PH0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__PH0Q);
          } else {
            t__VH0Q=((__UINTEGER_32 )typ_id__FCWD);
            a__XH0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__ACWD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__CCWD + a__XH0Q) & (__UINTEGER_32)(~ a__XH0Q)),((__POINTER )(&(table_type[(t__VH0Q)]))),(__UINTEGER_32)(t__VH0Q |  1));
          };
          result__5BWD=((__ITM_ARGS *)ptr__ACWD);
          *(result__5BWD) = *(ITM_ARGS__);
        };
        Self__BH3D=((__ITM_ARGS *)result__5BWD);
        Self__BH3D->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM=p__W0VD;
        Self__BH3D->name__FH3D=name__HQSD;
        Self__BH3D->type__GH3D=tm__FQSD;
        result__KQSD=result__5BWD;
      };
    };
  };
  return(result__KQSD);
}

static __ITM_ARG* create__name__type__AWSD(__POSITION p__CWSD,void *n__DWSD,void *t__EWSD)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxITM_TYPE_SIMPLExITM_TYPE_STYLExITM_TYPE_GENERICxITM_TYPE_SELFxITM_TYPE_GENERIC_ELT}) With resultNo recursive, No inlinable.
{
  __ITM_ARG *result__FUTD,*Self__Z32D;
  __POINTER ptr__GUTD;
  __INTEGER typ_id__LUTD;
  __UINTEGER_32 sz__IUTD,a__2H0Q,new_size__0H0Q,t__AI0Q,a__CI0Q;
  result__FUTD=NULL;
  ptr__GUTD=((__POINTER )(NULL));
  typ_id__LUTD= 0;
  sz__IUTD=((__UINTEGER_32 )sizeof(__ITM_ARG));
  if ((sz__IUTD ==  0)) {
    result__FUTD=ITM_ARG__;
  } else {
    typ_id__LUTD=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__IUTD);
    if ((typ_id__LUTD == (__INTEGER)(-  1))) {
      a__2H0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__0H0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__IUTD + a__2H0Q) & (__UINTEGER_32)(~ a__2H0Q));
      ptr__GUTD=micro_alloc__table__lab__BOI(new_size__0H0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0H0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__0H0Q);
    } else {
      t__AI0Q=((__UINTEGER_32 )typ_id__LUTD);
      a__CI0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GUTD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__IUTD + a__CI0Q) & (__UINTEGER_32)(~ a__CI0Q)),((__POINTER )(&(table_type[(t__AI0Q)]))),(__UINTEGER_32)(t__AI0Q |  1));
    };
    result__FUTD=((__ITM_ARG *)ptr__GUTD);
    *(result__FUTD) = *(ITM_ARG__);
  };
  Self__Z32D=((__ITM_ARG *)result__FUTD);
  Self__Z32D->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM=p__CWSD;
  Self__Z32D->name__332D=n__DWSD;
  Self__Z32D->type__432D=t__EWSD;
  return(result__FUTD);
}

static void add_last__S31D(__FAST_ARRAYoITM_ARGUMENTo *Self__T31D,void *element__U31D)
// ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__V31D,__tmp__441D,__tmp__3FHF,Self__52AG;
  __BOOLEAN __tmp__F41D;
  void **__tmp__341D,**new__KFHF;
  new_capacity__V31D= 0;
  if (((__INTEGER)(Self__T31D->parent_arrayed_collection__5GJD.upper__W31D +  1) <= (__INTEGER)(Self__T31D->parent_arrayed_collection__5GJD.capacity__Y31D -  1))) {
    Self__T31D->parent_arrayed_collection__5GJD.upper__W31D=(__INTEGER)(Self__T31D->parent_arrayed_collection__5GJD.upper__W31D +  1);
    __tmp__F41D=TRUE__;
  } else {
    __tmp__F41D=FALSE__;
  };
  if ((! __tmp__F41D)) {
    if ((Self__T31D->parent_arrayed_collection__5GJD.capacity__Y31D ==  0)) {
      Self__T31D->parent_arrayed_collection__5GJD.storage__U41D=create__VHUE( 2);
      Self__T31D->parent_arrayed_collection__5GJD.capacity__Y31D= 2;
      Self__T31D->parent_arrayed_collection__5GJD.upper__W31D= 0;
    } else {
      new_capacity__V31D=(__INTEGER)(Self__T31D->parent_arrayed_collection__5GJD.capacity__Y31D <<  1);
      __tmp__341D=Self__T31D->parent_arrayed_collection__5GJD.storage__U41D;
      __tmp__441D=Self__T31D->parent_arrayed_collection__5GJD.capacity__Y31D;
      new__KFHF=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__341D)),((__UINTEGER_32 )(__INTEGER)(__tmp__441D * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__V31D * ((__INTEGER )(sizeof(void *)))))));
      __tmp__3FHF=(__INTEGER)(new_capacity__V31D -  1);
      Self__52AG=__tmp__441D;
      while ((Self__52AG <= __tmp__3FHF)) {
        new__KFHF[Self__52AG]=NULL;
        Self__52AG=(__INTEGER)(Self__52AG +  1);
      };
      Self__T31D->parent_arrayed_collection__5GJD.storage__U41D=new__KFHF;
      Self__T31D->parent_arrayed_collection__5GJD.capacity__Y31D=new_capacity__V31D;
      Self__T31D->parent_arrayed_collection__5GJD.upper__W31D=(__INTEGER)(Self__T31D->parent_arrayed_collection__5GJD.upper__W31D +  1);
    };
  };
  ((void **)Self__T31D->parent_arrayed_collection__5GJD.storage__U41D)[Self__T31D->parent_arrayed_collection__5GJD.upper__W31D]=element__U31D;
}

static void* new__5ALC()
// () With resultNo recursive, No inlinable.
{
  void *result__CBLC;
  __FAST_ARRAYoSTRINGo *Self__OUEB,*Self__WH0C;
  result__CBLC=NULL;
  if ((((__FAST_ARRAYoSTRINGo *)free__DBLC)->parent_arrayed_collection__QXD.upper__TXD <  0)) {
    result__CBLC=create__AXB( 128);
  } else {
    Self__OUEB=((__FAST_ARRAYoSTRINGo *)free__DBLC);
    result__CBLC=((void **)Self__OUEB->parent_arrayed_collection__QXD.storage__D2M)[Self__OUEB->parent_arrayed_collection__QXD.upper__TXD];
    Self__WH0C=((__FAST_ARRAYoSTRINGo *)free__DBLC);
    Self__WH0C->parent_arrayed_collection__QXD.upper__TXD=(__INTEGER)(Self__WH0C->parent_arrayed_collection__QXD.upper__TXD -  1);
  };
  return(result__CBLC);
}

static void* read_loc_arg__EDCD(__PARSER *Self__FDCD,__BOOLEAN mute__GDCD)
// ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *result__IDCD;
  void *t__JDCD;
  __POSITION pos__KDCD,pos__1T0P,pos__3T0P,pos__5T0P,pos__BU0P;
  void *n__NDCD;
  __BOOLEAN __tmp__KFCD;
  result__IDCD=NULL;
  t__JDCD=NULL;
  pos__KDCD=((__POSITION ) 0);
  n__NDCD=NULL;
  if (read_identifier__OLEB()) {
    pos__KDCD=current_position__EJG();
    n__NDCD=last_string__V1G;
    if ((read_character__EQ3(':') && (last_character__0OF() != '='))) {
      t__JDCD=read_type__YKLC(Self__FDCD,TRUE__);
      if (((void *)t__JDCD == (void *)NULL)) {
        pos__1T0P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_429));
        put_position__ECH(pos__1T0P);
        send_error__2FH();
      };
      result__IDCD=create__name__type__AWSD(pos__KDCD,n__NDCD,t__JDCD);
    } else {
      if ((! mute__GDCD)) {
        pos__3T0P=current_position__EJG();
        put_error__text__0AH( 2,(&__string_442));
        put_position__ECH(pos__3T0P);
        send_error__2FH();
      };
    };
    __tmp__KFCD=TRUE__;
  } else {
    __tmp__KFCD=FALSE__;
  };
  if ((! __tmp__KFCD)) {
    if (read_character__EQ3('(')) {
      result__IDCD=read_local_arg__with_self__5PSD(Self__FDCD,mute__GDCD,FALSE__);
      if (((void *)result__IDCD == (void *)NULL)) {
        if ((! mute__GDCD)) {
          pos__5T0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_309));
          put_position__ECH(pos__5T0P);
          send_error__2FH();
        };
      } else {
        if ((! read_character__EQ3(')'))) {
          pos__BU0P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_443));
          put_position__ECH(pos__BU0P);
          send_error__2FH();
        };
      };
    };
  };
  return(result__IDCD);
}

static __ITM_SLOT* create__name__feature__WVTD(__POSITION p__YVTD,void *n__ZVTD,void *sec__0VTD)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxSECTION_}) With resultNo recursive, No inlinable.
{
  __ITM_SLOT *result__BHUD,*Self__JA3D;
  __POINTER ptr__CHUD;
  __INTEGER typ_id__HHUD;
  __UINTEGER_32 sz__EHUD,a__MI0Q,new_size__KI0Q,t__QI0Q,a__SI0Q;
  result__BHUD=NULL;
  ptr__CHUD=((__POINTER )(NULL));
  typ_id__HHUD= 0;
  sz__EHUD=((__UINTEGER_32 )sizeof(__ITM_SLOT));
  if ((sz__EHUD ==  0)) {
    result__BHUD=ITM_SLOT__;
  } else {
    typ_id__HHUD=__ITM_SLOT__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__EHUD);
    if ((typ_id__HHUD == (__INTEGER)(-  1))) {
      a__MI0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__KI0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__EHUD + a__MI0Q) & (__UINTEGER_32)(~ a__MI0Q));
      ptr__CHUD=micro_alloc__table__lab__BOI(new_size__KI0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KI0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__KI0Q);
    } else {
      t__QI0Q=((__UINTEGER_32 )typ_id__HHUD);
      a__SI0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__CHUD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__EHUD + a__SI0Q) & (__UINTEGER_32)(~ a__SI0Q)),((__POINTER )(&(table_type[(t__QI0Q)]))),(__UINTEGER_32)(t__QI0Q |  1));
    };
    result__BHUD=((__ITM_SLOT *)ptr__CHUD);
    *(result__BHUD) = *(ITM_SLOT__);
  };
  Self__JA3D=((__ITM_SLOT *)result__BHUD);
  Self__JA3D->parent_named__XIM.name__1QB=n__ZVTD;
  Self__JA3D->parent_named__XIM.parent_itm_object__PD.position__BJM=p__YVTD;
  Self__JA3D->id_section__EACC=sec__0VTD;
  return(result__BHUD);
}

static __BOOLEAN read_operator__2IHC()
// () With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__VCY,i__IY0;
  __POSITION pos__PU0P;
  __BOOLEAN result__5IHC,__tmp__1JHC;
  __CHARACTER ch__QCY;
  __CHARACTER *__tmp__SCY,*Self__2X0;
  result__5IHC=FALSE__;
  read_space__UAF();
  ((__STRING *)string_tmp__RB)->count__VF= 0;
  until_do__5SHC:
  {
    if ((last_character__0OF() == ((__CHARACTER )(( 0))))) {
      __tmp__1JHC=TRUE__;
    } else {
      ch__QCY=last_character__0OF();
      __tmp__SCY=((__STRING_CONSTANT *)(&__string_444))->storage__C5K;
      __tmp__VCY=(__INTEGER)(((__STRING_CONSTANT *)(&__string_444))->count__XHB -  1);
      Self__2X0=((__CHARACTER *)__tmp__SCY);
      i__IY0=__tmp__VCY;
      while ((! ((i__IY0 <  0) || (ch__QCY == Self__2X0[i__IY0])))) {
        i__IY0=(__INTEGER)(i__IY0 -  1);
      };
      __tmp__1JHC=(i__IY0 <  0);
    };
    if ((! __tmp__1JHC)) {
      add_last__YPK(string_tmp__RB,last_character__0OF());
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      goto until_do__5SHC;
    };
  };
  if ((((__STRING *)string_tmp__RB)->count__VF !=  0)) {
    last_string__V1G=get__QEC(string_tmp__RB);
    if (((((void *)last_string__V1G == (void *)(&__string_16)) || ((void *)last_string__V1G == (void *)(&__string_18))) || ((void *)last_string__V1G == (void *)(&__string_17)))) {
      pos__PU0P=current_position__EJG();
      put_error__text__0AH( 0,(&__string_313));
      put_position__ECH(pos__PU0P);
      send_error__2FH();
    };
    result__5IHC=TRUE__;
  };
  return(result__5IHC);
}

static __BOOLEAN read_integer__4MKC()
// () With resultNo recursive, No inlinable.
{
  __INTEGER_64 result__PNHD,__tmp__BOHD,result__PCND,result__JZQD;
  __STRING *Self__NNHD,*Self__0I0Q,*Self__3AND,*Self__NCND,*Self__RXQD;
  __STRING *Self__HZQD,*Self__T0QD,*Self__OCRD;
  __INTEGER __tmp__0NHD,Self__T2KD,result__RESD,j__ABND,__tmp__5I0Q;
  __INTEGER __tmp__0CND,Self__00OD,i__TXQD,__tmp__UZQD,Self__PJSD;
  __INTEGER state__W0QD,value__X0QD,i__V0QD,state__RCRD,result__UCRD;
  __INTEGER i__QCRD;
  __POSITION pos__2V0P,pos__PW0P,pos__5W0P;
  __BOOLEAN result__BNKC,__tmp__IFSD,result__5AND,__tmp__YBND;
  __BOOLEAN result__EYUD,__tmp__PQKC,result__UXQD,negative__Y0QD;
  __BOOLEAN result__Z0QD,__tmp__H2QD,result__SUEJ,__tmp__T2QD;
  __BOOLEAN result__5UEJ,__tmp__H3QD,__tmp__G4QD,result__GMUE;
  __BOOLEAN __tmp__0ARD,result__YMUE,__tmp__HARD,negative__TCRD;
  __BOOLEAN __tmp__AERD,result__BWEJ,__tmp__TERD,__tmp__IFRD;
  __BOOLEAN result__GOUE,__tmp__PGRD,result__YOUE;
  __CHARACTER *__tmp__ZI0Q,*__tmp__AJ0Q,*__tmp__EJ0Q,*__tmp__IJ0Q;
  __CHARACTER *__tmp__MJ0Q;
  __CHARACTER Self__PESD,Self__CYUD,Self__WKUE,cc__00QD,cc__SCRD;
  result__BNKC=FALSE__;
  if ((read_space__UAF() && is_digit__EWEB(last_character__0OF()))) {
    result__BNKC=TRUE__;
    ((__STRING *)string_tmp__RB)->count__VF= 0;
    add_last__YPK(string_tmp__RB,last_character__0OF());
    position__ZFD=(__INTEGER)(position__ZFD +  1);
    while ((is_hexadecimal_digit__NLHD(last_character__0OF()) || (last_character__0OF() == '_'))) {
      if ((last_character__0OF() != '_')) {
        add_last__YPK(string_tmp__RB,last_character__0OF());
      };
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    };
    if ((last_character__0OF() == 'h')) {
      Self__NNHD=((__STRING *)string_tmp__RB);
      result__PNHD= 0;
      __tmp__0NHD=Self__NNHD->count__VF;
      Self__T2KD= 1;
      __tmp__ZI0Q=Self__NNHD->storage__XNK;
      while ((Self__T2KD <= __tmp__0NHD)) {
        __tmp__BOHD=(__INTEGER_64)(result__PNHD <<  4);
        Self__PESD=((__CHARACTER *)__tmp__ZI0Q)[(__INTEGER)(Self__T2KD -  1)];
        result__RESD= 0;
        if ((((__INTEGER_8 )Self__PESD) < ((__INTEGER_8 )'A'))) {
          result__RESD=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__PESD) -  48));
          __tmp__IFSD=TRUE__;
        } else {
          __tmp__IFSD=FALSE__;
        };
        if ((! __tmp__IFSD)) {
          if ((((__INTEGER_8 )Self__PESD) < ((__INTEGER_8 )'a'))) {
            result__RESD=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__PESD) -  55));
          } else {
            result__RESD=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__PESD) -  87));
          };
        };
        result__PNHD=(__INTEGER_64)(__tmp__BOHD | ((__INTEGER_64 )result__RESD));
        Self__T2KD=(__INTEGER)(Self__T2KD +  1);
      };
      last_integer__R1IC=result__PNHD;
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    } else {
      Self__0I0Q=((__STRING *)string_tmp__RB);
      if ((((__INTEGER_8 )((__CHARACTER *)Self__0I0Q->storage__XNK)[(__INTEGER)(Self__0I0Q->count__VF -  1)]) > ((__INTEGER_8 )'9'))) {
        remove_last__RLLB(string_tmp__RB, 1);
        position__ZFD=(__INTEGER)(position__ZFD -  1);
      };
      if ((last_character__0OF() == 'o')) {
        Self__3AND=((__STRING *)string_tmp__RB);
        result__5AND=FALSE__;
        j__ABND= 0;
        if ((Self__3AND->count__VF !=  0)) {
          j__ABND= 1;
          __tmp__5I0Q=Self__3AND->count__VF;
          __tmp__AJ0Q=Self__3AND->storage__XNK;
          until_do__4GSD:
          {
            if ((j__ABND > __tmp__5I0Q)) {
              __tmp__YBND=TRUE__;
            } else {
              Self__CYUD=((__CHARACTER *)__tmp__AJ0Q)[(__INTEGER)(j__ABND -  1)];
              result__EYUD=FALSE__;
              if ((((__INTEGER_8 )Self__CYUD) >= ((__INTEGER_8 )'0'))) {
                result__EYUD=(((__INTEGER_8 )Self__CYUD) <= ((__INTEGER_8 )'7'));
              };
              __tmp__YBND=(! result__EYUD);
            };
            if ((! __tmp__YBND)) {
              j__ABND=(__INTEGER)(j__ABND +  1);
              goto until_do__4GSD;
            };
          };
          result__5AND=(j__ABND > Self__3AND->count__VF);
        };
        if ((! result__5AND)) {
          pos__2V0P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_445));
          put_position__ECH(pos__2V0P);
          send_error__2FH();
        };
        Self__NCND=((__STRING *)string_tmp__RB);
        result__PCND= 0;
        __tmp__0CND=Self__NCND->count__VF;
        Self__00OD= 1;
        __tmp__EJ0Q=Self__NCND->storage__XNK;
        while ((Self__00OD <= __tmp__0CND)) {
          result__PCND=(__INTEGER_64)((__INTEGER_64)(result__PCND <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)__tmp__EJ0Q)[(__INTEGER)(Self__00OD -  1)]) -  48))));
          Self__00OD=(__INTEGER)(Self__00OD +  1);
        };
        last_integer__R1IC=result__PCND;
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        __tmp__PQKC=TRUE__;
      } else {
        __tmp__PQKC=FALSE__;
      };
      if ((! __tmp__PQKC)) {
        if ((last_character__0OF() == 'b')) {
          Self__RXQD=((__STRING *)string_tmp__RB);
          i__TXQD=Self__RXQD->count__VF;
          result__UXQD=TRUE__;
          __tmp__IJ0Q=Self__RXQD->storage__XNK;
          while ((! ((! result__UXQD) || (i__TXQD ==  0)))) {
            Self__WKUE=((__CHARACTER *)__tmp__IJ0Q)[(__INTEGER)(i__TXQD -  1)];
            result__UXQD=((Self__WKUE == '0') || (Self__WKUE == '1'));
            i__TXQD=(__INTEGER)(i__TXQD -  1);
          };
          if ((! result__UXQD)) {
            pos__PW0P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_446));
            put_position__ECH(pos__PW0P);
            send_error__2FH();
          };
          Self__HZQD=((__STRING *)string_tmp__RB);
          result__JZQD= 0;
          __tmp__UZQD=Self__HZQD->count__VF;
          Self__PJSD= 1;
          __tmp__MJ0Q=Self__HZQD->storage__XNK;
          while ((Self__PJSD <= __tmp__UZQD)) {
            result__JZQD=(__INTEGER_64)(result__JZQD <<  1);
            if ((((__CHARACTER *)__tmp__MJ0Q)[(__INTEGER)(Self__PJSD -  1)] == '1')) {
              result__JZQD=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__JZQD) &  -2));
            };
            Self__PJSD=(__INTEGER)(Self__PJSD +  1);
          };
          last_integer__R1IC=result__JZQD;
          position__ZFD=(__INTEGER)(position__ZFD +  1);
        } else {
          if ((last_character__0OF() == 'd')) {
            position__ZFD=(__INTEGER)(position__ZFD +  1);
          };
          Self__T0QD=((__STRING *)string_tmp__RB);
          state__W0QD= 0;
          value__X0QD= 0;
          negative__Y0QD=FALSE__;
          result__Z0QD=FALSE__;
          cc__00QD='\0';
          i__V0QD= 1;
          while ((! ((state__W0QD ==  4) || (i__V0QD > Self__T0QD->count__VF)))) {
            cc__00QD=((__CHARACTER *)Self__T0QD->storage__XNK)[(__INTEGER)(i__V0QD -  1)];
            if ((state__W0QD ==  0)) {
              if (is_separator__4D3E(cc__00QD)) {
                __tmp__H2QD=TRUE__;
              } else {
                result__SUEJ=(cc__00QD == '+');
                if (result__SUEJ) {
                  state__W0QD= 1;
                };
                __tmp__H2QD=result__SUEJ;
              };
              if (__tmp__H2QD) {
                __tmp__T2QD=TRUE__;
              } else {
                result__5UEJ=(cc__00QD == '-');
                if (result__5UEJ) {
                  negative__Y0QD=TRUE__;
                  state__W0QD= 1;
                };
                __tmp__T2QD=result__5UEJ;
              };
              if ((! __tmp__T2QD)) {
                if (is_digit__EWEB(cc__00QD)) {
                  value__X0QD=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__00QD)) -  48);
                  state__W0QD= 2;
                } else {
                  state__W0QD= 4;
                };
              };
              __tmp__H3QD=TRUE__;
            } else {
              __tmp__H3QD=FALSE__;
            };
            if (__tmp__H3QD) {
              __tmp__G4QD=TRUE__;
            } else {
              result__GMUE=(state__W0QD ==  1);
              if (result__GMUE) {
                if (is_digit__EWEB(cc__00QD)) {
                  value__X0QD=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__00QD)) -  48);
                  if (negative__Y0QD) {
                    value__X0QD=(__INTEGER)(- value__X0QD);
                  };
                  state__W0QD= 2;
                } else {
                  state__W0QD= 4;
                };
              };
              __tmp__G4QD=result__GMUE;
            };
            if (__tmp__G4QD) {
              __tmp__0ARD=TRUE__;
            } else {
              result__YMUE=(state__W0QD ==  2);
              if (result__YMUE) {
                if (is_digit__EWEB(cc__00QD)) {
                  if (negative__Y0QD) {
                    value__X0QD=(__INTEGER)((__INTEGER)( 10 * value__X0QD) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__00QD)) -  48));
                  } else {
                    value__X0QD=(__INTEGER)((__INTEGER)( 10 * value__X0QD) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__00QD)) -  48));
                  };
                  if (((negative__Y0QD && (value__X0QD >  0)) || ((! negative__Y0QD) && (value__X0QD <  0)))) {
                    state__W0QD= 4;
                  };
                  __tmp__HARD=TRUE__;
                } else {
                  __tmp__HARD=FALSE__;
                };
                if ((! __tmp__HARD)) {
                  if (is_separator__4D3E(cc__00QD)) {
                    state__W0QD= 3;
                  } else {
                    state__W0QD= 4;
                  };
                };
              };
              __tmp__0ARD=result__YMUE;
            };
            if ((! __tmp__0ARD)) {
              if ((state__W0QD ==  3)) {
                if ((! is_separator__4D3E(cc__00QD))) {
                  state__W0QD= 4;
                };
              };
            };
            i__V0QD=(__INTEGER)(i__V0QD +  1);
          };
          if (((state__W0QD !=  0) && (state__W0QD !=  4))) {
            result__Z0QD=TRUE__;
          };
          if ((! result__Z0QD)) {
            pos__5W0P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_447));
            put_position__ECH(pos__5W0P);
            send_error__2FH();
          };
          Self__OCRD=((__STRING *)string_tmp__RB);
          state__RCRD= 0;
          cc__SCRD='\0';
          negative__TCRD=FALSE__;
          result__UCRD= 0;
          i__QCRD= 1;
          while ((i__QCRD <= Self__OCRD->count__VF)) {
            cc__SCRD=((__CHARACTER *)Self__OCRD->storage__XNK)[(__INTEGER)(i__QCRD -  1)];
            if ((state__RCRD ==  0)) {
              if (is_separator__4D3E(cc__SCRD)) {
                __tmp__AERD=TRUE__;
              } else {
                result__BWEJ=(cc__SCRD == '+');
                if (result__BWEJ) {
                  state__RCRD= 1;
                };
                __tmp__AERD=result__BWEJ;
              };
              if ((! __tmp__AERD)) {
                if ((cc__SCRD == '-')) {
                  negative__TCRD=TRUE__;
                  state__RCRD= 1;
                } else {
                  result__UCRD=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SCRD)) -  48);
                  state__RCRD= 2;
                };
              };
              __tmp__TERD=TRUE__;
            } else {
              __tmp__TERD=FALSE__;
            };
            if (__tmp__TERD) {
              __tmp__IFRD=TRUE__;
            } else {
              result__GOUE=(state__RCRD ==  1);
              if (result__GOUE) {
                result__UCRD=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SCRD)) -  48);
                if (negative__TCRD) {
                  result__UCRD=(__INTEGER)(- result__UCRD);
                };
                state__RCRD= 2;
              };
              __tmp__IFRD=result__GOUE;
            };
            if (__tmp__IFRD) {
              __tmp__PGRD=TRUE__;
            } else {
              result__YOUE=(state__RCRD ==  2);
              if (result__YOUE) {
                if (is_digit__EWEB(cc__SCRD)) {
                  if (negative__TCRD) {
                    result__UCRD=(__INTEGER)((__INTEGER)( 10 * result__UCRD) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SCRD)) -  48));
                  } else {
                    result__UCRD=(__INTEGER)((__INTEGER)( 10 * result__UCRD) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SCRD)) -  48));
                  };
                } else {
                  state__RCRD= 3;
                };
              };
              __tmp__PGRD=result__YOUE;
            };
            if ((! __tmp__PGRD)) {
              if ((state__RCRD ==  3)) {
                i__QCRD=Self__OCRD->count__VF;
              };
            };
            i__QCRD=(__INTEGER)(i__QCRD +  1);
          };
          last_integer__R1IC=((__INTEGER_64 )result__UCRD);
        };
      };
    };
  };
  return(result__BNKC);
}

static void* operator_to_name__2YHC(void *typ__4YHC,void *op__5YHC)
// ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__GZHC,Self__JFIC;
  __CHARACTER c__BZHC;
  __BOOLEAN __tmp__UZHC,__tmp__B0HC,result__GFJC,__tmp__O0HC;
  __BOOLEAN result__YFJC,__tmp__10HC,result__KGJC,__tmp__I1HC;
  __BOOLEAN result__2GJC,__tmp__V1HC,result__OHJC,__tmp__C2HC;
  __BOOLEAN result__AIJC,__tmp__P2HC,result__SIJC,__tmp__22HC;
  __BOOLEAN result__EJJC,__tmp__J3HC,result__WJJC,__tmp__W3HC;
  __BOOLEAN result__IKJC,__tmp__D4HC,result__0KJC,__tmp__Q4HC;
  __BOOLEAN result__MLJC,__tmp__34HC,result__4LJC,__tmp__K5HC;
  __BOOLEAN result__QMJC,__tmp__X5HC,result__CNJC,__tmp__EAIC;
  __BOOLEAN result__UNJC;
  c__BZHC='\0';
  copy__BNK(string_tmp__RB,typ__4YHC);
  __tmp__GZHC=((__STRING_CONSTANT *)op__5YHC)->count__XHB;
  Self__JFIC= 1;
  while ((Self__JFIC <= __tmp__GZHC)) {
    c__BZHC=((__CHARACTER *)((__STRING_CONSTANT *)op__5YHC)->storage__C5K)[(__INTEGER)(Self__JFIC -  1)];
    if ((c__BZHC == '+')) {
      append__MOK(string_tmp__RB,(&__string_212));
      __tmp__UZHC=TRUE__;
    } else {
      __tmp__UZHC=FALSE__;
    };
    if (__tmp__UZHC) {
      __tmp__B0HC=TRUE__;
    } else {
      result__GFJC=(c__BZHC == '-');
      if (result__GFJC) {
        append__MOK(string_tmp__RB,(&__string_213));
      };
      __tmp__B0HC=result__GFJC;
    };
    if (__tmp__B0HC) {
      __tmp__O0HC=TRUE__;
    } else {
      result__YFJC=(c__BZHC == '~');
      if (result__YFJC) {
        append__MOK(string_tmp__RB,(&__string_214));
      };
      __tmp__O0HC=result__YFJC;
    };
    if (__tmp__O0HC) {
      __tmp__10HC=TRUE__;
    } else {
      result__KGJC=(c__BZHC == '!');
      if (result__KGJC) {
        append__MOK(string_tmp__RB,(&__string_215));
      };
      __tmp__10HC=result__KGJC;
    };
    if (__tmp__10HC) {
      __tmp__I1HC=TRUE__;
    } else {
      result__2GJC=(c__BZHC == '/');
      if (result__2GJC) {
        append__MOK(string_tmp__RB,(&__string_216));
      };
      __tmp__I1HC=result__2GJC;
    };
    if (__tmp__I1HC) {
      __tmp__V1HC=TRUE__;
    } else {
      result__OHJC=(c__BZHC == '*');
      if (result__OHJC) {
        append__MOK(string_tmp__RB,(&__string_217));
      };
      __tmp__V1HC=result__OHJC;
    };
    if (__tmp__V1HC) {
      __tmp__C2HC=TRUE__;
    } else {
      result__AIJC=(c__BZHC == '^');
      if (result__AIJC) {
        append__MOK(string_tmp__RB,(&__string_218));
      };
      __tmp__C2HC=result__AIJC;
    };
    if (__tmp__C2HC) {
      __tmp__P2HC=TRUE__;
    } else {
      result__SIJC=(c__BZHC == '%');
      if (result__SIJC) {
        append__MOK(string_tmp__RB,(&__string_219));
      };
      __tmp__P2HC=result__SIJC;
    };
    if (__tmp__P2HC) {
      __tmp__22HC=TRUE__;
    } else {
      result__EJJC=(c__BZHC == '>');
      if (result__EJJC) {
        append__MOK(string_tmp__RB,(&__string_220));
      };
      __tmp__22HC=result__EJJC;
    };
    if (__tmp__22HC) {
      __tmp__J3HC=TRUE__;
    } else {
      result__WJJC=(c__BZHC == '<');
      if (result__WJJC) {
        append__MOK(string_tmp__RB,(&__string_221));
      };
      __tmp__J3HC=result__WJJC;
    };
    if (__tmp__J3HC) {
      __tmp__W3HC=TRUE__;
    } else {
      result__IKJC=(c__BZHC == '=');
      if (result__IKJC) {
        append__MOK(string_tmp__RB,(&__string_222));
      };
      __tmp__W3HC=result__IKJC;
    };
    if (__tmp__W3HC) {
      __tmp__D4HC=TRUE__;
    } else {
      result__0KJC=(c__BZHC == '\\');
      if (result__0KJC) {
        append__MOK(string_tmp__RB,(&__string_223));
      };
      __tmp__D4HC=result__0KJC;
    };
    if (__tmp__D4HC) {
      __tmp__Q4HC=TRUE__;
    } else {
      result__MLJC=(c__BZHC == '|');
      if (result__MLJC) {
        append__MOK(string_tmp__RB,(&__string_224));
      };
      __tmp__Q4HC=result__MLJC;
    };
    if (__tmp__Q4HC) {
      __tmp__34HC=TRUE__;
    } else {
      result__4LJC=(c__BZHC == '&');
      if (result__4LJC) {
        append__MOK(string_tmp__RB,(&__string_225));
      };
      __tmp__34HC=result__4LJC;
    };
    if (__tmp__34HC) {
      __tmp__K5HC=TRUE__;
    } else {
      result__QMJC=(c__BZHC == '$');
      if (result__QMJC) {
        append__MOK(string_tmp__RB,(&__string_226));
      };
      __tmp__K5HC=result__QMJC;
    };
    if (__tmp__K5HC) {
      __tmp__X5HC=TRUE__;
    } else {
      result__CNJC=(c__BZHC == '#');
      if (result__CNJC) {
        append__MOK(string_tmp__RB,(&__string_227));
      };
      __tmp__X5HC=result__CNJC;
    };
    if (__tmp__X5HC) {
      __tmp__EAIC=TRUE__;
    } else {
      result__UNJC=(c__BZHC == '@');
      if (result__UNJC) {
        append__MOK(string_tmp__RB,(&__string_228));
      };
      __tmp__EAIC=result__UNJC;
    };
    if ((! __tmp__EAIC)) {
      if ((c__BZHC == '?')) {
        append__MOK(string_tmp__RB,(&__string_229));
      };
    };
    Self__JFIC=(__INTEGER)(Self__JFIC +  1);
  };
  return(get__QEC(string_tmp__RB));
}

static void* copy__FDQD(void *tmp__HDQD)
// ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
{
  __INTEGER new_capacity__HU2D,other_upper__GU2D,Self__H2JF;
  __INTEGER new_capacity__HY2D,__tmp__PZ2D,__tmp__UHHF,Self__44AG;
  void *result__JDQD;
  __FAST_ARRAYoITM_ARGUMENTo *Self__EU2D;
  void **__tmp__0U2D,**__tmp__2U2D,**Self__ZPGF;
  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__FY2D;
  __BOOLEAN __tmp__WY2D;
  void **__tmp__OZ2D,**new__BHHF;
  result__JDQD=create_with_capacity__FTRD((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)tmp__HDQD)->parent_arrayed_collection__5GJD.upper__W31D +  1));
  Self__EU2D=((__FAST_ARRAYoITM_ARGUMENTo *)result__JDQD);
  new_capacity__HU2D= 0;
  other_upper__GU2D=((__FAST_ARRAYoITM_ARGUMENTo *)tmp__HDQD)->parent_arrayed_collection__5GJD.upper__W31D;
  if ((other_upper__GU2D >=  0)) {
    new_capacity__HU2D=(__INTEGER)(other_upper__GU2D +  1);
    if ((Self__EU2D->parent_arrayed_collection__5GJD.capacity__Y31D < new_capacity__HU2D)) {
      Self__EU2D->parent_arrayed_collection__5GJD.storage__U41D=create__VHUE(new_capacity__HU2D);
      Self__EU2D->parent_arrayed_collection__5GJD.capacity__Y31D=new_capacity__HU2D;
    };
    __tmp__0U2D=Self__EU2D->parent_arrayed_collection__5GJD.storage__U41D;
    __tmp__2U2D=((__FAST_ARRAYoITM_ARGUMENTo *)tmp__HDQD)->parent_arrayed_collection__5GJD.storage__U41D;
    Self__ZPGF=((void **)__tmp__0U2D);
    Self__H2JF=other_upper__GU2D;
    while ((Self__H2JF >=  0)) {
      Self__ZPGF[Self__H2JF]=((void **)__tmp__2U2D)[Self__H2JF];
      Self__H2JF=(__INTEGER)(Self__H2JF -  1);
    };
  };
  Self__EU2D->parent_arrayed_collection__5GJD.upper__W31D=other_upper__GU2D;
  ((__FAST_ARRAYoITM_ARGUMENTo *)tmp__HDQD)->parent_arrayed_collection__5GJD.upper__W31D=(__INTEGER)(-  1);
  Self__FY2D=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__Z0PD);
  new_capacity__HY2D= 0;
  if (((__INTEGER)(Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D +  1) <= (__INTEGER)(Self__FY2D->parent_arrayed_collection__Y0PD.capacity__JY2D -  1))) {
    Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D=(__INTEGER)(Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D +  1);
    __tmp__WY2D=TRUE__;
  } else {
    __tmp__WY2D=FALSE__;
  };
  if ((! __tmp__WY2D)) {
    if ((Self__FY2D->parent_arrayed_collection__Y0PD.capacity__JY2D ==  0)) {
      Self__FY2D->parent_arrayed_collection__Y0PD.storage__FZ2D=create__XQUE( 2);
      Self__FY2D->parent_arrayed_collection__Y0PD.capacity__JY2D= 2;
      Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D= 0;
    } else {
      new_capacity__HY2D=(__INTEGER)(Self__FY2D->parent_arrayed_collection__Y0PD.capacity__JY2D <<  1);
      __tmp__OZ2D=Self__FY2D->parent_arrayed_collection__Y0PD.storage__FZ2D;
      __tmp__PZ2D=Self__FY2D->parent_arrayed_collection__Y0PD.capacity__JY2D;
      new__BHHF=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__OZ2D)),((__UINTEGER_32 )(__INTEGER)(__tmp__PZ2D * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__HY2D * ((__INTEGER )(sizeof(void *)))))));
      __tmp__UHHF=(__INTEGER)(new_capacity__HY2D -  1);
      Self__44AG=__tmp__PZ2D;
      while ((Self__44AG <= __tmp__UHHF)) {
        new__BHHF[Self__44AG]=NULL;
        Self__44AG=(__INTEGER)(Self__44AG +  1);
      };
      Self__FY2D->parent_arrayed_collection__Y0PD.storage__FZ2D=new__BHHF;
      Self__FY2D->parent_arrayed_collection__Y0PD.capacity__JY2D=new_capacity__HY2D;
      Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D=(__INTEGER)(Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D +  1);
    };
  };
  ((void **)Self__FY2D->parent_arrayed_collection__Y0PD.storage__FZ2D)[Self__FY2D->parent_arrayed_collection__Y0PD.upper__ET2D]=tmp__HDQD;
  return(result__JDQD);
}

static void set_argument_list__QA2D(__ITM_SLOT *Self__RA2D,void *p__SA2D)
// ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
{
  void *Result__4YTE,*__tmp__MB2D,*__tmp__ZB2D;
  __INTEGER __tmp__1A2D;
  __POSITION __tmp__NB2D,__tmp__0B2D;
  __SECTION_ *Self__PMIQ;
  __BOOLEAN __tmp__5A2D;
  __FAST_ARRAYoITM_ARGUMENTo *Self__125Q,*Self__DU2E;
  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__SA2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) >  1)) {
    __tmp__5A2D=TRUE__;
  } else {
    Result__4YTE=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__SA2D)->parent_arrayed_collection__5GJD.storage__U41D)[ 0];
    if (((struct ___OBJ *)Result__4YTE)->__id==__ITM_ARG__) {
      __tmp__1A2D= 1;
    } else {
      __tmp__1A2D=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)Result__4YTE)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
    };
    __tmp__5A2D=(__tmp__1A2D >  1);
  };
  if (__tmp__5A2D) {
    if (((void *)((__SECTION_ *)Self__RA2D->id_section__EACC)->name__1I0D == (void *)(&__string_25))) {
      Self__125Q=((__FAST_ARRAYoITM_ARGUMENTo *)p__SA2D);
      __tmp__MB2D=((void **)Self__125Q->parent_arrayed_collection__5GJD.storage__U41D)[Self__125Q->parent_arrayed_collection__5GJD.upper__W31D];
      if (((struct ___OBJ *)__tmp__MB2D)->__id==__ITM_ARG__) {
        __tmp__NB2D=((__ITM_ARG *)__tmp__MB2D)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
      } else {
        __tmp__NB2D=((__ITM_ARGS *)__tmp__MB2D)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
      };
      put_error__text__0AH( 1,(&__string_448));
      put_position__ECH(__tmp__NB2D);
      send_error__2FH();
    };
    Self__PMIQ=((__SECTION_ *)Self__RA2D->id_section__EACC);
    if ((((void *)Self__PMIQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__PMIQ->name__1I0D == (void *)(&__string_24)))) {
      Self__DU2E=((__FAST_ARRAYoITM_ARGUMENTo *)p__SA2D);
      __tmp__ZB2D=((void **)Self__DU2E->parent_arrayed_collection__5GJD.storage__U41D)[Self__DU2E->parent_arrayed_collection__5GJD.upper__W31D];
      if (((struct ___OBJ *)__tmp__ZB2D)->__id==__ITM_ARG__) {
        __tmp__0B2D=((__ITM_ARG *)__tmp__ZB2D)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
      } else {
        __tmp__0B2D=((__ITM_ARGS *)__tmp__ZB2D)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
      };
      put_error__text__0AH( 1,(&__string_449));
      put_position__ECH(__tmp__0B2D);
      send_error__2FH();
    };
  };
  Self__RA2D->argument_list__BC2D=p__SA2D;
}

static __BOOLEAN read_affect__IWZC()
// () With resultNo recursive, No inlinable.
{
  __BOOLEAN result__LWZC,__tmp__WWZC,__tmp__GXZC,result__OQBD;
  result__LWZC=FALSE__;
  if (read_symbol__5OEB((&__string_16))) {
    last_string__V1G=(&__string_16);
    result__LWZC=TRUE__;
    __tmp__WWZC=TRUE__;
  } else {
    __tmp__WWZC=FALSE__;
  };
  if (__tmp__WWZC) {
    __tmp__GXZC=TRUE__;
  } else {
    result__OQBD=read_symbol__5OEB((&__string_17));
    if (result__OQBD) {
      last_string__V1G=(&__string_17);
      result__LWZC=TRUE__;
    };
    __tmp__GXZC=result__OQBD;
  };
  if ((! __tmp__GXZC)) {
    if (read_symbol__5OEB((&__string_18))) {
      last_string__V1G=(&__string_18);
      result__LWZC=TRUE__;
    };
  };
  return(result__LWZC);
}

static void* get__XYVD(void *lt__ZYVD)
// ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
{
  void *result__1YVD;
  __INTEGER idx__2YVD,__tmp__FF5Q,typ_id__MMWD,new_capacity__YJ3D;
  __INTEGER __tmp__2K3D,__tmp__4JHF,Self__3ABG;
  __ITM_TYPE_MULTI *result__GMWD;
  __POINTER ptr__HMWD;
  __UINTEGER_32 sz__JMWD,a__IK0Q,new_size__GK0Q,t__MK0Q,a__OK0Q;
  void **__tmp__325Q,**__tmp__1K3D,**new__LJHF;
  __FAST_ARRAYoITM_TYPE_MULTIo *Self__WJ3D;
  __BOOLEAN __tmp__GK3D;
  result__1YVD=NULL;
  idx__2YVD= 0;
  __tmp__FF5Q=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__CZVD)->parent_arrayed_collection__BZVD.upper__LZVD;
  __tmp__325Q=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__CZVD)->parent_arrayed_collection__BZVD.storage__UI3D;
  while (((idx__2YVD <= __tmp__FF5Q) && ((void *)((__ITM_TYPE_MULTI *)((void **)__tmp__325Q)[idx__2YVD])->list_type__VZVD != (void *)lt__ZYVD))) {
    idx__2YVD=(__INTEGER)(idx__2YVD +  1);
  };
  if ((idx__2YVD <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__CZVD)->parent_arrayed_collection__BZVD.upper__LZVD)) {
    result__1YVD=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__CZVD)->parent_arrayed_collection__BZVD.storage__UI3D)[idx__2YVD];
  } else {
    result__GMWD=NULL;
    ptr__HMWD=((__POINTER )(NULL));
    typ_id__MMWD= 0;
    sz__JMWD=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
    if ((sz__JMWD ==  0)) {
      result__GMWD=ITM_TYPE_MULTI__;
    } else {
      typ_id__MMWD=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__JMWD);
      if ((typ_id__MMWD == (__INTEGER)(-  1))) {
        a__IK0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__GK0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__JMWD + a__IK0Q) & (__UINTEGER_32)(~ a__IK0Q));
        ptr__HMWD=micro_alloc__table__lab__BOI(new_size__GK0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GK0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__GK0Q);
      } else {
        t__MK0Q=((__UINTEGER_32 )typ_id__MMWD);
        a__OK0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__HMWD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__JMWD + a__OK0Q) & (__UINTEGER_32)(~ a__OK0Q)),((__POINTER )(&(table_type[(t__MK0Q)]))),(__UINTEGER_32)(t__MK0Q |  1));
      };
      result__GMWD=((__ITM_TYPE_MULTI *)ptr__HMWD);
      *(result__GMWD) = *(ITM_TYPE_MULTI__);
    };
    ((__ITM_TYPE_MULTI *)result__GMWD)->list_type__VZVD=lt__ZYVD;
    result__1YVD=result__GMWD;
    Self__WJ3D=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__CZVD);
    new_capacity__YJ3D= 0;
    if (((__INTEGER)(Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD +  1) <= (__INTEGER)(Self__WJ3D->parent_arrayed_collection__BZVD.capacity__JI3D -  1))) {
      Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD=(__INTEGER)(Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD +  1);
      __tmp__GK3D=TRUE__;
    } else {
      __tmp__GK3D=FALSE__;
    };
    if ((! __tmp__GK3D)) {
      if ((Self__WJ3D->parent_arrayed_collection__BZVD.capacity__JI3D ==  0)) {
        Self__WJ3D->parent_arrayed_collection__BZVD.storage__UI3D=create__K2UE( 2);
        Self__WJ3D->parent_arrayed_collection__BZVD.capacity__JI3D= 2;
        Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD= 0;
      } else {
        new_capacity__YJ3D=(__INTEGER)(Self__WJ3D->parent_arrayed_collection__BZVD.capacity__JI3D <<  1);
        __tmp__1K3D=Self__WJ3D->parent_arrayed_collection__BZVD.storage__UI3D;
        __tmp__2K3D=Self__WJ3D->parent_arrayed_collection__BZVD.capacity__JI3D;
        new__LJHF=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__1K3D)),((__UINTEGER_32 )(__INTEGER)(__tmp__2K3D * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__YJ3D * ((__INTEGER )(sizeof(void *)))))));
        __tmp__4JHF=(__INTEGER)(new_capacity__YJ3D -  1);
        Self__3ABG=__tmp__2K3D;
        while ((Self__3ABG <= __tmp__4JHF)) {
          new__LJHF[Self__3ABG]=NULL;
          Self__3ABG=(__INTEGER)(Self__3ABG +  1);
        };
        Self__WJ3D->parent_arrayed_collection__BZVD.storage__UI3D=new__LJHF;
        Self__WJ3D->parent_arrayed_collection__BZVD.capacity__JI3D=new_capacity__YJ3D;
        Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD=(__INTEGER)(Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD +  1);
      };
    };
    ((void **)Self__WJ3D->parent_arrayed_collection__BZVD.storage__UI3D)[Self__WJ3D->parent_arrayed_collection__BZVD.upper__LZVD]=result__GMWD;
  };
  return(result__1YVD);
}

static void* read_type__YKLC(__PARSER *Self__ZKLC,__BOOLEAN is_local__0KLC)
// ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
{
  void *style__2KLC;
  __POSITION pos__M10P;
  style__2KLC=NULL;
  if ((read_word__NWH((&__string_13)) || read_word__NWH((&__string_14)))) {
    style__2KLC=last_string__V1G;
    if ((is_local__0KLC && ((void *)last_string__V1G == (void *)(&__string_13)))) {
      pos__M10P=current_position__EJG();
      put_error__text__0AH( 0,(&__string_450));
      put_position__ECH(pos__M10P);
      send_error__2FH();
    };
  };
  return(read_prototype__X5JC(Self__ZKLC,style__2KLC));
}

static void set_type__GC2D(__ITM_SLOT *Self__HC2D,void *t__IC2D)
// ({ITM_SLOT},{NULLxITM_TYPE_SIMPLExITM_TYPE_STYLExITM_TYPE_GENERICxITM_TYPE_SELFxITM_TYPE_GENERIC_ELTxITM_TYPE_MULTI}) VoidNo recursive, No inlinable.
{
  void *tm__JC2D,*__tmp__SC2D;
  __SECTION_ *Self__TMIQ;
  __POSITION pos__RW2E;
  tm__JC2D=NULL;
  Self__TMIQ=((__SECTION_ *)Self__HC2D->id_section__EACC);
  if ((((void *)Self__TMIQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__TMIQ->name__1I0D == (void *)(&__string_24)))) {
    if (t__IC2D==NULL) {
      __tmp__SC2D=NULL;
    } else {
      switch (((struct ___OBJ *)t__IC2D)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__SC2D=((void *)t__IC2D);
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__SC2D=((void *)t__IC2D);
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__SC2D=((void *)t__IC2D);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__SC2D=((void *)t__IC2D);
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__SC2D=((void *)t__IC2D);
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__SC2D=NULL;
      } break;
      }
    };
    tm__JC2D=__tmp__SC2D;
    if (((((void *)__tmp__SC2D == (void *)NULL) || ((void *)__tmp__SC2D == (void *)ITM_TYPE_SELF__)) || ((void *)__tmp__SC2D == (void *)type_void__NHEC))) {
      pos__RW2E=Self__HC2D->parent_named__XIM.parent_itm_object__PD.position__BJM;
      put_error__text__0AH( 1,(&__string_451));
      put_position__ECH(pos__RW2E);
      send_error__2FH();
    };
  };
  Self__HC2D->type__PD2D=t__IC2D;
}

static void* read_contract__WEEC()
// () With resultNo recursive, No inlinable.
{
  void *e__0EEC;
  void *result__1EEC;
  __ITM_LIST *__tmp__JFEC;
  __POSITION p__5LHC,pos__V10P,pos__X10P;
  __ITM_LDOTS *result__0THC;
  __POINTER ptr__1THC;
  __INTEGER typ_id__AUHC;
  __UINTEGER_32 sz__3THC,a__ZK0Q,new_size__XK0Q,t__3K0Q,a__5K0Q;
  __BOOLEAN continue__ZEEC;
  void *lst__BFEC;
  continue__ZEEC=FALSE__;
  e__0EEC=NULL;
  result__1EEC=NULL;
  lst__BFEC=NULL;
  if (read_character__EQ3('[')) {
    __tmp__JFEC=create__JCFC(current_position__EJG());
    last_group__KFEC=__tmp__JFEC;
    result__1EEC=__tmp__JFEC;
    read_def_local__PCFC(PARSER__);
    lst__BFEC=new__KFFC();
    do {
      e__0EEC=read_expr__NTFC(PARSER__);
      if (((void *)e__0EEC == (void *)NULL)) {
        continue__ZEEC=read_word__NWH((&__string_11));
        if (continue__ZEEC) {
          p__5LHC=current_position__EJG();
          result__0THC=NULL;
          ptr__1THC=((__POINTER )(NULL));
          typ_id__AUHC= 0;
          sz__3THC=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
          if ((sz__3THC ==  0)) {
            result__0THC=ITM_LDOTS__;
          } else {
            typ_id__AUHC=-1;
            clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__3THC);
            if ((typ_id__AUHC == (__INTEGER)(-  1))) {
              a__ZK0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
              new_size__XK0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__3THC + a__ZK0Q) & (__UINTEGER_32)(~ a__ZK0Q));
              ptr__1THC=micro_alloc__table__lab__BOI(new_size__XK0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XK0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__XK0Q);
            } else {
              t__3K0Q=((__UINTEGER_32 )typ_id__AUHC);
              a__5K0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
              ptr__1THC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__3THC + a__5K0Q) & (__UINTEGER_32)(~ a__5K0Q)),((__POINTER )(&(table_type[(t__3K0Q)]))),(__UINTEGER_32)(t__3K0Q |  1));
            };
            result__0THC=((__ITM_LDOTS *)ptr__1THC);
            *(result__0THC) = *(ITM_LDOTS__);
          };
          ((__ITM_LDOTS *)result__0THC)->parent_itm_constant__5FEC.parent_itm_object__X1CC.position__BJM=p__5LHC;
          add_last__I4PC(lst__BFEC,result__0THC);
        };
      } else {
        add_last__I4PC(lst__BFEC,e__0EEC);
        if ((! read_character__EQ3(';'))) {
          pos__V10P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_320));
          put_position__ECH(pos__V10P);
          send_error__2FH();
        };
        continue__ZEEC=TRUE__;
      };
    } while (continue__ZEEC);
    if ((! read_character__EQ3(']'))) {
      pos__X10P=current_position__EJG();
      put_error__text__0AH( 2,(&__string_427));
      put_position__ECH(pos__X10P);
      send_error__2FH();
    };
    e__0EEC=create__type__1GFC(current_position__EJG(),type_void__NHEC);
    add_last__I4PC(lst__BFEC,e__0EEC);
    ((__ITM_LIST *)__tmp__JFEC)->code__G5OC=copy__CHFC(lst__BFEC);
  };
  return(result__1EEC);
}

static void* read_expr__NTFC(__PARSER *Self__OTFC)
// ({PARSER}) With resultRecursive, No inlinable.
{
  void *result__QTFC,*value__RTFC;
  void *name__CUFC;
  __POSITION p__OKGE,pos__D20P,pos__F20P,pos__H20P,__tmp__0YFC;
  __POSITION pos__K20P,__tmp__11FC,__tmp__F2FC,__tmp__O2FC,__tmp__A4FC;
  __POSITION v__UK5F,pos__B40P;
  __ITM_LIST_IDF *result__O0PE,*Self__AHGF;
  __POINTER ptr__P0PE,ptr__B1RD,ptr__2LKD;
  __INTEGER typ_id__U0PE,typ_id__G1RD,new_capacity__VE1D,__tmp__ZF1D;
  __INTEGER __tmp__HCHF,Self__A1AG,typ_id__BMKD;
  __UINTEGER_32 sz__R0PE,a__FL0Q,new_size__DL0Q,t__JL0Q,a__LL0Q;
  __UINTEGER_32 sz__D1RD,a__UL0Q,new_size__SL0Q,t__YL0Q,a__0L0Q;
  __UINTEGER_32 sz__4LKD,a__5L0Q,new_size__3L0Q,t__DM0Q,a__FM0Q;
  __ITM_WRITE_CODE *result__A1RD,*Self__LV2D;
  __ITM_BINARY *result__1LKD,*Self__XV0D;
  void *l_expr__STFC;
  void *l_oper__WTFC,*l_assignment__AUFC,*result__IKGE;
  void *l_posi__2TFC,*result__VYGD;
  __BOOLEAN is_not_op__3TFC,again__5TFC,__tmp__GZFC,__tmp__DF1D;
  __CHARACTER affect__4TFC;
  __FAST_ARRAYoExpanded_POSITIONo *Self__TE1D;
  __POSITION *__tmp__YF1D,*new__UBHF;
  result__QTFC=NULL;
  value__RTFC=NULL;
  l_expr__STFC=NULL;
  l_oper__WTFC=NULL;
  l_posi__2TFC=NULL;
  is_not_op__3TFC=FALSE__;
  affect__4TFC='\0';
  again__5TFC=FALSE__;
  l_assignment__AUFC=NULL;
  name__CUFC=NULL;
  old_position__TMFC=position__ZFD;
  old_pos_cur__VMFC=pos_cur__2FD;
  old_pos_line__XMFC=pos_line__3FD;
  old_pos_col__ZMFC=pos_col__4FD;
  if (read_character__EQ3('(')) {
    l_assignment__AUFC=new__B2GC();
    do {
      again__5TFC=FALSE__;
      if (read_identifier__OLEB()) {
        copy__BNK(string_tmp2__ADB,last_string__V1G);
        while (read_identifier__OLEB()) {
          append__MOK(string_tmp2__ADB,(&__string_92));
          append__MOK(string_tmp2__ADB,last_string__V1G);
        };
        name__CUFC=get__QEC(string_tmp2__ADB);
        add_last__4B1D(l_assignment__AUFC,name__CUFC);
        if (read_character__EQ3(',')) {
          again__5TFC=TRUE__;
        };
      };
    } while (again__5TFC);
    if ((((! (((__FAST_ARRAYoSTRING_CONSTANTo *)l_assignment__AUFC)->parent_arrayed_collection__VTFC.upper__RSSD <  0)) && read_character__EQ3(')')) && read_affect__IWZC())) {
      result__IKGE=create_with_capacity__4NOD((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)l_assignment__AUFC)->parent_arrayed_collection__VTFC.upper__RSSD +  1));
      copy__CR1D(result__IKGE,l_assignment__AUFC);
      free__XXZC(l_assignment__AUFC);
      l_assignment__AUFC=result__IKGE;
      p__OKGE=current_position__EJG();
      result__O0PE=NULL;
      ptr__P0PE=((__POINTER )(NULL));
      typ_id__U0PE= 0;
      sz__R0PE=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
      if ((sz__R0PE ==  0)) {
        result__O0PE=ITM_LIST_IDF__;
      } else {
        typ_id__U0PE=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__R0PE);
        if ((typ_id__U0PE == (__INTEGER)(-  1))) {
          a__FL0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__DL0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__R0PE + a__FL0Q) & (__UINTEGER_32)(~ a__FL0Q));
          ptr__P0PE=micro_alloc__table__lab__BOI(new_size__DL0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DL0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__DL0Q);
        } else {
          t__JL0Q=((__UINTEGER_32 )typ_id__U0PE);
          a__LL0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__P0PE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__R0PE + a__LL0Q) & (__UINTEGER_32)(~ a__LL0Q)),((__POINTER )(&(table_type[(t__JL0Q)]))),(__UINTEGER_32)(t__JL0Q |  1));
        };
        result__O0PE=((__ITM_LIST_IDF *)ptr__P0PE);
        *(result__O0PE) = *(ITM_LIST_IDF__);
      };
      Self__AHGF=((__ITM_LIST_IDF *)result__O0PE);
      Self__AHGF->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM=p__OKGE;
      Self__AHGF->list_name__DHGF=result__IKGE;
      result__QTFC=result__O0PE;
      affect__4TFC=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1G)->storage__C5K)[ 0];
      value__RTFC=read_expr__NTFC(Self__OTFC);
      if (((void *)value__RTFC == (void *)NULL)) {
        pos__D20P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_319));
        put_position__ECH(pos__D20P);
        send_error__2FH();
      };
      if ((affect__4TFC == ':')) {
        result__QTFC=create__assign__with__AMQD(result__O0PE->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM,result__O0PE,value__RTFC);
      };
      if ((affect__4TFC == '<')) {
        pos__F20P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_452));
        put_position__ECH(pos__F20P);
        send_error__2FH();
      };
      if ((affect__4TFC == '?')) {
        pos__H20P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_453));
        put_position__ECH(pos__H20P);
        send_error__2FH();
        switch (((struct ___OBJ *)result__QTFC)->__id) {
        case __ITM_LIST__: {
          __tmp__0YFC=((__ITM_LIST *)result__QTFC)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__0YFC=((__ITM_PROTOTYPE *)result__QTFC)->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__0YFC=((__ITM_LIST_IDF *)result__QTFC)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__0YFC=((__ITM_WRITE_VALUE *)result__QTFC)->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__0YFC=((__ITM_WRITE_CAST *)result__QTFC)->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ__: {
          __tmp__0YFC=((__ITM_READ *)result__QTFC)->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__0YFC=((__ITM_WRITE_CODE *)result__QTFC)->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__0YFC=((__ITM_READ_ARG2 *)result__QTFC)->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_BINARY__: {
          __tmp__0YFC=((__ITM_BINARY *)result__QTFC)->parent_itm_code__J5FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__0YFC=((__ITM_READ_ARG1 *)result__QTFC)->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_OLD__: {
          __tmp__0YFC=((__ITM_OLD *)result__QTFC)->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__0YFC=((__ITM_EXTERNAL_TYPE *)result__QTFC)->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_REAL__: {
          __tmp__0YFC=((__ITM_REAL *)result__QTFC)->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_NUMBER__: {
          __tmp__0YFC=((__ITM_NUMBER *)result__QTFC)->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__0YFC=((__ITM_CHARACTER *)result__QTFC)->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_STRING__: {
          __tmp__0YFC=((__ITM_STRING *)result__QTFC)->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__0YFC=((__ITM_EXTERNAL *)result__QTFC)->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__0YFC=((__ITM_READ_ARGS *)result__QTFC)->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        };
        result__QTFC=create__assign__with__SNQD(__tmp__0YFC,result__QTFC,value__RTFC);
      };
    } else {
      free__XXZC(l_assignment__AUFC);
    };
    __tmp__GZFC=TRUE__;
  } else {
    __tmp__GZFC=FALSE__;
  };
  if ((! __tmp__GZFC)) {
    if (read_identifier__OLEB()) {
      copy__BNK(string_tmp2__ADB,last_string__V1G);
      while (read_identifier__OLEB()) {
        append__MOK(string_tmp2__ADB,(&__string_92));
        append__MOK(string_tmp2__ADB,last_string__V1G);
      };
      name__CUFC=get__QEC(string_tmp2__ADB);
      if (read_affect__IWZC()) {
        result__QTFC=create__name__Q5JC(current_position__EJG(),name__CUFC);
        affect__4TFC=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1G)->storage__C5K)[ 0];
        value__RTFC=read_expr__NTFC(Self__OTFC);
        if (((void *)value__RTFC == (void *)NULL)) {
          pos__K20P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_319));
          put_position__ECH(pos__K20P);
          send_error__2FH();
        };
        if ((affect__4TFC == ':')) {
          switch (((struct ___OBJ *)result__QTFC)->__id) {
          case __ITM_LIST__: {
            __tmp__11FC=((__ITM_LIST *)result__QTFC)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_PROTOTYPE__: {
            __tmp__11FC=((__ITM_PROTOTYPE *)result__QTFC)->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_LIST_IDF__: {
            __tmp__11FC=((__ITM_LIST_IDF *)result__QTFC)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_VALUE__: {
            __tmp__11FC=((__ITM_WRITE_VALUE *)result__QTFC)->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_CAST__: {
            __tmp__11FC=((__ITM_WRITE_CAST *)result__QTFC)->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ__: {
            __tmp__11FC=((__ITM_READ *)result__QTFC)->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_CODE__: {
            __tmp__11FC=((__ITM_WRITE_CODE *)result__QTFC)->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARG2__: {
            __tmp__11FC=((__ITM_READ_ARG2 *)result__QTFC)->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_BINARY__: {
            __tmp__11FC=((__ITM_BINARY *)result__QTFC)->parent_itm_code__J5FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARG1__: {
            __tmp__11FC=((__ITM_READ_ARG1 *)result__QTFC)->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_OLD__: {
            __tmp__11FC=((__ITM_OLD *)result__QTFC)->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_EXTERNAL_TYPE__: {
            __tmp__11FC=((__ITM_EXTERNAL_TYPE *)result__QTFC)->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_REAL__: {
            __tmp__11FC=((__ITM_REAL *)result__QTFC)->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_NUMBER__: {
            __tmp__11FC=((__ITM_NUMBER *)result__QTFC)->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_CHARACTER__: {
            __tmp__11FC=((__ITM_CHARACTER *)result__QTFC)->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_STRING__: {
            __tmp__11FC=((__ITM_STRING *)result__QTFC)->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_EXTERNAL__: {
            __tmp__11FC=((__ITM_EXTERNAL *)result__QTFC)->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARGS__: {
            __tmp__11FC=((__ITM_READ_ARGS *)result__QTFC)->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          };
          result__QTFC=create__assign__with__AMQD(__tmp__11FC,result__QTFC,value__RTFC);
        };
        if ((affect__4TFC == '<')) {
          switch (((struct ___OBJ *)result__QTFC)->__id) {
          case __ITM_LIST__: {
            __tmp__F2FC=((__ITM_LIST *)result__QTFC)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_PROTOTYPE__: {
            __tmp__F2FC=((__ITM_PROTOTYPE *)result__QTFC)->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_LIST_IDF__: {
            __tmp__F2FC=((__ITM_LIST_IDF *)result__QTFC)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_VALUE__: {
            __tmp__F2FC=((__ITM_WRITE_VALUE *)result__QTFC)->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_CAST__: {
            __tmp__F2FC=((__ITM_WRITE_CAST *)result__QTFC)->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ__: {
            __tmp__F2FC=((__ITM_READ *)result__QTFC)->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_CODE__: {
            __tmp__F2FC=((__ITM_WRITE_CODE *)result__QTFC)->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARG2__: {
            __tmp__F2FC=((__ITM_READ_ARG2 *)result__QTFC)->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_BINARY__: {
            __tmp__F2FC=((__ITM_BINARY *)result__QTFC)->parent_itm_code__J5FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARG1__: {
            __tmp__F2FC=((__ITM_READ_ARG1 *)result__QTFC)->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_OLD__: {
            __tmp__F2FC=((__ITM_OLD *)result__QTFC)->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_EXTERNAL_TYPE__: {
            __tmp__F2FC=((__ITM_EXTERNAL_TYPE *)result__QTFC)->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_REAL__: {
            __tmp__F2FC=((__ITM_REAL *)result__QTFC)->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_NUMBER__: {
            __tmp__F2FC=((__ITM_NUMBER *)result__QTFC)->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_CHARACTER__: {
            __tmp__F2FC=((__ITM_CHARACTER *)result__QTFC)->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_STRING__: {
            __tmp__F2FC=((__ITM_STRING *)result__QTFC)->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_EXTERNAL__: {
            __tmp__F2FC=((__ITM_EXTERNAL *)result__QTFC)->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARGS__: {
            __tmp__F2FC=((__ITM_READ_ARGS *)result__QTFC)->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          };
          result__A1RD=NULL;
          ptr__B1RD=((__POINTER )(NULL));
          typ_id__G1RD= 0;
          sz__D1RD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
          if ((sz__D1RD ==  0)) {
            result__A1RD=ITM_WRITE_CODE__;
          } else {
            typ_id__G1RD=-1;
            clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__D1RD);
            if ((typ_id__G1RD == (__INTEGER)(-  1))) {
              a__UL0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
              new_size__SL0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__D1RD + a__UL0Q) & (__UINTEGER_32)(~ a__UL0Q));
              ptr__B1RD=micro_alloc__table__lab__BOI(new_size__SL0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SL0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SL0Q);
            } else {
              t__YL0Q=((__UINTEGER_32 )typ_id__G1RD);
              a__0L0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
              ptr__B1RD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__D1RD + a__0L0Q) & (__UINTEGER_32)(~ a__0L0Q)),((__POINTER )(&(table_type[(t__YL0Q)]))),(__UINTEGER_32)(t__YL0Q |  1));
            };
            result__A1RD=((__ITM_WRITE_CODE *)ptr__B1RD);
            *(result__A1RD) = *(ITM_WRITE_CODE__);
          };
          Self__LV2D=((__ITM_WRITE_CODE *)result__A1RD);
          Self__LV2D->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM=__tmp__F2FC;
          Self__LV2D->parent_itm_write__E2FC.assign__HV2D=result__QTFC;
          Self__LV2D->parent_itm_write__E2FC.value__IV2D=value__RTFC;
          result__QTFC=result__A1RD;
        };
        if ((affect__4TFC == '?')) {
          switch (((struct ___OBJ *)result__QTFC)->__id) {
          case __ITM_LIST__: {
            __tmp__O2FC=((__ITM_LIST *)result__QTFC)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_PROTOTYPE__: {
            __tmp__O2FC=((__ITM_PROTOTYPE *)result__QTFC)->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_LIST_IDF__: {
            __tmp__O2FC=((__ITM_LIST_IDF *)result__QTFC)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_VALUE__: {
            __tmp__O2FC=((__ITM_WRITE_VALUE *)result__QTFC)->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_CAST__: {
            __tmp__O2FC=((__ITM_WRITE_CAST *)result__QTFC)->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ__: {
            __tmp__O2FC=((__ITM_READ *)result__QTFC)->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_WRITE_CODE__: {
            __tmp__O2FC=((__ITM_WRITE_CODE *)result__QTFC)->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARG2__: {
            __tmp__O2FC=((__ITM_READ_ARG2 *)result__QTFC)->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_BINARY__: {
            __tmp__O2FC=((__ITM_BINARY *)result__QTFC)->parent_itm_code__J5FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARG1__: {
            __tmp__O2FC=((__ITM_READ_ARG1 *)result__QTFC)->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_OLD__: {
            __tmp__O2FC=((__ITM_OLD *)result__QTFC)->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_EXTERNAL_TYPE__: {
            __tmp__O2FC=((__ITM_EXTERNAL_TYPE *)result__QTFC)->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_REAL__: {
            __tmp__O2FC=((__ITM_REAL *)result__QTFC)->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_NUMBER__: {
            __tmp__O2FC=((__ITM_NUMBER *)result__QTFC)->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_CHARACTER__: {
            __tmp__O2FC=((__ITM_CHARACTER *)result__QTFC)->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_STRING__: {
            __tmp__O2FC=((__ITM_STRING *)result__QTFC)->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_EXTERNAL__: {
            __tmp__O2FC=((__ITM_EXTERNAL *)result__QTFC)->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          } break;
          case __ITM_READ_ARGS__: {
            __tmp__O2FC=((__ITM_READ_ARGS *)result__QTFC)->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          } break;
          };
          result__QTFC=create__assign__with__SNQD(__tmp__O2FC,result__QTFC,value__RTFC);
        };
      };
    };
  };
  if (((void *)result__QTFC == (void *)NULL)) {
    position__ZFD=old_position__TMFC;
    pos_cur__2FD=old_pos_cur__VMFC;
    pos_line__3FD=old_pos_line__XMFC;
    pos_col__4FD=old_pos_col__ZMFC;
    result__QTFC=read_expr_prefix__W4GC(Self__OTFC);
    if ((((void *)result__QTFC != (void *)NULL) && read_operator__2IHC())) {
      l_expr__STFC=new__KFFC();
      l_oper__WTFC=new__B2GC();
      l_posi__2TFC=new__1XZC();
      while ((! is_not_op__3TFC)) {
        add_last__I4PC(l_expr__STFC,result__QTFC);
        add_last__4B1D(l_oper__WTFC,operator_to_name__2YHC((&__string_84),last_string__V1G));
        __tmp__A4FC=current_position__EJG();
        Self__TE1D=((__FAST_ARRAYoExpanded_POSITIONo *)l_posi__2TFC);
        new_capacity__VE1D= 0;
        if (((__INTEGER)(Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D +  1) <= (__INTEGER)(Self__TE1D->parent_arrayed_collection__1TFC.capacity__BP0D -  1))) {
          Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D=(__INTEGER)(Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D +  1);
          __tmp__DF1D=TRUE__;
        } else {
          __tmp__DF1D=FALSE__;
        };
        if ((! __tmp__DF1D)) {
          if ((Self__TE1D->parent_arrayed_collection__1TFC.capacity__BP0D ==  0)) {
            Self__TE1D->parent_arrayed_collection__1TFC.storage__MA0D=create__WXSE( 2);
            Self__TE1D->parent_arrayed_collection__1TFC.capacity__BP0D= 2;
            Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D= 0;
          } else {
            new_capacity__VE1D=(__INTEGER)(Self__TE1D->parent_arrayed_collection__1TFC.capacity__BP0D <<  1);
            __tmp__YF1D=Self__TE1D->parent_arrayed_collection__1TFC.storage__MA0D;
            __tmp__ZF1D=Self__TE1D->parent_arrayed_collection__1TFC.capacity__BP0D;
            new__UBHF=((__POSITION *)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((__POSITION *)__tmp__YF1D)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZF1D * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VE1D * ((__INTEGER )(sizeof(void *)))))));
            __tmp__HCHF=(__INTEGER)(new_capacity__VE1D -  1);
            v__UK5F=((__POSITION ) 0);
            Self__A1AG=__tmp__ZF1D;
            while ((Self__A1AG <= __tmp__HCHF)) {
              new__UBHF[Self__A1AG]=v__UK5F;
              Self__A1AG=(__INTEGER)(Self__A1AG +  1);
            };
            Self__TE1D->parent_arrayed_collection__1TFC.storage__MA0D=new__UBHF;
            Self__TE1D->parent_arrayed_collection__1TFC.capacity__BP0D=new_capacity__VE1D;
            Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D=(__INTEGER)(Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D +  1);
          };
        };
        ((__POSITION *)Self__TE1D->parent_arrayed_collection__1TFC.storage__MA0D)[Self__TE1D->parent_arrayed_collection__1TFC.upper__VO0D]=__tmp__A4FC;
        result__QTFC=read_expr_prefix__W4GC(Self__OTFC);
        if (((void *)result__QTFC == (void *)NULL)) {
          pos__B40P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_319));
          put_position__ECH(pos__B40P);
          send_error__2FH();
        };
        is_not_op__3TFC=(! read_operator__2IHC());
      };
      add_last__I4PC(l_expr__STFC,result__QTFC);
      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__STFC)->parent_arrayed_collection__AFEC.upper__ZAPC +  1) ==  2)) {
        result__QTFC=create__name__args__BKLC(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)l_posi__2TFC)->parent_arrayed_collection__1TFC.storage__MA0D)[ 0],((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)l_oper__WTFC)->parent_arrayed_collection__VTFC.storage__FB0D)[ 0],((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__STFC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 0],((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__STFC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 1]);
        free__MQFC(l_expr__STFC);
        free__XXZC(l_oper__WTFC);
        free__XXGD(l_posi__2TFC);
      } else {
        l_expr__STFC=copy__CHFC(l_expr__STFC);
        l_oper__WTFC=alias__1XGD(l_oper__WTFC);
        result__VYGD=create_with_capacity__MLKD((__INTEGER)(((__FAST_ARRAYoExpanded_POSITIONo *)l_posi__2TFC)->parent_arrayed_collection__1TFC.upper__VO0D +  1));
        copy__0U0D(result__VYGD,l_posi__2TFC);
        free__XXGD(l_posi__2TFC);
        l_posi__2TFC=result__VYGD;
        result__1LKD=NULL;
        ptr__2LKD=((__POINTER )(NULL));
        typ_id__BMKD= 0;
        sz__4LKD=((__UINTEGER_32 )sizeof(__ITM_BINARY));
        if ((sz__4LKD ==  0)) {
          result__1LKD=ITM_BINARY__;
        } else {
          typ_id__BMKD=-1;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__4LKD);
          if ((typ_id__BMKD == (__INTEGER)(-  1))) {
            a__5L0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__3L0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__4LKD + a__5L0Q) & (__UINTEGER_32)(~ a__5L0Q));
            ptr__2LKD=micro_alloc__table__lab__BOI(new_size__3L0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3L0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3L0Q);
          } else {
            t__DM0Q=((__UINTEGER_32 )typ_id__BMKD);
            a__FM0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__2LKD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__4LKD + a__FM0Q) & (__UINTEGER_32)(~ a__FM0Q)),((__POINTER )(&(table_type[(t__DM0Q)]))),(__UINTEGER_32)(t__DM0Q |  1));
          };
          result__1LKD=((__ITM_BINARY *)ptr__2LKD);
          *(result__1LKD) = *(ITM_BINARY__);
        };
        Self__XV0D=((__ITM_BINARY *)result__1LKD);
        Self__XV0D->position_list__NW0D=result__VYGD;
        Self__XV0D->value_list__OW0D=l_expr__STFC;
        Self__XV0D->operator_list__PW0D=l_oper__WTFC;
        result__QTFC=result__1LKD;
      };
    };
  };
  return(result__QTFC);
}

static void* fast_reference_at__UEQD(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__VEQD,void *k__WEQD)
// ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__AFQD;
  void *node__5EQD;
  result__AFQD=NULL;
  node__5EQD=((void **)Self__VEQD->buckets__YYNB)[(__INTEGER)(hash_code__WPN(k__WEQD) % Self__VEQD->capacity__AVJB)];
  while ((! (((void *)node__5EQD == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__5EQD)->key__PFQD == (void *)k__WEQD)))) {
    node__5EQD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__5EQD)->next__0FQD;
  };
  if (((void *)node__5EQD != (void *)NULL)) {
    result__AFQD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__5EQD)->item__CGQD;
  };
  return(result__AFQD);
}

static void add_slot__3GQD(__PROTOTYPE *Self__4GQD,void *s__5GQD)
// ({PROTOTYPE},{NULLxITM_SLOT}) VoidNo recursive, No inlinable.
{
  void *__tmp__CHQD;
  __INTEGER h__4VRD,idx__5VRD,idx__R5UD,new_capacity__S5UD,i__T5UD;
  __INTEGER typ_id__ACVD;
  __POINTER ptr__1BVD;
  __UINTEGER_32 sz__3BVD,a__NM0Q,new_size__LM0Q,t__RM0Q,a__TM0Q;
  void *__tmp__AHQD;
  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__VVRD;
  void *node__AWRD,*node1__V5UD,*node2__W5UD,*__tmp__NXRD;
  void **old_buckets__U5UD;
  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__0BVD;
  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__ZB3D;
  __tmp__AHQD=Self__4GQD->slot_list__3IM;
  __tmp__CHQD=((__ITM_SLOT *)s__5GQD)->parent_named__XIM.name__1QB;
  Self__VVRD=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)__tmp__AHQD);
  h__4VRD=hash_code__WPN(__tmp__CHQD);
  idx__5VRD=(__INTEGER)(h__4VRD % Self__VVRD->capacity__AVJB);
  node__AWRD=((void **)Self__VVRD->buckets__YYNB)[idx__5VRD];
  while ((! (((void *)node__AWRD == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__AWRD)->key__PFQD == (void *)__tmp__CHQD)))) {
    node__AWRD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__AWRD)->next__0FQD;
  };
  if (((void *)node__AWRD == (void *)NULL)) {
    if ((Self__VVRD->capacity__AVJB == Self__VVRD->count__1YNB)) {
      idx__R5UD= 0;
      node1__V5UD=NULL;
      node2__W5UD=NULL;
      old_buckets__U5UD=Self__VVRD->buckets__YYNB;
      new_capacity__S5UD=prime_number_ceiling__A4Q((__INTEGER)(Self__VVRD->capacity__AVJB +  1));
      Self__VVRD->buckets__YYNB=create__3DTB(new_capacity__S5UD);
      i__T5UD=(__INTEGER)(Self__VVRD->capacity__AVJB -  1);
      Self__VVRD->capacity__AVJB=new_capacity__S5UD;
      while ((i__T5UD >=  0)) {
        node1__V5UD=((void **)old_buckets__U5UD)[i__T5UD];
        while (((void *)node1__V5UD != (void *)NULL)) {
          node2__W5UD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__V5UD)->next__0FQD;
          idx__R5UD=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__V5UD)->key__PFQD) % Self__VVRD->capacity__AVJB);
          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__V5UD)->next__0FQD=((void **)Self__VVRD->buckets__YYNB)[idx__R5UD];
          ((void **)Self__VVRD->buckets__YYNB)[idx__R5UD]=node1__V5UD;
          node1__V5UD=node2__W5UD;
        };
        i__T5UD=(__INTEGER)(i__T5UD -  1);
      };
      idx__5VRD=(__INTEGER)(h__4VRD % Self__VVRD->capacity__AVJB);
    };
    __tmp__NXRD=((void **)Self__VVRD->buckets__YYNB)[idx__5VRD];
    result__0BVD=NULL;
    ptr__1BVD=((__POINTER )(NULL));
    typ_id__ACVD= 0;
    sz__3BVD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
    if ((sz__3BVD ==  0)) {
      result__0BVD=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
    } else {
      typ_id__ACVD=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__3BVD);
      if ((typ_id__ACVD == (__INTEGER)(-  1))) {
        a__NM0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__LM0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__3BVD + a__NM0Q) & (__UINTEGER_32)(~ a__NM0Q));
        ptr__1BVD=micro_alloc__table__lab__BOI(new_size__LM0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LM0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LM0Q);
      } else {
        t__RM0Q=((__UINTEGER_32 )typ_id__ACVD);
        a__TM0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__1BVD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__3BVD + a__TM0Q) & (__UINTEGER_32)(~ a__TM0Q)),((__POINTER )(&(table_type[(t__RM0Q)]))),(__UINTEGER_32)(t__RM0Q |  1));
      };
      result__0BVD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__1BVD);
      *(result__0BVD) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
    };
    Self__ZB3D=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__0BVD);
    Self__ZB3D->item__CGQD=s__5GQD;
    Self__ZB3D->key__PFQD=__tmp__CHQD;
    Self__ZB3D->next__0FQD=__tmp__NXRD;
    node__AWRD=result__0BVD;
    ((void **)Self__VVRD->buckets__YYNB)[idx__5VRD]=result__0BVD;
    Self__VVRD->count__1YNB=(__INTEGER)(Self__VVRD->count__1YNB +  1);
  } else {
    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__AWRD)->item__CGQD=s__5GQD;
  };
  if (((void *)Self__4GQD->first_slot__5QMC == (void *)NULL)) {
    Self__4GQD->first_slot__5QMC=s__5GQD;
  } else {
    ((__ITM_SLOT *)Self__4GQD->last_slot__05BC)->next__YRMC=s__5GQD;
  };
  Self__4GQD->last_slot__05BC=s__5GQD;
}

static void* create__type__ZU2F(void *s__1U2F,void *t__2U2F)
// ({NULLxITM_SLOT},{TYPExTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERIC}) With resultNo recursive, No inlinable.
{
  __SLOT *result__B12F,*Self__K22F;
  __POINTER ptr__C12F;
  __INTEGER typ_id__H12F,__tmp__TK3F,Self__XW3F;
  __UINTEGER_32 sz__E12F,a__1M0Q,new_size__ZM0Q,t__5M0Q,a__BN0Q;
  void *styl__O22F;
  void *__tmp__222F;
  void *__tmp__2L3F;
  void *type_mono__EK3F,*__tmp__DL3F,*__tmp__KL3F,*__tmp__WL3F;
  void *type_self__CK3F,*__tmp__EL3F,*__tmp__JB1P,*__tmp__LL3F;
  void *__tmp__QB1P,*__tmp__XL3F,*__tmp__UB1P;
  void *__tmp__KK3F,*__tmp__VL3F;
  void *__tmp__LK3F,*type_multiple__DK3F;
  __ITM_TYPE_STYLE *Self__IB1P,*Self__PB1P,*Self__TB1P;
  __POSITION __tmp__UMIQ,__tmp__0MIQ,__tmp__SX3F;
  void *__tmp__WMIQ,*__tmp__2MIQ,*__tmp__UX3F;
  __SLOT_DATA *result__YMIQ,*result__4MIQ,*result__I43F;
  __CHARACTER __tmp__XMIQ,__tmp__3MIQ,__tmp__WX3F;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__RL1;
  result__B12F=NULL;
  ptr__C12F=((__POINTER )(NULL));
  typ_id__H12F= 0;
  sz__E12F=((__UINTEGER_32 )sizeof(__SLOT));
  if ((sz__E12F ==  0)) {
    result__B12F=SLOT__;
  } else {
    typ_id__H12F=__SLOT__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__E12F);
    if ((typ_id__H12F == (__INTEGER)(-  1))) {
      a__1M0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__ZM0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__E12F + a__1M0Q) & (__UINTEGER_32)(~ a__1M0Q));
      ptr__C12F=micro_alloc__table__lab__BOI(new_size__ZM0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZM0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__ZM0Q);
    } else {
      t__5M0Q=((__UINTEGER_32 )typ_id__H12F);
      a__BN0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__C12F=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__E12F + a__BN0Q) & (__UINTEGER_32)(~ a__BN0Q)),((__POINTER )(&(table_type[(t__5M0Q)]))),(__UINTEGER_32)(t__5M0Q |  1));
    };
    result__B12F=((__SLOT *)ptr__C12F);
    *(result__B12F) = *(SLOT__);
  };
  Self__K22F=((__SLOT *)result__B12F);
  styl__O22F=NULL;
  Self__K22F->base_slot__P22F=s__1U2F;
  Self__K22F->receiver_type__Q22F=t__2U2F;
  ITM_OBJECT__->position__BJM=((__ITM_SLOT *)s__1U2F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
  if ((((__ITM_SLOT *)s__1U2F)->affect__TD2D == '<')) {
    __tmp__222F=create__with__YJ3F(Self__K22F,((__ITM_SLOT *)s__1U2F)->value__C42D);
    Self__K22F->slot_code_intern__322F=__tmp__222F;
    styl__O22F=__tmp__222F;
  } else {
    __tmp__2L3F=self_up__LKEF;
    type_mono__EK3F=NULL;
    type_self__CK3F=run_value__FMQC;
    self_up__LKEF=Self__K22F->receiver_type__Q22F;
    run_value__FMQC=NULL;
    last_position__GG1=ITM_OBJECT__->position__BJM;
    __tmp__KK3F=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->type__PD2D;
    if (__tmp__KK3F==NULL) {
      __tmp__LK3F=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__KK3F)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__LK3F=NULL;
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__LK3F=NULL;
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__LK3F=NULL;
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__LK3F=NULL;
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__LK3F=NULL;
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__LK3F=((void *)__tmp__KK3F);
      } break;
      }
    };
    type_multiple__DK3F=__tmp__LK3F;
    if (((void *)__tmp__LK3F != (void *)NULL)) {
      __tmp__TK3F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__LK3F)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK -  1);
      Self__XW3F= 0;
      while ((Self__XW3F <= __tmp__TK3F)) {
        Self__K22F->slot_data_list__CL3F=create_with_capacity__TB4F((__INTEGER)((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__DK3F)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1) -  1));
        __tmp__DL3F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__DK3F)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__XW3F];
        switch (((struct ___OBJ *)__tmp__DL3F)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          if (((__ITM_TYPE_SIMPLE *)__tmp__DL3F)->to_run__2VK==0) {
            __tmp__EL3F=((__ITM_TYPE_SIMPLE *)__tmp__DL3F)->to_run__1VK;
          } else {
            __tmp__EL3F=to_run__XVK(__tmp__DL3F);
          };
        } break;
        case __ITM_TYPE_STYLE__: {
          if (((__ITM_TYPE_STYLE *)__tmp__DL3F)->to_run__V1IB==0) {
            __tmp__EL3F=((__ITM_TYPE_STYLE *)__tmp__DL3F)->to_run__U1IB;
          } else {
            Self__IB1P=((__ITM_TYPE_STYLE *)__tmp__DL3F);
            __tmp__JB1P=get__XUN(Self__IB1P);
            Self__IB1P->to_run__U1IB=__tmp__JB1P;
            Self__IB1P->to_run__V1IB=0;
            __tmp__EL3F=__tmp__JB1P;
          };
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__EL3F=to_run__W1IB(__tmp__DL3F);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__EL3F=to_run__MPXD();
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__EL3F=to_run__DKEF(__tmp__DL3F);
        } break;
        };
        __tmp__UMIQ=ITM_OBJECT__->position__BJM;
        __tmp__WMIQ=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->parent_named__XIM.name__1QB;
        __tmp__XMIQ=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->parent_named__XIM.style__LDGC;
        result__YMIQ=clone__K53F();
        make__name__style__base__type__P25F(result__YMIQ,__tmp__UMIQ,__tmp__WMIQ,__tmp__XMIQ,Self__K22F,__tmp__EL3F);
        add_last__W35F(Self__K22F->slot_data_list__CL3F,result__YMIQ);
        Self__XW3F=(__INTEGER)(Self__XW3F +  1);
      };
      Self__RL1=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__LK3F)->list_type__VZVD);
      __tmp__KL3F=((void **)Self__RL1->parent_arrayed_collection__PIB.storage__5WK)[Self__RL1->parent_arrayed_collection__PIB.upper__BWK];
      switch (((struct ___OBJ *)__tmp__KL3F)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__KL3F)->to_run__2VK==0) {
          __tmp__LL3F=((__ITM_TYPE_SIMPLE *)__tmp__KL3F)->to_run__1VK;
        } else {
          __tmp__LL3F=to_run__XVK(__tmp__KL3F);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__KL3F)->to_run__V1IB==0) {
          __tmp__LL3F=((__ITM_TYPE_STYLE *)__tmp__KL3F)->to_run__U1IB;
        } else {
          Self__PB1P=((__ITM_TYPE_STYLE *)__tmp__KL3F);
          __tmp__QB1P=get__XUN(Self__PB1P);
          Self__PB1P->to_run__U1IB=__tmp__QB1P;
          Self__PB1P->to_run__V1IB=0;
          __tmp__LL3F=__tmp__QB1P;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__LL3F=to_run__W1IB(__tmp__KL3F);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__LL3F=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__LL3F=to_run__DKEF(__tmp__KL3F);
      } break;
      };
      __tmp__0MIQ=ITM_OBJECT__->position__BJM;
      __tmp__2MIQ=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__3MIQ=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__4MIQ=clone__K53F();
      make__name__style__base__type__P25F(result__4MIQ,__tmp__0MIQ,__tmp__2MIQ,__tmp__3MIQ,Self__K22F,__tmp__LL3F);
      Self__K22F->slot_data_intern__1JZD=result__4MIQ;
    } else {
      __tmp__VL3F=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->type__PD2D;
      if (__tmp__VL3F==NULL) {
        __tmp__WL3F=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__VL3F)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__WL3F=((void *)__tmp__VL3F);
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__WL3F=((void *)__tmp__VL3F);
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__WL3F=((void *)__tmp__VL3F);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__WL3F=((void *)__tmp__VL3F);
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__WL3F=((void *)__tmp__VL3F);
        } break;
        case __ITM_TYPE_MULTI__: {
          __tmp__WL3F=NULL;
        } break;
        }
      };
      type_mono__EK3F=__tmp__WL3F;
      switch (((struct ___OBJ *)__tmp__WL3F)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__WL3F)->to_run__2VK==0) {
          __tmp__XL3F=((__ITM_TYPE_SIMPLE *)__tmp__WL3F)->to_run__1VK;
        } else {
          __tmp__XL3F=to_run__XVK(__tmp__WL3F);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__WL3F)->to_run__V1IB==0) {
          __tmp__XL3F=((__ITM_TYPE_STYLE *)__tmp__WL3F)->to_run__U1IB;
        } else {
          Self__TB1P=((__ITM_TYPE_STYLE *)__tmp__WL3F);
          __tmp__UB1P=get__XUN(Self__TB1P);
          Self__TB1P->to_run__U1IB=__tmp__UB1P;
          Self__TB1P->to_run__V1IB=0;
          __tmp__XL3F=__tmp__UB1P;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__XL3F=to_run__W1IB(__tmp__WL3F);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__XL3F=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__XL3F=to_run__DKEF(__tmp__WL3F);
      } break;
      };
      __tmp__SX3F=ITM_OBJECT__->position__BJM;
      __tmp__UX3F=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->parent_named__XIM.name__1QB;
      __tmp__WX3F=((__ITM_SLOT *)Self__K22F->base_slot__P22F)->parent_named__XIM.style__LDGC;
      result__I43F=clone__K53F();
      make__name__style__base__type__P25F(result__I43F,__tmp__SX3F,__tmp__UX3F,__tmp__WX3F,Self__K22F,__tmp__XL3F);
      Self__K22F->slot_data_intern__1JZD=result__I43F;
    };
    run_value__FMQC=type_self__CK3F;
    self_up__LKEF=__tmp__2L3F;
    styl__O22F=Self__K22F->slot_data_intern__1JZD;
  };
  return(styl__O22F);
}

static void add_last__BV2F(__FAST_ARRAYoSLOTo *Self__CV2F,void *element__DV2F)
// ({FAST_ARRAYoSLOTo},{NULLxSLOT_DATAxSLOT_CODE}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__EV2F,old_nb_elts__5O3F;
  __BOOLEAN __tmp__SV2F;
  void **Self__4O3F,**new__WP3F;
  new_capacity__EV2F= 0;
  if (((__INTEGER)(Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL +  1) <= (__INTEGER)(Self__CV2F->parent_arrayed_collection__ZJC.capacity__HSL -  1))) {
    Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL=(__INTEGER)(Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL +  1);
    __tmp__SV2F=TRUE__;
  } else {
    __tmp__SV2F=FALSE__;
  };
  if ((! __tmp__SV2F)) {
    if ((Self__CV2F->parent_arrayed_collection__ZJC.capacity__HSL ==  0)) {
      Self__CV2F->parent_arrayed_collection__ZJC.storage__SSL=create__IRSB( 2);
      Self__CV2F->parent_arrayed_collection__ZJC.capacity__HSL= 2;
      Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL= 0;
    } else {
      new_capacity__EV2F=(__INTEGER)(Self__CV2F->parent_arrayed_collection__ZJC.capacity__HSL <<  1);
      Self__4O3F=((void **)Self__CV2F->parent_arrayed_collection__ZJC.storage__SSL);
      old_nb_elts__5O3F=Self__CV2F->parent_arrayed_collection__ZJC.capacity__HSL;
      new__WP3F=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__4O3F),((__UINTEGER_32 )(__INTEGER)(old_nb_elts__5O3F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EV2F * ((__INTEGER )(sizeof(void *)))))));
      clear__to__K15F(new__WP3F,old_nb_elts__5O3F,(__INTEGER)(new_capacity__EV2F -  1));
      Self__CV2F->parent_arrayed_collection__ZJC.storage__SSL=new__WP3F;
      Self__CV2F->parent_arrayed_collection__ZJC.capacity__HSL=new_capacity__EV2F;
      Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL=(__INTEGER)(Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL +  1);
    };
  };
  ((void **)Self__CV2F->parent_arrayed_collection__ZJC.storage__SSL)[Self__CV2F->parent_arrayed_collection__ZJC.upper__WSL]=element__DV2F;
}

static void** create__4NVB(__INTEGER nb_elements__AOVB)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__SASC;
  void **Result__LT0B;
  Result__LT0B=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__AOVB * ((__INTEGER )(sizeof(void *)))))));
  Self__SASC=(__INTEGER)(nb_elements__AOVB -  1);
  while ((Self__SASC >=  0)) {
    Result__LT0B[Self__SASC]=NULL;
    Self__SASC=(__INTEGER)(Self__SASC -  1);
  };
  return(Result__LT0B);
}

static __BOOLEAN fast_has__DCLB(__HASHED_SEToTYPEo *Self__ECLB,void *e__FCLB)
// ({HASHED_SEToTYPEo},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__PCLB;
  void *node__OCLB;
  switch (((struct ___OBJ *)e__FCLB)->__id) {
  case __TYPE__: {
    __tmp__PCLB=hash_code__WPN(((__PROTOTYPE *)((__TYPE *)e__FCLB)->prototype__RD)->parent_named__QD.name__1QB);
  } break;
  case __TYPE_NULL__: {
    __tmp__PCLB=hash_code__WPN((&__string_59));
  } break;
  case __TYPE_VOID__: {
    __tmp__PCLB=hash_code__WPN((&__string_2));
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__PCLB=hash_code__WPN((&__string_44));
  } break;
  case __TYPE_GENERIC__: {
    __tmp__PCLB=hash_code__WPN(((__TYPE_GENERIC *)e__FCLB)->intern_name__FS2B);
  } break;
  };
  node__OCLB=((void **)Self__ECLB->buckets__DRKB)[(__INTEGER)(__tmp__PCLB % Self__ECLB->capacity__4QKB)];
  while ((! (((void *)node__OCLB == (void *)NULL) || ((void *)((__HASHED_SET_NODEoTYPEo *)node__OCLB)->item__PRKB == (void *)e__FCLB)))) {
    node__OCLB=((__HASHED_SET_NODEoTYPEo *)node__OCLB)->next__0RKB;
  };
  return(((void *)node__OCLB != (void *)NULL));
}

static void add_subtype__WT3D(__TYPE_NULL *Self__XT3D,void *t__YT3D)
// ({TYPE_NULL},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  __INTEGER j__ZT3D;
  void *__tmp__SU3D,*__tmp__5U3D,*__tmp__IV3D;
  void *__tmp__TU3D,*__tmp__AV3D;
  __SECTION_ *Self__ANIQ;
  void *__tmp__JV3D;
  void *__tmp__KV3D;
  __BOOLEAN __tmp__XU3D;
  j__ZT3D= 0;
  if ((! fast_has__DCLB(Self__XT3D->parent_type__TIB.subtype_list__APY,t__YT3D))) {
    fast_add__OQKB(Self__XT3D->parent_type__TIB.subtype_list__APY,t__YT3D);
    j__ZT3D= 0;
    while_do__BFVE:
    {
      if ((j__ZT3D <= ((__FAST_ARRAYoSLOTo *)Self__XT3D->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__SU3D=((void **)((__FAST_ARRAYoSLOTo *)Self__XT3D->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ZT3D];
        if (((struct ___OBJ *)__tmp__SU3D)->__id==__SLOT_DATA__) {
          __tmp__TU3D=id_section__UG4F(__tmp__SU3D);
        } else {
          __tmp__TU3D=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__SU3D)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__ANIQ=((__SECTION_ *)__tmp__TU3D);
        __tmp__XU3D=(((void *)Self__ANIQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__ANIQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__XU3D=FALSE__;
      };
      if (__tmp__XU3D) {
        __tmp__5U3D=((void **)((__FAST_ARRAYoSLOTo *)Self__XT3D->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ZT3D];
        if (((struct ___OBJ *)__tmp__5U3D)->__id==__SLOT_DATA__) {
          __tmp__AV3D=id_section__UG4F(__tmp__5U3D);
        } else {
          __tmp__AV3D=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__5U3D)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__AV3D)->name__1I0D == (void *)(&__string_23))) {
          __tmp__IV3D=((void **)((__FAST_ARRAYoSLOTo *)Self__XT3D->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ZT3D];
          if (((struct ___OBJ *)__tmp__IV3D)->__id==__SLOT_DATA__) {
            __tmp__JV3D=get_type_result__PG2G(__tmp__IV3D);
          } else {
            __tmp__JV3D=get_type_result__ZH2G(__tmp__IV3D);
          };
          __tmp__KV3D=((__TYPE_FULL *)__tmp__JV3D)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__KV3D)->__id) {
          case __TYPE__: {
            add_subtype__BI1(__tmp__KV3D,t__YT3D);
          } break;
          case __TYPE_NULL__: {
            add_subtype__WT3D(__tmp__KV3D,t__YT3D);
          } break;
          case __TYPE_VOID__: {
            add_subtype__S43D(__tmp__KV3D,t__YT3D);
          } break;
          case __TYPE_CONTEXT__: {
            add_subtype__OJ4D(__tmp__KV3D,t__YT3D);
          } break;
          case __TYPE_ID__: {
            add_subtype__XIHH(__tmp__KV3D,t__YT3D);
          } break;
          case __TYPE_GENERIC__: {
            add_subtype__O05B(__tmp__KV3D,t__YT3D);
          } break;
          case __PROFIL_BLOCK__: {
            add_subtype__WNFJ(t__YT3D);
          } break;
          };
        };
        j__ZT3D=(__INTEGER)(j__ZT3D +  1);
        goto while_do__BFVE;
      };
    };
  };
}

static void add_subtype__S43D(__TYPE_VOID *Self__T43D,void *t__U43D)
// ({TYPE_VOID},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  __INTEGER j__V43D;
  void *__tmp__O53D,*__tmp__153D,*__tmp__EA4D;
  void *__tmp__P53D,*__tmp__253D;
  __SECTION_ *Self__BNIQ;
  void *__tmp__FA4D;
  void *__tmp__GA4D;
  __BOOLEAN __tmp__T53D;
  j__V43D= 0;
  if ((! fast_has__DCLB(Self__T43D->parent_type__UIB.subtype_list__APY,t__U43D))) {
    fast_add__OQKB(Self__T43D->parent_type__UIB.subtype_list__APY,t__U43D);
    j__V43D= 0;
    while_do__UGVE:
    {
      if ((j__V43D <= ((__FAST_ARRAYoSLOTo *)Self__T43D->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__O53D=((void **)((__FAST_ARRAYoSLOTo *)Self__T43D->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__V43D];
        if (((struct ___OBJ *)__tmp__O53D)->__id==__SLOT_DATA__) {
          __tmp__P53D=id_section__UG4F(__tmp__O53D);
        } else {
          __tmp__P53D=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__O53D)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__BNIQ=((__SECTION_ *)__tmp__P53D);
        __tmp__T53D=(((void *)Self__BNIQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__BNIQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__T53D=FALSE__;
      };
      if (__tmp__T53D) {
        __tmp__153D=((void **)((__FAST_ARRAYoSLOTo *)Self__T43D->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__V43D];
        if (((struct ___OBJ *)__tmp__153D)->__id==__SLOT_DATA__) {
          __tmp__253D=id_section__UG4F(__tmp__153D);
        } else {
          __tmp__253D=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__153D)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__253D)->name__1I0D == (void *)(&__string_23))) {
          __tmp__EA4D=((void **)((__FAST_ARRAYoSLOTo *)Self__T43D->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__V43D];
          if (((struct ___OBJ *)__tmp__EA4D)->__id==__SLOT_DATA__) {
            __tmp__FA4D=get_type_result__PG2G(__tmp__EA4D);
          } else {
            __tmp__FA4D=get_type_result__ZH2G(__tmp__EA4D);
          };
          __tmp__GA4D=((__TYPE_FULL *)__tmp__FA4D)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__GA4D)->__id) {
          case __TYPE__: {
            add_subtype__BI1(__tmp__GA4D,t__U43D);
          } break;
          case __TYPE_NULL__: {
            add_subtype__WT3D(__tmp__GA4D,t__U43D);
          } break;
          case __TYPE_VOID__: {
            add_subtype__S43D(__tmp__GA4D,t__U43D);
          } break;
          case __TYPE_CONTEXT__: {
            add_subtype__OJ4D(__tmp__GA4D,t__U43D);
          } break;
          case __TYPE_ID__: {
            add_subtype__XIHH(__tmp__GA4D,t__U43D);
          } break;
          case __TYPE_GENERIC__: {
            add_subtype__O05B(__tmp__GA4D,t__U43D);
          } break;
          case __PROFIL_BLOCK__: {
            add_subtype__WNFJ(t__U43D);
          } break;
          };
        };
        j__V43D=(__INTEGER)(j__V43D +  1);
        goto while_do__UGVE;
      };
    };
  };
}

static void add_subtype__OJ4D(__TYPE_CONTEXT *Self__PJ4D,void *t__QJ4D)
// ({TYPE_CONTEXT},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  __INTEGER j__RJ4D;
  void *__tmp__KK4D,*__tmp__XK4D,*__tmp__AL4D;
  void *__tmp__LK4D,*__tmp__YK4D;
  __SECTION_ *Self__CNIQ;
  void *__tmp__BL4D;
  void *__tmp__CL4D;
  __BOOLEAN __tmp__PK4D;
  j__RJ4D= 0;
  if ((! fast_has__DCLB(Self__PJ4D->parent_type__VIB.subtype_list__APY,t__QJ4D))) {
    fast_add__OQKB(Self__PJ4D->parent_type__VIB.subtype_list__APY,t__QJ4D);
    j__RJ4D= 0;
    while_do__HIVE:
    {
      if ((j__RJ4D <= ((__FAST_ARRAYoSLOTo *)Self__PJ4D->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__KK4D=((void **)((__FAST_ARRAYoSLOTo *)Self__PJ4D->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__RJ4D];
        if (((struct ___OBJ *)__tmp__KK4D)->__id==__SLOT_DATA__) {
          __tmp__LK4D=id_section__UG4F(__tmp__KK4D);
        } else {
          __tmp__LK4D=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__KK4D)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__CNIQ=((__SECTION_ *)__tmp__LK4D);
        __tmp__PK4D=(((void *)Self__CNIQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__CNIQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__PK4D=FALSE__;
      };
      if (__tmp__PK4D) {
        __tmp__XK4D=((void **)((__FAST_ARRAYoSLOTo *)Self__PJ4D->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__RJ4D];
        if (((struct ___OBJ *)__tmp__XK4D)->__id==__SLOT_DATA__) {
          __tmp__YK4D=id_section__UG4F(__tmp__XK4D);
        } else {
          __tmp__YK4D=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__XK4D)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__YK4D)->name__1I0D == (void *)(&__string_23))) {
          __tmp__AL4D=((void **)((__FAST_ARRAYoSLOTo *)Self__PJ4D->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__RJ4D];
          if (((struct ___OBJ *)__tmp__AL4D)->__id==__SLOT_DATA__) {
            __tmp__BL4D=get_type_result__PG2G(__tmp__AL4D);
          } else {
            __tmp__BL4D=get_type_result__ZH2G(__tmp__AL4D);
          };
          __tmp__CL4D=((__TYPE_FULL *)__tmp__BL4D)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__CL4D)->__id) {
          case __TYPE__: {
            add_subtype__BI1(__tmp__CL4D,t__QJ4D);
          } break;
          case __TYPE_NULL__: {
            add_subtype__WT3D(__tmp__CL4D,t__QJ4D);
          } break;
          case __TYPE_VOID__: {
            add_subtype__S43D(__tmp__CL4D,t__QJ4D);
          } break;
          case __TYPE_CONTEXT__: {
            add_subtype__OJ4D(__tmp__CL4D,t__QJ4D);
          } break;
          case __TYPE_ID__: {
            add_subtype__XIHH(__tmp__CL4D,t__QJ4D);
          } break;
          case __TYPE_GENERIC__: {
            add_subtype__O05B(__tmp__CL4D,t__QJ4D);
          } break;
          case __PROFIL_BLOCK__: {
            add_subtype__WNFJ(t__QJ4D);
          } break;
          };
        };
        j__RJ4D=(__INTEGER)(j__RJ4D +  1);
        goto while_do__HIVE;
      };
    };
  };
}

static void add_subtype__XIHH(__TYPE_ID *Self__YIHH,void *t__ZIHH)
// ({TYPE_ID},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  __INTEGER j__0IHH;
  void *__tmp__TJHH,*__tmp__AKHH,*__tmp__JKHH;
  void *__tmp__UJHH,*__tmp__BKHH;
  __SECTION_ *Self__DNIQ;
  void *__tmp__KKHH;
  void *__tmp__LKHH;
  __BOOLEAN __tmp__YJHH;
  j__0IHH= 0;
  if ((! fast_has__DCLB(Self__YIHH->parent_type__WIB.subtype_list__APY,t__ZIHH))) {
    fast_add__OQKB(Self__YIHH->parent_type__WIB.subtype_list__APY,t__ZIHH);
    j__0IHH= 0;
    while_do__R0NH:
    {
      if ((j__0IHH <= ((__FAST_ARRAYoSLOTo *)Self__YIHH->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__TJHH=((void **)((__FAST_ARRAYoSLOTo *)Self__YIHH->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__0IHH];
        if (((struct ___OBJ *)__tmp__TJHH)->__id==__SLOT_DATA__) {
          __tmp__UJHH=id_section__UG4F(__tmp__TJHH);
        } else {
          __tmp__UJHH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__TJHH)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__DNIQ=((__SECTION_ *)__tmp__UJHH);
        __tmp__YJHH=(((void *)Self__DNIQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__DNIQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__YJHH=FALSE__;
      };
      if (__tmp__YJHH) {
        __tmp__AKHH=((void **)((__FAST_ARRAYoSLOTo *)Self__YIHH->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__0IHH];
        if (((struct ___OBJ *)__tmp__AKHH)->__id==__SLOT_DATA__) {
          __tmp__BKHH=id_section__UG4F(__tmp__AKHH);
        } else {
          __tmp__BKHH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__AKHH)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__BKHH)->name__1I0D == (void *)(&__string_23))) {
          __tmp__JKHH=((void **)((__FAST_ARRAYoSLOTo *)Self__YIHH->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__0IHH];
          if (((struct ___OBJ *)__tmp__JKHH)->__id==__SLOT_DATA__) {
            __tmp__KKHH=get_type_result__PG2G(__tmp__JKHH);
          } else {
            __tmp__KKHH=get_type_result__ZH2G(__tmp__JKHH);
          };
          __tmp__LKHH=((__TYPE_FULL *)__tmp__KKHH)->parent_type__KTL;
          switch (((struct ___OBJ *)__tmp__LKHH)->__id) {
          case __TYPE__: {
            add_subtype__BI1(__tmp__LKHH,t__ZIHH);
          } break;
          case __TYPE_NULL__: {
            add_subtype__WT3D(__tmp__LKHH,t__ZIHH);
          } break;
          case __TYPE_VOID__: {
            add_subtype__S43D(__tmp__LKHH,t__ZIHH);
          } break;
          case __TYPE_CONTEXT__: {
            add_subtype__OJ4D(__tmp__LKHH,t__ZIHH);
          } break;
          case __TYPE_ID__: {
            add_subtype__XIHH(__tmp__LKHH,t__ZIHH);
          } break;
          case __TYPE_GENERIC__: {
            add_subtype__O05B(__tmp__LKHH,t__ZIHH);
          } break;
          case __PROFIL_BLOCK__: {
            add_subtype__WNFJ(t__ZIHH);
          } break;
          };
        };
        j__0IHH=(__INTEGER)(j__0IHH +  1);
        goto while_do__R0NH;
      };
    };
  };
}

static void add_subtype__WNFJ(void *t__YNFJ)
// ({TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERIC}) VoidRecursive, No inlinable.
{
  void *__tmp__ZNFJ;
  __tmp__ZNFJ=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__ZNFJ)->__id) {
  case __TYPE__: {
    add_subtype__BI1(__tmp__ZNFJ,t__YNFJ);
  } break;
  case __TYPE_NULL__: {
    add_subtype__WT3D(__tmp__ZNFJ,t__YNFJ);
  } break;
  case __TYPE_VOID__: {
    add_subtype__S43D(__tmp__ZNFJ,t__YNFJ);
  } break;
  case __TYPE_CONTEXT__: {
    add_subtype__OJ4D(__tmp__ZNFJ,t__YNFJ);
  } break;
  case __TYPE_ID__: {
    add_subtype__XIHH(__tmp__ZNFJ,t__YNFJ);
  } break;
  case __TYPE_GENERIC__: {
    add_subtype__O05B(__tmp__ZNFJ,t__YNFJ);
  } break;
  case __PROFIL_BLOCK__: {
    add_subtype__WNFJ(t__YNFJ);
  } break;
  };
}

static void* prototype__NQRF(__TYPE_FULL *Self__OQRF)
// ({TYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *__tmp__QQRF;
  void *__tmp__RQRF;
  __tmp__QQRF=Self__OQRF->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__QQRF)->__id) {
  case __TYPE__: {
    __tmp__RQRF=((__TYPE *)__tmp__QQRF)->prototype__RD;
  } break;
  case __TYPE_NULL__: {
    __tmp__RQRF=((__TYPE_NULL *)__tmp__QQRF)->parent_type__TIB.prototype__RD;
  } break;
  case __TYPE_VOID__: {
    __tmp__RQRF=((__TYPE_VOID *)__tmp__QQRF)->parent_type__UIB.prototype__RD;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__RQRF=((__TYPE_CONTEXT *)__tmp__QQRF)->parent_type__VIB.prototype__RD;
  } break;
  case __TYPE_ID__: {
    __tmp__RQRF=((__TYPE_ID *)__tmp__QQRF)->parent_type__WIB.prototype__RD;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__RQRF=((__TYPE_GENERIC *)__tmp__QQRF)->parent_type__T2IB.prototype__RD;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__RQRF=prototype__IMEJ();
  } break;
  };
  return(__tmp__RQRF);
}

static __INTEGER hash_code__T20D(__TYPE_FULL *Self__U20D)
// ({TYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *__tmp__W20D;
  void *__tmp__X20D;
  __tmp__W20D=Self__U20D->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__W20D)->__id) {
  case __TYPE__: {
    __tmp__X20D=((__PROTOTYPE *)((__TYPE *)__tmp__W20D)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__X20D=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__X20D=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__X20D=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__X20D=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__X20D=((__TYPE_GENERIC *)__tmp__W20D)->name__2R2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__X20D=((__PROFIL_BLOCK *)__tmp__W20D)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  return(hash_code__WPN(__tmp__X20D));
}

static void* get_intern__3MBG(void *str__5MBG)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __INTEGER m__DNBG,v__CNBG;
  void *result__BNBG;
  m__DNBG= 0;
  copy__BNK(tmp_name__MK,str__5MBG);
  append__MOK(tmp_name__MK,(&__string_92));
  count_variable__GNBG=(__INTEGER)(count_variable__GNBG +  1);
  v__CNBG=count_variable__GNBG;
  while ((v__CNBG !=  0)) {
    m__DNBG=(__INTEGER)(v__CNBG &  31);
    if ((m__DNBG <  26)) {
      add_last__YPK(tmp_name__MK,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )'A') + ((__INTEGER_8 )m__DNBG))))));
    } else {
      add_last__YPK(tmp_name__MK,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )'0') + ((__INTEGER_8 )(__INTEGER)(m__DNBG -  26)))))));
    };
    v__CNBG=(__INTEGER)(v__CNBG >>  5);
  };
  result__BNBG=create_copy__I0E(tmp_name__MK);
  fast_add__GAM(list__TK,result__BNBG);
  return(result__BNBG);
}

static void* to_types__A4EJ(__TYPES_TMP *Self__B4EJ)
// ({TYPES_TMP}) With resultNo recursive, No inlinable.
{
  void *result__D4EJ,*result__ZIIK,*e__WVIK;
  __INTEGER result__NHNK,__tmp__XHNK,__tmp__ZHNK,__tmp__QO0Q;
  __INTEGER __tmp__JEJK,i__A3EL,typ_id__CE5J,up__BDJK,Self__W4RK;
  __INTEGER h__3VIK,idx__4VIK,idx__D14K,new_capacity__E14K,i__C14K;
  __INTEGER typ_id__0W1K;
  void *__tmp__YHNK;
  __TYPES *Self__PDJK,*result__2D5J,*Self__5CJK;
  __POINTER ptr__3D5J,ptr__VW1K;
  __UINTEGER_32 sz__5D5J,a__VO0Q,new_size__TO0Q,t__ZO0Q,a__1O0Q;
  __UINTEGER_32 sz__XW1K,a__IP0Q,new_size__GP0Q,t__MP0Q,a__OP0Q;
  __HASHED_SEToTYPESo *Self__FIIK,*Self__VVIK;
  void *node__YIIK,*node__5VIK,*node1__G14K,*node2__H14K,*__tmp__PXIK;
  void **__tmp__RO0Q,**__tmp__EEJK,**Self__M2EL,**__tmp__GDJK;
  void **__tmp__IDJK,**Self__GEOK;
  __BOOLEAN __tmp__RJIK,__tmp__TEJK,__tmp__NEJK,__tmp__QEJK;
  void **old_buckets__F14K;
  __HASHED_SET_NODEoTYPESo *result__UW1K,*Self__TFOL;
  result__D4EJ=NULL;
  if ((Self__B4EJ->parent_types__W25F.upper__4LAG == (__INTEGER)(-  1))) {
    result__D4EJ=TYPES__;
  } else {
    Self__FIIK=((__HASHED_SEToTYPESo *)bucket__V4EJ);
    result__ZIIK=NULL;
    result__NHNK= 0;
    if ((Self__B4EJ->parent_types__W25F.upper__4LAG != (__INTEGER)(-  1))) {
      __tmp__XHNK=(__INTEGER)(Self__B4EJ->parent_types__W25F.upper__4LAG <<  8);
      __tmp__YHNK=((void **)Self__B4EJ->parent_types__W25F.storage__WWFJ)[Self__B4EJ->parent_types__W25F.upper__4LAG];
      switch (((struct ___OBJ *)__tmp__YHNK)->__id) {
      case __TYPE__: {
        __tmp__ZHNK=((__TYPE *)__tmp__YHNK)->index__LJC;
      } break;
      case __TYPE_NULL__: {
        __tmp__ZHNK=((__TYPE_NULL *)__tmp__YHNK)->parent_type__TIB.index__LJC;
      } break;
      case __TYPE_VOID__: {
        __tmp__ZHNK=((__TYPE_VOID *)__tmp__YHNK)->parent_type__UIB.index__LJC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__ZHNK=((__TYPE_CONTEXT *)__tmp__YHNK)->parent_type__VIB.index__LJC;
      } break;
      case __TYPE_ID__: {
        __tmp__ZHNK=((__TYPE_ID *)__tmp__YHNK)->parent_type__WIB.index__LJC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__ZHNK=((__TYPE_GENERIC *)__tmp__YHNK)->parent_type__T2IB.index__LJC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__ZHNK=((__PROFIL_BLOCK *)__tmp__YHNK)->parent_type__HHAG.index__LJC;
      } break;
      };
      result__NHNK=(__INTEGER)(__tmp__XHNK + __tmp__ZHNK);
    };
    node__YIIK=((void **)Self__FIIK->buckets__AJIK)[(__INTEGER)(result__NHNK % Self__FIIK->capacity__1IIK)];
    __tmp__QO0Q=Self__B4EJ->parent_types__W25F.upper__4LAG;
    __tmp__RO0Q=Self__B4EJ->parent_types__W25F.storage__WWFJ;
    until_do__5HNK:
    {
      if (((void *)node__YIIK == (void *)NULL)) {
        __tmp__RJIK=TRUE__;
      } else {
        Self__PDJK=((__TYPES *)((__HASHED_SET_NODEoTYPESo *)node__YIIK)->item__MJIK);
        if (((void *)Self__PDJK == (void *)Self__B4EJ)) {
          __tmp__TEJK=TRUE__;
        } else {
          if ((Self__PDJK->upper__4LAG == __tmp__QO0Q)) {
            if ((Self__PDJK->upper__4LAG == (__INTEGER)(-  1))) {
              __tmp__NEJK=TRUE__;
            } else {
              __tmp__EEJK=Self__PDJK->storage__WWFJ;
              __tmp__JEJK=(__INTEGER)(Self__PDJK->upper__4LAG +  1);
              Self__M2EL=((void **)__tmp__EEJK);
              i__A3EL=(__INTEGER)(__tmp__JEJK -  1);
              while (((i__A3EL >=  0) && ((void *)Self__M2EL[i__A3EL] == (void *)((void **)__tmp__RO0Q)[i__A3EL]))) {
                i__A3EL=(__INTEGER)(i__A3EL -  1);
              };
              __tmp__NEJK=(i__A3EL <  0);
            };
            __tmp__QEJK=__tmp__NEJK;
          } else {
            __tmp__QEJK=FALSE__;
          };
          __tmp__TEJK=__tmp__QEJK;
        };
        __tmp__RJIK=__tmp__TEJK;
      };
      if ((! __tmp__RJIK)) {
        node__YIIK=((__HASHED_SET_NODEoTYPESo *)node__YIIK)->next__YJIK;
        goto until_do__5HNK;
      };
    };
    if (((void *)node__YIIK != (void *)NULL)) {
      result__ZIIK=((__HASHED_SET_NODEoTYPESo *)node__YIIK)->item__MJIK;
    };
    result__D4EJ=result__ZIIK;
    if (((void *)result__ZIIK == (void *)NULL)) {
      result__2D5J=NULL;
      ptr__3D5J=((__POINTER )(NULL));
      typ_id__CE5J= 0;
      sz__5D5J=((__UINTEGER_32 )sizeof(__TYPES));
      if ((sz__5D5J ==  0)) {
        result__2D5J=TYPES__;
      } else {
        typ_id__CE5J=__TYPES__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__5D5J);
        if ((typ_id__CE5J == (__INTEGER)(-  1))) {
          a__VO0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__TO0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__5D5J + a__VO0Q) & (__UINTEGER_32)(~ a__VO0Q));
          ptr__3D5J=micro_alloc__table__lab__BOI(new_size__TO0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TO0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__TO0Q);
        } else {
          t__ZO0Q=((__UINTEGER_32 )typ_id__CE5J);
          a__1O0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__3D5J=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__5D5J + a__1O0Q) & (__UINTEGER_32)(~ a__1O0Q)),((__POINTER )(&(table_type[(t__ZO0Q)]))),(__UINTEGER_32)(t__ZO0Q |  1));
        };
        result__2D5J=((__TYPES *)ptr__3D5J);
        *(result__2D5J) = *(TYPES__);
      };
      Self__5CJK=((__TYPES *)result__2D5J);
      up__BDJK=Self__B4EJ->parent_types__W25F.upper__4LAG;
      Self__5CJK->storage__WWFJ=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)((__INTEGER)(up__BDJK +  1) * ((__INTEGER )(sizeof(void *)))))));
      __tmp__GDJK=Self__5CJK->storage__WWFJ;
      __tmp__IDJK=Self__B4EJ->parent_types__W25F.storage__WWFJ;
      Self__GEOK=((void **)__tmp__GDJK);
      Self__W4RK=up__BDJK;
      while ((Self__W4RK >=  0)) {
        Self__GEOK[Self__W4RK]=((void **)__tmp__IDJK)[Self__W4RK];
        Self__W4RK=(__INTEGER)(Self__W4RK -  1);
      };
      Self__5CJK->upper__4LAG=up__BDJK;
      size__JDJK=(__INTEGER)(size__JDJK + (__INTEGER)((__INTEGER)(up__BDJK +  1) <<  2));
      result__D4EJ=result__2D5J;
      Self__VVIK=((__HASHED_SEToTYPESo *)bucket__V4EJ);
      e__WVIK=result__2D5J;
      fast_has__5UNK(Self__VVIK,result__2D5J);
      fast_has__5UNK(Self__VVIK,result__2D5J);
      h__3VIK=hash_code__VTNK(result__2D5J);
      idx__4VIK=(__INTEGER)(h__3VIK % Self__VVIK->capacity__1IIK);
      node__5VIK=((void **)Self__VVIK->buckets__AJIK)[idx__4VIK];
      while ((! (((void *)node__5VIK == (void *)NULL) || ((void *)((__HASHED_SET_NODEoTYPESo *)node__5VIK)->item__MJIK == (void *)e__WVIK)))) {
        node__5VIK=((__HASHED_SET_NODEoTYPESo *)node__5VIK)->next__YJIK;
      };
      if (((void *)node__5VIK == (void *)NULL)) {
        if ((Self__VVIK->capacity__1IIK == Self__VVIK->count__CXIK)) {
          idx__D14K= 0;
          node1__G14K=NULL;
          node2__H14K=NULL;
          new_capacity__E14K=prime_number_ceiling__A4Q((__INTEGER)(Self__VVIK->capacity__1IIK +  1));
          old_buckets__F14K=Self__VVIK->buckets__AJIK;
          Self__VVIK->buckets__AJIK=create__RLRK(new_capacity__E14K);
          i__C14K=(__INTEGER)(Self__VVIK->capacity__1IIK -  1);
          Self__VVIK->capacity__1IIK=new_capacity__E14K;
          while ((i__C14K >=  0)) {
            node1__G14K=((void **)old_buckets__F14K)[i__C14K];
            while (((void *)node1__G14K != (void *)NULL)) {
              node2__H14K=((__HASHED_SET_NODEoTYPESo *)node1__G14K)->next__YJIK;
              idx__D14K=(__INTEGER)(hash_code__VTNK(((__HASHED_SET_NODEoTYPESo *)node1__G14K)->item__MJIK) % Self__VVIK->capacity__1IIK);
              ((__HASHED_SET_NODEoTYPESo *)node1__G14K)->next__YJIK=((void **)Self__VVIK->buckets__AJIK)[idx__D14K];
              ((void **)Self__VVIK->buckets__AJIK)[idx__D14K]=node1__G14K;
              node1__G14K=node2__H14K;
            };
            i__C14K=(__INTEGER)(i__C14K -  1);
          };
          idx__4VIK=(__INTEGER)(h__3VIK % Self__VVIK->capacity__1IIK);
        };
        __tmp__PXIK=((void **)Self__VVIK->buckets__AJIK)[idx__4VIK];
        result__UW1K=NULL;
        ptr__VW1K=((__POINTER )(NULL));
        typ_id__0W1K= 0;
        sz__XW1K=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoTYPESo));
        if ((sz__XW1K ==  0)) {
          result__UW1K=HASHED_SET_NODEoTYPESo__;
        } else {
          typ_id__0W1K=__HASHED_SET_NODEoTYPESo__;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__XW1K);
          if ((typ_id__0W1K == (__INTEGER)(-  1))) {
            a__IP0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__GP0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__XW1K + a__IP0Q) & (__UINTEGER_32)(~ a__IP0Q));
            ptr__VW1K=micro_alloc__table__lab__BOI(new_size__GP0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GP0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__GP0Q);
          } else {
            t__MP0Q=((__UINTEGER_32 )typ_id__0W1K);
            a__OP0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__VW1K=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__XW1K + a__OP0Q) & (__UINTEGER_32)(~ a__OP0Q)),((__POINTER )(&(table_type[(t__MP0Q)]))),(__UINTEGER_32)(t__MP0Q |  1));
          };
          result__UW1K=((__HASHED_SET_NODEoTYPESo *)ptr__VW1K);
          *(result__UW1K) = *(HASHED_SET_NODEoTYPESo__);
        };
        Self__TFOL=((__HASHED_SET_NODEoTYPESo *)result__UW1K);
        Self__TFOL->item__MJIK=result__2D5J;
        Self__TFOL->next__YJIK=__tmp__PXIK;
        node__5VIK=result__UW1K;
        ((void **)Self__VVIK->buckets__AJIK)[idx__4VIK]=result__UW1K;
        Self__VVIK->count__CXIK=(__INTEGER)(Self__VVIK->count__CXIK +  1);
      };
    };
  };
  free__OOFJ(Self__B4EJ);
  return(result__D4EJ);
}

static void* receiver_type__R12G(__SLOT_DATA *Self__S12G)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  void *result__U12G;
  result__U12G=NULL;
  if (((void *)Self__S12G->parent_slot__BJZD != (void *)NULL)) {
    result__U12G=((__SLOT *)Self__S12G->parent_slot__BJZD)->receiver_type__Q22F;
  } else {
    result__U12G=type_block__BLB;
  };
  return(result__U12G);
}

static void* last_expr__URRG(__LIST *Self__VRRG)
// ({LIST}) With resultNo recursive, No inlinable.
{
  void *__tmp__ZRRG;
  void *__tmp__0RRG,*result__XRRG;
  __FAST_ARRAYoINSTRo *Self__TP0Q;
  Self__TP0Q=((__FAST_ARRAYoINSTRo *)Self__VRRG->expr_list__JUOG);
  __tmp__ZRRG=((void **)Self__TP0Q->parent_arrayed_collection__IUOG.storage__BM4G)[Self__TP0Q->parent_arrayed_collection__IUOG.upper__THQG];
  if (__tmp__ZRRG==NULL) {
    __tmp__0RRG=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__ZRRG)->__id) {
    case __LIST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __STRING_CST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __PUSH__: {
      __tmp__0RRG=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __INTEGER_CST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __SWITCH__: {
      __tmp__0RRG=NULL;
    } break;
    case __NODE_TYPE__: {
      __tmp__0RRG=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __NODE_STYLE__: {
      __tmp__0RRG=NULL;
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__0RRG=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__0RRG=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __REAL_CST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __CHARACTER_CST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __IS_EXPANDED__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_SUP__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_SUB__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_MUL__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_DIV__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_AND__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __PUT_TO__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __ITEM__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __SIZE_OF__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __CAST__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __CALL_SLOT__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __NOP__: {
      __tmp__0RRG=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __WRITE_LOCAL__: {
      __tmp__0RRG=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __LOOP__: {
      __tmp__0RRG=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_NEG__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_ADD__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_NOT__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_MOD__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __LOOP_END__: {
      __tmp__0RRG=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_INF__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_OR__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    case __EXPR_XOR__: {
      __tmp__0RRG=((void *)__tmp__ZRRG);
    } break;
    }
  };
  result__XRRG=__tmp__0RRG;
  return(__tmp__0RRG);
}

static __BOOLEAN is_interrupt__2MQL(__CALL_SLOT *Self__3MQL)
// ({CALL_SLOT}) With resultNo recursive, No inlinable.
{
  void *__tmp__5MQL;
  __BOOLEAN __tmp__BNQL;
  __tmp__5MQL=Self__3MQL->profil__QA2H;
  if (((struct ___OBJ *)__tmp__5MQL)->__id==__PROFIL_SLOT__) {
    __tmp__BNQL=((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)__tmp__5MQL)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_25));
  } else {
    __tmp__BNQL=FALSE__;
  };
  return(__tmp__BNQL);
}

static void* get_temporary_expr__RCUG(__TYPE_FULL *Self__SCUG,__POSITION p__TCUG)
// ({TYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__VCUG;
  result__VCUG=NULL;
  if (((void *)Self__SCUG->parent_type__KTL == (void *)TYPE_VOID__)) {
    result__VCUG=create__type__CLQC(p__TCUG,TYPE_VOID__->parent_type__UIB.default__AKC);
  } else {
    result__VCUG=read__IC5G(create__name__style__type__25JG(p__TCUG,(&__string_60),'+',Self__SCUG));
  };
  return(result__VCUG);
}

static __FAST_ARRAYoEXPRo* create_with_capacity__3THH(__INTEGER new_count__5THH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__CKKH;
  __INTEGER typ_id__HKKH;
  __UINTEGER_32 sz__EKKH,a__YP0Q,new_size__WP0Q,t__2P0Q,a__4P0Q;
  __FAST_ARRAYoEXPRo *result__BKKH,*Self__HSDI;
  result__BKKH=NULL;
  ptr__CKKH=((__POINTER )(NULL));
  typ_id__HKKH= 0;
  sz__EKKH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoEXPRo));
  if ((sz__EKKH ==  0)) {
    result__BKKH=FAST_ARRAYoEXPRo__;
  } else {
    typ_id__HKKH=__FAST_ARRAYoEXPRo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__EKKH);
    if ((typ_id__HKKH == (__INTEGER)(-  1))) {
      a__YP0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__WP0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__EKKH + a__YP0Q) & (__UINTEGER_32)(~ a__YP0Q));
      ptr__CKKH=micro_alloc__table__lab__BOI(new_size__WP0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WP0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__WP0Q);
    } else {
      t__2P0Q=((__UINTEGER_32 )typ_id__HKKH);
      a__4P0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__CKKH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__EKKH + a__4P0Q) & (__UINTEGER_32)(~ a__4P0Q)),((__POINTER )(&(table_type[(t__2P0Q)]))),(__UINTEGER_32)(t__2P0Q |  1));
    };
    result__BKKH=((__FAST_ARRAYoEXPRo *)ptr__CKKH);
    *(result__BKKH) = *(FAST_ARRAYoEXPRo__);
  };
  Self__HSDI=((__FAST_ARRAYoEXPRo *)result__BKKH);
  if ((Self__HSDI->parent_arrayed_collection__42LC.capacity__QSDI < new_count__5THH)) {
    Self__HSDI->parent_arrayed_collection__42LC.storage__1SDI=create__YBWI(new_count__5THH);
    Self__HSDI->parent_arrayed_collection__42LC.capacity__QSDI=new_count__5THH;
  };
  Self__HSDI->parent_arrayed_collection__42LC.upper__USSH=(__INTEGER)(-  1);
  return(result__BKKH);
}

static void add_last__XSEI(__FAST_ARRAYoEXPRo *Self__YSEI,void *element__ZSEI)
// ({FAST_ARRAYoEXPRo},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__0SEI,__tmp__4TEI,__tmp__NNIJ,Self__ZCNK;
  __BOOLEAN __tmp__ITEI;
  void **__tmp__3TEI,**new__0MIJ;
  new_capacity__0SEI= 0;
  if (((__INTEGER)(Self__YSEI->parent_arrayed_collection__42LC.upper__USSH +  1) <= (__INTEGER)(Self__YSEI->parent_arrayed_collection__42LC.capacity__QSDI -  1))) {
    Self__YSEI->parent_arrayed_collection__42LC.upper__USSH=(__INTEGER)(Self__YSEI->parent_arrayed_collection__42LC.upper__USSH +  1);
    __tmp__ITEI=TRUE__;
  } else {
    __tmp__ITEI=FALSE__;
  };
  if ((! __tmp__ITEI)) {
    if ((Self__YSEI->parent_arrayed_collection__42LC.capacity__QSDI ==  0)) {
      Self__YSEI->parent_arrayed_collection__42LC.storage__1SDI=create__YBWI( 2);
      Self__YSEI->parent_arrayed_collection__42LC.capacity__QSDI= 2;
      Self__YSEI->parent_arrayed_collection__42LC.upper__USSH= 0;
    } else {
      new_capacity__0SEI=(__INTEGER)(Self__YSEI->parent_arrayed_collection__42LC.capacity__QSDI <<  1);
      __tmp__3TEI=Self__YSEI->parent_arrayed_collection__42LC.storage__1SDI;
      __tmp__4TEI=Self__YSEI->parent_arrayed_collection__42LC.capacity__QSDI;
      new__0MIJ=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__3TEI)),((__UINTEGER_32 )(__INTEGER)(__tmp__4TEI * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0SEI * ((__INTEGER )(sizeof(void *)))))));
      __tmp__NNIJ=(__INTEGER)(new_capacity__0SEI -  1);
      Self__ZCNK=__tmp__4TEI;
      while ((Self__ZCNK <= __tmp__NNIJ)) {
        new__0MIJ[Self__ZCNK]=NULL;
        Self__ZCNK=(__INTEGER)(Self__ZCNK +  1);
      };
      Self__YSEI->parent_arrayed_collection__42LC.storage__1SDI=new__0MIJ;
      Self__YSEI->parent_arrayed_collection__42LC.capacity__QSDI=new_capacity__0SEI;
      Self__YSEI->parent_arrayed_collection__42LC.upper__USSH=(__INTEGER)(Self__YSEI->parent_arrayed_collection__42LC.upper__USSH +  1);
    };
  };
  ((void **)Self__YSEI->parent_arrayed_collection__42LC.storage__1SDI)[Self__YSEI->parent_arrayed_collection__42LC.upper__USSH]=element__ZSEI;
}

static __EXPR_MULTIPLE* create__SUHH(void *l__UUHH)
// ({NULLxFAST_ARRAYoEXPRo}) With resultNo recursive, No inlinable.
{
  __EXPR_MULTIPLE *result__2LKH;
  __POINTER ptr__3LKH;
  __INTEGER typ_id__CMKH;
  __UINTEGER_32 sz__5LKH,a__DQ0Q,new_size__BQ0Q,t__HQ0Q,a__JQ0Q;
  void *__tmp__RTDI;
  __POSITION __tmp__STDI;
  __FAST_ARRAYoEXPRo *Self__IFJI;
  result__2LKH=NULL;
  ptr__3LKH=((__POINTER )(NULL));
  typ_id__CMKH= 0;
  sz__5LKH=((__UINTEGER_32 )sizeof(__EXPR_MULTIPLE));
  if ((sz__5LKH ==  0)) {
    result__2LKH=EXPR_MULTIPLE__;
  } else {
    typ_id__CMKH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__5LKH);
    if ((typ_id__CMKH == (__INTEGER)(-  1))) {
      a__DQ0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__BQ0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__5LKH + a__DQ0Q) & (__UINTEGER_32)(~ a__DQ0Q));
      ptr__3LKH=micro_alloc__table__lab__BOI(new_size__BQ0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BQ0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__BQ0Q);
    } else {
      t__HQ0Q=((__UINTEGER_32 )typ_id__CMKH);
      a__JQ0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__3LKH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__5LKH + a__JQ0Q) & (__UINTEGER_32)(~ a__JQ0Q)),((__POINTER )(&(table_type[(t__HQ0Q)]))),(__UINTEGER_32)(t__HQ0Q |  1));
    };
    result__2LKH=((__EXPR_MULTIPLE *)ptr__3LKH);
    *(result__2LKH) = *(EXPR_MULTIPLE__);
  };
  ((__EXPR_MULTIPLE *)result__2LKH)->expr_list__VFMH=l__UUHH;
  Self__IFJI=((__FAST_ARRAYoEXPRo *)l__UUHH);
  __tmp__RTDI=((void **)Self__IFJI->parent_arrayed_collection__42LC.storage__1SDI)[Self__IFJI->parent_arrayed_collection__42LC.upper__USSH];
  switch (((struct ___OBJ *)__tmp__RTDI)->__id) {
  case __LIST__: {
    __tmp__STDI=((__LIST *)__tmp__RTDI)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__STDI=((__STRING_CST *)__tmp__RTDI)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__STDI=((__EXTERNAL_C *)__tmp__RTDI)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__STDI=((__PROTOTYPE_CST *)__tmp__RTDI)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__STDI=((__INTEGER_CST *)__tmp__RTDI)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__STDI=((__READ_LOCAL *)__tmp__RTDI)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__STDI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__STDI=((__EXPR_EQUAL *)__tmp__RTDI)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__STDI=((__EXPR_NOT_EQUAL *)__tmp__RTDI)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__STDI=((__REAL_CST *)__tmp__RTDI)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__STDI=((__CHARACTER_CST *)__tmp__RTDI)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__STDI=((__IS_EXPANDED *)__tmp__RTDI)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__STDI=((__GET_TYPE_ID *)__tmp__RTDI)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__STDI=((__EXPR_SUP *)__tmp__RTDI)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__STDI=((__EXPR_SUB *)__tmp__RTDI)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__STDI=((__EXPR_MUL *)__tmp__RTDI)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__STDI=((__EXPR_DIV *)__tmp__RTDI)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__STDI=((__EXPR_AND *)__tmp__RTDI)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__STDI=((__EXPR_SHIFT_R *)__tmp__RTDI)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__STDI=((__EXPR_SHIFT_L *)__tmp__RTDI)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__STDI=((__PUT_TO *)__tmp__RTDI)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__STDI=((__ITEM *)__tmp__RTDI)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__STDI=((__SIZE_OF *)__tmp__RTDI)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__STDI=((__CAST *)__tmp__RTDI)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__STDI=((__CALL_SLOT *)__tmp__RTDI)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__STDI=((__READ_SLOT *)__tmp__RTDI)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__STDI=((__READ_GLOBAL *)__tmp__RTDI)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__STDI=((__EXPR_NOT_LOGIC *)__tmp__RTDI)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__STDI=((__EXPR_OR_LOGIC *)__tmp__RTDI)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__STDI=((__EXPR_OR_OR_LOGIC *)__tmp__RTDI)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__STDI=((__EXPR_AND_LOGIC *)__tmp__RTDI)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__STDI=((__EXPR_AND_AND_LOGIC *)__tmp__RTDI)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__STDI=((__EXPR_NEG *)__tmp__RTDI)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__STDI=((__EXPR_ADD *)__tmp__RTDI)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__STDI=((__EXPR_NOT *)__tmp__RTDI)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__STDI=((__EXPR_MOD *)__tmp__RTDI)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__STDI=((__EXPR_SUP_EQ *)__tmp__RTDI)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__STDI=((__EXPR_INF *)__tmp__RTDI)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__STDI=((__EXPR_INF_EQ *)__tmp__RTDI)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__STDI=((__EXPR_OR *)__tmp__RTDI)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__STDI=((__EXPR_XOR *)__tmp__RTDI)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__STDI;
  return(result__2LKH);
}

static void add_last__T2FH(__FAST_ARRAYoLOCALo *Self__U2FH,void *element__V2FH)
// ({FAST_ARRAYoLOCALo},{NULLxLOCAL}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__W2FH,__tmp__03FH;
  __BOOLEAN __tmp__E3FH;
  void **__tmp__Z3FH,**new__H0PH;
  new_capacity__W2FH= 0;
  if (((__INTEGER)(Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F +  1) <= (__INTEGER)(Self__U2FH->parent_arrayed_collection__QI4F.capacity__0WPG -  1))) {
    Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F +  1);
    __tmp__E3FH=TRUE__;
  } else {
    __tmp__E3FH=FALSE__;
  };
  if ((! __tmp__E3FH)) {
    if ((Self__U2FH->parent_arrayed_collection__QI4F.capacity__0WPG ==  0)) {
      Self__U2FH->parent_arrayed_collection__QI4F.storage__FXPG=create__OWWG( 2);
      Self__U2FH->parent_arrayed_collection__QI4F.capacity__0WPG= 2;
      Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F= 0;
    } else {
      new_capacity__W2FH=(__INTEGER)(Self__U2FH->parent_arrayed_collection__QI4F.capacity__0WPG <<  1);
      __tmp__Z3FH=Self__U2FH->parent_arrayed_collection__QI4F.storage__FXPG;
      __tmp__03FH=Self__U2FH->parent_arrayed_collection__QI4F.capacity__0WPG;
      new__H0PH=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__Z3FH)),((__UINTEGER_32 )(__INTEGER)(__tmp__03FH * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__W2FH * ((__INTEGER )(sizeof(void *)))))));
      clear__to__TVEI(new__H0PH,__tmp__03FH,(__INTEGER)(new_capacity__W2FH -  1));
      Self__U2FH->parent_arrayed_collection__QI4F.storage__FXPG=new__H0PH;
      Self__U2FH->parent_arrayed_collection__QI4F.capacity__0WPG=new_capacity__W2FH;
      Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F +  1);
    };
  };
  ((void **)Self__U2FH->parent_arrayed_collection__QI4F.storage__FXPG)[Self__U2FH->parent_arrayed_collection__QI4F.upper__TI4F]=element__V2FH;
}

static void* write__value__T5FH(__LOCAL *Self__U5FH,__POSITION p__V5FH,void *val__W5FH)
// ({LOCAL},{POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *result__ASHH;
  __BOOLEAN __tmp__KSHH;
  result__ASHH=NULL;
  if (((void *)Self__U5FH->my_alias__PWAH != (void *)NULL)) {
    result__ASHH=write_direct__with__value__AIWI(Self__U5FH->my_alias__PWAH,p__V5FH,val__W5FH);
    __tmp__KSHH=TRUE__;
  } else {
    __tmp__KSHH=FALSE__;
  };
  if ((! __tmp__KSHH)) {
    if (is_alias__4WAH) {
      result__ASHH=write_direct__with__value__AIWI(get_alias__IX4N(Self__U5FH),p__V5FH,val__W5FH);
    } else {
      result__ASHH=write_direct__with__value__AIWI(Self__U5FH,p__V5FH,val__W5FH);
    };
  };
  return(result__ASHH);
}

static void* default_value__U1IH(__TYPE_FULL *Self__V1IH,__POSITION p__W1IH)
// ({TYPE_FULL},{POSITION}) With resultRecursive, No inlinable.
{
  void *result__Y1IH,*__tmp__L2IH;
  void *__tmp__K2IH;
  __ITM_CHARACTER *Self__PNIQ;
  __ITM_STRING *Self__QNIQ;
  result__Y1IH=NULL;
  if ((((void *)prototype__NQRF(Self__V1IH) != (void *)NULL) && ((void *)((__PROTOTYPE *)prototype__NQRF(Self__V1IH))->default_value__JNDC != (void *)NULL))) {
    __tmp__K2IH=((__PROTOTYPE *)prototype__NQRF(Self__V1IH))->default_value__JNDC;
    switch (((struct ___OBJ *)__tmp__K2IH)->__id) {
    case __ITM_LIST__: {
      __tmp__L2IH=to_run_expr__D3IH(__tmp__K2IH);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__L2IH=to_run_expr__M3IH(__tmp__K2IH);
    } break;
    case __ITM_READ__: {
      __tmp__L2IH=to_run_expr__JGJH(__tmp__K2IH);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__L2IH=to_run_expr__U1JH(__tmp__K2IH);
    } break;
    case __ITM_REAL__: {
      __tmp__L2IH=to_run_expr__J3JH(__tmp__K2IH);
    } break;
    case __ITM_NUMBER__: {
      __tmp__L2IH=to_run_expr__T3JH(__tmp__K2IH);
    } break;
    case __ITM_CHARACTER__: {
      Self__PNIQ=((__ITM_CHARACTER *)__tmp__K2IH);
      __tmp__L2IH=create__char__WTMH(Self__PNIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__PNIQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__QNIQ=((__ITM_STRING *)__tmp__K2IH);
      __tmp__L2IH=create__text__AUMH(Self__QNIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__QNIQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__L2IH=to_run_expr__J4JH(__tmp__K2IH);
    } break;
    };
    result__Y1IH=__tmp__L2IH;
  } else {
    if (((__UINTEGER_8)(Self__V1IH->flag__LTL &  1) !=  0)) {
      result__Y1IH=create__type__CLQC(p__W1IH,Self__V1IH);
    } else {
      result__Y1IH=create__type__CLQC(p__W1IH,TYPE_NULL__->parent_type__TIB.default__AKC);
    };
  };
  return(result__Y1IH);
}

static void* to_run_expr__D3IH(__ITM_LIST *Self__E3IH)
// ({ITM_LIST}) With resultRecursive, No inlinable.
{
  void *result__BHLH;
  void *var__CHLH;
  __INTEGER __tmp__MHLH,__tmp__NHLH,__tmp__OHLH,nb_result__EHLH;
  __INTEGER __tmp__JJLH,__tmp__NJLH,Self__GUVH;
  __LIST *Self__SNIQ;
  void *voir__RNIQ;
  void *lr__FHLH;
  __BOOLEAN has_last__GHLH;
  __FAST_ARRAYoLOCALo *Self__OQ0Q;
  push_intern__VCLH(Self__E3IH->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM);
  to_run_base__KDLH(Self__E3IH,TRUE__);
  result__BHLH=NULL;
  var__CHLH=NULL;
  lr__FHLH=NULL;
  has_last__GHLH=((void *)((__TYPE_FULL *)static_type__GIQG(list_current__IF1))->parent_type__KTL != (void *)TYPE_VOID__);
  __tmp__MHLH=((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__NHLH=stack_result_lower__DI4F;
  if (has_last__GHLH) {
    __tmp__OHLH= 1;
  } else {
    __tmp__OHLH= 0;
  };
  nb_result__EHLH=(__INTEGER)((__INTEGER)((__INTEGER)(__tmp__MHLH - __tmp__NHLH) +  1) + __tmp__OHLH);
  if ((nb_result__EHLH ==  0)) {
    last_expr__K3IH=list_current__IF1;
    result__BHLH=create__type__CLQC(Self__E3IH->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,TYPE_VOID__->parent_type__UIB.default__AKC);
  } else {
    if (has_last__GHLH) {
      if (((void *)static_type__GIQG(list_current__IF1) == (void *)NULL)) {
        Self__SNIQ=((__LIST *)list_current__IF1);
        voir__RNIQ=create__AXB( 250);
        display__2QQG(Self__SNIQ,voir__RNIQ);
        put_string__2EG(((__STRING *)voir__RNIQ));
        fputc((int)('\n'),stdout);
      };
      var__CHLH=create__name__style__type__25JG(Self__E3IH->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIQG(list_current__IF1)));
      last_expr__K3IH=write__value__T5FH(var__CHLH,Self__E3IH->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,list_current__IF1);
    } else {
      Self__OQ0Q=((__FAST_ARRAYoLOCALo *)stack_result__WI4F);
      var__CHLH=((void **)Self__OQ0Q->parent_arrayed_collection__QI4F.storage__FXPG)[Self__OQ0Q->parent_arrayed_collection__QI4F.upper__TI4F];
    };
    result__BHLH=read__IC5G(var__CHLH);
    if ((nb_result__EHLH >  1)) {
      lr__FHLH=create_with_capacity__3THH(nb_result__EHLH);
      __tmp__JJLH=stack_result_lower__DI4F;
      __tmp__NJLH=(__INTEGER)((__INTEGER)(stack_result_lower__DI4F + nb_result__EHLH) -  2);
      Self__GUVH=__tmp__JJLH;
      while ((Self__GUVH <= __tmp__NJLH)) {
        add_last__XSEI(lr__FHLH,read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__GUVH]));
        Self__GUVH=(__INTEGER)(Self__GUVH +  1);
      };
      add_last__XSEI(lr__FHLH,result__BHLH);
      result__BHLH=create__SUHH(lr__FHLH);
    };
  };
  pop_intern__CKLH();
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,last_expr__K3IH);
  return(result__BHLH);
}

static void* to_run_expr__M3IH(__ITM_PROTOTYPE *Self__N3IH)
// ({ITM_PROTOTYPE}) With resultNo recursive, No inlinable.
{
  void *loc__R3IH,*res__M2RI,*result__SAQH;
  void *result__T3IH,*val__U3IH,*rec__V3IH,*__tmp__EAJH;
  void *wrt__W3IH;
  void *__tmp__X3IH;
  void *__tmp__Y3IH,*__tmp__DM1P;
  __ITM_TYPE_STYLE *Self__CM1P;
  void *base__BEOH;
  __PROFIL_BLOCK *result__O4PH,*Self__KIEI;
  __POINTER ptr__P4PH;
  __INTEGER typ_id__U4PH,__tmp__CKEI,__tmp__2KEI,Self__B4JI;
  __INTEGER nb_result__V4JI,__tmp__G5JI,Self__E11I,j__TAQH;
  __UINTEGER_32 sz__R4PH,a__WQ0Q,new_size__UQ0Q,t__0Q0Q,a__2Q0Q;
  void *list__MIEI;
  __POSITION p__W2JI,__tmp__DAJH;
  __CONTEXT *Self__I2RI,*Self__C4RI;
  void *__tmp__BKEI,*__tmp__HKEI;
  void *__tmp__03IH;
  void *__tmp__13IH,*tb__Q3IH;
  void *old_node_list__NIEI;
  void *__tmp__IKEI,*result__U4JI;
  void **__tmp__B35Q;
  __BOOLEAN __tmp__SCQH;
  loc__R3IH=NULL;
  result__T3IH=NULL;
  val__U3IH=NULL;
  rec__V3IH=NULL;
  wrt__W3IH=NULL;
  __tmp__X3IH=Self__N3IH->type__VAPC;
  switch (((struct ___OBJ *)__tmp__X3IH)->__id) {
  case __ITM_TYPE_SIMPLE__: {
    if (((__ITM_TYPE_SIMPLE *)__tmp__X3IH)->to_run__2VK==0) {
      __tmp__Y3IH=((__ITM_TYPE_SIMPLE *)__tmp__X3IH)->to_run__1VK;
    } else {
      __tmp__Y3IH=to_run__XVK(__tmp__X3IH);
    };
  } break;
  case __ITM_TYPE_STYLE__: {
    if (((__ITM_TYPE_STYLE *)__tmp__X3IH)->to_run__V1IB==0) {
      __tmp__Y3IH=((__ITM_TYPE_STYLE *)__tmp__X3IH)->to_run__U1IB;
    } else {
      Self__CM1P=((__ITM_TYPE_STYLE *)__tmp__X3IH);
      __tmp__DM1P=get__XUN(Self__CM1P);
      Self__CM1P->to_run__U1IB=__tmp__DM1P;
      Self__CM1P->to_run__V1IB=0;
      __tmp__Y3IH=__tmp__DM1P;
    };
  } break;
  case __ITM_TYPE_GENERIC__: {
    __tmp__Y3IH=to_run__W1IB(__tmp__X3IH);
  } break;
  case __ITM_TYPE_SELF__: {
    __tmp__Y3IH=to_run__MPXD();
  } break;
  case __ITM_BLOCK__: {
    base__BEOH=((__ITM_BLOCK *)__tmp__X3IH);
    result__O4PH=NULL;
    ptr__P4PH=((__POINTER )(NULL));
    typ_id__U4PH= 0;
    sz__R4PH=((__UINTEGER_32 )sizeof(__PROFIL_BLOCK));
    if ((sz__R4PH ==  0)) {
      result__O4PH=PROFIL_BLOCK__;
    } else {
      typ_id__U4PH=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__R4PH);
      if ((typ_id__U4PH == (__INTEGER)(-  1))) {
        a__WQ0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__UQ0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__R4PH + a__WQ0Q) & (__UINTEGER_32)(~ a__WQ0Q));
        ptr__P4PH=micro_alloc__table__lab__BOI(new_size__UQ0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UQ0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__UQ0Q);
      } else {
        t__0Q0Q=((__UINTEGER_32 )typ_id__U4PH);
        a__2Q0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__P4PH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__R4PH + a__2Q0Q) & (__UINTEGER_32)(~ a__2Q0Q)),((__POINTER )(&(table_type[(t__0Q0Q)]))),(__UINTEGER_32)(t__0Q0Q |  1));
      };
      result__O4PH=((__PROFIL_BLOCK *)ptr__P4PH);
      *(result__O4PH) = *(PROFIL_BLOCK__);
    };
    Self__KIEI=((__PROFIL_BLOCK *)result__O4PH);
    list__MIEI=((__ITM_BLOCK *)base__BEOH)->list__VD0D;
    add__30JI(Self__KIEI);
    Self__KIEI->parent_profil__GHAG.type_self__RIEI=to_run__MPXD();
    Self__KIEI->parent_type__HHAG.default__AKC=create__with__VJD(Self__KIEI, 3);
    Self__KIEI->slot_self__T4IH=clone__K53F();
    make__name__style__base__type__P25F(Self__KIEI->slot_self__T4IH,((__ITM_LIST *)list__MIEI)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,(&__string_80),'+',NULL,Self__KIEI->parent_profil__GHAG.type_self__RIEI);
    ((__SLOT_DATA *)Self__KIEI->slot_self__T4IH)->parent_variable__AJZD.intern_name__025F=(&__string_80);
    Self__KIEI->slot_value__H4IH=clone__K53F();
    make__name__style__base__type__P25F(Self__KIEI->slot_value__H4IH,((__ITM_LIST *)list__MIEI)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,(&__string_81),'+',NULL,Self__KIEI->parent_type__HHAG.default__AKC);
    ((__SLOT_DATA *)Self__KIEI->slot_value__H4IH)->parent_variable__AJZD.intern_name__025F=(&__string_81);
    Self__KIEI->profil_list__MJEI=create_with_capacity__PKBG( 2);
    Self__KIEI->node_list__OJEI=create__O00C();
    old_node_list__NIEI=node_list__PMQC;
    node_list__PMQC=Self__KIEI->node_list__OJEI;
    Self__KIEI->parent_type__HHAG.index__LJC=index_count__JJC;
    index_count__JJC=(__INTEGER)(index_count__JJC +  1);
    Self__KIEI->parent_profil__GHAG.name__XJEI=get_intern__3MBG((&__string_79));
    p__W2JI=((__ITM_LIST *)list__MIEI)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM;
    top__3GQC=(__INTEGER)(top__3GQC +  1);
    if ((top__3GQC > ((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.upper__IHQC)) {
      add_last__YUZD(stack__GHQC,clone__2RCD());
    };
    Self__I2RI=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
    res__M2RI=NULL;
    Self__I2RI->local__CI4F=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
    Self__I2RI->result__FI4F=stack_result_lower__DI4F;
    Self__I2RI->list__HI4F=list_current__IF1;
    Self__I2RI->profil__LI4F=profil_second__3PQC;
    profil_second__3PQC=Self__KIEI;
    stack_result_lower__DI4F=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
    list_current__IF1=create__QCAG(p__W2JI);
    Self__I2RI->context_extern__B3NH=context_extern__1OLH;
    context_extern__1OLH=NULL;
    if ((debug_level_option__3C !=  0)) {
      res__M2RI=create__name__style__type__25JG(p__W2JI,(&__string_58),'+',((__TYPE_FULL *)TYPE_CONTEXT__->parent_type__VIB.default__AKC));
      ((__LOCAL *)res__M2RI)->parent_variable__B2LC.ensure_count__QEAG= 1;
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__context__first__20EG(PUSH__,p__W2JI,res__M2RI,TRUE__));
    };
    Self__KIEI->parent_profil__GHAG.context__0M0G=res__M2RI;
    if (((void *)((__ITM_BLOCK *)base__BEOH)->argument__WD0D != (void *)NULL)) {
      __tmp__BKEI=((__ITM_BLOCK *)base__BEOH)->argument__WD0D;
      if (((struct ___OBJ *)__tmp__BKEI)->__id==__ITM_ARG__) {
        __tmp__CKEI= 1;
      } else {
        __tmp__CKEI=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__BKEI)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
      };
      Self__KIEI->parent_profil__GHAG.argument_list__N5JH=create_with_capacity__NXBG((__INTEGER)(__tmp__CKEI +  1));
      add_last__T2FH(Self__KIEI->parent_profil__GHAG.argument_list__N5JH,NULL);
      __tmp__HKEI=((__ITM_BLOCK *)base__BEOH)->argument__WD0D;
      __tmp__IKEI=Self__KIEI->parent_profil__GHAG.argument_list__N5JH;
      if (((struct ___OBJ *)__tmp__HKEI)->__id==__ITM_ARG__) {
        to_run__TLXI(__tmp__HKEI,__tmp__IKEI);
      } else {
        to_run__3LXI(__tmp__HKEI,__tmp__IKEI);
      };
    } else {
      Self__KIEI->parent_profil__GHAG.argument_list__N5JH=create__NTOH( 1);
    };
    ((void **)((__FAST_ARRAYoLOCALo *)Self__KIEI->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]=create__name__style__type__25JG(((__ITM_LIST *)list__MIEI)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,(&__string_57),' ',Self__KIEI->parent_profil__GHAG.type_self__RIEI);
    __tmp__2KEI=((__FAST_ARRAYoLOCALo *)Self__KIEI->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
    Self__B4JI= 0;
    while ((Self__B4JI <= __tmp__2KEI)) {
      add_last__T2FH(stack_local__RI4F,((void **)((__FAST_ARRAYoLOCALo *)Self__KIEI->parent_profil__GHAG.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__B4JI]);
      Self__B4JI=(__INTEGER)(Self__B4JI +  1);
    };
    Self__KIEI->parent_profil__GHAG.code__HZJH=list_current__IF1;
    to_run_base__KDLH(list__MIEI,TRUE__);
    result__U4JI=NULL;
    nb_result__V4JI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F - stack_result_lower__DI4F) +  1);
    if ((nb_result__V4JI !=  0)) {
      result__U4JI=create_with_capacity__NXBG(nb_result__V4JI);
      __tmp__G5JI=((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
      Self__E11I=stack_result_lower__DI4F;
      while ((Self__E11I <= __tmp__G5JI)) {
        add_last__T2FH(result__U4JI,((void **)((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__E11I]);
        Self__E11I=(__INTEGER)(Self__E11I +  1);
      };
    };
    Self__KIEI->parent_profil__GHAG.result_list__SA2H=result__U4JI;
    if (((void *)((__TYPE_FULL *)static_type__GIQG(list_current__IF1))->parent_type__KTL != (void *)TYPE_VOID__)) {
      Self__KIEI->parent_profil__GHAG.result_last__XGKH=create__name__style__type__25JG(((__LIST *)list_current__IF1)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIQG(list_current__IF1)));
    };
    Self__KIEI->context_extern__OMXH=context_extern__1OLH;
    Self__C4RI=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
    list_current__IF1=Self__C4RI->list__HI4F;
    pop_stack_until__DDAG(Self__C4RI->local__CI4F);
    remove_since__ERPG(stack_result__WI4F,stack_result_lower__DI4F);
    stack_result_lower__DI4F=Self__C4RI->result__FI4F;
    if (((void *)context_extern__1OLH == (void *)NULL)) {
      context_extern__1OLH=Self__C4RI->context_extern__B3NH;
    };
    profil_second__3PQC=Self__C4RI->profil__LI4F;
    top__3GQC=(__INTEGER)(top__3GQC -  1);
    node_list__PMQC=old_node_list__NIEI;
    __tmp__Y3IH=result__O4PH->parent_type__HHAG.default__AKC;
  } break;
  case __ITM_TYPE_GENERIC_ELT__: {
    __tmp__Y3IH=to_run__DKEF(__tmp__X3IH);
  } break;
  };
  __tmp__03IH=((__TYPE_FULL *)__tmp__Y3IH)->parent_type__KTL;
  if (__tmp__03IH==NULL) {
    __tmp__13IH=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__03IH)->__id) {
    case __TYPE__: {
      __tmp__13IH=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__13IH=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__13IH=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__13IH=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__13IH=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__13IH=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__13IH=((void *)__tmp__03IH);
    } break;
    }
  };
  tb__Q3IH=__tmp__13IH;
  if (((void *)__tmp__13IH != (void *)NULL)) {
    loc__R3IH=create__name__style__type__25JG(Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,(&__string_60),'+',((__TYPE_FULL *)__tmp__Y3IH));
    rec__V3IH=read__IC5G(loc__R3IH);
    val__U3IH=create__type__CLQC(Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,__tmp__Y3IH);
    wrt__W3IH=write_direct__with__value__05DH(((__SLOT_DATA *)((__PROFIL_BLOCK *)__tmp__13IH)->slot_value__H4IH),Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,rec__V3IH,val__U3IH);
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,wrt__W3IH);
    rec__V3IH=read__IC5G(loc__R3IH);
    result__SAQH=NULL;
    j__TAQH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
    __tmp__B35Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
    while ((! ((j__TAQH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__B35Q)[j__TAQH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
      j__TAQH=(__INTEGER)(j__TAQH -  1);
    };
    if ((j__TAQH >= stack_local_lower__AI4F)) {
      result__SAQH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__TAQH];
      if (((j__TAQH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__SAQH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
        context_extern__1OLH=result__SAQH;
      };
      __tmp__SCQH=TRUE__;
    } else {
      __tmp__SCQH=FALSE__;
    };
    if ((! __tmp__SCQH)) {
      if (((void *)profil_first__4PQC != (void *)NULL)) {
        result__SAQH=lookup__LLJM(profil_first__4PQC,(&__string_57));
        if ((((void *)result__SAQH != (void *)NULL) && ((void *)((__LOCAL *)result__SAQH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
          context_extern__1OLH=result__SAQH;
        };
      };
    };
    val__U3IH=read__IC5G(result__SAQH);
    wrt__W3IH=write_direct__with__value__05DH(((__SLOT_DATA *)((__PROFIL_BLOCK *)__tmp__13IH)->slot_self__T4IH),Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,rec__V3IH,val__U3IH);
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,wrt__W3IH);
    result__T3IH=read__IC5G(loc__R3IH);
  } else {
    if ((((is_expanded_c__0ZWG(__tmp__Y3IH) && ((void *)((__TYPE_FULL *)__tmp__Y3IH)->parent_type__KTL != (void *)type_boolean__VJB)) && ((void *)((__TYPE_FULL *)__tmp__Y3IH)->parent_type__KTL != (void *)type_true__FJB)) && ((void *)((__TYPE_FULL *)__tmp__Y3IH)->parent_type__KTL != (void *)type_false__NJB))) {
      result__T3IH=default_value__U1IH(__tmp__Y3IH,Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM);
      __tmp__DAJH=Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
      switch (((struct ___OBJ *)result__T3IH)->__id) {
      case __LIST__: {
        __tmp__EAJH=check_type__with__T5CN(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __STRING_CST__: {
        __tmp__EAJH=check_type__with__Q22H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXTERNAL_C__: {
        __tmp__EAJH=check_type__with__PF3H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__EAJH=check_type__with__OO3H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __INTEGER_CST__: {
        __tmp__EAJH=check_type__with__NX3H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __READ_LOCAL__: {
        __tmp__EAJH=check_type__with__LEFJ(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__EAJH=check_type__with__LA4H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__EAJH=check_type__with__KJ4H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__EAJH=check_type__with__JS4H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __REAL_CST__: {
        __tmp__EAJH=check_type__with__I14H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __CHARACTER_CST__: {
        __tmp__EAJH=check_type__with__HE5H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __IS_EXPANDED__: {
        __tmp__EAJH=check_type__with__FN5H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__EAJH=check_type__with__DW5H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_SUP__: {
        __tmp__EAJH=check_type__with__C55H(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_SUB__: {
        __tmp__EAJH=check_type__with__BIAI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_MUL__: {
        __tmp__EAJH=check_type__with__ARAI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_DIV__: {
        __tmp__EAJH=check_type__with__5ZAI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_AND__: {
        __tmp__EAJH=check_type__with__4CBI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__EAJH=check_type__with__3LBI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__EAJH=check_type__with__2UBI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __PUT_TO__: {
        __tmp__EAJH=check_type__with__03BI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __ITEM__: {
        __tmp__EAJH=check_type__with__YGCI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __SIZE_OF__: {
        __tmp__EAJH=check_type__with__WPCI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __CAST__: {
        __tmp__EAJH=check_type__with__UYCI(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __CALL_SLOT__: {
        __tmp__EAJH=check_type__with__RIDN(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __READ_SLOT__: {
        __tmp__EAJH=check_type__with__VPKL(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __READ_GLOBAL__: {
        __tmp__EAJH=check_type__with__UYKL(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__EAJH=check_type__with__IW2O(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__EAJH=check_type__with__AYIO(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__EAJH=check_type__with__IFSO(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__EAJH=check_type__with__5AJO(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__EAJH=check_type__with__IOSO(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_NEG__: {
        __tmp__EAJH=check_type__with__SVXM(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_ADD__: {
        __tmp__EAJH=check_type__with__R4XM(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_NOT__: {
        __tmp__EAJH=check_type__with__QRDN(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_MOD__: {
        __tmp__EAJH=check_type__with__4JJO(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__EAJH=check_type__with__SQIP(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_INF__: {
        __tmp__EAJH=check_type__with__H52O(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__EAJH=check_type__with__GI3O(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_OR__: {
        __tmp__EAJH=check_type__with__MZZN(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      case __EXPR_XOR__: {
        __tmp__EAJH=check_type__with__FR3O(result__T3IH,__tmp__Y3IH,__tmp__DAJH);
      } break;
      };
      result__T3IH=__tmp__EAJH;
    } else {
      result__T3IH=create__type__CLQC(Self__N3IH->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,__tmp__Y3IH);
    };
  };
  return(result__T3IH);
}

static void* to_run_expr__UAJH(__ITM_WRITE_VALUE *Self__VAJH)
// ({ITM_WRITE_VALUE}) With resultRecursive, No inlinable.
{
  void *ass_multiple__XAJH,*__tmp__NBJH;
  __INTEGER j__0AJH,__tmp__YBJH,Self__TJUH;
  void *itm_read__2AJH,*__tmp__MCJH,*__tmp__LDJH;
  void *result__4AJH,*__tmp__ABJH,*result__LGQH;
  void *__tmp__5AJH,*__tmp__MBJH,*__tmp__LCJH,*__tmp__KDJH;
  __POSITION __tmp__3N1P,pos__OOIQ;
  __ITM_CHARACTER *Self__LOIQ;
  __ITM_STRING *Self__MOIQ;
  void *__tmp__CBJH,*val_multiple__ZAJH;
  void *__tmp__TCJH,*__tmp__SDJH;
  void *loc__KGQH;
  void *lst_idf__1AJH;
  void *lst_exp__3AJH;
  __FAST_ARRAYoSTRING_CONSTANTo *Self__B01E;
  ass_multiple__XAJH=NULL;
  j__0AJH= 0;
  lst_idf__1AJH=NULL;
  itm_read__2AJH=NULL;
  lst_exp__3AJH=NULL;
  result__4AJH=NULL;
  __tmp__5AJH=Self__VAJH->parent_itm_write__DYFC.value__IV2D;
  switch (((struct ___OBJ *)__tmp__5AJH)->__id) {
  case __ITM_LIST__: {
    __tmp__ABJH=to_run_expr__D3IH(__tmp__5AJH);
  } break;
  case __ITM_PROTOTYPE__: {
    __tmp__ABJH=to_run_expr__M3IH(__tmp__5AJH);
  } break;
  case __ITM_LIST_IDF__: {
    __tmp__3N1P=((__ITM_LIST_IDF *)__tmp__5AJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_328));
    put_position__ECH(__tmp__3N1P);
    send_error__2FH();
    __tmp__ABJH=NULL;
  } break;
  case __ITM_WRITE_VALUE__: {
    __tmp__ABJH=to_run_expr__UAJH(__tmp__5AJH);
  } break;
  case __ITM_WRITE_CAST__: {
    __tmp__ABJH=to_run_expr__WDJH(__tmp__5AJH);
  } break;
  case __ITM_READ__: {
    __tmp__ABJH=to_run_expr__JGJH(__tmp__5AJH);
  } break;
  case __ITM_WRITE_CODE__: {
    __tmp__ABJH=to_run_expr__MHJH(__tmp__5AJH);
  } break;
  case __ITM_READ_ARG2__: {
    __tmp__ABJH=to_run_expr__3IJH(__tmp__5AJH);
  } break;
  case __ITM_BINARY__: {
    __tmp__ABJH=to_run_expr__RMJH(__tmp__5AJH);
  } break;
  case __ITM_READ_ARG1__: {
    __tmp__ABJH=to_run_expr__0XJH(__tmp__5AJH);
  } break;
  case __ITM_OLD__: {
    __tmp__ABJH=to_run_expr__5XJH(__tmp__5AJH);
  } break;
  case __ITM_EXTERNAL_TYPE__: {
    __tmp__ABJH=to_run_expr__U1JH(__tmp__5AJH);
  } break;
  case __ITM_REAL__: {
    __tmp__ABJH=to_run_expr__J3JH(__tmp__5AJH);
  } break;
  case __ITM_NUMBER__: {
    __tmp__ABJH=to_run_expr__T3JH(__tmp__5AJH);
  } break;
  case __ITM_CHARACTER__: {
    Self__LOIQ=((__ITM_CHARACTER *)__tmp__5AJH);
    __tmp__ABJH=create__char__WTMH(Self__LOIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__LOIQ->character__ED0D);
  } break;
  case __ITM_STRING__: {
    Self__MOIQ=((__ITM_STRING *)__tmp__5AJH);
    __tmp__ABJH=create__text__AUMH(Self__MOIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__MOIQ->string__QD0D);
  } break;
  case __ITM_EXTERNAL__: {
    __tmp__ABJH=to_run_expr__J4JH(__tmp__5AJH);
  } break;
  case __ITM_READ_ARGS__: {
    __tmp__ABJH=to_run_expr__TIKH(__tmp__5AJH);
  } break;
  };
  if (__tmp__ABJH==NULL) {
    __tmp__CBJH=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__ABJH)->__id) {
    case __LIST__: {
      __tmp__CBJH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__CBJH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__CBJH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__CBJH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__CBJH=((void *)__tmp__ABJH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__CBJH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__CBJH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__CBJH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__CBJH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__CBJH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__CBJH=NULL;
    } break;
    case __ITEM__: {
      __tmp__CBJH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__CBJH=NULL;
    } break;
    case __CAST__: {
      __tmp__CBJH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__CBJH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__CBJH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__CBJH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__CBJH=NULL;
    } break;
    }
  };
  val_multiple__ZAJH=__tmp__CBJH;
  if (((void *)__tmp__CBJH != (void *)NULL)) {
    lst_exp__3AJH=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__CBJH)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH +  1));
    __tmp__MBJH=Self__VAJH->parent_itm_write__DYFC.assign__HV2D;
    if (__tmp__MBJH==NULL) {
      __tmp__NBJH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__MBJH)->__id) {
      case __ITM_LIST__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_LIST_IDF__: {
        __tmp__NBJH=((void *)__tmp__MBJH);
      } break;
      case __ITM_WRITE_VALUE__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_WRITE_CAST__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_READ__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_WRITE_CODE__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_BINARY__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_OLD__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_REAL__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_NUMBER__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_CHARACTER__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_STRING__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__NBJH=NULL;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__NBJH=NULL;
      } break;
      }
    };
    ass_multiple__XAJH=__tmp__NBJH;
    if (((void *)__tmp__NBJH != (void *)NULL)) {
      lst_idf__1AJH=((__ITM_LIST_IDF *)__tmp__NBJH)->list_name__DHGF;
      __tmp__YBJH=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)lst_idf__1AJH)->parent_arrayed_collection__VTFC.upper__RSSD -  1);
      Self__TJUH= 0;
      while ((Self__TJUH <= __tmp__YBJH)) {
        j__0AJH=affect__with__index__in__BKUH(Self__VAJH,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)lst_idf__1AJH)->parent_arrayed_collection__VTFC.storage__FB0D)[Self__TJUH],val_multiple__ZAJH,j__0AJH,lst_exp__3AJH);
        Self__TJUH=(__INTEGER)(Self__TJUH +  1);
      };
      Self__B01E=((__FAST_ARRAYoSTRING_CONSTANTo *)lst_idf__1AJH);
      j__0AJH=affect__with__index__in__BKUH(Self__VAJH,((void **)Self__B01E->parent_arrayed_collection__VTFC.storage__FB0D)[Self__B01E->parent_arrayed_collection__VTFC.upper__RSSD],__tmp__CBJH,j__0AJH,lst_exp__3AJH);
    } else {
      __tmp__LCJH=Self__VAJH->parent_itm_write__DYFC.assign__HV2D;
      if (__tmp__LCJH==NULL) {
        __tmp__MCJH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__LCJH)->__id) {
        case __ITM_LIST__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_READ__: {
          __tmp__MCJH=((void *)__tmp__LCJH);
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__MCJH=((void *)__tmp__LCJH);
        } break;
        case __ITM_BINARY__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__MCJH=((void *)__tmp__LCJH);
        } break;
        case __ITM_OLD__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_REAL__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_NUMBER__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_STRING__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__MCJH=NULL;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__MCJH=((void *)__tmp__LCJH);
        } break;
        }
      };
      itm_read__2AJH=__tmp__MCJH;
      switch (((struct ___OBJ *)__tmp__MCJH)->__id) {
      case __ITM_READ__: {
        __tmp__TCJH=((__ITM_READ *)__tmp__MCJH)->name__TVPC;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__TCJH=((__ITM_READ_ARG2 *)__tmp__MCJH)->parent_itm_read__V4FC.name__TVPC;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__TCJH=((__ITM_READ_ARG1 *)__tmp__MCJH)->parent_itm_read__S5GC.name__TVPC;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__TCJH=((__ITM_READ_ARGS *)__tmp__MCJH)->parent_itm_read__J5JC.name__TVPC;
      } break;
      };
      j__0AJH=affect__with__index__in__BKUH(Self__VAJH,__tmp__TCJH,__tmp__CBJH,j__0AJH,lst_exp__3AJH);
    };
    if ((j__0AJH <= ((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__CBJH)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH)) {
      pos__OOIQ=Self__VAJH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_454));
      put_position__ECH(pos__OOIQ);
      send_error__2FH();
    };
    result__4AJH=create__SUHH(lst_exp__3AJH);
  } else {
    __tmp__KDJH=Self__VAJH->parent_itm_write__DYFC.assign__HV2D;
    if (__tmp__KDJH==NULL) {
      __tmp__LDJH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__KDJH)->__id) {
      case __ITM_LIST__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_LIST_IDF__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_WRITE_VALUE__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_WRITE_CAST__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_READ__: {
        __tmp__LDJH=((void *)__tmp__KDJH);
      } break;
      case __ITM_WRITE_CODE__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__LDJH=((void *)__tmp__KDJH);
      } break;
      case __ITM_BINARY__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__LDJH=((void *)__tmp__KDJH);
      } break;
      case __ITM_OLD__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_REAL__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_NUMBER__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_CHARACTER__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_STRING__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__LDJH=NULL;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__LDJH=((void *)__tmp__KDJH);
      } break;
      }
    };
    itm_read__2AJH=__tmp__LDJH;
    switch (((struct ___OBJ *)__tmp__LDJH)->__id) {
    case __ITM_READ__: {
      __tmp__SDJH=((__ITM_READ *)__tmp__LDJH)->name__TVPC;
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__SDJH=((__ITM_READ_ARG2 *)__tmp__LDJH)->parent_itm_read__V4FC.name__TVPC;
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__SDJH=((__ITM_READ_ARG1 *)__tmp__LDJH)->parent_itm_read__S5GC.name__TVPC;
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__SDJH=((__ITM_READ_ARGS *)__tmp__LDJH)->parent_itm_read__J5JC.name__TVPC;
    } break;
    };
    result__LGQH=NULL;
    loc__KGQH=lookup__TJSH(__tmp__SDJH);
    if (((void *)loc__KGQH != (void *)NULL)) {
      result__LGQH=affect_local__with__PZVH(Self__VAJH,loc__KGQH,__tmp__ABJH);
    } else {
      result__LGQH=affect_slot__with__50VH(Self__VAJH,__tmp__SDJH,__tmp__ABJH);
    };
    result__4AJH=result__LGQH;
  };
  return(result__4AJH);
}

static void* to_run_expr__WDJH(__ITM_WRITE_CAST *Self__XDJH)
// ({ITM_WRITE_CAST}) With resultRecursive, No inlinable.
{
  void *typ_cast__3DJH,*__tmp__BEJH,*__tmp__KFJH,*__tmp__VQSH;
  void *slot__4DJH;
  void *__tmp__5DJH,*__tmp__GMLH,*__tmp__HGJH;
  void *__tmp__AEJH,*val__ZDJH,*__tmp__FGJH,*__tmp__XQSH,*__tmp__IGJH;
  __POSITION __tmp__LO1P,pos__YOIQ,pos__MNSH,__tmp__1FJH,p__UQLH;
  __POSITION __tmp__WQSH,__tmp__CP1P;
  __ITM_CHARACTER *Self__QOIQ,*Self__0OIQ;
  __ITM_STRING *Self__ROIQ,*Self__1OIQ;
  void *loc__0DJH,*loc__IRLH;
  void *result__DMLH,*__tmp__NMLH;
  void *__tmp__HMLH,*without_arg__EMLH;
  __DTA_CAST *result__FIQH;
  __POINTER ptr__GIQH;
  __INTEGER typ_id__LIQH;
  __UINTEGER_32 sz__IIQH,a__WR0Q,new_size__UR0Q,t__0R0Q,a__2R0Q;
  void *result__0QLH;
  typ_cast__3DJH=NULL;
  slot__4DJH=NULL;
  __tmp__5DJH=Self__XDJH->parent_itm_write__ZYFC.value__IV2D;
  switch (((struct ___OBJ *)__tmp__5DJH)->__id) {
  case __ITM_LIST__: {
    __tmp__AEJH=to_run_expr__D3IH(__tmp__5DJH);
  } break;
  case __ITM_PROTOTYPE__: {
    __tmp__AEJH=to_run_expr__M3IH(__tmp__5DJH);
  } break;
  case __ITM_LIST_IDF__: {
    __tmp__LO1P=((__ITM_LIST_IDF *)__tmp__5DJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_328));
    put_position__ECH(__tmp__LO1P);
    send_error__2FH();
    __tmp__AEJH=NULL;
  } break;
  case __ITM_WRITE_VALUE__: {
    __tmp__AEJH=to_run_expr__UAJH(__tmp__5DJH);
  } break;
  case __ITM_WRITE_CAST__: {
    __tmp__AEJH=to_run_expr__WDJH(__tmp__5DJH);
  } break;
  case __ITM_READ__: {
    __tmp__AEJH=to_run_expr__JGJH(__tmp__5DJH);
  } break;
  case __ITM_WRITE_CODE__: {
    __tmp__AEJH=to_run_expr__MHJH(__tmp__5DJH);
  } break;
  case __ITM_READ_ARG2__: {
    __tmp__AEJH=to_run_expr__3IJH(__tmp__5DJH);
  } break;
  case __ITM_BINARY__: {
    __tmp__AEJH=to_run_expr__RMJH(__tmp__5DJH);
  } break;
  case __ITM_READ_ARG1__: {
    __tmp__AEJH=to_run_expr__0XJH(__tmp__5DJH);
  } break;
  case __ITM_OLD__: {
    __tmp__AEJH=to_run_expr__5XJH(__tmp__5DJH);
  } break;
  case __ITM_EXTERNAL_TYPE__: {
    __tmp__AEJH=to_run_expr__U1JH(__tmp__5DJH);
  } break;
  case __ITM_REAL__: {
    __tmp__AEJH=to_run_expr__J3JH(__tmp__5DJH);
  } break;
  case __ITM_NUMBER__: {
    __tmp__AEJH=to_run_expr__T3JH(__tmp__5DJH);
  } break;
  case __ITM_CHARACTER__: {
    Self__QOIQ=((__ITM_CHARACTER *)__tmp__5DJH);
    __tmp__AEJH=create__char__WTMH(Self__QOIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__QOIQ->character__ED0D);
  } break;
  case __ITM_STRING__: {
    Self__ROIQ=((__ITM_STRING *)__tmp__5DJH);
    __tmp__AEJH=create__text__AUMH(Self__ROIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__ROIQ->string__QD0D);
  } break;
  case __ITM_EXTERNAL__: {
    __tmp__AEJH=to_run_expr__J4JH(__tmp__5DJH);
  } break;
  case __ITM_READ_ARGS__: {
    __tmp__AEJH=to_run_expr__TIKH(__tmp__5DJH);
  } break;
  };
  switch (((struct ___OBJ *)__tmp__AEJH)->__id) {
  case __LIST__: {
    __tmp__BEJH=static_type__GIQG(__tmp__AEJH);
  } break;
  case __STRING_CST__: {
    __tmp__BEJH=((__STRING_CST *)__tmp__AEJH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__BEJH=((__EXTERNAL_C *)__tmp__AEJH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__BEJH=((__PROTOTYPE_CST *)__tmp__AEJH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__BEJH=((__INTEGER_CST *)__tmp__AEJH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__BEJH=((__LOCAL *)((__READ_LOCAL *)__tmp__AEJH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BEJH=static_type__0N1H(__tmp__AEJH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BEJH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BEJH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__BEJH=((__REAL_CST *)__tmp__AEJH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__BEJH=((__CHARACTER_CST *)__tmp__AEJH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__BEJH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BEJH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__BEJH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__BEJH=static_type__MP1H(__tmp__AEJH);
  } break;
  case __EXPR_MUL__: {
    __tmp__BEJH=static_type__SP1H(__tmp__AEJH);
  } break;
  case __EXPR_DIV__: {
    __tmp__BEJH=static_type__XP1H(__tmp__AEJH);
  } break;
  case __EXPR_AND__: {
    __tmp__BEJH=static_type__2P1H(__tmp__AEJH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BEJH=static_type__BQ1H(__tmp__AEJH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BEJH=static_type__GQ1H(__tmp__AEJH);
  } break;
  case __PUT_TO__: {
    __tmp__BEJH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__BEJH=static_type__PQ1H(__tmp__AEJH);
  } break;
  case __SIZE_OF__: {
    __tmp__BEJH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__BEJH=((__CAST *)__tmp__AEJH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__BEJH=static_type__GIKL(__tmp__AEJH);
  } break;
  case __READ_SLOT__: {
    __tmp__BEJH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__AEJH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__BEJH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__AEJH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BEJH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BEJH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BEJH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BEJH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BEJH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__BEJH=static_type__Z2IM(__tmp__AEJH);
  } break;
  case __EXPR_ADD__: {
    __tmp__BEJH=static_type__IXML(__tmp__AEJH);
  } break;
  case __EXPR_NOT__: {
    __tmp__BEJH=static_type__BTXM(__tmp__AEJH);
  } break;
  case __EXPR_MOD__: {
    __tmp__BEJH=static_type__5LEO(__tmp__AEJH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BEJH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__BEJH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BEJH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__BEJH=static_type__NOPN(__tmp__AEJH);
  } break;
  case __EXPR_XOR__: {
    __tmp__BEJH=static_type__XCSO(__tmp__AEJH);
  } break;
  };
  loc__0DJH=create__name__style__type__25JG(Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM,(&__string_60),'+',((__TYPE_FULL *)__tmp__BEJH));
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(loc__0DJH,Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM,__tmp__AEJH));
  val__ZDJH=read__IC5G(loc__0DJH);
  result__DMLH=NULL;
  __tmp__GMLH=Self__XDJH->parent_itm_write__ZYFC.assign__HV2D;
  if (__tmp__GMLH==NULL) {
    __tmp__HMLH=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__GMLH)->__id) {
    case __ITM_LIST__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_READ__: {
      __tmp__HMLH=((void *)__tmp__GMLH);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__HMLH=((void *)__tmp__GMLH);
    } break;
    case __ITM_BINARY__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__HMLH=((void *)__tmp__GMLH);
    } break;
    case __ITM_OLD__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_REAL__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_NUMBER__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_CHARACTER__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_STRING__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__HMLH=NULL;
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__HMLH=((void *)__tmp__GMLH);
    } break;
    }
  };
  without_arg__EMLH=__tmp__HMLH;
  if (((void *)__tmp__HMLH != (void *)NULL)) {
    switch (((struct ___OBJ *)__tmp__HMLH)->__id) {
    case __ITM_READ__: {
      __tmp__NMLH=((__ITM_READ *)__tmp__HMLH)->name__TVPC;
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__NMLH=((__ITM_READ_ARG2 *)__tmp__HMLH)->parent_itm_read__V4FC.name__TVPC;
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__NMLH=((__ITM_READ_ARG1 *)__tmp__HMLH)->parent_itm_read__S5GC.name__TVPC;
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__NMLH=((__ITM_READ_ARGS *)__tmp__HMLH)->parent_itm_read__J5JC.name__TVPC;
    } break;
    };
    result__DMLH=__tmp__NMLH;
  } else {
    pos__YOIQ=Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_455));
    put_position__ECH(pos__YOIQ);
    send_error__2FH();
  };
  loc__0DJH=lookup__0MLH(result__DMLH);
  if (((void *)loc__0DJH != (void *)NULL)) {
    typ_cast__3DJH=((__LOCAL *)loc__0DJH)->parent_variable__B2LC.type__125F;
  } else {
    slot__4DJH=get_slot__AP5G(to_run__MPXD(),result__DMLH);
    if (((void *)slot__4DJH == (void *)NULL)) {
      copy__BNK(string_tmp__RB,(&__string_456));
      append__MOK(string_tmp__RB,result__DMLH);
      append__MOK(string_tmp__RB,(&__string_457));
      append_name_in__FBYD(to_run__MPXD(),string_tmp__RB);
      add_last__YPK(string_tmp__RB,'.');
      pos__MNSH=Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,string_tmp__RB);
      put_position__ECH(pos__MNSH);
      send_error__2FH();
    };
    if (((struct ___OBJ *)slot__4DJH)->__id==__SLOT_DATA__) {
      __tmp__KFJH=get_type_result__PG2G(slot__4DJH);
    } else {
      __tmp__KFJH=get_type_result__ZH2G(slot__4DJH);
    };
    typ_cast__3DJH=__tmp__KFJH;
  };
  if (verify__JDAG) {
    if (affect_with__ZCHI(typ_cast__3DJH,((__LOCAL *)((__READ_LOCAL *)val__ZDJH)->local__ALZD)->parent_variable__B2LC.type__125F)) {
      __tmp__1FJH=Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 2,(&__string_458));
      put_position__ECH(__tmp__1FJH);
      send_error__2FH();
    };
  };
  p__UQLH=Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
  result__FIQH=NULL;
  ptr__GIQH=((__POINTER )(NULL));
  typ_id__LIQH= 0;
  sz__IIQH=((__UINTEGER_32 )sizeof(__DTA_CAST));
  if ((sz__IIQH ==  0)) {
    result__FIQH=DTA_CAST__;
  } else {
    typ_id__LIQH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__IIQH);
    if ((typ_id__LIQH == (__INTEGER)(-  1))) {
      a__WR0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__UR0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__IIQH + a__WR0Q) & (__UINTEGER_32)(~ a__WR0Q));
      ptr__GIQH=micro_alloc__table__lab__BOI(new_size__UR0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UR0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__UR0Q);
    } else {
      t__0R0Q=((__UINTEGER_32 )typ_id__LIQH);
      a__2R0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GIQH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__IIQH + a__2R0Q) & (__UINTEGER_32)(~ a__2R0Q)),((__POINTER )(&(table_type[(t__0R0Q)]))),(__UINTEGER_32)(t__0R0Q |  1));
    };
    result__FIQH=((__DTA_CAST *)ptr__GIQH);
    *(result__FIQH) = *(DTA_CAST__);
  };
  ((__DTA_CAST *)result__FIQH)->result_expr__401H=get_temporary_expr__RCUG(typ_cast__3DJH,p__UQLH);
  result__0QLH=create__with__GWUC(val__ZDJH,result__FIQH);
  add_last__I4YD(node_list__PMQC,result__0QLH);
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,result__0QLH);
  __tmp__FGJH=result_expr__PVDI(result__0QLH);
  loc__IRLH=lookup__0MLH(result__DMLH);
  if (((void *)loc__IRLH != (void *)NULL)) {
    if ((((__LOCAL *)loc__IRLH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == '-')) {
      affect_slot__with__5QSH(Self__XDJH,((__LOCAL *)loc__IRLH)->parent_variable__B2LC.intern_name__025F,__tmp__FGJH);
    } else {
      if ((((__LOCAL *)loc__IRLH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == ' ')) {
        put_error__text__0AH( 1,(&__string_459));
        put_position__ECH(((__LOCAL *)loc__IRLH)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
        put_position__ECH(Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      __tmp__VQSH=((__LOCAL *)loc__IRLH)->parent_variable__B2LC.type__125F;
      __tmp__WQSH=Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
      switch (((struct ___OBJ *)__tmp__FGJH)->__id) {
      case __LIST__: {
        __tmp__XQSH=check_type__with__T5CN(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __STRING_CST__: {
        __tmp__XQSH=check_type__with__Q22H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXTERNAL_C__: {
        __tmp__XQSH=check_type__with__PF3H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__XQSH=check_type__with__OO3H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __INTEGER_CST__: {
        __tmp__XQSH=check_type__with__NX3H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __READ_LOCAL__: {
        __tmp__XQSH=check_type__with__LEFJ(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__XQSH=check_type__with__LA4H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__XQSH=check_type__with__KJ4H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__XQSH=check_type__with__JS4H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __REAL_CST__: {
        __tmp__XQSH=check_type__with__I14H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __CHARACTER_CST__: {
        __tmp__XQSH=check_type__with__HE5H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __IS_EXPANDED__: {
        __tmp__XQSH=check_type__with__FN5H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__XQSH=check_type__with__DW5H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_SUP__: {
        __tmp__XQSH=check_type__with__C55H(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_SUB__: {
        __tmp__XQSH=check_type__with__BIAI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_MUL__: {
        __tmp__XQSH=check_type__with__ARAI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_DIV__: {
        __tmp__XQSH=check_type__with__5ZAI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_AND__: {
        __tmp__XQSH=check_type__with__4CBI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__XQSH=check_type__with__3LBI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__XQSH=check_type__with__2UBI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __PUT_TO__: {
        __tmp__XQSH=check_type__with__03BI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __ITEM__: {
        __tmp__XQSH=check_type__with__YGCI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __SIZE_OF__: {
        __tmp__XQSH=check_type__with__WPCI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __CAST__: {
        __tmp__XQSH=check_type__with__UYCI(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __CALL_SLOT__: {
        __tmp__XQSH=check_type__with__RIDN(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __READ_SLOT__: {
        __tmp__XQSH=check_type__with__VPKL(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __READ_GLOBAL__: {
        __tmp__XQSH=check_type__with__UYKL(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__XQSH=check_type__with__IW2O(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__XQSH=check_type__with__AYIO(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__XQSH=check_type__with__IFSO(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__XQSH=check_type__with__5AJO(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__XQSH=check_type__with__IOSO(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_NEG__: {
        __tmp__XQSH=check_type__with__SVXM(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_ADD__: {
        __tmp__XQSH=check_type__with__R4XM(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_NOT__: {
        __tmp__XQSH=check_type__with__QRDN(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_MOD__: {
        __tmp__XQSH=check_type__with__4JJO(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__XQSH=check_type__with__SQIP(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_INF__: {
        __tmp__XQSH=check_type__with__H52O(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__XQSH=check_type__with__GI3O(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_OR__: {
        __tmp__XQSH=check_type__with__MZZN(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      case __EXPR_XOR__: {
        __tmp__XQSH=check_type__with__FR3O(__tmp__FGJH,__tmp__VQSH,__tmp__WQSH);
      } break;
      };
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(loc__IRLH,Self__XDJH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM,__tmp__XQSH));
      read__IC5G(loc__IRLH);
    };
  } else {
    affect_slot__with__5QSH(Self__XDJH,result__DMLH,__tmp__FGJH);
  };
  __tmp__HGJH=Self__XDJH->parent_itm_write__ZYFC.assign__HV2D;
  switch (((struct ___OBJ *)__tmp__HGJH)->__id) {
  case __ITM_LIST__: {
    __tmp__IGJH=to_run_expr__D3IH(__tmp__HGJH);
  } break;
  case __ITM_PROTOTYPE__: {
    __tmp__IGJH=to_run_expr__M3IH(__tmp__HGJH);
  } break;
  case __ITM_LIST_IDF__: {
    __tmp__CP1P=((__ITM_LIST_IDF *)__tmp__HGJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_328));
    put_position__ECH(__tmp__CP1P);
    send_error__2FH();
    __tmp__IGJH=NULL;
  } break;
  case __ITM_WRITE_VALUE__: {
    __tmp__IGJH=to_run_expr__UAJH(__tmp__HGJH);
  } break;
  case __ITM_WRITE_CAST__: {
    __tmp__IGJH=to_run_expr__WDJH(__tmp__HGJH);
  } break;
  case __ITM_READ__: {
    __tmp__IGJH=to_run_expr__JGJH(__tmp__HGJH);
  } break;
  case __ITM_WRITE_CODE__: {
    __tmp__IGJH=to_run_expr__MHJH(__tmp__HGJH);
  } break;
  case __ITM_READ_ARG2__: {
    __tmp__IGJH=to_run_expr__3IJH(__tmp__HGJH);
  } break;
  case __ITM_BINARY__: {
    __tmp__IGJH=to_run_expr__RMJH(__tmp__HGJH);
  } break;
  case __ITM_READ_ARG1__: {
    __tmp__IGJH=to_run_expr__0XJH(__tmp__HGJH);
  } break;
  case __ITM_OLD__: {
    __tmp__IGJH=to_run_expr__5XJH(__tmp__HGJH);
  } break;
  case __ITM_EXTERNAL_TYPE__: {
    __tmp__IGJH=to_run_expr__U1JH(__tmp__HGJH);
  } break;
  case __ITM_REAL__: {
    __tmp__IGJH=to_run_expr__J3JH(__tmp__HGJH);
  } break;
  case __ITM_NUMBER__: {
    __tmp__IGJH=to_run_expr__T3JH(__tmp__HGJH);
  } break;
  case __ITM_CHARACTER__: {
    Self__0OIQ=((__ITM_CHARACTER *)__tmp__HGJH);
    __tmp__IGJH=create__char__WTMH(Self__0OIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__0OIQ->character__ED0D);
  } break;
  case __ITM_STRING__: {
    Self__1OIQ=((__ITM_STRING *)__tmp__HGJH);
    __tmp__IGJH=create__text__AUMH(Self__1OIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__1OIQ->string__QD0D);
  } break;
  case __ITM_EXTERNAL__: {
    __tmp__IGJH=to_run_expr__J4JH(__tmp__HGJH);
  } break;
  case __ITM_READ_ARGS__: {
    __tmp__IGJH=to_run_expr__TIKH(__tmp__HGJH);
  } break;
  };
  return(__tmp__IGJH);
}

static void* to_run_expr__JGJH(__ITM_READ *Self__KGJH)
// ({ITM_READ}) With resultNo recursive, No inlinable.
{
  void *result__MGJH;
  void *loc__NGJH;
  result__MGJH=NULL;
  loc__NGJH=lookup__3RLH(Self__KGJH->name__TVPC);
  if (((void *)loc__NGJH != (void *)NULL)) {
    if ((((__LOCAL *)loc__NGJH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == '-')) {
      ((__LOCAL *)loc__NGJH)->parent_variable__B2LC.ensure_count__QEAG= 1;
      Self__KGJH->name__TVPC=((__LOCAL *)loc__NGJH)->parent_variable__B2LC.intern_name__025F;
      result__MGJH=to_run_with__args__PKQH(Self__KGJH);
    } else {
      result__MGJH=read__IC5G(loc__NGJH);
    };
  } else {
    result__MGJH=to_run_with__args__PKQH(Self__KGJH);
  };
  return(result__MGJH);
}

static void* to_run_expr__MHJH(__ITM_WRITE_CODE *Self__NHJH)
// ({ITM_WRITE_CODE}) With resultNo recursive, No inlinable.
{
  void *__tmp__YHJH,*__tmp__ZIJH;
  void *__tmp__ZHJH,*itm_read__PHJH;
  void *__tmp__0HJH;
  void *result__NWLH;
  __INTEGER j__OWLH,typ_id__5YQH;
  void *rec__RHJH,*__tmp__HOEI;
  void *type__UHJH;
  void *slot__VHJH,*__tmp__GOEI;
  __POSITION __tmp__TIJH,__tmp__YIJH;
  __DTA_WR_CODE *result__ZYQH,*Self__AOEI;
  __POINTER ptr__0YQH;
  __UINTEGER_32 sz__2YQH,a__JS0Q,new_size__HS0Q,t__NS0Q,a__PS0Q;
  void *result__G0LH;
  void **__tmp__C35Q;
  __BOOLEAN __tmp__NYLH;
  __tmp__YHJH=Self__NHJH->parent_itm_write__E2FC.assign__HV2D;
  if (__tmp__YHJH==NULL) {
    __tmp__ZHJH=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__YHJH)->__id) {
    case __ITM_LIST__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_READ__: {
      __tmp__ZHJH=((void *)__tmp__YHJH);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__ZHJH=((void *)__tmp__YHJH);
    } break;
    case __ITM_BINARY__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__ZHJH=((void *)__tmp__YHJH);
    } break;
    case __ITM_OLD__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_REAL__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_NUMBER__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_CHARACTER__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_STRING__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__ZHJH=NULL;
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__ZHJH=((void *)__tmp__YHJH);
    } break;
    }
  };
  itm_read__PHJH=__tmp__ZHJH;
  switch (((struct ___OBJ *)__tmp__ZHJH)->__id) {
  case __ITM_READ__: {
    __tmp__0HJH=((__ITM_READ *)__tmp__ZHJH)->name__TVPC;
  } break;
  case __ITM_READ_ARG2__: {
    __tmp__0HJH=((__ITM_READ_ARG2 *)__tmp__ZHJH)->parent_itm_read__V4FC.name__TVPC;
  } break;
  case __ITM_READ_ARG1__: {
    __tmp__0HJH=((__ITM_READ_ARG1 *)__tmp__ZHJH)->parent_itm_read__S5GC.name__TVPC;
  } break;
  case __ITM_READ_ARGS__: {
    __tmp__0HJH=((__ITM_READ_ARGS *)__tmp__ZHJH)->parent_itm_read__J5JC.name__TVPC;
  } break;
  };
  result__NWLH=NULL;
  j__OWLH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__C35Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__OWLH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__C35Q)[j__OWLH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
    j__OWLH=(__INTEGER)(j__OWLH -  1);
  };
  if ((j__OWLH >= stack_local_lower__AI4F)) {
    result__NWLH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__OWLH];
    if (((j__OWLH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__NWLH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__NWLH;
    };
    __tmp__NYLH=TRUE__;
  } else {
    __tmp__NYLH=FALSE__;
  };
  if ((! __tmp__NYLH)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__NWLH=lookup__LLJM(profil_first__4PQC,(&__string_57));
      if ((((void *)result__NWLH != (void *)NULL) && ((void *)((__LOCAL *)result__NWLH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__NWLH;
      };
    };
  };
  rec__RHJH=read__IC5G(result__NWLH);
  type__UHJH=((__LOCAL *)((__READ_LOCAL *)rec__RHJH)->local__ALZD)->parent_variable__B2LC.type__125F;
  slot__VHJH=get_slot__AP5G(type__UHJH,__tmp__0HJH);
  if (((void *)slot__VHJH == (void *)NULL)) {
    copy__BNK(string_tmp__RB,(&__string_456));
    append__MOK(string_tmp__RB,__tmp__0HJH);
    append__MOK(string_tmp__RB,(&__string_457));
    append_name_in__FBYD(type__UHJH,string_tmp__RB);
    add_last__YPK(string_tmp__RB,'.');
    __tmp__TIJH=Self__NHJH->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,string_tmp__RB);
    put_position__ECH(__tmp__TIJH);
    send_error__2FH();
  };
  __tmp__YIJH=Self__NHJH->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
  __tmp__ZIJH=Self__NHJH->parent_itm_write__E2FC.value__IV2D;
  result__ZYQH=NULL;
  ptr__0YQH=((__POINTER )(NULL));
  typ_id__5YQH= 0;
  sz__2YQH=((__UINTEGER_32 )sizeof(__DTA_WR_CODE));
  if ((sz__2YQH ==  0)) {
    result__ZYQH=DTA_WR_CODE__;
  } else {
    typ_id__5YQH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__2YQH);
    if ((typ_id__5YQH == (__INTEGER)(-  1))) {
      a__JS0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__HS0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__2YQH + a__JS0Q) & (__UINTEGER_32)(~ a__JS0Q));
      ptr__0YQH=micro_alloc__table__lab__BOI(new_size__HS0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HS0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HS0Q);
    } else {
      t__NS0Q=((__UINTEGER_32 )typ_id__5YQH);
      a__PS0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__0YQH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__2YQH + a__PS0Q) & (__UINTEGER_32)(~ a__PS0Q)),((__POINTER )(&(table_type[(t__NS0Q)]))),(__UINTEGER_32)(t__NS0Q |  1));
    };
    result__ZYQH=((__DTA_WR_CODE *)ptr__0YQH);
    *(result__ZYQH) = *(DTA_WR_CODE__);
  };
  Self__AOEI=((__DTA_WR_CODE *)result__ZYQH);
  Self__AOEI->parent_dta__E0LH.parent_itm_object__5LQC.position__BJM=__tmp__YIJH;
  Self__AOEI->parent_dta__E0LH.context__OJZD=profil_second__3PQC;
  Self__AOEI->parent_dta__E0LH.slot__PJZD=slot__VHJH;
  Self__AOEI->parent_dta__E0LH.self_arg__QJZD=rec__RHJH;
  __tmp__GOEI=Self__AOEI->parent_dta__E0LH.slot__PJZD;
  if (((struct ___OBJ *)__tmp__GOEI)->__id==__SLOT_DATA__) {
    __tmp__HOEI=get_expr_result__RUOG(__tmp__GOEI);
  } else {
    __tmp__HOEI=get_expr_result__QXOG(__tmp__GOEI);
  };
  Self__AOEI->parent_dta__E0LH.result_expr__RJZD=__tmp__HOEI;
  Self__AOEI->code__IOEI=__tmp__ZIJH;
  result__G0LH=create__with__GWUC(rec__RHJH,result__ZYQH);
  add_last__I4YD(node_list__PMQC,result__G0LH);
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,result__G0LH);
  return(result_expr__PVDI(result__G0LH));
}

static void* to_run_expr__3IJH(__ITM_READ_ARG2 *Self__4IJH)
// ({ITM_READ_ARG2}) With resultRecursive, No inlinable.
{
  void *result__AJJH,*__tmp__YJJH,*__tmp__0JJH,*receiver__RSQI;
  void *__tmp__NTQI,*__tmp__H0QI,*__tmp__U0QI,*__tmp__V0QI,*__tmp__R1QI;
  void *__tmp__U3QI,*__tmp__V3QI;
  void *__tmp__XJJH,*__tmp__ZJJH,*__tmp__OMJH,*__tmp__XTQI,*__tmp__G0QI;
  __POSITION __tmp__XP1P,__tmp__ZP1P,pos__FPIQ,pos_null__USQI;
  __POSITION __tmp__PQ1P,pos__NPIQ,pos__TA4I,__tmp__KYQI,__tmp__QYQI;
  __POSITION __tmp__EZQI,__tmp__RR1P,pos__PBIN;
  __ITM_CHARACTER *Self__2OIQ,*Self__APIQ,*Self__HPIQ,*Self__YPIQ;
  __ITM_STRING *Self__3OIQ,*Self__BPIQ,*Self__IPIQ,*Self__ZPIQ;
  void *__tmp__BKJH,*__tmp__CKJH,*__tmp__QUQI,*__tmp__T2QI;
  void *itm_list__XSQI,*__tmp__PTQI;
  void *itm_read__YSQI,*__tmp__YTQI,*__tmp__5TQI;
  void *slot_msg__0SQI,*__tmp__TVQI;
  void *base__2SQI;
  void *__tmp__HUQI;
  void *__tmp__IUQI,*__tmp__SVQI;
  void *receiver_type__SSQI,*__tmp__2UQI,*__tmp__NWQI,*__tmp__OWQI;
  void *__tmp__FWQI,*__tmp__LWQI,*__tmp__YWQI;
  void *__tmp__GXQI,*__tmp__XXQI;
  __INTEGER __tmp__WXQI,__tmp__A0QI,Self__YB4I;
  void *__tmp__RYQI;
  void *__tmp__OZQI,*em__TSQI;
  __STRING_CST *Self__2PIQ,*Self__IQIQ;
  __PROTOTYPE_CST *Self__3PIQ,*Self__JQIQ;
  __INTEGER_CST *Self__4PIQ,*Self__KQIQ;
  __REAL_CST *Self__AQIQ,*Self__MQIQ;
  __CHARACTER_CST *Self__CQIQ,*Self__OQIQ;
  __IS_EXPANDED *Self__DQIQ,*Self__PQIQ;
  __READ_LOCAL *Self__EQIQ,*Self__GQIQ;
  __READ_GLOBAL *Self__HQIQ;
  void *l_arg__BJJH,*larg__OSQI;
  __BOOLEAN is_resend__ZSQI,is_block_value__1SQI,__tmp__NUQI;
  __BOOLEAN __tmp__3UQI,__tmp__PWQI,__tmp__SWQI,__tmp__LXQI,__tmp__BYQI;
  __BOOLEAN __tmp__4XQI,__tmp__00QI;
  void *args__QSQI;
  result__AJJH=NULL;
  l_arg__BJJH=NULL;
  if ((((void *)Self__4IJH->parent_itm_read__V4FC.name__TVPC == (void *)operator_equal__0V) || ((void *)Self__4IJH->parent_itm_read__V4FC.name__TVPC == (void *)operator_not_equal__5V))) {
    __tmp__XJJH=Self__4IJH->arg_first__MEQC;
    switch (((struct ___OBJ *)__tmp__XJJH)->__id) {
    case __ITM_LIST__: {
      __tmp__YJJH=to_run_expr__D3IH(__tmp__XJJH);
    } break;
    case __ITM_LDOTS__: {
      __tmp__YJJH=to_run_expr__E0QH(__tmp__XJJH);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__YJJH=to_run_expr__M3IH(__tmp__XJJH);
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__XP1P=((__ITM_LIST_IDF *)__tmp__XJJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_328));
      put_position__ECH(__tmp__XP1P);
      send_error__2FH();
      __tmp__YJJH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__YJJH=to_run_expr__UAJH(__tmp__XJJH);
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__YJJH=to_run_expr__WDJH(__tmp__XJJH);
    } break;
    case __ITM_READ__: {
      __tmp__YJJH=to_run_expr__JGJH(__tmp__XJJH);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__YJJH=to_run_expr__MHJH(__tmp__XJJH);
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__YJJH=to_run_expr__3IJH(__tmp__XJJH);
    } break;
    case __ITM_BINARY__: {
      __tmp__YJJH=to_run_expr__RMJH(__tmp__XJJH);
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__YJJH=to_run_expr__0XJH(__tmp__XJJH);
    } break;
    case __ITM_OLD__: {
      __tmp__YJJH=to_run_expr__5XJH(__tmp__XJJH);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__YJJH=to_run_expr__U1JH(__tmp__XJJH);
    } break;
    case __ITM_REAL__: {
      __tmp__YJJH=to_run_expr__J3JH(__tmp__XJJH);
    } break;
    case __ITM_NUMBER__: {
      __tmp__YJJH=to_run_expr__T3JH(__tmp__XJJH);
    } break;
    case __ITM_CHARACTER__: {
      Self__2OIQ=((__ITM_CHARACTER *)__tmp__XJJH);
      __tmp__YJJH=create__char__WTMH(Self__2OIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__2OIQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__3OIQ=((__ITM_STRING *)__tmp__XJJH);
      __tmp__YJJH=create__text__AUMH(Self__3OIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__3OIQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__YJJH=to_run_expr__J4JH(__tmp__XJJH);
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__YJJH=to_run_expr__TIKH(__tmp__XJJH);
    } break;
    case __ITM_RESULT__: {
      print__1ZE((&__string_460));
      fputc((int)('\n'),stdout);
      exit(( 1));
      __tmp__YJJH=NULL;
    } break;
    };
    __tmp__ZJJH=Self__4IJH->arg_second__NEQC;
    switch (((struct ___OBJ *)__tmp__ZJJH)->__id) {
    case __ITM_LIST__: {
      __tmp__0JJH=to_run_expr__D3IH(__tmp__ZJJH);
    } break;
    case __ITM_LDOTS__: {
      __tmp__0JJH=to_run_expr__E0QH(__tmp__ZJJH);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__0JJH=to_run_expr__M3IH(__tmp__ZJJH);
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__ZP1P=((__ITM_LIST_IDF *)__tmp__ZJJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_328));
      put_position__ECH(__tmp__ZP1P);
      send_error__2FH();
      __tmp__0JJH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__0JJH=to_run_expr__UAJH(__tmp__ZJJH);
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__0JJH=to_run_expr__WDJH(__tmp__ZJJH);
    } break;
    case __ITM_READ__: {
      __tmp__0JJH=to_run_expr__JGJH(__tmp__ZJJH);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__0JJH=to_run_expr__MHJH(__tmp__ZJJH);
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__0JJH=to_run_expr__3IJH(__tmp__ZJJH);
    } break;
    case __ITM_BINARY__: {
      __tmp__0JJH=to_run_expr__RMJH(__tmp__ZJJH);
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__0JJH=to_run_expr__0XJH(__tmp__ZJJH);
    } break;
    case __ITM_OLD__: {
      __tmp__0JJH=to_run_expr__5XJH(__tmp__ZJJH);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__0JJH=to_run_expr__U1JH(__tmp__ZJJH);
    } break;
    case __ITM_REAL__: {
      __tmp__0JJH=to_run_expr__J3JH(__tmp__ZJJH);
    } break;
    case __ITM_NUMBER__: {
      __tmp__0JJH=to_run_expr__T3JH(__tmp__ZJJH);
    } break;
    case __ITM_CHARACTER__: {
      Self__APIQ=((__ITM_CHARACTER *)__tmp__ZJJH);
      __tmp__0JJH=create__char__WTMH(Self__APIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__APIQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__BPIQ=((__ITM_STRING *)__tmp__ZJJH);
      __tmp__0JJH=create__text__AUMH(Self__BPIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__BPIQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__0JJH=to_run_expr__J4JH(__tmp__ZJJH);
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__0JJH=to_run_expr__TIKH(__tmp__ZJJH);
    } break;
    case __ITM_RESULT__: {
      print__1ZE((&__string_460));
      fputc((int)('\n'),stdout);
      exit(( 1));
      __tmp__0JJH=NULL;
    } break;
    };
    if (verify__JDAG) {
      switch (((struct ___OBJ *)__tmp__YJJH)->__id) {
      case __LIST__: {
        __tmp__BKJH=static_type__GIQG(__tmp__YJJH);
      } break;
      case __STRING_CST__: {
        __tmp__BKJH=((__STRING_CST *)__tmp__YJJH)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__BKJH=((__EXTERNAL_C *)__tmp__YJJH)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__BKJH=((__PROTOTYPE_CST *)__tmp__YJJH)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__BKJH=((__INTEGER_CST *)__tmp__YJJH)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__BKJH=((__LOCAL *)((__READ_LOCAL *)__tmp__YJJH)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__BKJH=static_type__0N1H(__tmp__YJJH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__BKJH=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__BKJH=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__BKJH=((__REAL_CST *)__tmp__YJJH)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__BKJH=((__CHARACTER_CST *)__tmp__YJJH)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__BKJH=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__BKJH=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__BKJH=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__BKJH=static_type__MP1H(__tmp__YJJH);
      } break;
      case __EXPR_MUL__: {
        __tmp__BKJH=static_type__SP1H(__tmp__YJJH);
      } break;
      case __EXPR_DIV__: {
        __tmp__BKJH=static_type__XP1H(__tmp__YJJH);
      } break;
      case __EXPR_AND__: {
        __tmp__BKJH=static_type__2P1H(__tmp__YJJH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__BKJH=static_type__BQ1H(__tmp__YJJH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__BKJH=static_type__GQ1H(__tmp__YJJH);
      } break;
      case __PUT_TO__: {
        __tmp__BKJH=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__BKJH=static_type__PQ1H(__tmp__YJJH);
      } break;
      case __SIZE_OF__: {
        __tmp__BKJH=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__BKJH=((__CAST *)__tmp__YJJH)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__BKJH=static_type__GIKL(__tmp__YJJH);
      } break;
      case __READ_SLOT__: {
        __tmp__BKJH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YJJH)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__BKJH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YJJH)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__BKJH=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__BKJH=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__BKJH=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__BKJH=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__BKJH=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__BKJH=static_type__Z2IM(__tmp__YJJH);
      } break;
      case __EXPR_ADD__: {
        __tmp__BKJH=static_type__IXML(__tmp__YJJH);
      } break;
      case __EXPR_NOT__: {
        __tmp__BKJH=static_type__BTXM(__tmp__YJJH);
      } break;
      case __EXPR_MOD__: {
        __tmp__BKJH=static_type__5LEO(__tmp__YJJH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__BKJH=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__BKJH=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__BKJH=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__BKJH=static_type__NOPN(__tmp__YJJH);
      } break;
      case __EXPR_XOR__: {
        __tmp__BKJH=static_type__XCSO(__tmp__YJJH);
      } break;
      };
      switch (((struct ___OBJ *)__tmp__0JJH)->__id) {
      case __LIST__: {
        __tmp__CKJH=static_type__GIQG(__tmp__0JJH);
      } break;
      case __STRING_CST__: {
        __tmp__CKJH=((__STRING_CST *)__tmp__0JJH)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__CKJH=((__EXTERNAL_C *)__tmp__0JJH)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__CKJH=((__PROTOTYPE_CST *)__tmp__0JJH)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__CKJH=((__INTEGER_CST *)__tmp__0JJH)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__CKJH=((__LOCAL *)((__READ_LOCAL *)__tmp__0JJH)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__CKJH=static_type__0N1H(__tmp__0JJH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__CKJH=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__CKJH=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__CKJH=((__REAL_CST *)__tmp__0JJH)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__CKJH=((__CHARACTER_CST *)__tmp__0JJH)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__CKJH=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__CKJH=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__CKJH=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__CKJH=static_type__MP1H(__tmp__0JJH);
      } break;
      case __EXPR_MUL__: {
        __tmp__CKJH=static_type__SP1H(__tmp__0JJH);
      } break;
      case __EXPR_DIV__: {
        __tmp__CKJH=static_type__XP1H(__tmp__0JJH);
      } break;
      case __EXPR_AND__: {
        __tmp__CKJH=static_type__2P1H(__tmp__0JJH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__CKJH=static_type__BQ1H(__tmp__0JJH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__CKJH=static_type__GQ1H(__tmp__0JJH);
      } break;
      case __PUT_TO__: {
        __tmp__CKJH=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__CKJH=static_type__PQ1H(__tmp__0JJH);
      } break;
      case __SIZE_OF__: {
        __tmp__CKJH=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__CKJH=((__CAST *)__tmp__0JJH)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__CKJH=static_type__GIKL(__tmp__0JJH);
      } break;
      case __READ_SLOT__: {
        __tmp__CKJH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0JJH)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__CKJH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0JJH)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__CKJH=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__CKJH=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__CKJH=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__CKJH=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__CKJH=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__CKJH=static_type__Z2IM(__tmp__0JJH);
      } break;
      case __EXPR_ADD__: {
        __tmp__CKJH=static_type__IXML(__tmp__0JJH);
      } break;
      case __EXPR_NOT__: {
        __tmp__CKJH=static_type__BTXM(__tmp__0JJH);
      } break;
      case __EXPR_MOD__: {
        __tmp__CKJH=static_type__5LEO(__tmp__0JJH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__CKJH=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__CKJH=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__CKJH=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__CKJH=static_type__NOPN(__tmp__0JJH);
      } break;
      case __EXPR_XOR__: {
        __tmp__CKJH=static_type__XCSO(__tmp__0JJH);
      } break;
      };
      if (((((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__BKJH)->flag__LTL &  1) !=  0)) && (! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__CKJH)->flag__LTL &  1) !=  0))) && (! is_sub_type__FW4J(__tmp__BKJH,__tmp__CKJH))) && (! is_sub_type__FW4J(__tmp__CKJH,__tmp__BKJH)))) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(__tmp__BKJH,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_461));
        append_name_in__FBYD(__tmp__CKJH,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_462));
        pos__FPIQ=Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 2,string_tmp__RB);
        put_position__ECH(pos__FPIQ);
        send_error__2FH();
      };
    };
    if (((void *)Self__4IJH->parent_itm_read__V4FC.name__TVPC == (void *)operator_equal__0V)) {
      result__AJJH=create__with__and__TWUH(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,__tmp__YJJH,__tmp__0JJH);
    } else {
      result__AJJH=create__with__and__AXUH(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,__tmp__YJJH,__tmp__0JJH);
    };
  } else {
    l_arg__BJJH=new__KFFC();
    add_last__I4PC(l_arg__BJJH,Self__4IJH->arg_second__NEQC);
    __tmp__OMJH=Self__4IJH->arg_first__MEQC;
    larg__OSQI=l_arg__BJJH;
    receiver__RSQI=NULL;
    pos_null__USQI=((__POSITION ) 0);
    itm_list__XSQI=NULL;
    itm_read__YSQI=NULL;
    is_resend__ZSQI=FALSE__;
    slot_msg__0SQI=NULL;
    is_block_value__1SQI=FALSE__;
    base__2SQI=NULL;
    args__QSQI=new__50LH();
    if (((void *)__tmp__OMJH == (void *)NULL)) {
      receiver__RSQI=read__IC5G(lookup__R23I());
    } else {
      switch (((struct ___OBJ *)__tmp__OMJH)->__id) {
      case __ITM_LIST__: {
        __tmp__NTQI=to_run_expr__D3IH(__tmp__OMJH);
      } break;
      case __ITM_LDOTS__: {
        __tmp__NTQI=to_run_expr__E0QH(__tmp__OMJH);
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__NTQI=to_run_expr__M3IH(__tmp__OMJH);
      } break;
      case __ITM_LIST_IDF__: {
        __tmp__PQ1P=((__ITM_LIST_IDF *)__tmp__OMJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 1,(&__string_328));
        put_position__ECH(__tmp__PQ1P);
        send_error__2FH();
        __tmp__NTQI=NULL;
      } break;
      case __ITM_WRITE_VALUE__: {
        __tmp__NTQI=to_run_expr__UAJH(__tmp__OMJH);
      } break;
      case __ITM_WRITE_CAST__: {
        __tmp__NTQI=to_run_expr__WDJH(__tmp__OMJH);
      } break;
      case __ITM_READ__: {
        __tmp__NTQI=to_run_expr__JGJH(__tmp__OMJH);
      } break;
      case __ITM_WRITE_CODE__: {
        __tmp__NTQI=to_run_expr__MHJH(__tmp__OMJH);
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__NTQI=to_run_expr__3IJH(__tmp__OMJH);
      } break;
      case __ITM_BINARY__: {
        __tmp__NTQI=to_run_expr__RMJH(__tmp__OMJH);
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__NTQI=to_run_expr__0XJH(__tmp__OMJH);
      } break;
      case __ITM_OLD__: {
        __tmp__NTQI=to_run_expr__5XJH(__tmp__OMJH);
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__NTQI=to_run_expr__U1JH(__tmp__OMJH);
      } break;
      case __ITM_REAL__: {
        __tmp__NTQI=to_run_expr__J3JH(__tmp__OMJH);
      } break;
      case __ITM_NUMBER__: {
        __tmp__NTQI=to_run_expr__T3JH(__tmp__OMJH);
      } break;
      case __ITM_CHARACTER__: {
        Self__HPIQ=((__ITM_CHARACTER *)__tmp__OMJH);
        __tmp__NTQI=create__char__WTMH(Self__HPIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__HPIQ->character__ED0D);
      } break;
      case __ITM_STRING__: {
        Self__IPIQ=((__ITM_STRING *)__tmp__OMJH);
        __tmp__NTQI=create__text__AUMH(Self__IPIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__IPIQ->string__QD0D);
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__NTQI=to_run_expr__J4JH(__tmp__OMJH);
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__NTQI=to_run_expr__TIKH(__tmp__OMJH);
      } break;
      case __ITM_RESULT__: {
        print__1ZE((&__string_460));
        fputc((int)('\n'),stdout);
        exit(( 1));
        __tmp__NTQI=NULL;
      } break;
      };
      receiver__RSQI=__tmp__NTQI;
      if (__tmp__OMJH==NULL) {
        __tmp__PTQI=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__OMJH)->__id) {
        case __ITM_LIST__: {
          __tmp__PTQI=((void *)__tmp__OMJH);
        } break;
        case __ITM_LDOTS__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_READ__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_BINARY__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_OLD__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_REAL__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_NUMBER__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_STRING__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__PTQI=NULL;
        } break;
        case __ITM_RESULT__: {
          __tmp__PTQI=NULL;
        } break;
        }
      };
      itm_list__XSQI=__tmp__PTQI;
      if (((void *)__tmp__PTQI != (void *)NULL)) {
        __tmp__XTQI=((void **)((__FAST_ARRAYoITM_CODEo *)((__ITM_LIST *)__tmp__PTQI)->code__G5OC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 0];
        if (__tmp__XTQI==NULL) {
          __tmp__YTQI=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__XTQI)->__id) {
          case __ITM_LIST__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_LDOTS__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_PROTOTYPE__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_LIST_IDF__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_WRITE_VALUE__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_WRITE_CAST__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_READ__: {
            __tmp__YTQI=((void *)__tmp__XTQI);
          } break;
          case __ITM_WRITE_CODE__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_READ_ARG2__: {
            __tmp__YTQI=((void *)__tmp__XTQI);
          } break;
          case __ITM_BINARY__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_READ_ARG1__: {
            __tmp__YTQI=((void *)__tmp__XTQI);
          } break;
          case __ITM_OLD__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_EXTERNAL_TYPE__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_REAL__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_NUMBER__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_CHARACTER__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_STRING__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_EXTERNAL__: {
            __tmp__YTQI=NULL;
          } break;
          case __ITM_READ_ARGS__: {
            __tmp__YTQI=((void *)__tmp__XTQI);
          } break;
          case __ITM_RESULT__: {
            __tmp__YTQI=NULL;
          } break;
          }
        };
        itm_read__YSQI=__tmp__YTQI;
      } else {
        if (__tmp__OMJH==NULL) {
          __tmp__5TQI=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__OMJH)->__id) {
          case __ITM_LIST__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_LDOTS__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_PROTOTYPE__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_LIST_IDF__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_WRITE_VALUE__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_WRITE_CAST__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_READ__: {
            __tmp__5TQI=((void *)__tmp__OMJH);
          } break;
          case __ITM_WRITE_CODE__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_READ_ARG2__: {
            __tmp__5TQI=((void *)__tmp__OMJH);
          } break;
          case __ITM_BINARY__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_READ_ARG1__: {
            __tmp__5TQI=((void *)__tmp__OMJH);
          } break;
          case __ITM_OLD__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_EXTERNAL_TYPE__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_REAL__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_NUMBER__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_CHARACTER__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_STRING__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_EXTERNAL__: {
            __tmp__5TQI=NULL;
          } break;
          case __ITM_READ_ARGS__: {
            __tmp__5TQI=((void *)__tmp__OMJH);
          } break;
          case __ITM_RESULT__: {
            __tmp__5TQI=NULL;
          } break;
          }
        };
        itm_read__YSQI=__tmp__5TQI;
      };
      if (((void *)itm_read__YSQI != (void *)NULL)) {
        __tmp__HUQI=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM)) &  511)];
        switch (((struct ___OBJ *)itm_read__YSQI)->__id) {
        case __ITM_READ__: {
          __tmp__IUQI=((__ITM_READ *)itm_read__YSQI)->name__TVPC;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__IUQI=((__ITM_READ_ARG2 *)itm_read__YSQI)->parent_itm_read__V4FC.name__TVPC;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__IUQI=((__ITM_READ_ARG1 *)itm_read__YSQI)->parent_itm_read__S5GC.name__TVPC;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__IUQI=((__ITM_READ_ARGS *)itm_read__YSQI)->parent_itm_read__J5JC.name__TVPC;
        } break;
        };
        __tmp__NUQI=search_parent__UJWH(__tmp__HUQI,__tmp__IUQI);
      } else {
        __tmp__NUQI=FALSE__;
      };
      is_resend__ZSQI=__tmp__NUQI;
    };
    switch (((struct ___OBJ *)receiver__RSQI)->__id) {
    case __LIST__: {
      __tmp__QUQI=static_type__GIQG(receiver__RSQI);
    } break;
    case __STRING_CST__: {
      __tmp__QUQI=((__STRING_CST *)receiver__RSQI)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__QUQI=((__EXTERNAL_C *)receiver__RSQI)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QUQI=((__PROTOTYPE_CST *)receiver__RSQI)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__QUQI=((__INTEGER_CST *)receiver__RSQI)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__QUQI=((__LOCAL *)((__READ_LOCAL *)receiver__RSQI)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QUQI=static_type__0N1H(receiver__RSQI);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QUQI=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QUQI=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__QUQI=((__REAL_CST *)receiver__RSQI)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__QUQI=((__CHARACTER_CST *)receiver__RSQI)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__QUQI=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QUQI=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__QUQI=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__QUQI=static_type__MP1H(receiver__RSQI);
    } break;
    case __EXPR_MUL__: {
      __tmp__QUQI=static_type__SP1H(receiver__RSQI);
    } break;
    case __EXPR_DIV__: {
      __tmp__QUQI=static_type__XP1H(receiver__RSQI);
    } break;
    case __EXPR_AND__: {
      __tmp__QUQI=static_type__2P1H(receiver__RSQI);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QUQI=static_type__BQ1H(receiver__RSQI);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QUQI=static_type__GQ1H(receiver__RSQI);
    } break;
    case __PUT_TO__: {
      __tmp__QUQI=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__QUQI=static_type__PQ1H(receiver__RSQI);
    } break;
    case __SIZE_OF__: {
      __tmp__QUQI=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__QUQI=((__CAST *)receiver__RSQI)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__QUQI=static_type__GIKL(receiver__RSQI);
    } break;
    case __READ_SLOT__: {
      __tmp__QUQI=((__SLOT_DATA *)((__READ_SLOT *)receiver__RSQI)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__QUQI=((__SLOT_DATA *)((__READ_GLOBAL *)receiver__RSQI)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QUQI=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QUQI=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QUQI=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QUQI=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QUQI=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__QUQI=static_type__Z2IM(receiver__RSQI);
    } break;
    case __EXPR_ADD__: {
      __tmp__QUQI=static_type__IXML(receiver__RSQI);
    } break;
    case __EXPR_NOT__: {
      __tmp__QUQI=static_type__BTXM(receiver__RSQI);
    } break;
    case __EXPR_MOD__: {
      __tmp__QUQI=static_type__5LEO(receiver__RSQI);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QUQI=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__QUQI=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QUQI=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__QUQI=static_type__NOPN(receiver__RSQI);
    } break;
    case __EXPR_XOR__: {
      __tmp__QUQI=static_type__XCSO(receiver__RSQI);
    } break;
    };
    receiver_type__SSQI=((__TYPE_FULL *)__tmp__QUQI)->parent_type__KTL;
    if (((void *)receiver_type__SSQI == (void *)TYPE_VOID__)) {
      pos__NPIQ=Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_463));
      put_position__ECH(pos__NPIQ);
      send_error__2FH();
    };
    __tmp__2UQI=type_block__BLB;
    switch (((struct ___OBJ *)receiver_type__SSQI)->__id) {
    case __TYPE__: {
      __tmp__3UQI=((void *)((__TYPE *)receiver_type__SSQI) == (void *)__tmp__2UQI);
    } break;
    case __TYPE_NULL__: {
      __tmp__3UQI=((void *)((__TYPE_NULL *)receiver_type__SSQI) == (void *)__tmp__2UQI);
    } break;
    case __TYPE_VOID__: {
      __tmp__3UQI=((void *)((__TYPE_VOID *)receiver_type__SSQI) == (void *)__tmp__2UQI);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__3UQI=((void *)((__TYPE_CONTEXT *)receiver_type__SSQI) == (void *)__tmp__2UQI);
    } break;
    case __TYPE_ID__: {
      __tmp__3UQI=((void *)((__TYPE_ID *)receiver_type__SSQI) == (void *)__tmp__2UQI);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__3UQI=((void *)((__TYPE_GENERIC *)receiver_type__SSQI) == (void *)__tmp__2UQI);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__3UQI=__infix_equal_equal__GSFJ(receiver_type__SSQI,__tmp__2UQI);
    } break;
    };
    if ((__tmp__3UQI && ((void *)Self__4IJH->parent_itm_read__V4FC.name__TVPC == (void *)(&__string_79)))) {
      is_block_value__1SQI=TRUE__;
    } else {
      __tmp__SVQI=Self__4IJH->parent_itm_read__V4FC.name__TVPC;
      switch (((struct ___OBJ *)receiver_type__SSQI)->__id) {
      case __TYPE__: {
        __tmp__TVQI=get_slot__U1BG(receiver_type__SSQI,__tmp__SVQI);
      } break;
      case __TYPE_NULL__: {
        __tmp__TVQI=get_slot__K3BG(receiver_type__SSQI,__tmp__SVQI);
      } break;
      case __TYPE_VOID__: {
        __tmp__TVQI=get_slot__A5BG(receiver_type__SSQI,__tmp__SVQI);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__TVQI=get_slot__WACG(receiver_type__SSQI,__tmp__SVQI);
      } break;
      case __TYPE_ID__: {
        __tmp__TVQI=get_slot__MCCG(receiver_type__SSQI,__tmp__SVQI);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__TVQI=get_slot__CECG(receiver_type__SSQI,__tmp__SVQI);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__TVQI=get_slot__VXEJ(__tmp__SVQI);
      } break;
      };
      slot_msg__0SQI=__tmp__TVQI;
      if (((void *)__tmp__TVQI == (void *)NULL)) {
        copy__BNK(string_tmp__RB,(&__string_456));
        append__MOK(string_tmp__RB,Self__4IJH->parent_itm_read__V4FC.name__TVPC);
        append__MOK(string_tmp__RB,(&__string_464));
        switch (((struct ___OBJ *)receiver_type__SSQI)->__id) {
        case __TYPE__: {
          append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)receiver_type__SSQI)->prototype__RD)->parent_named__QD.name__1QB);
        } break;
        case __TYPE_NULL__: {
          append__MOK(string_tmp__RB,(&__string_59));
        } break;
        case __TYPE_VOID__: {
          append__MOK(string_tmp__RB,(&__string_2));
        } break;
        case __TYPE_CONTEXT__: {
          append__MOK(string_tmp__RB,(&__string_44));
        } break;
        case __TYPE_ID__: {
          append__MOK(string_tmp__RB,(&__string_46));
        } break;
        case __TYPE_GENERIC__: {
          append__MOK(string_tmp__RB,((__TYPE_GENERIC *)receiver_type__SSQI)->name__2R2B);
        } break;
        case __PROFIL_BLOCK__: {
          append__MOK(string_tmp__RB,(&__string_39));
        } break;
        };
        append__MOK(string_tmp__RB,(&__string_465));
        pos__TA4I=Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(pos__TA4I);
        send_error__2FH();
      };
      if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
        __tmp__FWQI=((__SLOT *)((__SLOT_DATA *)__tmp__TVQI)->parent_slot__BJZD)->slot_data_intern__1JZD;
      } else {
        __tmp__FWQI=((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->slot_data_intern__1JZD;
      };
      if (((void *)__tmp__FWQI != (void *)NULL)) {
        if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
          __tmp__LWQI=((__SLOT *)((__SLOT_DATA *)__tmp__TVQI)->parent_slot__BJZD)->slot_data_intern__1JZD;
        } else {
          __tmp__LWQI=((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->slot_data_intern__1JZD;
        };
        __tmp__NWQI=((__TYPE_FULL *)((__SLOT_DATA *)__tmp__LWQI)->parent_variable__AJZD.type__125F)->parent_type__KTL;
        __tmp__OWQI=type_block__BLB;
        switch (((struct ___OBJ *)__tmp__NWQI)->__id) {
        case __TYPE__: {
          __tmp__PWQI=((void *)((__TYPE *)__tmp__NWQI) == (void *)__tmp__OWQI);
        } break;
        case __TYPE_NULL__: {
          __tmp__PWQI=((void *)((__TYPE_NULL *)__tmp__NWQI) == (void *)__tmp__OWQI);
        } break;
        case __TYPE_VOID__: {
          __tmp__PWQI=((void *)((__TYPE_VOID *)__tmp__NWQI) == (void *)__tmp__OWQI);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__PWQI=((void *)((__TYPE_CONTEXT *)__tmp__NWQI) == (void *)__tmp__OWQI);
        } break;
        case __TYPE_ID__: {
          __tmp__PWQI=((void *)((__TYPE_ID *)__tmp__NWQI) == (void *)__tmp__OWQI);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__PWQI=((void *)((__TYPE_GENERIC *)__tmp__NWQI) == (void *)__tmp__OWQI);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__PWQI=__infix_equal_equal__GSFJ(__tmp__NWQI,__tmp__OWQI);
        } break;
        };
        __tmp__SWQI=__tmp__PWQI;
      } else {
        __tmp__SWQI=FALSE__;
      };
      if (__tmp__SWQI) {
        if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
          __tmp__YWQI=slot_data__Z4TH(__tmp__TVQI);
        } else {
          __tmp__YWQI=slot_data__T5TH(__tmp__TVQI);
        };
        init__C4OG(__tmp__YWQI);
      };
      if (verify__JDAG) {
        if (((void *)l_arg__BJJH == (void *)NULL)) {
          if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
            __tmp__GXQI=((__SLOT *)((__SLOT_DATA *)__tmp__TVQI)->parent_slot__BJZD)->base_slot__P22F;
          } else {
            __tmp__GXQI=((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->base_slot__P22F;
          };
          __tmp__LXQI=((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__GXQI)->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) !=  1);
        } else {
          __tmp__LXQI=FALSE__;
        };
        if (__tmp__LXQI) {
          __tmp__BYQI=TRUE__;
        } else {
          if (((void *)l_arg__BJJH != (void *)NULL)) {
            __tmp__WXQI=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_arg__BJJH)->parent_arrayed_collection__AFEC.upper__ZAPC +  1);
            if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
              __tmp__XXQI=((__SLOT *)((__SLOT_DATA *)__tmp__TVQI)->parent_slot__BJZD)->base_slot__P22F;
            } else {
              __tmp__XXQI=((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->base_slot__P22F;
            };
            __tmp__4XQI=(__tmp__WXQI != (__INTEGER)((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__XXQI)->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) -  1));
          } else {
            __tmp__4XQI=FALSE__;
          };
          __tmp__BYQI=__tmp__4XQI;
        };
        if (__tmp__BYQI) {
          put_error__text__0AH( 1,(&__string_466));
          if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
            __tmp__KYQI=((__SLOT_DATA *)__tmp__TVQI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__KYQI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__KYQI);
          put_position__ECH(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
          __tmp__QYQI=((__SLOT_DATA *)__tmp__TVQI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__QYQI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        last_position__GG1=__tmp__QYQI;
        if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
          __tmp__RYQI=id_section__UG4F(__tmp__TVQI);
        } else {
          __tmp__RYQI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if ((! access__with__2QMM(__tmp__RYQI,receiver_type__SSQI,((__TYPE_FULL *)to_run__MPXD())->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_467));
          append_name_in__FBYD(to_run__MPXD(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_468));
          put_error__text__0AH( 2,string_tmp__RB);
          if (((struct ___OBJ *)__tmp__TVQI)->__id==__SLOT_DATA__) {
            __tmp__EZQI=((__SLOT_DATA *)__tmp__TVQI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__EZQI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__TVQI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__EZQI);
          put_position__ECH(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
          send_error__2FH();
        };
        last_position__GG1=pos_null__USQI;
      };
    };
    add_arg__to__in__for__block__ELWI(receiver__RSQI, 0,args__QSQI,slot_msg__0SQI,is_block_value__1SQI);
    if (receiver__RSQI==NULL) {
      __tmp__OZQI=NULL;
    } else {
      switch (((struct ___OBJ *)receiver__RSQI)->__id) {
      case __LIST__: {
        __tmp__OZQI=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__OZQI=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__OZQI=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__OZQI=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__OZQI=((void *)receiver__RSQI);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__OZQI=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__OZQI=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__OZQI=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__OZQI=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__OZQI=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__OZQI=NULL;
      } break;
      case __ITEM__: {
        __tmp__OZQI=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__OZQI=NULL;
      } break;
      case __CAST__: {
        __tmp__OZQI=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__OZQI=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__OZQI=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__OZQI=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__OZQI=NULL;
      } break;
      }
    };
    em__TSQI=__tmp__OZQI;
    if (((void *)__tmp__OZQI != (void *)NULL)) {
      receiver__RSQI=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__OZQI)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    };
    if (((void *)l_arg__BJJH != (void *)NULL)) {
      __tmp__A0QI=((__FAST_ARRAYoITM_CODEo *)l_arg__BJJH)->parent_arrayed_collection__AFEC.upper__ZAPC;
      Self__YB4I= 0;
      while ((Self__YB4I <= __tmp__A0QI)) {
        __tmp__G0QI=((void **)((__FAST_ARRAYoITM_CODEo *)larg__OSQI)->parent_arrayed_collection__AFEC.storage__ACPC)[Self__YB4I];
        switch (((struct ___OBJ *)__tmp__G0QI)->__id) {
        case __ITM_LIST__: {
          __tmp__H0QI=to_run_expr__D3IH(__tmp__G0QI);
        } break;
        case __ITM_LDOTS__: {
          __tmp__H0QI=to_run_expr__E0QH(__tmp__G0QI);
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__H0QI=to_run_expr__M3IH(__tmp__G0QI);
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__RR1P=((__ITM_LIST_IDF *)__tmp__G0QI)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 1,(&__string_328));
          put_position__ECH(__tmp__RR1P);
          send_error__2FH();
          __tmp__H0QI=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__H0QI=to_run_expr__UAJH(__tmp__G0QI);
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__H0QI=to_run_expr__WDJH(__tmp__G0QI);
        } break;
        case __ITM_READ__: {
          __tmp__H0QI=to_run_expr__JGJH(__tmp__G0QI);
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__H0QI=to_run_expr__MHJH(__tmp__G0QI);
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__H0QI=to_run_expr__3IJH(__tmp__G0QI);
        } break;
        case __ITM_BINARY__: {
          __tmp__H0QI=to_run_expr__RMJH(__tmp__G0QI);
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__H0QI=to_run_expr__0XJH(__tmp__G0QI);
        } break;
        case __ITM_OLD__: {
          __tmp__H0QI=to_run_expr__5XJH(__tmp__G0QI);
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__H0QI=to_run_expr__U1JH(__tmp__G0QI);
        } break;
        case __ITM_REAL__: {
          __tmp__H0QI=to_run_expr__J3JH(__tmp__G0QI);
        } break;
        case __ITM_NUMBER__: {
          __tmp__H0QI=to_run_expr__T3JH(__tmp__G0QI);
        } break;
        case __ITM_CHARACTER__: {
          Self__YPIQ=((__ITM_CHARACTER *)__tmp__G0QI);
          __tmp__H0QI=create__char__WTMH(Self__YPIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__YPIQ->character__ED0D);
        } break;
        case __ITM_STRING__: {
          Self__ZPIQ=((__ITM_STRING *)__tmp__G0QI);
          __tmp__H0QI=create__text__AUMH(Self__ZPIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__ZPIQ->string__QD0D);
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__H0QI=to_run_expr__J4JH(__tmp__G0QI);
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__H0QI=to_run_expr__TIKH(__tmp__G0QI);
        } break;
        case __ITM_RESULT__: {
          print__1ZE((&__string_460));
          fputc((int)('\n'),stdout);
          exit(( 1));
          __tmp__H0QI=NULL;
        } break;
        };
        add_arg__to__in__for__block__ELWI(__tmp__H0QI,(__INTEGER)(Self__YB4I +  1),args__QSQI,slot_msg__0SQI,is_block_value__1SQI);
        Self__YB4I=(__INTEGER)(Self__YB4I +  1);
      };
    };
    if (is_block_value__1SQI) {
      args__QSQI=copy__QGTH(args__QSQI);
      __tmp__U0QI=((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
      switch (((struct ___OBJ *)__tmp__U0QI)->__id) {
      case __LIST__: {
        __tmp__V0QI=my_copy__2HYM(__tmp__U0QI);
      } break;
      case __STRING_CST__: {
        Self__2PIQ=((__STRING_CST *)__tmp__U0QI);
        __tmp__V0QI=create__text__AUMH(Self__2PIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2PIQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__V0QI=my_copy__2K2H(__tmp__U0QI);
      } break;
      case __PROTOTYPE_CST__: {
        Self__3PIQ=((__PROTOTYPE_CST *)__tmp__U0QI);
        __tmp__V0QI=create__type__CLQC(Self__3PIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3PIQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__4PIQ=((__INTEGER_CST *)__tmp__U0QI);
        __tmp__V0QI=create__value__type__DNQC(Self__4PIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4PIQ->value__PAZD,Self__4PIQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__V0QI=my_copy__OAFJ(__tmp__U0QI);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__V0QI=my_copy__KM2H(__tmp__U0QI);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__V0QI=my_copy__DN2H(__tmp__U0QI);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__V0QI=my_copy__QN2H(__tmp__U0QI);
      } break;
      case __REAL_CST__: {
        Self__AQIQ=((__REAL_CST *)__tmp__U0QI);
        __tmp__V0QI=create__value__type__1SMH(Self__AQIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AQIQ->value__5N2H,Self__AQIQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__CQIQ=((__CHARACTER_CST *)__tmp__U0QI);
        __tmp__V0QI=create__char__WTMH(Self__CQIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CQIQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__DQIQ=((__IS_EXPANDED *)__tmp__U0QI);
        __tmp__V0QI=create__receiver__WRWH(Self__DQIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__DQIQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__V0QI=my_copy__TO2H(__tmp__U0QI);
      } break;
      case __EXPR_SUP__: {
        __tmp__V0QI=my_copy__2O2H(__tmp__U0QI);
      } break;
      case __EXPR_SUB__: {
        __tmp__V0QI=my_copy__HP2H(__tmp__U0QI);
      } break;
      case __EXPR_MUL__: {
        __tmp__V0QI=my_copy__TP2H(__tmp__U0QI);
      } break;
      case __EXPR_DIV__: {
        __tmp__V0QI=my_copy__4P2H(__tmp__U0QI);
      } break;
      case __EXPR_AND__: {
        __tmp__V0QI=my_copy__JQ2H(__tmp__U0QI);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__V0QI=my_copy__UQ2H(__tmp__U0QI);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__V0QI=my_copy__5Q2H(__tmp__U0QI);
      } break;
      case __PUT_TO__: {
        __tmp__V0QI=my_copy__KR2H(__tmp__U0QI);
      } break;
      case __ITEM__: {
        __tmp__V0QI=my_copy__1R2H(__tmp__U0QI);
      } break;
      case __SIZE_OF__: {
        __tmp__V0QI=my_copy__HS2H(__tmp__U0QI);
      } break;
      case __CAST__: {
        __tmp__V0QI=my_copy__QS2H(__tmp__U0QI);
      } break;
      case __CALL_SLOT__: {
        __tmp__V0QI=my_copy__PIYM(__tmp__U0QI);
      } break;
      case __READ_SLOT__: {
        __tmp__V0QI=my_copy__AVGK(__tmp__U0QI);
      } break;
      case __READ_GLOBAL__: {
        __tmp__V0QI=my_copy__NVGK(__tmp__U0QI);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__V0QI=my_copy__RFCN(__tmp__U0QI);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__V0QI=my_copy__JMEO(__tmp__U0QI);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__V0QI=my_copy__RTJO(__tmp__U0QI);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__V0QI=my_copy__WMEO(__tmp__U0QI);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__V0QI=my_copy__3TJO(__tmp__U0QI);
      } break;
      case __EXPR_NEG__: {
        __tmp__V0QI=my_copy__YEJM(__tmp__U0QI);
      } break;
      case __EXPR_ADD__: {
        __tmp__V0QI=my_copy__YRLL(__tmp__U0QI);
      } break;
      case __EXPR_NOT__: {
        __tmp__V0QI=my_copy__GLYM(__tmp__U0QI);
      } break;
      case __EXPR_MOD__: {
        __tmp__V0QI=my_copy__BNEO(__tmp__U0QI);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__V0QI=my_copy__M3DP(__tmp__U0QI);
      } break;
      case __EXPR_INF__: {
        __tmp__V0QI=my_copy__PBSN(__tmp__U0QI);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__V0QI=my_copy__0BSN(__tmp__U0QI);
      } break;
      case __EXPR_OR__: {
        __tmp__V0QI=my_copy__ZOPN(__tmp__U0QI);
      } break;
      case __EXPR_XOR__: {
        __tmp__V0QI=my_copy__CYSO(__tmp__U0QI);
      } break;
      };
      ((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__V0QI;
      base__2SQI=new_block__receiver__with__1GTH(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,receiver__RSQI,args__QSQI);
      __tmp__00QI=TRUE__;
    } else {
      __tmp__00QI=FALSE__;
    };
    if ((! __tmp__00QI)) {
      if (((__INTEGER)(((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.upper__USSH +  1) ==  1)) {
        if (is_resend__ZSQI) {
          ((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__IC5G(lookup__R23I());
          __tmp__R1QI=((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
          switch (((struct ___OBJ *)__tmp__R1QI)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__R1QI);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__R1QI);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__EQIQ=((__READ_LOCAL *)__tmp__R1QI);
            unread__YVJK(Self__EQIQ->local__ALZD,Self__EQIQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__R1QI);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__R1QI);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__R1QI);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__GQIQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__R1QI)->receiver__OO2H);
            unread__YVJK(Self__GQIQ->local__ALZD,Self__GQIQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__R1QI);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__R1QI);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__R1QI);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__R1QI);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__R1QI);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__R1QI);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__R1QI);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__R1QI);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__R1QI);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__R1QI);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__R1QI);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__R1QI);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__R1QI);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__R1QI);
          } break;
          case __READ_GLOBAL__: {
            Self__HQIQ=((__READ_GLOBAL *)__tmp__R1QI);
            unread__15ML(Self__HQIQ->global__RHJK,Self__HQIQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__R1QI);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__R1QI);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__R1QI);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__R1QI);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__R1QI);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__R1QI);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__R1QI);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__R1QI);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__R1QI);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__R1QI);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__R1QI);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__R1QI);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__R1QI);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__R1QI);
          } break;
          };
        };
        if (((verify__JDAG & is_all_warning__2BB) && __infix_equal_equal__TKW(Self__4IJH->parent_itm_read__V4FC.name__TVPC,(&__string_469)))) {
          copy__BNK(string_tmp__RB,(&__string_470));
          append__MOK(string_tmp__RB,((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB);
          append__MOK(string_tmp__RB,(&__string_471));
          switch (((struct ___OBJ *)receiver__RSQI)->__id) {
          case __LIST__: {
            __tmp__T2QI=static_type__GIQG(receiver__RSQI);
          } break;
          case __STRING_CST__: {
            __tmp__T2QI=((__STRING_CST *)receiver__RSQI)->parent_constant__5F.static_type__F4YD;
          } break;
          case __EXTERNAL_C__: {
            __tmp__T2QI=((__EXTERNAL_C *)receiver__RSQI)->static_type__UXZD;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__T2QI=((__PROTOTYPE_CST *)receiver__RSQI)->parent_constant__E3LC.static_type__F4YD;
          } break;
          case __INTEGER_CST__: {
            __tmp__T2QI=((__INTEGER_CST *)receiver__RSQI)->parent_constant__P3LC.static_type__F4YD;
          } break;
          case __READ_LOCAL__: {
            __tmp__T2QI=((__LOCAL *)((__READ_LOCAL *)receiver__RSQI)->local__ALZD)->parent_variable__B2LC.type__125F;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__T2QI=static_type__0N1H(receiver__RSQI);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__T2QI=static_type__TO1H();
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__T2QI=static_type__YO1H();
          } break;
          case __REAL_CST__: {
            __tmp__T2QI=((__REAL_CST *)receiver__RSQI)->parent_constant__M3JH.static_type__F4YD;
          } break;
          case __CHARACTER_CST__: {
            __tmp__T2QI=((__CHARACTER_CST *)receiver__RSQI)->parent_constant__53JH.static_type__F4YD;
          } break;
          case __IS_EXPANDED__: {
            __tmp__T2QI=static_type__3O1H();
          } break;
          case __GET_TYPE_ID__: {
            __tmp__T2QI=static_type__CP1H();
          } break;
          case __EXPR_SUP__: {
            __tmp__T2QI=static_type__HP1H();
          } break;
          case __EXPR_SUB__: {
            __tmp__T2QI=static_type__MP1H(receiver__RSQI);
          } break;
          case __EXPR_MUL__: {
            __tmp__T2QI=static_type__SP1H(receiver__RSQI);
          } break;
          case __EXPR_DIV__: {
            __tmp__T2QI=static_type__XP1H(receiver__RSQI);
          } break;
          case __EXPR_AND__: {
            __tmp__T2QI=static_type__2P1H(receiver__RSQI);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__T2QI=static_type__BQ1H(receiver__RSQI);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__T2QI=static_type__GQ1H(receiver__RSQI);
          } break;
          case __PUT_TO__: {
            __tmp__T2QI=TYPE_VOID__->parent_type__UIB.default__AKC;
          } break;
          case __ITEM__: {
            __tmp__T2QI=static_type__PQ1H(receiver__RSQI);
          } break;
          case __SIZE_OF__: {
            __tmp__T2QI=static_type__1Q1H();
          } break;
          case __CAST__: {
            __tmp__T2QI=((__CAST *)receiver__RSQI)->static_type__SO1H;
          } break;
          case __CALL_SLOT__: {
            __tmp__T2QI=static_type__GIKL(receiver__RSQI);
          } break;
          case __READ_SLOT__: {
            __tmp__T2QI=((__SLOT_DATA *)((__READ_SLOT *)receiver__RSQI)->slot__EVGK)->parent_variable__AJZD.type__125F;
          } break;
          case __READ_GLOBAL__: {
            __tmp__T2QI=((__SLOT_DATA *)((__READ_GLOBAL *)receiver__RSQI)->global__RHJK)->parent_variable__AJZD.type__125F;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__T2QI=static_type__JRZM();
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__T2QI=static_type__VLEO();
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__T2QI=static_type__LVIO();
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__T2QI=static_type__0LEO();
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__T2QI=static_type__RVIO();
          } break;
          case __EXPR_NEG__: {
            __tmp__T2QI=static_type__Z2IM(receiver__RSQI);
          } break;
          case __EXPR_ADD__: {
            __tmp__T2QI=static_type__IXML(receiver__RSQI);
          } break;
          case __EXPR_NOT__: {
            __tmp__T2QI=static_type__BTXM(receiver__RSQI);
          } break;
          case __EXPR_MOD__: {
            __tmp__T2QI=static_type__5LEO(receiver__RSQI);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__T2QI=static_type__W2DP();
          } break;
          case __EXPR_INF__: {
            __tmp__T2QI=static_type__FQQN();
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__T2QI=static_type__KQQN();
          } break;
          case __EXPR_OR__: {
            __tmp__T2QI=static_type__NOPN(receiver__RSQI);
          } break;
          case __EXPR_XOR__: {
            __tmp__T2QI=static_type__XCSO(receiver__RSQI);
          } break;
          };
          append_name_in__FBYD(__tmp__T2QI,string_tmp__RB);
          pos__PBIN=Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 2,string_tmp__RB);
          put_position__ECH(pos__PBIN);
          send_error__2FH();
        };
        base__2SQI=new_read__slot__receiver__self__YLQC(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__0SQI,receiver__RSQI,((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]);
        free__C4LH(args__QSQI);
      } else {
        if (is_resend__ZSQI) {
          ((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__IC5G(lookup__R23I());
        } else {
          __tmp__U3QI=((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
          switch (((struct ___OBJ *)__tmp__U3QI)->__id) {
          case __LIST__: {
            __tmp__V3QI=my_copy__2HYM(__tmp__U3QI);
          } break;
          case __STRING_CST__: {
            Self__IQIQ=((__STRING_CST *)__tmp__U3QI);
            __tmp__V3QI=create__text__AUMH(Self__IQIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IQIQ->string__ZK2H);
          } break;
          case __EXTERNAL_C__: {
            __tmp__V3QI=my_copy__2K2H(__tmp__U3QI);
          } break;
          case __PROTOTYPE_CST__: {
            Self__JQIQ=((__PROTOTYPE_CST *)__tmp__U3QI);
            __tmp__V3QI=create__type__CLQC(Self__JQIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JQIQ->parent_constant__E3LC.static_type__F4YD);
          } break;
          case __INTEGER_CST__: {
            Self__KQIQ=((__INTEGER_CST *)__tmp__U3QI);
            __tmp__V3QI=create__value__type__DNQC(Self__KQIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KQIQ->value__PAZD,Self__KQIQ->parent_constant__P3LC.static_type__F4YD);
          } break;
          case __READ_LOCAL__: {
            __tmp__V3QI=my_copy__OAFJ(__tmp__U3QI);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__V3QI=my_copy__KM2H(__tmp__U3QI);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__V3QI=my_copy__DN2H(__tmp__U3QI);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__V3QI=my_copy__QN2H(__tmp__U3QI);
          } break;
          case __REAL_CST__: {
            Self__MQIQ=((__REAL_CST *)__tmp__U3QI);
            __tmp__V3QI=create__value__type__1SMH(Self__MQIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MQIQ->value__5N2H,Self__MQIQ->parent_constant__M3JH.static_type__F4YD);
          } break;
          case __CHARACTER_CST__: {
            Self__OQIQ=((__CHARACTER_CST *)__tmp__U3QI);
            __tmp__V3QI=create__char__WTMH(Self__OQIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OQIQ->text__HO2H);
          } break;
          case __IS_EXPANDED__: {
            Self__PQIQ=((__IS_EXPANDED *)__tmp__U3QI);
            __tmp__V3QI=create__receiver__WRWH(Self__PQIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__PQIQ->receiver__OO2H));
          } break;
          case __GET_TYPE_ID__: {
            __tmp__V3QI=my_copy__TO2H(__tmp__U3QI);
          } break;
          case __EXPR_SUP__: {
            __tmp__V3QI=my_copy__2O2H(__tmp__U3QI);
          } break;
          case __EXPR_SUB__: {
            __tmp__V3QI=my_copy__HP2H(__tmp__U3QI);
          } break;
          case __EXPR_MUL__: {
            __tmp__V3QI=my_copy__TP2H(__tmp__U3QI);
          } break;
          case __EXPR_DIV__: {
            __tmp__V3QI=my_copy__4P2H(__tmp__U3QI);
          } break;
          case __EXPR_AND__: {
            __tmp__V3QI=my_copy__JQ2H(__tmp__U3QI);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__V3QI=my_copy__UQ2H(__tmp__U3QI);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__V3QI=my_copy__5Q2H(__tmp__U3QI);
          } break;
          case __PUT_TO__: {
            __tmp__V3QI=my_copy__KR2H(__tmp__U3QI);
          } break;
          case __ITEM__: {
            __tmp__V3QI=my_copy__1R2H(__tmp__U3QI);
          } break;
          case __SIZE_OF__: {
            __tmp__V3QI=my_copy__HS2H(__tmp__U3QI);
          } break;
          case __CAST__: {
            __tmp__V3QI=my_copy__QS2H(__tmp__U3QI);
          } break;
          case __CALL_SLOT__: {
            __tmp__V3QI=my_copy__PIYM(__tmp__U3QI);
          } break;
          case __READ_SLOT__: {
            __tmp__V3QI=my_copy__AVGK(__tmp__U3QI);
          } break;
          case __READ_GLOBAL__: {
            __tmp__V3QI=my_copy__NVGK(__tmp__U3QI);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__V3QI=my_copy__RFCN(__tmp__U3QI);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__V3QI=my_copy__JMEO(__tmp__U3QI);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__V3QI=my_copy__RTJO(__tmp__U3QI);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__V3QI=my_copy__WMEO(__tmp__U3QI);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__V3QI=my_copy__3TJO(__tmp__U3QI);
          } break;
          case __EXPR_NEG__: {
            __tmp__V3QI=my_copy__YEJM(__tmp__U3QI);
          } break;
          case __EXPR_ADD__: {
            __tmp__V3QI=my_copy__YRLL(__tmp__U3QI);
          } break;
          case __EXPR_NOT__: {
            __tmp__V3QI=my_copy__GLYM(__tmp__U3QI);
          } break;
          case __EXPR_MOD__: {
            __tmp__V3QI=my_copy__BNEO(__tmp__U3QI);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__V3QI=my_copy__M3DP(__tmp__U3QI);
          } break;
          case __EXPR_INF__: {
            __tmp__V3QI=my_copy__PBSN(__tmp__U3QI);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__V3QI=my_copy__0BSN(__tmp__U3QI);
          } break;
          case __EXPR_OR__: {
            __tmp__V3QI=my_copy__ZOPN(__tmp__U3QI);
          } break;
          case __EXPR_XOR__: {
            __tmp__V3QI=my_copy__CYSO(__tmp__U3QI);
          } break;
          };
          ((void **)((__FAST_ARRAYoEXPRo *)args__QSQI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__V3QI;
        };
        args__QSQI=copy__QGTH(args__QSQI);
        base__2SQI=new_read__slot__receiver__with__YOWH(Self__4IJH->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__0SQI,receiver__RSQI,args__QSQI);
      };
    };
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,base__2SQI);
    if (((void *)l_arg__BJJH != (void *)NULL)) {
      free__MQFC(l_arg__BJJH);
    };
    result__AJJH=result_expr__PVDI(base__2SQI);
  };
  return(result__AJJH);
}

static void* to_run_expr__RMJH(__ITM_BINARY *Self__SMJH)
// ({ITM_BINARY}) With resultRecursive, No inlinable.
{
  __INTEGER max_pos__UMJH,max_lev__VMJH,__tmp__VNJH,Self__Z2LH;
  __INTEGER __tmp__GOJH,Self__J3LH,j__KOJH,__tmp__VPJH,Self__4H2I;
  __INTEGER __tmp__KQJH,__tmp__LQJH,__tmp__ORJH,Self__Z0WI,__tmp__ZSJH;
  __INTEGER __tmp__ATJH,__tmp__0TJH,__tmp__TUJH,__tmp__4JHK,i__QSMK;
  __INTEGER __tmp__P2WI,i__FN1I,__tmp__R3WI,i__YQ1I,__tmp__XXJH;
  __INTEGER __tmp__ALHK,i__DWMK,new_capacity__Z1DI,__tmp__B3DI;
  __INTEGER __tmp__CKIJ,Self__0ANK;
  void *max_pri__WMJH,*nam__BNJH,*__tmp__GTJH,*__tmp__1TJH,*__tmp__3UJH;
  void *val__ZMJH,*extern__DNJH,*__tmp__3NJH,*__tmp__PXJH,*__tmp__QXJH;
  void *result__GNJH;
  void *typ__1MJH,*__tmp__TWJH;
  void *slo__3MJH,*slo_ref__4MJH,*__tmp__DPJH,*__tmp__2PJH,*__tmp__SUJH;
  void *__tmp__2UJH,*__tmp__OXJH;
  void *site__CNJH;
  void *loc__ENJH;
  void *typ_list__0MJH;
  void *__tmp__2NJH;
  __POSITION __tmp__NS1P,__tmp__TQJH,__tmp__UQJH,__tmp__KVJH;
  __POSITION __tmp__MXJH;
  __ITM_CHARACTER *Self__QQIQ;
  __ITM_STRING *Self__RQIQ;
  void *__tmp__4NJH,*__tmp__UWJH;
  __STRING_CST *Self__DRIQ;
  __PROTOTYPE_CST *Self__ERIQ;
  __INTEGER_CST *Self__FRIQ;
  __REAL_CST *Self__HRIQ;
  __CHARACTER_CST *Self__JRIQ;
  __IS_EXPANDED *Self__KRIQ;
  void *l_arg__FNJH,*val_list__YMJH;
  void *ope_list__5MJH;
  void *pos_list__ANJH;
  void *result__31LH,*slo_list__2MJH;
  __FAST_ARRAYoFAST_ARRAYoSLOToo *Self__5CRI,*Self__VDRI,*Self__X1DI;
  __BOOLEAN __tmp__UTJH,__tmp__QTJH,__tmp__BVJH,__tmp__CVJH,__tmp__I2DI;
  __FAST_ARRAYoSLOTo *Self__UJHK;
  void **__tmp__3JHK,**Self__5RMK;
  __FAST_ARRAYoSTRING_CONSTANTo *Self__F2WI;
  void **__tmp__O2WI,**Self__UM1I;
  __FAST_ARRAYoExpanded_POSITIONo *Self__H3WI;
  __POSITION *__tmp__Q3WI,*Self__HQ1I;
  __FAST_ARRAYoEXPRo *Self__WKHK;
  void **__tmp__5KHK,**Self__SVMK;
  void **__tmp__A3DI,**new__PJIJ;
  max_pos__UMJH= 0;
  max_lev__VMJH= 0;
  max_pri__WMJH=NULL;
  val__ZMJH=NULL;
  typ__1MJH=NULL;
  slo__3MJH=NULL;
  slo_ref__4MJH=NULL;
  nam__BNJH=NULL;
  site__CNJH=NULL;
  extern__DNJH=NULL;
  loc__ENJH=NULL;
  l_arg__FNJH=NULL;
  ope_list__5MJH=new__B2GC();
  copy__CR1D(ope_list__5MJH,Self__SMJH->operator_list__PW0D);
  pos_list__ANJH=new__1XZC();
  copy__0U0D(pos_list__ANJH,Self__SMJH->position_list__NW0D);
  val_list__YMJH=new__50LH();
  typ_list__0MJH=new__XWSG();
  result__31LH=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoSLOToo *)free_list__D2LH)->parent_arrayed_collection__C2LH.upper__XXDI <  0)) {
    result__31LH=create_with_capacity__YID( 16);
  } else {
    Self__5CRI=((__FAST_ARRAYoFAST_ARRAYoSLOToo *)free_list__D2LH);
    result__31LH=((void **)Self__5CRI->parent_arrayed_collection__C2LH.storage__X2DI)[Self__5CRI->parent_arrayed_collection__C2LH.upper__XXDI];
    Self__VDRI=((__FAST_ARRAYoFAST_ARRAYoSLOToo *)free_list__D2LH);
    Self__VDRI->parent_arrayed_collection__C2LH.upper__XXDI=(__INTEGER)(Self__VDRI->parent_arrayed_collection__C2LH.upper__XXDI -  1);
  };
  slo_list__2MJH=result__31LH;
  __tmp__VNJH=((__FAST_ARRAYoITM_CODEo *)Self__SMJH->value_list__OW0D)->parent_arrayed_collection__AFEC.upper__ZAPC;
  Self__Z2LH= 0;
  while ((Self__Z2LH <= __tmp__VNJH)) {
    __tmp__2NJH=((void **)((__FAST_ARRAYoITM_CODEo *)Self__SMJH->value_list__OW0D)->parent_arrayed_collection__AFEC.storage__ACPC)[Self__Z2LH];
    switch (((struct ___OBJ *)__tmp__2NJH)->__id) {
    case __ITM_LIST__: {
      __tmp__3NJH=to_run_expr__D3IH(__tmp__2NJH);
    } break;
    case __ITM_LDOTS__: {
      __tmp__3NJH=to_run_expr__E0QH(__tmp__2NJH);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__3NJH=to_run_expr__M3IH(__tmp__2NJH);
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__NS1P=((__ITM_LIST_IDF *)__tmp__2NJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_328));
      put_position__ECH(__tmp__NS1P);
      send_error__2FH();
      __tmp__3NJH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__3NJH=to_run_expr__UAJH(__tmp__2NJH);
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__3NJH=to_run_expr__WDJH(__tmp__2NJH);
    } break;
    case __ITM_READ__: {
      __tmp__3NJH=to_run_expr__JGJH(__tmp__2NJH);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__3NJH=to_run_expr__MHJH(__tmp__2NJH);
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__3NJH=to_run_expr__3IJH(__tmp__2NJH);
    } break;
    case __ITM_BINARY__: {
      __tmp__3NJH=to_run_expr__RMJH(__tmp__2NJH);
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__3NJH=to_run_expr__0XJH(__tmp__2NJH);
    } break;
    case __ITM_OLD__: {
      __tmp__3NJH=to_run_expr__5XJH(__tmp__2NJH);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__3NJH=to_run_expr__U1JH(__tmp__2NJH);
    } break;
    case __ITM_REAL__: {
      __tmp__3NJH=to_run_expr__J3JH(__tmp__2NJH);
    } break;
    case __ITM_NUMBER__: {
      __tmp__3NJH=to_run_expr__T3JH(__tmp__2NJH);
    } break;
    case __ITM_CHARACTER__: {
      Self__QQIQ=((__ITM_CHARACTER *)__tmp__2NJH);
      __tmp__3NJH=create__char__WTMH(Self__QQIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__QQIQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__RQIQ=((__ITM_STRING *)__tmp__2NJH);
      __tmp__3NJH=create__text__AUMH(Self__RQIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__RQIQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__3NJH=to_run_expr__J4JH(__tmp__2NJH);
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__3NJH=to_run_expr__TIKH(__tmp__2NJH);
    } break;
    case __ITM_RESULT__: {
      print__1ZE((&__string_460));
      fputc((int)('\n'),stdout);
      exit(( 1));
      __tmp__3NJH=NULL;
    } break;
    };
    val__ZMJH=__tmp__3NJH;
    add_last__XSEI(val_list__YMJH,__tmp__3NJH);
    switch (((struct ___OBJ *)__tmp__3NJH)->__id) {
    case __LIST__: {
      __tmp__4NJH=static_type__GIQG(__tmp__3NJH);
    } break;
    case __STRING_CST__: {
      __tmp__4NJH=((__STRING_CST *)__tmp__3NJH)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__4NJH=((__EXTERNAL_C *)__tmp__3NJH)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__4NJH=((__PROTOTYPE_CST *)__tmp__3NJH)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__4NJH=((__INTEGER_CST *)__tmp__3NJH)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__4NJH=((__LOCAL *)((__READ_LOCAL *)__tmp__3NJH)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__4NJH=static_type__0N1H(__tmp__3NJH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__4NJH=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__4NJH=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__4NJH=((__REAL_CST *)__tmp__3NJH)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__4NJH=((__CHARACTER_CST *)__tmp__3NJH)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__4NJH=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__4NJH=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__4NJH=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__4NJH=static_type__MP1H(__tmp__3NJH);
    } break;
    case __EXPR_MUL__: {
      __tmp__4NJH=static_type__SP1H(__tmp__3NJH);
    } break;
    case __EXPR_DIV__: {
      __tmp__4NJH=static_type__XP1H(__tmp__3NJH);
    } break;
    case __EXPR_AND__: {
      __tmp__4NJH=static_type__2P1H(__tmp__3NJH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__4NJH=static_type__BQ1H(__tmp__3NJH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__4NJH=static_type__GQ1H(__tmp__3NJH);
    } break;
    case __PUT_TO__: {
      __tmp__4NJH=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__4NJH=static_type__PQ1H(__tmp__3NJH);
    } break;
    case __SIZE_OF__: {
      __tmp__4NJH=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__4NJH=((__CAST *)__tmp__3NJH)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__4NJH=static_type__GIKL(__tmp__3NJH);
    } break;
    case __READ_SLOT__: {
      __tmp__4NJH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__3NJH)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__4NJH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__3NJH)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__4NJH=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__4NJH=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__4NJH=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__4NJH=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__4NJH=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__4NJH=static_type__Z2IM(__tmp__3NJH);
    } break;
    case __EXPR_ADD__: {
      __tmp__4NJH=static_type__IXML(__tmp__3NJH);
    } break;
    case __EXPR_NOT__: {
      __tmp__4NJH=static_type__BTXM(__tmp__3NJH);
    } break;
    case __EXPR_MOD__: {
      __tmp__4NJH=static_type__5LEO(__tmp__3NJH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__4NJH=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__4NJH=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__4NJH=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__4NJH=static_type__NOPN(__tmp__3NJH);
    } break;
    case __EXPR_XOR__: {
      __tmp__4NJH=static_type__XCSO(__tmp__3NJH);
    } break;
    };
    typ__1MJH=((__TYPE_FULL *)__tmp__4NJH)->parent_type__KTL;
    add__R2EJ(typ_list__0MJH,typ__1MJH);
    Self__Z2LH=(__INTEGER)(Self__Z2LH +  1);
  };
  __tmp__GOJH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__SMJH->operator_list__PW0D)->parent_arrayed_collection__VTFC.upper__RSSD;
  Self__J3LH= 0;
  while ((Self__J3LH <= __tmp__GOJH)) {
    j__KOJH=Self__J3LH;
    nam__BNJH=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__SMJH->operator_list__PW0D)->parent_arrayed_collection__VTFC.storage__FB0D)[Self__J3LH];
    if ((((void *)nam__BNJH == (void *)operator_equal__0V) || ((void *)nam__BNJH == (void *)operator_not_equal__5V))) {
      add_last__BV2F(slo_list__2MJH,NULL);
    } else {
      typ__1MJH=((void **)((__TYPES_TMP *)typ_list__0MJH)->parent_types__W25F.storage__WWFJ)[ 0];
      switch (((struct ___OBJ *)typ__1MJH)->__id) {
      case __TYPE__: {
        __tmp__DPJH=get_slot__U1BG(typ__1MJH,nam__BNJH);
      } break;
      case __TYPE_NULL__: {
        __tmp__DPJH=get_slot__K3BG(typ__1MJH,nam__BNJH);
      } break;
      case __TYPE_VOID__: {
        __tmp__DPJH=get_slot__A5BG(typ__1MJH,nam__BNJH);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__DPJH=get_slot__WACG(typ__1MJH,nam__BNJH);
      } break;
      case __TYPE_ID__: {
        __tmp__DPJH=get_slot__MCCG(typ__1MJH,nam__BNJH);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__DPJH=get_slot__CECG(typ__1MJH,nam__BNJH);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__DPJH=get_slot__VXEJ(nam__BNJH);
      } break;
      };
      slo_ref__4MJH=__tmp__DPJH;
      if (((void *)__tmp__DPJH == (void *)NULL)) {
        error_slot__name__in__list__0G2I(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)Self__SMJH->position_list__NW0D)->parent_arrayed_collection__1TFC.storage__MA0D)[Self__J3LH],nam__BNJH,typ__1MJH,typ_list__0MJH);
      } else {
        add_last__BV2F(slo_list__2MJH,__tmp__DPJH);
        __tmp__VPJH=((__TYPES_TMP *)typ_list__0MJH)->parent_types__W25F.upper__4LAG;
        Self__4H2I= 1;
        while ((Self__4H2I <= __tmp__VPJH)) {
          typ__1MJH=((void **)((__TYPES_TMP *)typ_list__0MJH)->parent_types__W25F.storage__WWFJ)[Self__4H2I];
          switch (((struct ___OBJ *)typ__1MJH)->__id) {
          case __TYPE__: {
            __tmp__2PJH=get_slot__U1BG(typ__1MJH,nam__BNJH);
          } break;
          case __TYPE_NULL__: {
            __tmp__2PJH=get_slot__K3BG(typ__1MJH,nam__BNJH);
          } break;
          case __TYPE_VOID__: {
            __tmp__2PJH=get_slot__A5BG(typ__1MJH,nam__BNJH);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__2PJH=get_slot__WACG(typ__1MJH,nam__BNJH);
          } break;
          case __TYPE_ID__: {
            __tmp__2PJH=get_slot__MCCG(typ__1MJH,nam__BNJH);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__2PJH=get_slot__CECG(typ__1MJH,nam__BNJH);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__2PJH=get_slot__VXEJ(nam__BNJH);
          } break;
          };
          slo__3MJH=__tmp__2PJH;
          if (((void *)__tmp__2PJH == (void *)NULL)) {
            error_slot__name__in__list__0G2I(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)Self__SMJH->position_list__NW0D)->parent_arrayed_collection__1TFC.storage__MA0D)[j__KOJH],nam__BNJH,typ__1MJH,typ_list__0MJH);
          } else {
            if (((struct ___OBJ *)slo_ref__4MJH)->__id==__SLOT_DATA__) {
              __tmp__KQJH=((__ITM_SLOT *)((__SLOT *)((__SLOT_DATA *)slo_ref__4MJH)->parent_slot__BJZD)->base_slot__P22F)->priority_and_level__NHUE;
            } else {
              __tmp__KQJH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slo_ref__4MJH)->parent_slot__Y22F)->base_slot__P22F)->priority_and_level__NHUE;
            };
            if (((struct ___OBJ *)__tmp__2PJH)->__id==__SLOT_DATA__) {
              __tmp__LQJH=((__ITM_SLOT *)((__SLOT *)((__SLOT_DATA *)__tmp__2PJH)->parent_slot__BJZD)->base_slot__P22F)->priority_and_level__NHUE;
            } else {
              __tmp__LQJH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__2PJH)->parent_slot__Y22F)->base_slot__P22F)->priority_and_level__NHUE;
            };
            if ((__tmp__KQJH != __tmp__LQJH)) {
              put_error__text__0AH( 1,(&__string_472));
              if (((struct ___OBJ *)slo_ref__4MJH)->__id==__SLOT_DATA__) {
                __tmp__TQJH=((__SLOT_DATA *)slo_ref__4MJH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
              } else {
                __tmp__TQJH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slo_ref__4MJH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
              };
              put_position__ECH(__tmp__TQJH);
              if (((struct ___OBJ *)__tmp__2PJH)->__id==__SLOT_DATA__) {
                __tmp__UQJH=((__SLOT_DATA *)__tmp__2PJH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
              } else {
                __tmp__UQJH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__2PJH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
              };
              put_position__ECH(__tmp__UQJH);
              put_position__ECH(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)Self__SMJH->position_list__NW0D)->parent_arrayed_collection__1TFC.storage__MA0D)[j__KOJH]);
              send_error__2FH();
            };
          };
          Self__4H2I=(__INTEGER)(Self__4H2I +  1);
        };
      };
    };
    Self__J3LH=(__INTEGER)(Self__J3LH +  1);
  };
  while ((! (((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.upper__WSL <  0))) {
    max_lev__VMJH=(__INTEGER)(-  1);
    __tmp__ORJH=((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.upper__WSL;
    Self__Z0WI= 0;
    while ((Self__Z0WI <= __tmp__ORJH)) {
      slo__3MJH=((void **)((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.storage__SSL)[Self__Z0WI];
      if (((void *)slo__3MJH == (void *)NULL)) {
        if ((( 50 > max_lev__VMJH) || (( 50 == max_lev__VMJH) && ((void *)max_pri__WMJH == (void *)(&__string_9))))) {
          max_lev__VMJH= 50;
          max_pri__WMJH=(&__string_9);
          max_pos__UMJH=Self__Z0WI;
        };
      } else {
        if (((struct ___OBJ *)slo__3MJH)->__id==__SLOT_DATA__) {
          __tmp__ZSJH=priority__BVDJ(((__SLOT *)((__SLOT_DATA *)slo__3MJH)->parent_slot__BJZD)->base_slot__P22F);
        } else {
          __tmp__ZSJH=priority__BVDJ(((__SLOT *)((__SLOT_CODE *)slo__3MJH)->parent_slot__Y22F)->base_slot__P22F);
        };
        if ((__tmp__ZSJH > max_lev__VMJH)) {
          __tmp__UTJH=TRUE__;
        } else {
          if (((struct ___OBJ *)slo__3MJH)->__id==__SLOT_DATA__) {
            __tmp__ATJH=priority__BVDJ(((__SLOT *)((__SLOT_DATA *)slo__3MJH)->parent_slot__BJZD)->base_slot__P22F);
          } else {
            __tmp__ATJH=priority__BVDJ(((__SLOT *)((__SLOT_CODE *)slo__3MJH)->parent_slot__Y22F)->base_slot__P22F);
          };
          if ((__tmp__ATJH == max_lev__VMJH)) {
            if (((struct ___OBJ *)slo__3MJH)->__id==__SLOT_DATA__) {
              __tmp__GTJH=associativity__YGEJ(((__SLOT *)((__SLOT_DATA *)slo__3MJH)->parent_slot__BJZD)->base_slot__P22F);
            } else {
              __tmp__GTJH=associativity__YGEJ(((__SLOT *)((__SLOT_CODE *)slo__3MJH)->parent_slot__Y22F)->base_slot__P22F);
            };
            __tmp__QTJH=((void *)__tmp__GTJH == (void *)max_pri__WMJH);
          } else {
            __tmp__QTJH=FALSE__;
          };
          __tmp__UTJH=(__tmp__QTJH && ((void *)max_pri__WMJH == (void *)(&__string_9)));
        };
        if (__tmp__UTJH) {
          if (((struct ___OBJ *)slo__3MJH)->__id==__SLOT_DATA__) {
            __tmp__0TJH=priority__BVDJ(((__SLOT *)((__SLOT_DATA *)slo__3MJH)->parent_slot__BJZD)->base_slot__P22F);
          } else {
            __tmp__0TJH=priority__BVDJ(((__SLOT *)((__SLOT_CODE *)slo__3MJH)->parent_slot__Y22F)->base_slot__P22F);
          };
          max_lev__VMJH=__tmp__0TJH;
          if (((struct ___OBJ *)slo__3MJH)->__id==__SLOT_DATA__) {
            __tmp__1TJH=associativity__YGEJ(((__SLOT *)((__SLOT_DATA *)slo__3MJH)->parent_slot__BJZD)->base_slot__P22F);
          } else {
            __tmp__1TJH=associativity__YGEJ(((__SLOT *)((__SLOT_CODE *)slo__3MJH)->parent_slot__Y22F)->base_slot__P22F);
          };
          max_pri__WMJH=__tmp__1TJH;
          max_pos__UMJH=Self__Z0WI;
        };
      };
      Self__Z0WI=(__INTEGER)(Self__Z0WI +  1);
    };
    if (((max_pos__UMJH < ((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.upper__WSL) && ((void *)((void **)((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(max_pos__UMJH +  1)] != (void *)NULL))) {
      __tmp__SUJH=((void **)((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(max_pos__UMJH +  1)];
      if (((struct ___OBJ *)__tmp__SUJH)->__id==__SLOT_DATA__) {
        __tmp__TUJH=priority__BVDJ(((__SLOT *)((__SLOT_DATA *)__tmp__SUJH)->parent_slot__BJZD)->base_slot__P22F);
      } else {
        __tmp__TUJH=priority__BVDJ(((__SLOT *)((__SLOT_CODE *)__tmp__SUJH)->parent_slot__Y22F)->base_slot__P22F);
      };
      __tmp__BVJH=(__tmp__TUJH == max_lev__VMJH);
    } else {
      __tmp__BVJH=FALSE__;
    };
    if (__tmp__BVJH) {
      __tmp__2UJH=((void **)((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(max_pos__UMJH +  1)];
      if (((struct ___OBJ *)__tmp__2UJH)->__id==__SLOT_DATA__) {
        __tmp__3UJH=associativity__YGEJ(((__SLOT *)((__SLOT_DATA *)__tmp__2UJH)->parent_slot__BJZD)->base_slot__P22F);
      } else {
        __tmp__3UJH=associativity__YGEJ(((__SLOT *)((__SLOT_CODE *)__tmp__2UJH)->parent_slot__Y22F)->base_slot__P22F);
      };
      __tmp__CVJH=((void *)__tmp__3UJH != (void *)max_pri__WMJH);
    } else {
      __tmp__CVJH=FALSE__;
    };
    if (__tmp__CVJH) {
      __tmp__KVJH=((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH)->parent_arrayed_collection__1TFC.storage__MA0D)[max_pos__UMJH];
      put_error__text__0AH( 2,(&__string_473));
      put_position__ECH(__tmp__KVJH);
      send_error__2FH();
    };
    if (((void *)((void **)((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.storage__SSL)[max_pos__UMJH] == (void *)NULL)) {
      if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)ope_list__5MJH)->parent_arrayed_collection__VTFC.storage__FB0D)[max_pos__UMJH] == (void *)operator_equal__0V)) {
        extern__DNJH=create__with__and__TWUH(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH)->parent_arrayed_collection__1TFC.storage__MA0D)[max_pos__UMJH],((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[max_pos__UMJH],((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[(__INTEGER)(max_pos__UMJH +  1)]);
      } else {
        extern__DNJH=create__with__and__AXUH(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH)->parent_arrayed_collection__1TFC.storage__MA0D)[max_pos__UMJH],((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[max_pos__UMJH],((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[(__INTEGER)(max_pos__UMJH +  1)]);
      };
      __tmp__TWJH=type_boolean__VJB;
      switch (((struct ___OBJ *)__tmp__TWJH)->__id) {
      case __TYPE__: {
        __tmp__UWJH=((__TYPE *)__tmp__TWJH)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__UWJH=((__TYPE_NULL *)__tmp__TWJH)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__UWJH=((__TYPE_VOID *)__tmp__TWJH)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__UWJH=((__TYPE_CONTEXT *)__tmp__TWJH)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__UWJH=((__TYPE_ID *)__tmp__TWJH)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__UWJH=((__TYPE_GENERIC *)__tmp__TWJH)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__UWJH=((__PROFIL_BLOCK *)__tmp__TWJH)->parent_type__HHAG.default__AKC;
      } break;
      };
      loc__ENJH=create__name__style__type__25JG(((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH)->parent_arrayed_collection__1TFC.storage__MA0D)[max_pos__UMJH],(&__string_60),'+',((__TYPE_FULL *)__tmp__UWJH));
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(loc__ENJH,((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH)->parent_arrayed_collection__1TFC.storage__MA0D)[max_pos__UMJH],extern__DNJH));
      val__ZMJH=read__IC5G(loc__ENJH);
    } else {
      l_arg__FNJH=create_with_capacity__3THH( 2);
      add_last__XSEI(l_arg__FNJH,((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[max_pos__UMJH]);
      add_last__XSEI(l_arg__FNJH,((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[(__INTEGER)(max_pos__UMJH +  1)]);
      __tmp__MXJH=((__POSITION *)((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH)->parent_arrayed_collection__1TFC.storage__MA0D)[max_pos__UMJH];
      __tmp__OXJH=((void **)((__FAST_ARRAYoSLOTo *)slo_list__2MJH)->parent_arrayed_collection__ZJC.storage__SSL)[max_pos__UMJH];
      __tmp__PXJH=((void **)((__FAST_ARRAYoEXPRo *)l_arg__FNJH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
      switch (((struct ___OBJ *)__tmp__PXJH)->__id) {
      case __LIST__: {
        __tmp__QXJH=my_copy__2HYM(__tmp__PXJH);
      } break;
      case __STRING_CST__: {
        Self__DRIQ=((__STRING_CST *)__tmp__PXJH);
        __tmp__QXJH=create__text__AUMH(Self__DRIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DRIQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__QXJH=my_copy__2K2H(__tmp__PXJH);
      } break;
      case __PROTOTYPE_CST__: {
        Self__ERIQ=((__PROTOTYPE_CST *)__tmp__PXJH);
        __tmp__QXJH=create__type__CLQC(Self__ERIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ERIQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__FRIQ=((__INTEGER_CST *)__tmp__PXJH);
        __tmp__QXJH=create__value__type__DNQC(Self__FRIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FRIQ->value__PAZD,Self__FRIQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__QXJH=my_copy__OAFJ(__tmp__PXJH);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__QXJH=my_copy__KM2H(__tmp__PXJH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__QXJH=my_copy__DN2H(__tmp__PXJH);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__QXJH=my_copy__QN2H(__tmp__PXJH);
      } break;
      case __REAL_CST__: {
        Self__HRIQ=((__REAL_CST *)__tmp__PXJH);
        __tmp__QXJH=create__value__type__1SMH(Self__HRIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HRIQ->value__5N2H,Self__HRIQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__JRIQ=((__CHARACTER_CST *)__tmp__PXJH);
        __tmp__QXJH=create__char__WTMH(Self__JRIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JRIQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__KRIQ=((__IS_EXPANDED *)__tmp__PXJH);
        __tmp__QXJH=create__receiver__WRWH(Self__KRIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__KRIQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__QXJH=my_copy__TO2H(__tmp__PXJH);
      } break;
      case __EXPR_SUP__: {
        __tmp__QXJH=my_copy__2O2H(__tmp__PXJH);
      } break;
      case __EXPR_SUB__: {
        __tmp__QXJH=my_copy__HP2H(__tmp__PXJH);
      } break;
      case __EXPR_MUL__: {
        __tmp__QXJH=my_copy__TP2H(__tmp__PXJH);
      } break;
      case __EXPR_DIV__: {
        __tmp__QXJH=my_copy__4P2H(__tmp__PXJH);
      } break;
      case __EXPR_AND__: {
        __tmp__QXJH=my_copy__JQ2H(__tmp__PXJH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__QXJH=my_copy__UQ2H(__tmp__PXJH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__QXJH=my_copy__5Q2H(__tmp__PXJH);
      } break;
      case __PUT_TO__: {
        __tmp__QXJH=my_copy__KR2H(__tmp__PXJH);
      } break;
      case __ITEM__: {
        __tmp__QXJH=my_copy__1R2H(__tmp__PXJH);
      } break;
      case __SIZE_OF__: {
        __tmp__QXJH=my_copy__HS2H(__tmp__PXJH);
      } break;
      case __CAST__: {
        __tmp__QXJH=my_copy__QS2H(__tmp__PXJH);
      } break;
      case __CALL_SLOT__: {
        __tmp__QXJH=my_copy__PIYM(__tmp__PXJH);
      } break;
      case __READ_SLOT__: {
        __tmp__QXJH=my_copy__AVGK(__tmp__PXJH);
      } break;
      case __READ_GLOBAL__: {
        __tmp__QXJH=my_copy__NVGK(__tmp__PXJH);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__QXJH=my_copy__RFCN(__tmp__PXJH);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__QXJH=my_copy__JMEO(__tmp__PXJH);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__QXJH=my_copy__RTJO(__tmp__PXJH);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__QXJH=my_copy__WMEO(__tmp__PXJH);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__QXJH=my_copy__3TJO(__tmp__PXJH);
      } break;
      case __EXPR_NEG__: {
        __tmp__QXJH=my_copy__YEJM(__tmp__PXJH);
      } break;
      case __EXPR_ADD__: {
        __tmp__QXJH=my_copy__YRLL(__tmp__PXJH);
      } break;
      case __EXPR_NOT__: {
        __tmp__QXJH=my_copy__GLYM(__tmp__PXJH);
      } break;
      case __EXPR_MOD__: {
        __tmp__QXJH=my_copy__BNEO(__tmp__PXJH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__QXJH=my_copy__M3DP(__tmp__PXJH);
      } break;
      case __EXPR_INF__: {
        __tmp__QXJH=my_copy__PBSN(__tmp__PXJH);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__QXJH=my_copy__0BSN(__tmp__PXJH);
      } break;
      case __EXPR_OR__: {
        __tmp__QXJH=my_copy__ZOPN(__tmp__PXJH);
      } break;
      case __EXPR_XOR__: {
        __tmp__QXJH=my_copy__CYSO(__tmp__PXJH);
      } break;
      };
      site__CNJH=new_read__slot__receiver__with__YOWH(__tmp__MXJH,__tmp__OXJH,__tmp__QXJH,l_arg__FNJH);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,site__CNJH);
      val__ZMJH=result_expr__PVDI(site__CNJH);
    };
    Self__UJHK=((__FAST_ARRAYoSLOTo *)slo_list__2MJH);
    __tmp__3JHK=Self__UJHK->parent_arrayed_collection__ZJC.storage__SSL;
    __tmp__4JHK=Self__UJHK->parent_arrayed_collection__ZJC.upper__WSL;
    Self__5RMK=((void **)__tmp__3JHK);
    i__QSMK=max_pos__UMJH;
    while ((i__QSMK != __tmp__4JHK)) {
      Self__5RMK[i__QSMK]=Self__5RMK[(__INTEGER)(i__QSMK +  1)];
      i__QSMK=(__INTEGER)(i__QSMK +  1);
    };
    Self__UJHK->parent_arrayed_collection__ZJC.upper__WSL=(__INTEGER)(Self__UJHK->parent_arrayed_collection__ZJC.upper__WSL -  1);
    Self__F2WI=((__FAST_ARRAYoSTRING_CONSTANTo *)ope_list__5MJH);
    __tmp__O2WI=Self__F2WI->parent_arrayed_collection__VTFC.storage__FB0D;
    __tmp__P2WI=Self__F2WI->parent_arrayed_collection__VTFC.upper__RSSD;
    Self__UM1I=((void **)__tmp__O2WI);
    i__FN1I=max_pos__UMJH;
    while ((i__FN1I != __tmp__P2WI)) {
      Self__UM1I[i__FN1I]=Self__UM1I[(__INTEGER)(i__FN1I +  1)];
      i__FN1I=(__INTEGER)(i__FN1I +  1);
    };
    Self__F2WI->parent_arrayed_collection__VTFC.upper__RSSD=(__INTEGER)(Self__F2WI->parent_arrayed_collection__VTFC.upper__RSSD -  1);
    Self__H3WI=((__FAST_ARRAYoExpanded_POSITIONo *)pos_list__ANJH);
    __tmp__Q3WI=Self__H3WI->parent_arrayed_collection__1TFC.storage__MA0D;
    __tmp__R3WI=Self__H3WI->parent_arrayed_collection__1TFC.upper__VO0D;
    Self__HQ1I=((__POSITION *)__tmp__Q3WI);
    i__YQ1I=max_pos__UMJH;
    while ((i__YQ1I != __tmp__R3WI)) {
      Self__HQ1I[i__YQ1I]=Self__HQ1I[(__INTEGER)(i__YQ1I +  1)];
      i__YQ1I=(__INTEGER)(i__YQ1I +  1);
    };
    Self__H3WI->parent_arrayed_collection__1TFC.upper__VO0D=(__INTEGER)(Self__H3WI->parent_arrayed_collection__1TFC.upper__VO0D -  1);
    __tmp__XXJH=(__INTEGER)(max_pos__UMJH +  1);
    Self__WKHK=((__FAST_ARRAYoEXPRo *)val_list__YMJH);
    __tmp__5KHK=Self__WKHK->parent_arrayed_collection__42LC.storage__1SDI;
    __tmp__ALHK=Self__WKHK->parent_arrayed_collection__42LC.upper__USSH;
    Self__SVMK=((void **)__tmp__5KHK);
    i__DWMK=__tmp__XXJH;
    while ((i__DWMK != __tmp__ALHK)) {
      Self__SVMK[i__DWMK]=Self__SVMK[(__INTEGER)(i__DWMK +  1)];
      i__DWMK=(__INTEGER)(i__DWMK +  1);
    };
    Self__WKHK->parent_arrayed_collection__42LC.upper__USSH=(__INTEGER)(Self__WKHK->parent_arrayed_collection__42LC.upper__USSH -  1);
    ((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[max_pos__UMJH]=val__ZMJH;
  };
  result__GNJH=((void **)((__FAST_ARRAYoEXPRo *)val_list__YMJH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
  free__XXZC(ope_list__5MJH);
  free__XXGD(pos_list__ANJH);
  free__C4LH(val_list__YMJH);
  free__OOFJ(typ_list__0MJH);
  ((__FAST_ARRAYoSLOTo *)result__31LH)->parent_arrayed_collection__ZJC.upper__WSL=(__INTEGER)(-  1);
  Self__X1DI=((__FAST_ARRAYoFAST_ARRAYoSLOToo *)free_list__D2LH);
  new_capacity__Z1DI= 0;
  if (((__INTEGER)(Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI +  1) <= (__INTEGER)(Self__X1DI->parent_arrayed_collection__C2LH.capacity__11DI -  1))) {
    Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI=(__INTEGER)(Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI +  1);
    __tmp__I2DI=TRUE__;
  } else {
    __tmp__I2DI=FALSE__;
  };
  if ((! __tmp__I2DI)) {
    if ((Self__X1DI->parent_arrayed_collection__C2LH.capacity__11DI ==  0)) {
      Self__X1DI->parent_arrayed_collection__C2LH.storage__X2DI=create__QYXI( 2);
      Self__X1DI->parent_arrayed_collection__C2LH.capacity__11DI= 2;
      Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI= 0;
    } else {
      new_capacity__Z1DI=(__INTEGER)(Self__X1DI->parent_arrayed_collection__C2LH.capacity__11DI <<  1);
      __tmp__A3DI=Self__X1DI->parent_arrayed_collection__C2LH.storage__X2DI;
      __tmp__B3DI=Self__X1DI->parent_arrayed_collection__C2LH.capacity__11DI;
      new__PJIJ=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__A3DI)),((__UINTEGER_32 )(__INTEGER)(__tmp__B3DI * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Z1DI * ((__INTEGER )(sizeof(void *)))))));
      __tmp__CKIJ=(__INTEGER)(new_capacity__Z1DI -  1);
      Self__0ANK=__tmp__B3DI;
      while ((Self__0ANK <= __tmp__CKIJ)) {
        new__PJIJ[Self__0ANK]=NULL;
        Self__0ANK=(__INTEGER)(Self__0ANK +  1);
      };
      Self__X1DI->parent_arrayed_collection__C2LH.storage__X2DI=new__PJIJ;
      Self__X1DI->parent_arrayed_collection__C2LH.capacity__11DI=new_capacity__Z1DI;
      Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI=(__INTEGER)(Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI +  1);
    };
  };
  ((void **)Self__X1DI->parent_arrayed_collection__C2LH.storage__X2DI)[Self__X1DI->parent_arrayed_collection__C2LH.upper__XXDI]=result__31LH;
  return(result__GNJH);
}

static void* to_run_expr__0XJH(__ITM_READ_ARG1 *Self__1XJH)
// ({ITM_READ_ARG1}) With resultRecursive, No inlinable.
{
  void *__tmp__3XJH,*__tmp__Y5LH;
  void *receiver__S4LH,*__tmp__O5LH,*__tmp__WGMH,*__tmp__XGMH;
  void *__tmp__THMH,*__tmp__WJMH,*__tmp__XJMH;
  __POSITION pos_null__V4LH,pos__PRIQ,pos__1RIQ,__tmp__LEMH,__tmp__REMH;
  __POSITION __tmp__FFMH,__tmp__5POH,__tmp__AQOH,__tmp__ZQOH;
  __POSITION __tmp__YIMH;
  void *itm_list__Y4LH,*__tmp__Q5LH;
  void *itm_read__Z4LH,*__tmp__Z5LH,*__tmp__AAMH;
  void *slot_msg__14LH,*__tmp__UBMH;
  void *base__34LH;
  __ITM_CHARACTER *Self__LRIQ;
  __ITM_STRING *Self__MRIQ;
  void *__tmp__IAMH;
  void *__tmp__JAMH,*__tmp__TBMH;
  void *__tmp__RAMH,*__tmp__VIMH;
  void *receiver_type__T4LH,*__tmp__3AMH,*__tmp__OCMH,*__tmp__PCMH;
  void *__tmp__GCMH,*__tmp__MCMH,*__tmp__ZCMH;
  void *__tmp__HDMH,*__tmp__QPOH,*__tmp__2POH;
  void *__tmp__SEMH;
  __INTEGER count__TOOH,__tmp__TPOH;
  void *__tmp__VOOH,*em__SOOH,*__tmp__PFMH,*em__U4LH;
  void *__tmp__SPOH,*__tmp__4POH;
  __STRING_CST *Self__4RIQ,*Self__KSIQ;
  __PROTOTYPE_CST *Self__5RIQ,*Self__LSIQ;
  __INTEGER_CST *Self__ASIQ,*Self__MSIQ;
  __REAL_CST *Self__CSIQ,*Self__OSIQ;
  __CHARACTER_CST *Self__ESIQ,*Self__QSIQ;
  __IS_EXPANDED *Self__FSIQ,*Self__RSIQ;
  __READ_LOCAL *Self__GSIQ,*Self__ISIQ;
  __READ_GLOBAL *Self__JSIQ;
  __BOOLEAN is_resend__04LH,is_block_value__24LH,__tmp__OAMH;
  __BOOLEAN __tmp__4AMH,__tmp__QCMH,__tmp__TCMH,__tmp__GQOH,__tmp__2GMH;
  void *args__R4LH;
  __tmp__3XJH=Self__1XJH->arg__UVPC;
  receiver__S4LH=NULL;
  pos_null__V4LH=((__POSITION ) 0);
  itm_list__Y4LH=NULL;
  itm_read__Z4LH=NULL;
  is_resend__04LH=FALSE__;
  slot_msg__14LH=NULL;
  is_block_value__24LH=FALSE__;
  base__34LH=NULL;
  args__R4LH=new__50LH();
  if (((void *)__tmp__3XJH == (void *)NULL)) {
    receiver__S4LH=read__IC5G(lookup__3ATH());
  } else {
    switch (((struct ___OBJ *)__tmp__3XJH)->__id) {
    case __ITM_LIST__: {
      __tmp__O5LH=to_run_expr__D3IH(__tmp__3XJH);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__O5LH=to_run_expr__M3IH(__tmp__3XJH);
    } break;
    case __ITM_READ__: {
      __tmp__O5LH=to_run_expr__JGJH(__tmp__3XJH);
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__O5LH=to_run_expr__3IJH(__tmp__3XJH);
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__O5LH=to_run_expr__0XJH(__tmp__3XJH);
    } break;
    case __ITM_OLD__: {
      __tmp__O5LH=to_run_expr__5XJH(__tmp__3XJH);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__O5LH=to_run_expr__U1JH(__tmp__3XJH);
    } break;
    case __ITM_REAL__: {
      __tmp__O5LH=to_run_expr__J3JH(__tmp__3XJH);
    } break;
    case __ITM_NUMBER__: {
      __tmp__O5LH=to_run_expr__T3JH(__tmp__3XJH);
    } break;
    case __ITM_CHARACTER__: {
      Self__LRIQ=((__ITM_CHARACTER *)__tmp__3XJH);
      __tmp__O5LH=create__char__WTMH(Self__LRIQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__LRIQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__MRIQ=((__ITM_STRING *)__tmp__3XJH);
      __tmp__O5LH=create__text__AUMH(Self__MRIQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__MRIQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__O5LH=to_run_expr__J4JH(__tmp__3XJH);
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__O5LH=to_run_expr__TIKH(__tmp__3XJH);
    } break;
    };
    receiver__S4LH=__tmp__O5LH;
    if (__tmp__3XJH==NULL) {
      __tmp__Q5LH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__3XJH)->__id) {
      case __ITM_LIST__: {
        __tmp__Q5LH=((void *)__tmp__3XJH);
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_READ__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_OLD__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_REAL__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_NUMBER__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_CHARACTER__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_STRING__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__Q5LH=NULL;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__Q5LH=NULL;
      } break;
      }
    };
    itm_list__Y4LH=__tmp__Q5LH;
    if (((void *)__tmp__Q5LH != (void *)NULL)) {
      __tmp__Y5LH=((void **)((__FAST_ARRAYoITM_CODEo *)((__ITM_LIST *)__tmp__Q5LH)->code__G5OC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 0];
      if (__tmp__Y5LH==NULL) {
        __tmp__Z5LH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__Y5LH)->__id) {
        case __ITM_LIST__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_LDOTS__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_READ__: {
          __tmp__Z5LH=((void *)__tmp__Y5LH);
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__Z5LH=((void *)__tmp__Y5LH);
        } break;
        case __ITM_BINARY__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__Z5LH=((void *)__tmp__Y5LH);
        } break;
        case __ITM_OLD__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_REAL__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_NUMBER__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_STRING__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__Z5LH=NULL;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__Z5LH=((void *)__tmp__Y5LH);
        } break;
        case __ITM_RESULT__: {
          __tmp__Z5LH=NULL;
        } break;
        }
      };
      itm_read__Z4LH=__tmp__Z5LH;
    } else {
      if (__tmp__3XJH==NULL) {
        __tmp__AAMH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__3XJH)->__id) {
        case __ITM_LIST__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_READ__: {
          __tmp__AAMH=((void *)__tmp__3XJH);
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__AAMH=((void *)__tmp__3XJH);
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__AAMH=((void *)__tmp__3XJH);
        } break;
        case __ITM_OLD__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_REAL__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_NUMBER__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_STRING__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__AAMH=NULL;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__AAMH=((void *)__tmp__3XJH);
        } break;
        }
      };
      itm_read__Z4LH=__tmp__AAMH;
    };
    if (((void *)itm_read__Z4LH != (void *)NULL)) {
      __tmp__IAMH=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM)) &  511)];
      switch (((struct ___OBJ *)itm_read__Z4LH)->__id) {
      case __ITM_READ__: {
        __tmp__JAMH=((__ITM_READ *)itm_read__Z4LH)->name__TVPC;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__JAMH=((__ITM_READ_ARG2 *)itm_read__Z4LH)->parent_itm_read__V4FC.name__TVPC;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__JAMH=((__ITM_READ_ARG1 *)itm_read__Z4LH)->parent_itm_read__S5GC.name__TVPC;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__JAMH=((__ITM_READ_ARGS *)itm_read__Z4LH)->parent_itm_read__J5JC.name__TVPC;
      } break;
      };
      __tmp__OAMH=search_parent__UJWH(__tmp__IAMH,__tmp__JAMH);
    } else {
      __tmp__OAMH=FALSE__;
    };
    is_resend__04LH=__tmp__OAMH;
  };
  switch (((struct ___OBJ *)receiver__S4LH)->__id) {
  case __LIST__: {
    __tmp__RAMH=static_type__GIQG(receiver__S4LH);
  } break;
  case __STRING_CST__: {
    __tmp__RAMH=((__STRING_CST *)receiver__S4LH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__RAMH=((__EXTERNAL_C *)receiver__S4LH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__RAMH=((__PROTOTYPE_CST *)receiver__S4LH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__RAMH=((__INTEGER_CST *)receiver__S4LH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__RAMH=((__LOCAL *)((__READ_LOCAL *)receiver__S4LH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RAMH=static_type__0N1H(receiver__S4LH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RAMH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RAMH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__RAMH=((__REAL_CST *)receiver__S4LH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__RAMH=((__CHARACTER_CST *)receiver__S4LH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__RAMH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__RAMH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__RAMH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__RAMH=static_type__MP1H(receiver__S4LH);
  } break;
  case __EXPR_MUL__: {
    __tmp__RAMH=static_type__SP1H(receiver__S4LH);
  } break;
  case __EXPR_DIV__: {
    __tmp__RAMH=static_type__XP1H(receiver__S4LH);
  } break;
  case __EXPR_AND__: {
    __tmp__RAMH=static_type__2P1H(receiver__S4LH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RAMH=static_type__BQ1H(receiver__S4LH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RAMH=static_type__GQ1H(receiver__S4LH);
  } break;
  case __PUT_TO__: {
    __tmp__RAMH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__RAMH=static_type__PQ1H(receiver__S4LH);
  } break;
  case __SIZE_OF__: {
    __tmp__RAMH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__RAMH=((__CAST *)receiver__S4LH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__RAMH=static_type__GIKL(receiver__S4LH);
  } break;
  case __READ_SLOT__: {
    __tmp__RAMH=((__SLOT_DATA *)((__READ_SLOT *)receiver__S4LH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__RAMH=((__SLOT_DATA *)((__READ_GLOBAL *)receiver__S4LH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RAMH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RAMH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RAMH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RAMH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RAMH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__RAMH=static_type__Z2IM(receiver__S4LH);
  } break;
  case __EXPR_ADD__: {
    __tmp__RAMH=static_type__IXML(receiver__S4LH);
  } break;
  case __EXPR_NOT__: {
    __tmp__RAMH=static_type__BTXM(receiver__S4LH);
  } break;
  case __EXPR_MOD__: {
    __tmp__RAMH=static_type__5LEO(receiver__S4LH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RAMH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__RAMH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RAMH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__RAMH=static_type__NOPN(receiver__S4LH);
  } break;
  case __EXPR_XOR__: {
    __tmp__RAMH=static_type__XCSO(receiver__S4LH);
  } break;
  };
  receiver_type__T4LH=((__TYPE_FULL *)__tmp__RAMH)->parent_type__KTL;
  if (((void *)receiver_type__T4LH == (void *)TYPE_VOID__)) {
    pos__PRIQ=Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_463));
    put_position__ECH(pos__PRIQ);
    send_error__2FH();
  };
  __tmp__3AMH=type_block__BLB;
  switch (((struct ___OBJ *)receiver_type__T4LH)->__id) {
  case __TYPE__: {
    __tmp__4AMH=((void *)((__TYPE *)receiver_type__T4LH) == (void *)__tmp__3AMH);
  } break;
  case __TYPE_NULL__: {
    __tmp__4AMH=((void *)((__TYPE_NULL *)receiver_type__T4LH) == (void *)__tmp__3AMH);
  } break;
  case __TYPE_VOID__: {
    __tmp__4AMH=((void *)((__TYPE_VOID *)receiver_type__T4LH) == (void *)__tmp__3AMH);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__4AMH=((void *)((__TYPE_CONTEXT *)receiver_type__T4LH) == (void *)__tmp__3AMH);
  } break;
  case __TYPE_ID__: {
    __tmp__4AMH=((void *)((__TYPE_ID *)receiver_type__T4LH) == (void *)__tmp__3AMH);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__4AMH=((void *)((__TYPE_GENERIC *)receiver_type__T4LH) == (void *)__tmp__3AMH);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__4AMH=__infix_equal_equal__GSFJ(receiver_type__T4LH,__tmp__3AMH);
  } break;
  };
  if ((__tmp__4AMH && ((void *)Self__1XJH->parent_itm_read__S5GC.name__TVPC == (void *)(&__string_79)))) {
    is_block_value__24LH=TRUE__;
  } else {
    __tmp__TBMH=Self__1XJH->parent_itm_read__S5GC.name__TVPC;
    switch (((struct ___OBJ *)receiver_type__T4LH)->__id) {
    case __TYPE__: {
      __tmp__UBMH=get_slot__U1BG(receiver_type__T4LH,__tmp__TBMH);
    } break;
    case __TYPE_NULL__: {
      __tmp__UBMH=get_slot__K3BG(receiver_type__T4LH,__tmp__TBMH);
    } break;
    case __TYPE_VOID__: {
      __tmp__UBMH=get_slot__A5BG(receiver_type__T4LH,__tmp__TBMH);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__UBMH=get_slot__WACG(receiver_type__T4LH,__tmp__TBMH);
    } break;
    case __TYPE_ID__: {
      __tmp__UBMH=get_slot__MCCG(receiver_type__T4LH,__tmp__TBMH);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__UBMH=get_slot__CECG(receiver_type__T4LH,__tmp__TBMH);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__UBMH=get_slot__VXEJ(__tmp__TBMH);
    } break;
    };
    slot_msg__14LH=__tmp__UBMH;
    if (((void *)__tmp__UBMH == (void *)NULL)) {
      copy__BNK(string_tmp__RB,(&__string_456));
      append__MOK(string_tmp__RB,Self__1XJH->parent_itm_read__S5GC.name__TVPC);
      append__MOK(string_tmp__RB,(&__string_464));
      switch (((struct ___OBJ *)receiver_type__T4LH)->__id) {
      case __TYPE__: {
        append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)receiver_type__T4LH)->prototype__RD)->parent_named__QD.name__1QB);
      } break;
      case __TYPE_NULL__: {
        append__MOK(string_tmp__RB,(&__string_59));
      } break;
      case __TYPE_VOID__: {
        append__MOK(string_tmp__RB,(&__string_2));
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(string_tmp__RB,(&__string_44));
      } break;
      case __TYPE_ID__: {
        append__MOK(string_tmp__RB,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        append__MOK(string_tmp__RB,((__TYPE_GENERIC *)receiver_type__T4LH)->name__2R2B);
      } break;
      case __PROFIL_BLOCK__: {
        append__MOK(string_tmp__RB,(&__string_39));
      } break;
      };
      append__MOK(string_tmp__RB,(&__string_465));
      pos__1RIQ=Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,string_tmp__RB);
      put_position__ECH(pos__1RIQ);
      send_error__2FH();
    };
    if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
      __tmp__GCMH=((__SLOT *)((__SLOT_DATA *)__tmp__UBMH)->parent_slot__BJZD)->slot_data_intern__1JZD;
    } else {
      __tmp__GCMH=((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->slot_data_intern__1JZD;
    };
    if (((void *)__tmp__GCMH != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
        __tmp__MCMH=((__SLOT *)((__SLOT_DATA *)__tmp__UBMH)->parent_slot__BJZD)->slot_data_intern__1JZD;
      } else {
        __tmp__MCMH=((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->slot_data_intern__1JZD;
      };
      __tmp__OCMH=((__TYPE_FULL *)((__SLOT_DATA *)__tmp__MCMH)->parent_variable__AJZD.type__125F)->parent_type__KTL;
      __tmp__PCMH=type_block__BLB;
      switch (((struct ___OBJ *)__tmp__OCMH)->__id) {
      case __TYPE__: {
        __tmp__QCMH=((void *)((__TYPE *)__tmp__OCMH) == (void *)__tmp__PCMH);
      } break;
      case __TYPE_NULL__: {
        __tmp__QCMH=((void *)((__TYPE_NULL *)__tmp__OCMH) == (void *)__tmp__PCMH);
      } break;
      case __TYPE_VOID__: {
        __tmp__QCMH=((void *)((__TYPE_VOID *)__tmp__OCMH) == (void *)__tmp__PCMH);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__QCMH=((void *)((__TYPE_CONTEXT *)__tmp__OCMH) == (void *)__tmp__PCMH);
      } break;
      case __TYPE_ID__: {
        __tmp__QCMH=((void *)((__TYPE_ID *)__tmp__OCMH) == (void *)__tmp__PCMH);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__QCMH=((void *)((__TYPE_GENERIC *)__tmp__OCMH) == (void *)__tmp__PCMH);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__QCMH=__infix_equal_equal__GSFJ(__tmp__OCMH,__tmp__PCMH);
      } break;
      };
      __tmp__TCMH=__tmp__QCMH;
    } else {
      __tmp__TCMH=FALSE__;
    };
    if (__tmp__TCMH) {
      if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
        __tmp__ZCMH=slot_data__Z4TH(__tmp__UBMH);
      } else {
        __tmp__ZCMH=slot_data__T5TH(__tmp__UBMH);
      };
      init__C4OG(__tmp__ZCMH);
    };
    if (verify__JDAG) {
      if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
        __tmp__HDMH=((__SLOT *)((__SLOT_DATA *)__tmp__UBMH)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__HDMH=((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->base_slot__P22F;
      };
      if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__HDMH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) !=  1)) {
        put_error__text__0AH( 1,(&__string_466));
        if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
          __tmp__LEMH=((__SLOT_DATA *)__tmp__UBMH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__LEMH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__LEMH);
        put_position__ECH(Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
        __tmp__REMH=((__SLOT_DATA *)__tmp__UBMH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      } else {
        __tmp__REMH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
      };
      last_position__GG1=__tmp__REMH;
      if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
        __tmp__SEMH=id_section__UG4F(__tmp__UBMH);
      } else {
        __tmp__SEMH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      if ((! access__with__2QMM(__tmp__SEMH,receiver_type__T4LH,((__TYPE_FULL *)to_run__MPXD())->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_467));
        append_name_in__FBYD(to_run__MPXD(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_468));
        put_error__text__0AH( 2,string_tmp__RB);
        if (((struct ___OBJ *)__tmp__UBMH)->__id==__SLOT_DATA__) {
          __tmp__FFMH=((__SLOT_DATA *)__tmp__UBMH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__FFMH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__UBMH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__FFMH);
        put_position__ECH(Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      last_position__GG1=pos_null__V4LH;
    };
  };
  count__TOOH= 0;
  if (receiver__S4LH==NULL) {
    __tmp__VOOH=NULL;
  } else {
    switch (((struct ___OBJ *)receiver__S4LH)->__id) {
    case __LIST__: {
      __tmp__VOOH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VOOH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VOOH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__VOOH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VOOH=((void *)receiver__S4LH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VOOH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__VOOH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VOOH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VOOH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VOOH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__VOOH=NULL;
    } break;
    case __ITEM__: {
      __tmp__VOOH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__VOOH=NULL;
    } break;
    case __CAST__: {
      __tmp__VOOH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__VOOH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__VOOH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__VOOH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__VOOH=NULL;
    } break;
    }
  };
  em__SOOH=__tmp__VOOH;
  if (((void *)__tmp__VOOH != (void *)NULL)) {
    count__TOOH=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__VOOH)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH +  1);
    append_collection__53EI(args__R4LH,((__EXPR_MULTIPLE *)__tmp__VOOH)->expr_list__VFMH);
  } else {
    count__TOOH= 1;
    add_last__XSEI(args__R4LH,receiver__S4LH);
  };
  if (verify__JDAG) {
    if ((! is_block_value__24LH)) {
      if (((struct ___OBJ *)slot_msg__14LH)->__id==__SLOT_DATA__) {
        __tmp__QPOH=((__SLOT *)((__SLOT_DATA *)slot_msg__14LH)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__QPOH=((__SLOT *)((__SLOT_CODE *)slot_msg__14LH)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__SPOH=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__QPOH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[ 0];
      if (((struct ___OBJ *)__tmp__SPOH)->__id==__ITM_ARG__) {
        __tmp__TPOH= 1;
      } else {
        __tmp__TPOH=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__SPOH)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
      };
      if ((__tmp__TPOH != count__TOOH)) {
        put_error__text__0AH( 1,(&__string_334));
        if (((struct ___OBJ *)slot_msg__14LH)->__id==__SLOT_DATA__) {
          __tmp__2POH=((__SLOT *)((__SLOT_DATA *)slot_msg__14LH)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__2POH=((__SLOT *)((__SLOT_CODE *)slot_msg__14LH)->parent_slot__Y22F)->base_slot__P22F;
        };
        __tmp__4POH=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__2POH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[ 0];
        if (((struct ___OBJ *)__tmp__4POH)->__id==__ITM_ARG__) {
          __tmp__5POH=((__ITM_ARG *)__tmp__4POH)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
        } else {
          __tmp__5POH=((__ITM_ARGS *)__tmp__4POH)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
        };
        put_position__ECH(__tmp__5POH);
        switch (((struct ___OBJ *)receiver__S4LH)->__id) {
        case __LIST__: {
          __tmp__AQOH=((__LIST *)receiver__S4LH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__AQOH=((__STRING_CST *)receiver__S4LH)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__AQOH=((__EXTERNAL_C *)receiver__S4LH)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__AQOH=((__PROTOTYPE_CST *)receiver__S4LH)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__AQOH=((__INTEGER_CST *)receiver__S4LH)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__AQOH=((__READ_LOCAL *)receiver__S4LH)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__AQOH=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__AQOH=((__EXPR_EQUAL *)receiver__S4LH)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__AQOH=((__EXPR_NOT_EQUAL *)receiver__S4LH)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__AQOH=((__REAL_CST *)receiver__S4LH)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__AQOH=((__CHARACTER_CST *)receiver__S4LH)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__AQOH=((__IS_EXPANDED *)receiver__S4LH)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__AQOH=((__GET_TYPE_ID *)receiver__S4LH)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__AQOH=((__EXPR_SUP *)receiver__S4LH)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__AQOH=((__EXPR_SUB *)receiver__S4LH)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__AQOH=((__EXPR_MUL *)receiver__S4LH)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__AQOH=((__EXPR_DIV *)receiver__S4LH)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__AQOH=((__EXPR_AND *)receiver__S4LH)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__AQOH=((__EXPR_SHIFT_R *)receiver__S4LH)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__AQOH=((__EXPR_SHIFT_L *)receiver__S4LH)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__AQOH=((__PUT_TO *)receiver__S4LH)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__AQOH=((__ITEM *)receiver__S4LH)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__AQOH=((__SIZE_OF *)receiver__S4LH)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__AQOH=((__CAST *)receiver__S4LH)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__AQOH=((__CALL_SLOT *)receiver__S4LH)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__AQOH=((__READ_SLOT *)receiver__S4LH)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__AQOH=((__READ_GLOBAL *)receiver__S4LH)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__AQOH=((__EXPR_NOT_LOGIC *)receiver__S4LH)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__AQOH=((__EXPR_OR_LOGIC *)receiver__S4LH)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__AQOH=((__EXPR_OR_OR_LOGIC *)receiver__S4LH)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__AQOH=((__EXPR_AND_LOGIC *)receiver__S4LH)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__AQOH=((__EXPR_AND_AND_LOGIC *)receiver__S4LH)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__AQOH=((__EXPR_NEG *)receiver__S4LH)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__AQOH=((__EXPR_ADD *)receiver__S4LH)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__AQOH=((__EXPR_NOT *)receiver__S4LH)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__AQOH=((__EXPR_MOD *)receiver__S4LH)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__AQOH=((__EXPR_SUP_EQ *)receiver__S4LH)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__AQOH=((__EXPR_INF *)receiver__S4LH)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__AQOH=((__EXPR_INF_EQ *)receiver__S4LH)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__AQOH=((__EXPR_OR *)receiver__S4LH)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__AQOH=((__EXPR_XOR *)receiver__S4LH)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        put_position__ECH(__tmp__AQOH);
        send_error__2FH();
      };
      __tmp__GQOH=TRUE__;
    } else {
      __tmp__GQOH=FALSE__;
    };
    if ((! __tmp__GQOH)) {
      if ((count__TOOH !=  1)) {
        switch (((struct ___OBJ *)receiver__S4LH)->__id) {
        case __LIST__: {
          __tmp__ZQOH=((__LIST *)receiver__S4LH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__ZQOH=((__STRING_CST *)receiver__S4LH)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZQOH=((__EXTERNAL_C *)receiver__S4LH)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__ZQOH=((__PROTOTYPE_CST *)receiver__S4LH)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__ZQOH=((__INTEGER_CST *)receiver__S4LH)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__ZQOH=((__READ_LOCAL *)receiver__S4LH)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZQOH=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZQOH=((__EXPR_EQUAL *)receiver__S4LH)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZQOH=((__EXPR_NOT_EQUAL *)receiver__S4LH)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__ZQOH=((__REAL_CST *)receiver__S4LH)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__ZQOH=((__CHARACTER_CST *)receiver__S4LH)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__ZQOH=((__IS_EXPANDED *)receiver__S4LH)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZQOH=((__GET_TYPE_ID *)receiver__S4LH)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__ZQOH=((__EXPR_SUP *)receiver__S4LH)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__ZQOH=((__EXPR_SUB *)receiver__S4LH)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__ZQOH=((__EXPR_MUL *)receiver__S4LH)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__ZQOH=((__EXPR_DIV *)receiver__S4LH)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__ZQOH=((__EXPR_AND *)receiver__S4LH)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZQOH=((__EXPR_SHIFT_R *)receiver__S4LH)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZQOH=((__EXPR_SHIFT_L *)receiver__S4LH)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__ZQOH=((__PUT_TO *)receiver__S4LH)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__ZQOH=((__ITEM *)receiver__S4LH)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__ZQOH=((__SIZE_OF *)receiver__S4LH)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__ZQOH=((__CAST *)receiver__S4LH)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__ZQOH=((__CALL_SLOT *)receiver__S4LH)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__ZQOH=((__READ_SLOT *)receiver__S4LH)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZQOH=((__READ_GLOBAL *)receiver__S4LH)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZQOH=((__EXPR_NOT_LOGIC *)receiver__S4LH)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZQOH=((__EXPR_OR_LOGIC *)receiver__S4LH)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZQOH=((__EXPR_OR_OR_LOGIC *)receiver__S4LH)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZQOH=((__EXPR_AND_LOGIC *)receiver__S4LH)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZQOH=((__EXPR_AND_AND_LOGIC *)receiver__S4LH)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__ZQOH=((__EXPR_NEG *)receiver__S4LH)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__ZQOH=((__EXPR_ADD *)receiver__S4LH)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__ZQOH=((__EXPR_NOT *)receiver__S4LH)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__ZQOH=((__EXPR_MOD *)receiver__S4LH)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZQOH=((__EXPR_SUP_EQ *)receiver__S4LH)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__ZQOH=((__EXPR_INF *)receiver__S4LH)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZQOH=((__EXPR_INF_EQ *)receiver__S4LH)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__ZQOH=((__EXPR_OR *)receiver__S4LH)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__ZQOH=((__EXPR_XOR *)receiver__S4LH)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        put_error__text__0AH( 1,(&__string_474));
        put_position__ECH(__tmp__ZQOH);
        send_error__2FH();
      };
    };
  };
  if (receiver__S4LH==NULL) {
    __tmp__PFMH=NULL;
  } else {
    switch (((struct ___OBJ *)receiver__S4LH)->__id) {
    case __LIST__: {
      __tmp__PFMH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__PFMH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__PFMH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__PFMH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__PFMH=((void *)receiver__S4LH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__PFMH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__PFMH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__PFMH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__PFMH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__PFMH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__PFMH=NULL;
    } break;
    case __ITEM__: {
      __tmp__PFMH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__PFMH=NULL;
    } break;
    case __CAST__: {
      __tmp__PFMH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__PFMH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__PFMH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__PFMH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__PFMH=NULL;
    } break;
    }
  };
  em__U4LH=__tmp__PFMH;
  if (((void *)__tmp__PFMH != (void *)NULL)) {
    receiver__S4LH=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__PFMH)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
  };
  if (is_block_value__24LH) {
    args__R4LH=copy__QGTH(args__R4LH);
    __tmp__WGMH=((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    switch (((struct ___OBJ *)__tmp__WGMH)->__id) {
    case __LIST__: {
      __tmp__XGMH=my_copy__2HYM(__tmp__WGMH);
    } break;
    case __STRING_CST__: {
      Self__4RIQ=((__STRING_CST *)__tmp__WGMH);
      __tmp__XGMH=create__text__AUMH(Self__4RIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4RIQ->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__XGMH=my_copy__2K2H(__tmp__WGMH);
    } break;
    case __PROTOTYPE_CST__: {
      Self__5RIQ=((__PROTOTYPE_CST *)__tmp__WGMH);
      __tmp__XGMH=create__type__CLQC(Self__5RIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5RIQ->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__ASIQ=((__INTEGER_CST *)__tmp__WGMH);
      __tmp__XGMH=create__value__type__DNQC(Self__ASIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ASIQ->value__PAZD,Self__ASIQ->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__XGMH=my_copy__OAFJ(__tmp__WGMH);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__XGMH=my_copy__KM2H(__tmp__WGMH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__XGMH=my_copy__DN2H(__tmp__WGMH);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__XGMH=my_copy__QN2H(__tmp__WGMH);
    } break;
    case __REAL_CST__: {
      Self__CSIQ=((__REAL_CST *)__tmp__WGMH);
      __tmp__XGMH=create__value__type__1SMH(Self__CSIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CSIQ->value__5N2H,Self__CSIQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__ESIQ=((__CHARACTER_CST *)__tmp__WGMH);
      __tmp__XGMH=create__char__WTMH(Self__ESIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ESIQ->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__FSIQ=((__IS_EXPANDED *)__tmp__WGMH);
      __tmp__XGMH=create__receiver__WRWH(Self__FSIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__FSIQ->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__XGMH=my_copy__TO2H(__tmp__WGMH);
    } break;
    case __EXPR_SUP__: {
      __tmp__XGMH=my_copy__2O2H(__tmp__WGMH);
    } break;
    case __EXPR_SUB__: {
      __tmp__XGMH=my_copy__HP2H(__tmp__WGMH);
    } break;
    case __EXPR_MUL__: {
      __tmp__XGMH=my_copy__TP2H(__tmp__WGMH);
    } break;
    case __EXPR_DIV__: {
      __tmp__XGMH=my_copy__4P2H(__tmp__WGMH);
    } break;
    case __EXPR_AND__: {
      __tmp__XGMH=my_copy__JQ2H(__tmp__WGMH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__XGMH=my_copy__UQ2H(__tmp__WGMH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__XGMH=my_copy__5Q2H(__tmp__WGMH);
    } break;
    case __PUT_TO__: {
      __tmp__XGMH=my_copy__KR2H(__tmp__WGMH);
    } break;
    case __ITEM__: {
      __tmp__XGMH=my_copy__1R2H(__tmp__WGMH);
    } break;
    case __SIZE_OF__: {
      __tmp__XGMH=my_copy__HS2H(__tmp__WGMH);
    } break;
    case __CAST__: {
      __tmp__XGMH=my_copy__QS2H(__tmp__WGMH);
    } break;
    case __CALL_SLOT__: {
      __tmp__XGMH=my_copy__PIYM(__tmp__WGMH);
    } break;
    case __READ_SLOT__: {
      __tmp__XGMH=my_copy__AVGK(__tmp__WGMH);
    } break;
    case __READ_GLOBAL__: {
      __tmp__XGMH=my_copy__NVGK(__tmp__WGMH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__XGMH=my_copy__RFCN(__tmp__WGMH);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__XGMH=my_copy__JMEO(__tmp__WGMH);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__XGMH=my_copy__RTJO(__tmp__WGMH);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__XGMH=my_copy__WMEO(__tmp__WGMH);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__XGMH=my_copy__3TJO(__tmp__WGMH);
    } break;
    case __EXPR_NEG__: {
      __tmp__XGMH=my_copy__YEJM(__tmp__WGMH);
    } break;
    case __EXPR_ADD__: {
      __tmp__XGMH=my_copy__YRLL(__tmp__WGMH);
    } break;
    case __EXPR_NOT__: {
      __tmp__XGMH=my_copy__GLYM(__tmp__WGMH);
    } break;
    case __EXPR_MOD__: {
      __tmp__XGMH=my_copy__BNEO(__tmp__WGMH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__XGMH=my_copy__M3DP(__tmp__WGMH);
    } break;
    case __EXPR_INF__: {
      __tmp__XGMH=my_copy__PBSN(__tmp__WGMH);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__XGMH=my_copy__0BSN(__tmp__WGMH);
    } break;
    case __EXPR_OR__: {
      __tmp__XGMH=my_copy__ZOPN(__tmp__WGMH);
    } break;
    case __EXPR_XOR__: {
      __tmp__XGMH=my_copy__CYSO(__tmp__WGMH);
    } break;
    };
    ((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__XGMH;
    base__34LH=new_block__receiver__with__1GTH(Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,receiver__S4LH,args__R4LH);
    __tmp__2GMH=TRUE__;
  } else {
    __tmp__2GMH=FALSE__;
  };
  if ((! __tmp__2GMH)) {
    if (((__INTEGER)(((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.upper__USSH +  1) ==  1)) {
      if (is_resend__04LH) {
        ((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__IC5G(lookup__3ATH());
        __tmp__THMH=((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__THMH)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__THMH);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__THMH);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__GSIQ=((__READ_LOCAL *)__tmp__THMH);
          unread__YVJK(Self__GSIQ->local__ALZD,Self__GSIQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__THMH);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__THMH);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__THMH);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__ISIQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__THMH)->receiver__OO2H);
          unread__YVJK(Self__ISIQ->local__ALZD,Self__ISIQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__THMH);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__THMH);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__THMH);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__THMH);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__THMH);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__THMH);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__THMH);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__THMH);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__THMH);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__THMH);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__THMH);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__THMH);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__THMH);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__THMH);
        } break;
        case __READ_GLOBAL__: {
          Self__JSIQ=((__READ_GLOBAL *)__tmp__THMH);
          unread__15ML(Self__JSIQ->global__RHJK,Self__JSIQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__THMH);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__THMH);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__THMH);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__THMH);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__THMH);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__THMH);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__THMH);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__THMH);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__THMH);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__THMH);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__THMH);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__THMH);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__THMH);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__THMH);
        } break;
        };
      };
      if (((verify__JDAG & is_all_warning__2BB) && __infix_equal_equal__TKW(Self__1XJH->parent_itm_read__S5GC.name__TVPC,(&__string_469)))) {
        copy__BNK(string_tmp__RB,(&__string_470));
        append__MOK(string_tmp__RB,((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB);
        append__MOK(string_tmp__RB,(&__string_471));
        switch (((struct ___OBJ *)receiver__S4LH)->__id) {
        case __LIST__: {
          __tmp__VIMH=static_type__GIQG(receiver__S4LH);
        } break;
        case __STRING_CST__: {
          __tmp__VIMH=((__STRING_CST *)receiver__S4LH)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__VIMH=((__EXTERNAL_C *)receiver__S4LH)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__VIMH=((__PROTOTYPE_CST *)receiver__S4LH)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__VIMH=((__INTEGER_CST *)receiver__S4LH)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__VIMH=((__LOCAL *)((__READ_LOCAL *)receiver__S4LH)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__VIMH=static_type__0N1H(receiver__S4LH);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__VIMH=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__VIMH=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__VIMH=((__REAL_CST *)receiver__S4LH)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__VIMH=((__CHARACTER_CST *)receiver__S4LH)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__VIMH=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__VIMH=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__VIMH=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__VIMH=static_type__MP1H(receiver__S4LH);
        } break;
        case __EXPR_MUL__: {
          __tmp__VIMH=static_type__SP1H(receiver__S4LH);
        } break;
        case __EXPR_DIV__: {
          __tmp__VIMH=static_type__XP1H(receiver__S4LH);
        } break;
        case __EXPR_AND__: {
          __tmp__VIMH=static_type__2P1H(receiver__S4LH);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__VIMH=static_type__BQ1H(receiver__S4LH);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__VIMH=static_type__GQ1H(receiver__S4LH);
        } break;
        case __PUT_TO__: {
          __tmp__VIMH=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__VIMH=static_type__PQ1H(receiver__S4LH);
        } break;
        case __SIZE_OF__: {
          __tmp__VIMH=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__VIMH=((__CAST *)receiver__S4LH)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__VIMH=static_type__GIKL(receiver__S4LH);
        } break;
        case __READ_SLOT__: {
          __tmp__VIMH=((__SLOT_DATA *)((__READ_SLOT *)receiver__S4LH)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__VIMH=((__SLOT_DATA *)((__READ_GLOBAL *)receiver__S4LH)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__VIMH=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__VIMH=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__VIMH=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__VIMH=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__VIMH=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__VIMH=static_type__Z2IM(receiver__S4LH);
        } break;
        case __EXPR_ADD__: {
          __tmp__VIMH=static_type__IXML(receiver__S4LH);
        } break;
        case __EXPR_NOT__: {
          __tmp__VIMH=static_type__BTXM(receiver__S4LH);
        } break;
        case __EXPR_MOD__: {
          __tmp__VIMH=static_type__5LEO(receiver__S4LH);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__VIMH=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__VIMH=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__VIMH=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__VIMH=static_type__NOPN(receiver__S4LH);
        } break;
        case __EXPR_XOR__: {
          __tmp__VIMH=static_type__XCSO(receiver__S4LH);
        } break;
        };
        append_name_in__FBYD(__tmp__VIMH,string_tmp__RB);
        __tmp__YIMH=Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 2,string_tmp__RB);
        put_position__ECH(__tmp__YIMH);
        send_error__2FH();
      };
      base__34LH=new_read__slot__receiver__self__YLQC(Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__14LH,receiver__S4LH,((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]);
      free__C4LH(args__R4LH);
    } else {
      if (is_resend__04LH) {
        ((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__IC5G(lookup__3ATH());
      } else {
        __tmp__WJMH=((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__WJMH)->__id) {
        case __LIST__: {
          __tmp__XJMH=my_copy__2HYM(__tmp__WJMH);
        } break;
        case __STRING_CST__: {
          Self__KSIQ=((__STRING_CST *)__tmp__WJMH);
          __tmp__XJMH=create__text__AUMH(Self__KSIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KSIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__XJMH=my_copy__2K2H(__tmp__WJMH);
        } break;
        case __PROTOTYPE_CST__: {
          Self__LSIQ=((__PROTOTYPE_CST *)__tmp__WJMH);
          __tmp__XJMH=create__type__CLQC(Self__LSIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LSIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__MSIQ=((__INTEGER_CST *)__tmp__WJMH);
          __tmp__XJMH=create__value__type__DNQC(Self__MSIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MSIQ->value__PAZD,Self__MSIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__XJMH=my_copy__OAFJ(__tmp__WJMH);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__XJMH=my_copy__KM2H(__tmp__WJMH);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__XJMH=my_copy__DN2H(__tmp__WJMH);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__XJMH=my_copy__QN2H(__tmp__WJMH);
        } break;
        case __REAL_CST__: {
          Self__OSIQ=((__REAL_CST *)__tmp__WJMH);
          __tmp__XJMH=create__value__type__1SMH(Self__OSIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OSIQ->value__5N2H,Self__OSIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__QSIQ=((__CHARACTER_CST *)__tmp__WJMH);
          __tmp__XJMH=create__char__WTMH(Self__QSIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QSIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__RSIQ=((__IS_EXPANDED *)__tmp__WJMH);
          __tmp__XJMH=create__receiver__WRWH(Self__RSIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__RSIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__XJMH=my_copy__TO2H(__tmp__WJMH);
        } break;
        case __EXPR_SUP__: {
          __tmp__XJMH=my_copy__2O2H(__tmp__WJMH);
        } break;
        case __EXPR_SUB__: {
          __tmp__XJMH=my_copy__HP2H(__tmp__WJMH);
        } break;
        case __EXPR_MUL__: {
          __tmp__XJMH=my_copy__TP2H(__tmp__WJMH);
        } break;
        case __EXPR_DIV__: {
          __tmp__XJMH=my_copy__4P2H(__tmp__WJMH);
        } break;
        case __EXPR_AND__: {
          __tmp__XJMH=my_copy__JQ2H(__tmp__WJMH);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__XJMH=my_copy__UQ2H(__tmp__WJMH);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__XJMH=my_copy__5Q2H(__tmp__WJMH);
        } break;
        case __PUT_TO__: {
          __tmp__XJMH=my_copy__KR2H(__tmp__WJMH);
        } break;
        case __ITEM__: {
          __tmp__XJMH=my_copy__1R2H(__tmp__WJMH);
        } break;
        case __SIZE_OF__: {
          __tmp__XJMH=my_copy__HS2H(__tmp__WJMH);
        } break;
        case __CAST__: {
          __tmp__XJMH=my_copy__QS2H(__tmp__WJMH);
        } break;
        case __CALL_SLOT__: {
          __tmp__XJMH=my_copy__PIYM(__tmp__WJMH);
        } break;
        case __READ_SLOT__: {
          __tmp__XJMH=my_copy__AVGK(__tmp__WJMH);
        } break;
        case __READ_GLOBAL__: {
          __tmp__XJMH=my_copy__NVGK(__tmp__WJMH);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__XJMH=my_copy__RFCN(__tmp__WJMH);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__XJMH=my_copy__JMEO(__tmp__WJMH);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__XJMH=my_copy__RTJO(__tmp__WJMH);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__XJMH=my_copy__WMEO(__tmp__WJMH);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__XJMH=my_copy__3TJO(__tmp__WJMH);
        } break;
        case __EXPR_NEG__: {
          __tmp__XJMH=my_copy__YEJM(__tmp__WJMH);
        } break;
        case __EXPR_ADD__: {
          __tmp__XJMH=my_copy__YRLL(__tmp__WJMH);
        } break;
        case __EXPR_NOT__: {
          __tmp__XJMH=my_copy__GLYM(__tmp__WJMH);
        } break;
        case __EXPR_MOD__: {
          __tmp__XJMH=my_copy__BNEO(__tmp__WJMH);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__XJMH=my_copy__M3DP(__tmp__WJMH);
        } break;
        case __EXPR_INF__: {
          __tmp__XJMH=my_copy__PBSN(__tmp__WJMH);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__XJMH=my_copy__0BSN(__tmp__WJMH);
        } break;
        case __EXPR_OR__: {
          __tmp__XJMH=my_copy__ZOPN(__tmp__WJMH);
        } break;
        case __EXPR_XOR__: {
          __tmp__XJMH=my_copy__CYSO(__tmp__WJMH);
        } break;
        };
        ((void **)((__FAST_ARRAYoEXPRo *)args__R4LH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__XJMH;
      };
      args__R4LH=copy__QGTH(args__R4LH);
      base__34LH=new_read__slot__receiver__with__YOWH(Self__1XJH->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__14LH,receiver__S4LH,args__R4LH);
    };
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,base__34LH);
  return(result_expr__PVDI(base__34LH));
}

static void* to_run_expr__5XJH(__ITM_OLD *Self__AYJH)
// ({ITM_OLD}) With resultRecursive, No inlinable.
{
  void *instr__DYJH;
  void *node__IYJH,*__tmp__4ZJH,*element__VD0H;
  void *old_profil_second__KYJH;
  __INTEGER old_upper__GYJH,diff__HYJH,result__ZD0H,u__YD0H;
  void *__tmp__0YJH;
  void *__tmp__1YJH;
  __POSITION __tmp__MZ1P;
  __ITM_CHARACTER *Self__33JH;
  __ITM_STRING *Self__E4JH;
  void *__tmp__2YJH;
  void *result_old__EYJH;
  void *lst__FYJH;
  void *old_stack_local__JYJH;
  __FAST_ARRAYoINSTRo *Self__ZU0Q,*Self__5PWH;
  void *__tmp__E0JH;
  __LINKED_LISToNODE_TYPEo *Self__S0ZH;
  instr__DYJH=NULL;
  node__IYJH=NULL;
  old_stack_local__JYJH=stack_local__RI4F;
  old_profil_second__KYJH=profil_second__3PQC;
  stack_local__RI4F=stack_local_empty__NYJH;
  profil_second__3PQC=profil_first__4PQC;
  old_upper__GYJH=(__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1);
  __tmp__0YJH=Self__AYJH->value__OZPC;
  switch (((struct ___OBJ *)__tmp__0YJH)->__id) {
  case __ITM_LIST__: {
    __tmp__1YJH=to_run_expr__D3IH(__tmp__0YJH);
  } break;
  case __ITM_PROTOTYPE__: {
    __tmp__1YJH=to_run_expr__M3IH(__tmp__0YJH);
  } break;
  case __ITM_LIST_IDF__: {
    __tmp__MZ1P=((__ITM_LIST_IDF *)__tmp__0YJH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_328));
    put_position__ECH(__tmp__MZ1P);
    send_error__2FH();
    __tmp__1YJH=NULL;
  } break;
  case __ITM_WRITE_VALUE__: {
    __tmp__1YJH=to_run_expr__UAJH(__tmp__0YJH);
  } break;
  case __ITM_WRITE_CAST__: {
    __tmp__1YJH=to_run_expr__WDJH(__tmp__0YJH);
  } break;
  case __ITM_READ__: {
    __tmp__1YJH=to_run_expr__JGJH(__tmp__0YJH);
  } break;
  case __ITM_WRITE_CODE__: {
    __tmp__1YJH=to_run_expr__MHJH(__tmp__0YJH);
  } break;
  case __ITM_READ_ARG2__: {
    __tmp__1YJH=to_run_expr__3IJH(__tmp__0YJH);
  } break;
  case __ITM_BINARY__: {
    __tmp__1YJH=to_run_expr__RMJH(__tmp__0YJH);
  } break;
  case __ITM_READ_ARG1__: {
    __tmp__1YJH=to_run_expr__0XJH(__tmp__0YJH);
  } break;
  case __ITM_OLD__: {
    __tmp__1YJH=to_run_expr__5XJH(__tmp__0YJH);
  } break;
  case __ITM_EXTERNAL_TYPE__: {
    __tmp__1YJH=to_run_expr__U1JH(__tmp__0YJH);
  } break;
  case __ITM_REAL__: {
    __tmp__1YJH=to_run_expr__J3JH(__tmp__0YJH);
  } break;
  case __ITM_NUMBER__: {
    __tmp__1YJH=to_run_expr__T3JH(__tmp__0YJH);
  } break;
  case __ITM_CHARACTER__: {
    Self__33JH=((__ITM_CHARACTER *)__tmp__0YJH);
    __tmp__1YJH=create__char__WTMH(Self__33JH->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__33JH->character__ED0D);
  } break;
  case __ITM_STRING__: {
    Self__E4JH=((__ITM_STRING *)__tmp__0YJH);
    __tmp__1YJH=create__text__AUMH(Self__E4JH->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__E4JH->string__QD0D);
  } break;
  case __ITM_EXTERNAL__: {
    __tmp__1YJH=to_run_expr__J4JH(__tmp__0YJH);
  } break;
  case __ITM_READ_ARGS__: {
    __tmp__1YJH=to_run_expr__TIKH(__tmp__0YJH);
  } break;
  };
  switch (((struct ___OBJ *)__tmp__1YJH)->__id) {
  case __LIST__: {
    __tmp__2YJH=static_type__GIQG(__tmp__1YJH);
  } break;
  case __STRING_CST__: {
    __tmp__2YJH=((__STRING_CST *)__tmp__1YJH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__2YJH=((__EXTERNAL_C *)__tmp__1YJH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__2YJH=((__PROTOTYPE_CST *)__tmp__1YJH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__2YJH=((__INTEGER_CST *)__tmp__1YJH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__2YJH=((__LOCAL *)((__READ_LOCAL *)__tmp__1YJH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2YJH=static_type__0N1H(__tmp__1YJH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2YJH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2YJH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__2YJH=((__REAL_CST *)__tmp__1YJH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__2YJH=((__CHARACTER_CST *)__tmp__1YJH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__2YJH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2YJH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__2YJH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__2YJH=static_type__MP1H(__tmp__1YJH);
  } break;
  case __EXPR_MUL__: {
    __tmp__2YJH=static_type__SP1H(__tmp__1YJH);
  } break;
  case __EXPR_DIV__: {
    __tmp__2YJH=static_type__XP1H(__tmp__1YJH);
  } break;
  case __EXPR_AND__: {
    __tmp__2YJH=static_type__2P1H(__tmp__1YJH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2YJH=static_type__BQ1H(__tmp__1YJH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2YJH=static_type__GQ1H(__tmp__1YJH);
  } break;
  case __PUT_TO__: {
    __tmp__2YJH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__2YJH=static_type__PQ1H(__tmp__1YJH);
  } break;
  case __SIZE_OF__: {
    __tmp__2YJH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__2YJH=((__CAST *)__tmp__1YJH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__2YJH=static_type__GIKL(__tmp__1YJH);
  } break;
  case __READ_SLOT__: {
    __tmp__2YJH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__1YJH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__2YJH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__1YJH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2YJH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2YJH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2YJH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2YJH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2YJH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__2YJH=static_type__Z2IM(__tmp__1YJH);
  } break;
  case __EXPR_ADD__: {
    __tmp__2YJH=static_type__IXML(__tmp__1YJH);
  } break;
  case __EXPR_NOT__: {
    __tmp__2YJH=static_type__BTXM(__tmp__1YJH);
  } break;
  case __EXPR_MOD__: {
    __tmp__2YJH=static_type__5LEO(__tmp__1YJH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2YJH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__2YJH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2YJH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__2YJH=static_type__NOPN(__tmp__1YJH);
  } break;
  case __EXPR_XOR__: {
    __tmp__2YJH=static_type__XCSO(__tmp__1YJH);
  } break;
  };
  result_old__EYJH=create__name__style__type__25JG(Self__AYJH->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM,(&__string_60),'+',((__TYPE_FULL *)__tmp__2YJH));
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(result_old__EYJH,Self__AYJH->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM,__tmp__1YJH));
  diff__HYJH=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) - old_upper__GYJH);
  lst__FYJH=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH;
  while ((diff__HYJH !=  0)) {
    Self__ZU0Q=((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG);
    instr__DYJH=((void **)Self__ZU0Q->parent_arrayed_collection__IUOG.storage__BM4G)[Self__ZU0Q->parent_arrayed_collection__IUOG.upper__THQG];
    if (((void *)node_list__PMQC != (void *)node_list_base__WZJH)) {
      if (instr__DYJH==NULL) {
        __tmp__4ZJH=NULL;
      } else {
        switch (((struct ___OBJ *)instr__DYJH)->__id) {
        case __LIST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __PUSH__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__4ZJH=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __SWITCH__: {
          __tmp__4ZJH=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__4ZJH=((void *)instr__DYJH);
        } break;
        case __READ_LOCAL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__4ZJH=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__4ZJH=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__4ZJH=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__4ZJH=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__4ZJH=NULL;
        } break;
        case __ITEM__: {
          __tmp__4ZJH=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__4ZJH=NULL;
        } break;
        case __CAST__: {
          __tmp__4ZJH=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__4ZJH=NULL;
        } break;
        case __NOP__: {
          __tmp__4ZJH=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__4ZJH=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__4ZJH=NULL;
        } break;
        case __LOOP__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__4ZJH=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__4ZJH=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__4ZJH=NULL;
        } break;
        }
      };
      node__IYJH=__tmp__4ZJH;
      if (((void *)__tmp__4ZJH != (void *)NULL)) {
        __tmp__E0JH=node_list__PMQC;
        Self__S0ZH=((__LINKED_LISToNODE_TYPEo *)node_list__PMQC);
        element__VD0H=__tmp__4ZJH;
        result__ZD0H= 1;
        u__YD0H=Self__S0ZH->parent_linked_collection__OMQC.upper__ZCID;
        while ((! ((result__ZD0H > u__YD0H) || ((void *)element__VD0H == (void *)item__00SE(Self__S0ZH,result__ZD0H))))) {
          result__ZD0H=(__INTEGER)(result__ZD0H +  1);
        };
        remove__50RG(__tmp__E0JH,result__ZD0H);
        add_last__I4YD(node_list_base__WZJH,__tmp__4ZJH);
      };
    };
    Self__5PWH=((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG);
    Self__5PWH->parent_arrayed_collection__IUOG.upper__THQG=(__INTEGER)(Self__5PWH->parent_arrayed_collection__IUOG.upper__THQG -  1);
    if ((debug_level_option__3C !=  0)) {
      add__to__1H5G(((__LIST *)lst__FYJH)->expr_list__JUOG,instr__DYJH, 1);
    } else {
      add_first__PPCM(lst__FYJH,instr__DYJH);
    };
    diff__HYJH=(__INTEGER)(diff__HYJH -  1);
  };
  profil_second__3PQC=old_profil_second__KYJH;
  stack_local__RI4F=old_stack_local__JYJH;
  return(read__IC5G(result_old__EYJH));
}

static void* to_run_expr__U1JH(__ITM_EXTERNAL_TYPE *Self__V1JH)
// ({ITM_EXTERNAL_TYPE}) With resultNo recursive, No inlinable.
{
  void *lt__Y1JH;
  __INTEGER base__ANMH,idx__5MMH,j__I5XI,__tmp__R2JH,Self__B4QH;
  void *loc__CNMH,*n__F5XI,*__tmp__51JH;
  __POSITION __tmp__UPMH,pos__3SIQ,pos__FG5I,__tmp__31JH;
  void *result__H5XI;
  void *__tmp__B2JH,*__tmp__Y2JH;
  void *__tmp__C2JH,*__tmp__Z01P,*__tmp__Z2JH,*__tmp__301P;
  __ITM_TYPE_STYLE *Self__Y01P,*Self__201P;
  void *e__X1JH;
  void *tmp__11JH;
  void *access_list__ENMH;
  void **__tmp__D35Q;
  __BOOLEAN __tmp__HBYI,__tmp__IQMH,__tmp__A2JH;
  lt__Y1JH=NULL;
  base__ANMH= 0;
  loc__CNMH=NULL;
  access_list__ENMH=NULL;
  copy__BNK(string_tmp2__ADB,Self__V1JH->parent_itm_extern__LXIC.extern__CJ1D);
  idx__5MMH=index_of__since__AVOH(string_tmp2__ADB, 1);
  if ((idx__5MMH <= ((__STRING *)string_tmp2__ADB)->count__VF)) {
    access_list__ENMH=new__50LH();
    while ((idx__5MMH <= ((__STRING *)string_tmp2__ADB)->count__VF)) {
      base__ANMH=idx__5MMH;
      idx__5MMH=(__INTEGER)(idx__5MMH +  1);
      ((__STRING *)string_tmp__RB)->count__VF= 0;
      while ((! ((idx__5MMH > ((__STRING *)string_tmp2__ADB)->count__VF) || ((! is_letter_or_digit__TBCJ(((__CHARACTER *)((__STRING *)string_tmp2__ADB)->storage__XNK)[(__INTEGER)(idx__5MMH -  1)])) && (((__CHARACTER *)((__STRING *)string_tmp2__ADB)->storage__XNK)[(__INTEGER)(idx__5MMH -  1)] != '_'))))) {
        add_last__YPK(string_tmp__RB,((__CHARACTER *)((__STRING *)string_tmp2__ADB)->storage__XNK)[(__INTEGER)(idx__5MMH -  1)]);
        idx__5MMH=(__INTEGER)(idx__5MMH +  1);
      };
      if ((((__STRING *)string_tmp__RB)->count__VF ==  0)) {
        __tmp__UPMH=Self__V1JH->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 0,(&__string_475));
        put_position__ECH(__tmp__UPMH);
        send_error__2FH();
      };
      loc__CNMH=get__QEC(string_tmp__RB);
      n__F5XI=loc__CNMH;
      result__H5XI=NULL;
      j__I5XI=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
      __tmp__D35Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
      while ((! ((j__I5XI < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__D35Q)[j__I5XI])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__F5XI)))) {
        j__I5XI=(__INTEGER)(j__I5XI -  1);
      };
      if ((j__I5XI >= stack_local_lower__AI4F)) {
        result__H5XI=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__I5XI];
        if (((j__I5XI < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__H5XI)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
          context_extern__1OLH=result__H5XI;
        };
        __tmp__HBYI=TRUE__;
      } else {
        __tmp__HBYI=FALSE__;
      };
      if ((! __tmp__HBYI)) {
        if (((void *)profil_first__4PQC != (void *)NULL)) {
          result__H5XI=lookup__LLJM(profil_first__4PQC,loc__CNMH);
          if ((((void *)result__H5XI != (void *)NULL) && ((void *)((__LOCAL *)result__H5XI)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
            context_extern__1OLH=result__H5XI;
          };
        };
      };
      if (((void *)result__H5XI == (void *)NULL)) {
        copy__BNK(string_tmp__RB,(&__string_476));
        append__MOK(string_tmp__RB,loc__CNMH);
        append__MOK(string_tmp__RB,(&__string_477));
        pos__3SIQ=Self__V1JH->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(pos__3SIQ);
        send_error__2FH();
        __tmp__IQMH=TRUE__;
      } else {
        __tmp__IQMH=FALSE__;
      };
      if ((! __tmp__IQMH)) {
        if ((((__LOCAL *)result__H5XI)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == '-')) {
          copy__BNK(string_tmp__RB,(&__string_476));
          append__MOK(string_tmp__RB,loc__CNMH);
          append__MOK(string_tmp__RB,(&__string_478));
          pos__FG5I=Self__V1JH->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(pos__FG5I);
          send_error__2FH();
        };
      };
      add_last__XSEI(access_list__ENMH,read__IC5G(result__H5XI));
      remove_between__to__ZVCC(string_tmp2__ADB,base__ANMH,(__INTEGER)(base__ANMH + ((__STRING_CONSTANT *)loc__CNMH)->count__XHB));
      insert_string__to__KMQG(string_tmp2__ADB,(&__string_479),base__ANMH);
      idx__5MMH=index_of__since__AVOH(string_tmp2__ADB,(__INTEGER)(base__ANMH +  2));
    };
    access_list__ENMH=copy__QGTH(access_list__ENMH);
  };
  last_code__41JH=get__QEC(string_tmp2__ADB);
  __tmp__31JH=Self__V1JH->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
  __tmp__51JH=last_code__41JH;
  __tmp__A2JH=Self__V1JH->is_persistant__ECJC;
  __tmp__B2JH=Self__V1JH->type__WY0D;
  switch (((struct ___OBJ *)__tmp__B2JH)->__id) {
  case __ITM_TYPE_SIMPLE__: {
    if (((__ITM_TYPE_SIMPLE *)__tmp__B2JH)->to_run__2VK==0) {
      __tmp__C2JH=((__ITM_TYPE_SIMPLE *)__tmp__B2JH)->to_run__1VK;
    } else {
      __tmp__C2JH=to_run__XVK(__tmp__B2JH);
    };
  } break;
  case __ITM_TYPE_STYLE__: {
    if (((__ITM_TYPE_STYLE *)__tmp__B2JH)->to_run__V1IB==0) {
      __tmp__C2JH=((__ITM_TYPE_STYLE *)__tmp__B2JH)->to_run__U1IB;
    } else {
      Self__Y01P=((__ITM_TYPE_STYLE *)__tmp__B2JH);
      __tmp__Z01P=get__XUN(Self__Y01P);
      Self__Y01P->to_run__U1IB=__tmp__Z01P;
      Self__Y01P->to_run__V1IB=0;
      __tmp__C2JH=__tmp__Z01P;
    };
  } break;
  case __ITM_TYPE_GENERIC__: {
    __tmp__C2JH=to_run__W1IB(__tmp__B2JH);
  } break;
  case __ITM_TYPE_SELF__: {
    __tmp__C2JH=to_run__MPXD();
  } break;
  case __ITM_TYPE_GENERIC_ELT__: {
    __tmp__C2JH=to_run__DKEF(__tmp__B2JH);
  } break;
  };
  e__X1JH=create__text__access__persistant__type__2U0C(__tmp__31JH,__tmp__51JH,access_list__ENMH,__tmp__A2JH,__tmp__C2JH);
  if (((void *)Self__V1JH->type_list__TV1D != (void *)NULL)) {
    lt__Y1JH=new__XWSG();
    __tmp__R2JH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__V1JH->type_list__TV1D)->parent_arrayed_collection__PIB.upper__BWK;
    Self__B4QH= 0;
    while ((Self__B4QH <= __tmp__R2JH)) {
      __tmp__Y2JH=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__V1JH->type_list__TV1D)->parent_arrayed_collection__PIB.storage__5WK)[Self__B4QH];
      switch (((struct ___OBJ *)__tmp__Y2JH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__Y2JH)->to_run__2VK==0) {
          __tmp__Z2JH=((__ITM_TYPE_SIMPLE *)__tmp__Y2JH)->to_run__1VK;
        } else {
          __tmp__Z2JH=to_run__XVK(__tmp__Y2JH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__Y2JH)->to_run__V1IB==0) {
          __tmp__Z2JH=((__ITM_TYPE_STYLE *)__tmp__Y2JH)->to_run__U1IB;
        } else {
          Self__201P=((__ITM_TYPE_STYLE *)__tmp__Y2JH);
          __tmp__301P=get__XUN(Self__201P);
          Self__201P->to_run__U1IB=__tmp__301P;
          Self__201P->to_run__V1IB=0;
          __tmp__Z2JH=__tmp__301P;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__Z2JH=to_run__W1IB(__tmp__Y2JH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__Z2JH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__Z2JH=to_run__DKEF(__tmp__Y2JH);
      } break;
      };
      add__R2EJ(lt__Y1JH,((__TYPE_FULL *)__tmp__Z2JH)->parent_type__KTL);
      Self__B4QH=(__INTEGER)(Self__B4QH +  1);
    };
    ((__EXTERNAL_C *)e__X1JH)->living_type__R4QH=to_types__A4EJ(lt__Y1JH);
  };
  tmp__11JH=create__name__style__type__25JG(Self__V1JH->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__EXTERNAL_C *)e__X1JH)->static_type__UXZD));
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(tmp__11JH,Self__V1JH->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,e__X1JH));
  return(read__IC5G(tmp__11JH));
}

static void* to_run_expr__J3JH(__ITM_REAL *Self__K3JH)
// ({ITM_REAL}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__N3JH;
  void *__tmp__O3JH;
  void *__tmp__P3JH;
  void *__tmp__Q3JH;
  __tmp__N3JH=Self__K3JH->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
  __tmp__O3JH=Self__K3JH->value__0C0D;
  __tmp__P3JH=type_real__FKB;
  switch (((struct ___OBJ *)__tmp__P3JH)->__id) {
  case __TYPE__: {
    __tmp__Q3JH=((__TYPE *)__tmp__P3JH)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__Q3JH=((__TYPE_NULL *)__tmp__P3JH)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__Q3JH=((__TYPE_VOID *)__tmp__P3JH)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__Q3JH=((__TYPE_CONTEXT *)__tmp__P3JH)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__Q3JH=((__TYPE_ID *)__tmp__P3JH)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__Q3JH=((__TYPE_GENERIC *)__tmp__P3JH)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__Q3JH=((__PROFIL_BLOCK *)__tmp__P3JH)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(create__value__type__1SMH(__tmp__N3JH,__tmp__O3JH,__tmp__Q3JH));
}

static void* to_run_expr__T3JH(__ITM_NUMBER *Self__U3JH)
// ({ITM_NUMBER}) With resultNo recursive, No inlinable.
{
  __INTEGER_64 __tmp__X3JH;
  __POSITION __tmp__W3JH;
  void *__tmp__Y3JH;
  void *__tmp__Z3JH;
  __tmp__W3JH=Self__U3JH->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
  __tmp__X3JH=Self__U3JH->value__5C0D;
  __tmp__Y3JH=type_integer__3JB;
  switch (((struct ___OBJ *)__tmp__Y3JH)->__id) {
  case __TYPE__: {
    __tmp__Z3JH=((__TYPE *)__tmp__Y3JH)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__Z3JH=((__TYPE_NULL *)__tmp__Y3JH)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__Z3JH=((__TYPE_VOID *)__tmp__Y3JH)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__Z3JH=((__TYPE_CONTEXT *)__tmp__Y3JH)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__Z3JH=((__TYPE_ID *)__tmp__Y3JH)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__Z3JH=((__TYPE_GENERIC *)__tmp__Y3JH)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__Z3JH=((__PROFIL_BLOCK *)__tmp__Y3JH)->parent_type__HHAG.default__AKC;
  } break;
  };
  return(create__value__type__DNQC(__tmp__W3JH,__tmp__X3JH,__tmp__Z3JH));
}

static __CHARACTER_CST* create__char__WTMH(__POSITION p__YTMH,void *car__ZTMH)
// ({POSITION},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __CHARACTER_CST *result__YYOH,*Self__FAEI;
  __POINTER ptr__ZYOH;
  __INTEGER typ_id__4YOH;
  __UINTEGER_32 sz__1YOH,a__UV0Q,new_size__SV0Q,t__YV0Q,a__0V0Q;
  void *__tmp__IAEI;
  void *__tmp__JAEI;
  result__YYOH=NULL;
  ptr__ZYOH=((__POINTER )(NULL));
  typ_id__4YOH= 0;
  sz__1YOH=((__UINTEGER_32 )sizeof(__CHARACTER_CST));
  if ((sz__1YOH ==  0)) {
    result__YYOH=CHARACTER_CST__;
  } else {
    typ_id__4YOH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__1YOH);
    if ((typ_id__4YOH == (__INTEGER)(-  1))) {
      a__UV0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__SV0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__1YOH + a__UV0Q) & (__UINTEGER_32)(~ a__UV0Q));
      ptr__ZYOH=micro_alloc__table__lab__BOI(new_size__SV0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SV0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SV0Q);
    } else {
      t__YV0Q=((__UINTEGER_32 )typ_id__4YOH);
      a__0V0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__ZYOH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__1YOH + a__0V0Q) & (__UINTEGER_32)(~ a__0V0Q)),((__POINTER )(&(table_type[(t__YV0Q)]))),(__UINTEGER_32)(t__YV0Q |  1));
    };
    result__YYOH=((__CHARACTER_CST *)ptr__ZYOH);
    *(result__YYOH) = *(CHARACTER_CST__);
  };
  Self__FAEI=((__CHARACTER_CST *)result__YYOH);
  Self__FAEI->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=p__YTMH;
  Self__FAEI->text__HO2H=car__ZTMH;
  __tmp__IAEI=type_character__1KB;
  switch (((struct ___OBJ *)__tmp__IAEI)->__id) {
  case __TYPE__: {
    __tmp__JAEI=((__TYPE *)__tmp__IAEI)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__JAEI=((__TYPE_NULL *)__tmp__IAEI)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__JAEI=((__TYPE_VOID *)__tmp__IAEI)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__JAEI=((__TYPE_CONTEXT *)__tmp__IAEI)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__JAEI=((__TYPE_ID *)__tmp__IAEI)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__JAEI=((__TYPE_GENERIC *)__tmp__IAEI)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__JAEI=((__PROFIL_BLOCK *)__tmp__IAEI)->parent_type__HHAG.default__AKC;
  } break;
  };
  Self__FAEI->parent_constant__53JH.static_type__F4YD=__tmp__JAEI;
  return(result__YYOH);
}

static __STRING_CST* create__text__AUMH(__POSITION p__CUMH,void *n__DUMH)
// ({POSITION},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __STRING_CST *result__K0OH,*Self__LAEI;
  __POINTER ptr__L0OH;
  __INTEGER typ_id__Q0OH;
  __UINTEGER_32 sz__N0OH,a__5V0Q,new_size__3V0Q,t__DW0Q,a__FW0Q;
  void *__tmp__OAEI;
  void *__tmp__PAEI;
  result__K0OH=NULL;
  ptr__L0OH=((__POINTER )(NULL));
  typ_id__Q0OH= 0;
  sz__N0OH=((__UINTEGER_32 )sizeof(__STRING_CST));
  if ((sz__N0OH ==  0)) {
    result__K0OH=STRING_CST__;
  } else {
    typ_id__Q0OH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__N0OH);
    if ((typ_id__Q0OH == (__INTEGER)(-  1))) {
      a__5V0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__3V0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__N0OH + a__5V0Q) & (__UINTEGER_32)(~ a__5V0Q));
      ptr__L0OH=micro_alloc__table__lab__BOI(new_size__3V0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3V0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3V0Q);
    } else {
      t__DW0Q=((__UINTEGER_32 )typ_id__Q0OH);
      a__FW0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__L0OH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__N0OH + a__FW0Q) & (__UINTEGER_32)(~ a__FW0Q)),((__POINTER )(&(table_type[(t__DW0Q)]))),(__UINTEGER_32)(t__DW0Q |  1));
    };
    result__K0OH=((__STRING_CST *)ptr__L0OH);
    *(result__K0OH) = *(STRING_CST__);
  };
  Self__LAEI=((__STRING_CST *)result__K0OH);
  Self__LAEI->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=p__CUMH;
  Self__LAEI->string__ZK2H=n__DUMH;
  __tmp__OAEI=type_string_constant__TKB;
  switch (((struct ___OBJ *)__tmp__OAEI)->__id) {
  case __TYPE__: {
    __tmp__PAEI=((__TYPE *)__tmp__OAEI)->default__AKC;
  } break;
  case __TYPE_NULL__: {
    __tmp__PAEI=((__TYPE_NULL *)__tmp__OAEI)->parent_type__TIB.default__AKC;
  } break;
  case __TYPE_VOID__: {
    __tmp__PAEI=((__TYPE_VOID *)__tmp__OAEI)->parent_type__UIB.default__AKC;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__PAEI=((__TYPE_CONTEXT *)__tmp__OAEI)->parent_type__VIB.default__AKC;
  } break;
  case __TYPE_ID__: {
    __tmp__PAEI=((__TYPE_ID *)__tmp__OAEI)->parent_type__WIB.default__AKC;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__PAEI=((__TYPE_GENERIC *)__tmp__OAEI)->parent_type__T2IB.default__AKC;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__PAEI=((__PROFIL_BLOCK *)__tmp__OAEI)->parent_type__HHAG.default__AKC;
  } break;
  };
  Self__LAEI->parent_constant__5F.static_type__F4YD=__tmp__PAEI;
  return(result__K0OH);
}

static void* to_run_expr__J4JH(__ITM_EXTERNAL *Self__K4JH)
// ({ITM_EXTERNAL}) With resultNo recursive, No inlinable.
{
  void *result__M4JH,*exp1__P4JH,*exp2__Q4JH,*left__S4JH,*right__T4JH;
  void *type__U4JH,*__tmp__3FKH,*__tmp__YHKH;
  __STRING_CONSTANT *Self__LUMH,*Self__RARH;
  __INTEGER state__OUMH,value__PUMH,i__NUMH,state__UARH,result__XARH;
  __INTEGER i__TARH,__tmp__1FKH,base__QJRH,idx__PJRH,j__ROYI;
  __POSITION pos__FTIQ,__tmp__0FKH,__tmp__WHKH,pos__ITIQ,pos__CEVH;
  __POSITION pos__LTIQ,pos__HK5I;
  void *__tmp__2FKH,*__tmp__XHKH;
  void *loc__SJRH,*n__OOYI;
  void *result__QOYI;
  __BOOLEAN negative__QUMH,result__RUMH,__tmp__5VMH,result__1KIJ;
  __BOOLEAN __tmp__LWMH,result__ILIJ,__tmp__5WMH,__tmp__4XMH;
  __BOOLEAN result__PSXI,__tmp__S0MH,result__BTXI,__tmp__5ZMH;
  __BOOLEAN negative__WARH,__tmp__DCRH,result__FPIJ,__tmp__WCRH;
  __BOOLEAN __tmp__LDRH,result__HEYI,__tmp__SERH,result__ZEYI;
  __BOOLEAN __tmp__QQYI,__tmp__YMRH;
  __CHARACTER cc__SUMH,cc__VARH;
  void *access_list__UJRH;
  void **__tmp__E35Q;
  result__M4JH=NULL;
  exp1__P4JH=NULL;
  exp2__Q4JH=NULL;
  left__S4JH=NULL;
  right__T4JH=NULL;
  type__U4JH=NULL;
  Self__LUMH=((__STRING_CONSTANT *)Self__K4JH->parent_itm_extern__MAJC.extern__CJ1D);
  state__OUMH= 0;
  value__PUMH= 0;
  negative__QUMH=FALSE__;
  result__RUMH=FALSE__;
  cc__SUMH='\0';
  i__NUMH= 1;
  while ((! ((state__OUMH ==  4) || (i__NUMH > Self__LUMH->count__XHB)))) {
    cc__SUMH=((__CHARACTER *)Self__LUMH->storage__C5K)[(__INTEGER)(i__NUMH -  1)];
    if ((state__OUMH ==  0)) {
      if (is_separator__4D3E(cc__SUMH)) {
        __tmp__5VMH=TRUE__;
      } else {
        result__1KIJ=(cc__SUMH == '+');
        if (result__1KIJ) {
          state__OUMH= 1;
        };
        __tmp__5VMH=result__1KIJ;
      };
      if (__tmp__5VMH) {
        __tmp__LWMH=TRUE__;
      } else {
        result__ILIJ=(cc__SUMH == '-');
        if (result__ILIJ) {
          negative__QUMH=TRUE__;
          state__OUMH= 1;
        };
        __tmp__LWMH=result__ILIJ;
      };
      if ((! __tmp__LWMH)) {
        if (is_digit__EWEB(cc__SUMH)) {
          value__PUMH=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SUMH)) -  48);
          state__OUMH= 2;
        } else {
          state__OUMH= 4;
        };
      };
      __tmp__5WMH=TRUE__;
    } else {
      __tmp__5WMH=FALSE__;
    };
    if (__tmp__5WMH) {
      __tmp__4XMH=TRUE__;
    } else {
      result__PSXI=(state__OUMH ==  1);
      if (result__PSXI) {
        if (is_digit__EWEB(cc__SUMH)) {
          value__PUMH=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SUMH)) -  48);
          if (negative__QUMH) {
            value__PUMH=(__INTEGER)(- value__PUMH);
          };
          state__OUMH= 2;
        } else {
          state__OUMH= 4;
        };
      };
      __tmp__4XMH=result__PSXI;
    };
    if (__tmp__4XMH) {
      __tmp__S0MH=TRUE__;
    } else {
      result__BTXI=(state__OUMH ==  2);
      if (result__BTXI) {
        if (is_digit__EWEB(cc__SUMH)) {
          if (negative__QUMH) {
            value__PUMH=(__INTEGER)((__INTEGER)( 10 * value__PUMH) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SUMH)) -  48));
          } else {
            value__PUMH=(__INTEGER)((__INTEGER)( 10 * value__PUMH) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SUMH)) -  48));
          };
          if (((negative__QUMH && (value__PUMH >  0)) || ((! negative__QUMH) && (value__PUMH <  0)))) {
            state__OUMH= 4;
          };
          __tmp__5ZMH=TRUE__;
        } else {
          __tmp__5ZMH=FALSE__;
        };
        if ((! __tmp__5ZMH)) {
          if (is_separator__4D3E(cc__SUMH)) {
            state__OUMH= 3;
          } else {
            state__OUMH= 4;
          };
        };
      };
      __tmp__S0MH=result__BTXI;
    };
    if ((! __tmp__S0MH)) {
      if ((state__OUMH ==  3)) {
        if ((! is_separator__4D3E(cc__SUMH))) {
          state__OUMH= 4;
        };
      };
    };
    i__NUMH=(__INTEGER)(i__NUMH +  1);
  };
  if (((state__OUMH !=  0) && (state__OUMH !=  4))) {
    result__RUMH=TRUE__;
  };
  if (result__RUMH) {
    Self__RARH=((__STRING_CONSTANT *)Self__K4JH->parent_itm_extern__MAJC.extern__CJ1D);
    state__UARH= 0;
    cc__VARH='\0';
    negative__WARH=FALSE__;
    result__XARH= 0;
    i__TARH= 1;
    while ((i__TARH <= Self__RARH->count__XHB)) {
      cc__VARH=((__CHARACTER *)Self__RARH->storage__C5K)[(__INTEGER)(i__TARH -  1)];
      if ((state__UARH ==  0)) {
        if (is_separator__4D3E(cc__VARH)) {
          __tmp__DCRH=TRUE__;
        } else {
          result__FPIJ=(cc__VARH == '+');
          if (result__FPIJ) {
            state__UARH= 1;
          };
          __tmp__DCRH=result__FPIJ;
        };
        if ((! __tmp__DCRH)) {
          if ((cc__VARH == '-')) {
            negative__WARH=TRUE__;
            state__UARH= 1;
          } else {
            result__XARH=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VARH)) -  48);
            state__UARH= 2;
          };
        };
        __tmp__WCRH=TRUE__;
      } else {
        __tmp__WCRH=FALSE__;
      };
      if (__tmp__WCRH) {
        __tmp__LDRH=TRUE__;
      } else {
        result__HEYI=(state__UARH ==  1);
        if (result__HEYI) {
          result__XARH=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VARH)) -  48);
          if (negative__WARH) {
            result__XARH=(__INTEGER)(- result__XARH);
          };
          state__UARH= 2;
        };
        __tmp__LDRH=result__HEYI;
      };
      if (__tmp__LDRH) {
        __tmp__SERH=TRUE__;
      } else {
        result__ZEYI=(state__UARH ==  2);
        if (result__ZEYI) {
          if (is_digit__EWEB(cc__VARH)) {
            if (negative__WARH) {
              result__XARH=(__INTEGER)((__INTEGER)( 10 * result__XARH) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VARH)) -  48));
            } else {
              result__XARH=(__INTEGER)((__INTEGER)( 10 * result__XARH) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VARH)) -  48));
            };
          } else {
            state__UARH= 3;
          };
        };
        __tmp__SERH=result__ZEYI;
      };
      if ((! __tmp__SERH)) {
        if ((state__UARH ==  3)) {
          i__TARH=Self__RARH->count__XHB;
        };
      };
      i__TARH=(__INTEGER)(i__TARH +  1);
    };
    if ((result__XARH >  15)) {
      pos__FTIQ=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 0,(&__string_480));
      put_position__ECH(pos__FTIQ);
      send_error__2FH();
    };
    if ((result__XARH ==  0)) {
      exp1__P4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      result__M4JH=create__receiver__WRWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,exp1__P4JH);
    };
    if ((result__XARH ==  1)) {
      exp1__P4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      result__M4JH=create__receiver__HSWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,exp1__P4JH);
    };
    if ((result__XARH ==  2)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__BTWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  3)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__2TWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  4)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__XUWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  5)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__SVWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  6)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__NWWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  7)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__IXWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  8)) {
      left__S4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      right__T4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__with__and__DYWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,left__S4JH,right__T4JH);
    };
    if ((result__XARH ==  9)) {
      exp1__P4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      exp2__Q4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__base__index__value__DZWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,exp1__P4JH,read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 2]),exp2__Q4JH);
    };
    if ((result__XARH ==  10)) {
      exp1__P4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      exp2__Q4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__base__index__3ZWH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,exp1__P4JH,exp2__Q4JH);
    };
    if ((result__XARH ==  11)) {
      __tmp__0FKH=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
      __tmp__1FKH=debug_level_option__3C;
      __tmp__2FKH=type_integer__3JB;
      switch (((struct ___OBJ *)__tmp__2FKH)->__id) {
      case __TYPE__: {
        __tmp__3FKH=((__TYPE *)__tmp__2FKH)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__3FKH=((__TYPE_NULL *)__tmp__2FKH)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__3FKH=((__TYPE_VOID *)__tmp__2FKH)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__3FKH=((__TYPE_CONTEXT *)__tmp__2FKH)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__3FKH=((__TYPE_ID *)__tmp__2FKH)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__3FKH=((__TYPE_GENERIC *)__tmp__2FKH)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__3FKH=((__PROFIL_BLOCK *)__tmp__2FKH)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__M4JH=create__value__type__DNQC(__tmp__0FKH,((__INTEGER_64 )__tmp__1FKH),__tmp__3FKH);
    };
    if ((result__XARH ==  12)) {
      exp1__P4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 0]);
      result__M4JH=create__receiver__A1WH(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,exp1__P4JH);
    };
    if ((result__XARH ==  13)) {
      type__U4JH=((__LOCAL *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH)->parent_variable__B2LC.type__125F;
      exp2__Q4JH=read__IC5G(((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[ 1]);
      result__M4JH=create__value__S1WH(CAST__,type__U4JH,exp2__Q4JH);
    };
    if ((result__XARH ==  14)) {
      if ((debug_level_option__3C ==  0)) {
        result__M4JH=create__type__CLQC(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,TYPE_NULL__->parent_type__TIB.default__AKC);
      } else {
        __tmp__WHKH=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        __tmp__XHKH=type_pointer__HLB;
        switch (((struct ___OBJ *)__tmp__XHKH)->__id) {
        case __TYPE__: {
          __tmp__YHKH=((__TYPE *)__tmp__XHKH)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__YHKH=((__TYPE_NULL *)__tmp__XHKH)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__YHKH=((__TYPE_VOID *)__tmp__XHKH)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__YHKH=((__TYPE_CONTEXT *)__tmp__XHKH)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__YHKH=((__TYPE_ID *)__tmp__XHKH)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__YHKH=((__TYPE_GENERIC *)__tmp__XHKH)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__YHKH=((__PROFIL_BLOCK *)__tmp__XHKH)->parent_type__HHAG.default__AKC;
        } break;
        };
        result__M4JH=create__text__access__persistant__type__2U0C(__tmp__WHKH,(&__string_481),NULL,FALSE__,__tmp__YHKH);
      };
    };
    if ((result__XARH ==  15)) {
      pos__ITIQ=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 0,(&__string_482));
      put_position__ECH(pos__ITIQ);
      send_error__2FH();
    };
  } else {
    base__QJRH= 0;
    loc__SJRH=NULL;
    access_list__UJRH=NULL;
    copy__BNK(string_tmp2__ADB,Self__K4JH->parent_itm_extern__MAJC.extern__CJ1D);
    idx__PJRH=index_of__since__AVOH(string_tmp2__ADB, 1);
    if ((idx__PJRH <= ((__STRING *)string_tmp2__ADB)->count__VF)) {
      access_list__UJRH=new__50LH();
      while ((idx__PJRH <= ((__STRING *)string_tmp2__ADB)->count__VF)) {
        base__QJRH=idx__PJRH;
        idx__PJRH=(__INTEGER)(idx__PJRH +  1);
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        while ((! ((idx__PJRH > ((__STRING *)string_tmp2__ADB)->count__VF) || ((! is_letter_or_digit__TBCJ(((__CHARACTER *)((__STRING *)string_tmp2__ADB)->storage__XNK)[(__INTEGER)(idx__PJRH -  1)])) && (((__CHARACTER *)((__STRING *)string_tmp2__ADB)->storage__XNK)[(__INTEGER)(idx__PJRH -  1)] != '_'))))) {
          add_last__YPK(string_tmp__RB,((__CHARACTER *)((__STRING *)string_tmp2__ADB)->storage__XNK)[(__INTEGER)(idx__PJRH -  1)]);
          idx__PJRH=(__INTEGER)(idx__PJRH +  1);
        };
        if ((((__STRING *)string_tmp__RB)->count__VF ==  0)) {
          pos__CEVH=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 0,(&__string_475));
          put_position__ECH(pos__CEVH);
          send_error__2FH();
        };
        loc__SJRH=get__QEC(string_tmp__RB);
        n__OOYI=loc__SJRH;
        result__QOYI=NULL;
        j__ROYI=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
        __tmp__E35Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
        while ((! ((j__ROYI < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__E35Q)[j__ROYI])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__OOYI)))) {
          j__ROYI=(__INTEGER)(j__ROYI -  1);
        };
        if ((j__ROYI >= stack_local_lower__AI4F)) {
          result__QOYI=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__ROYI];
          if (((j__ROYI < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__QOYI)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
            context_extern__1OLH=result__QOYI;
          };
          __tmp__QQYI=TRUE__;
        } else {
          __tmp__QQYI=FALSE__;
        };
        if ((! __tmp__QQYI)) {
          if (((void *)profil_first__4PQC != (void *)NULL)) {
            result__QOYI=lookup__LLJM(profil_first__4PQC,loc__SJRH);
            if ((((void *)result__QOYI != (void *)NULL) && ((void *)((__LOCAL *)result__QOYI)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
              context_extern__1OLH=result__QOYI;
            };
          };
        };
        if (((void *)result__QOYI == (void *)NULL)) {
          copy__BNK(string_tmp__RB,(&__string_476));
          append__MOK(string_tmp__RB,loc__SJRH);
          append__MOK(string_tmp__RB,(&__string_477));
          pos__LTIQ=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(pos__LTIQ);
          send_error__2FH();
          __tmp__YMRH=TRUE__;
        } else {
          __tmp__YMRH=FALSE__;
        };
        if ((! __tmp__YMRH)) {
          if ((((__LOCAL *)result__QOYI)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == '-')) {
            copy__BNK(string_tmp__RB,(&__string_476));
            append__MOK(string_tmp__RB,loc__SJRH);
            append__MOK(string_tmp__RB,(&__string_478));
            pos__HK5I=Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
            put_error__text__0AH( 1,string_tmp__RB);
            put_position__ECH(pos__HK5I);
            send_error__2FH();
          };
        };
        add_last__XSEI(access_list__UJRH,read__IC5G(result__QOYI));
        remove_between__to__ZVCC(string_tmp2__ADB,base__QJRH,(__INTEGER)(base__QJRH + ((__STRING_CONSTANT *)loc__SJRH)->count__XHB));
        insert_string__to__KMQG(string_tmp2__ADB,(&__string_479),base__QJRH);
        idx__PJRH=index_of__since__AVOH(string_tmp2__ADB,(__INTEGER)(base__QJRH +  2));
      };
      access_list__UJRH=copy__QGTH(access_list__UJRH);
    };
    last_code__41JH=get__QEC(string_tmp2__ADB);
    result__M4JH=create__text__access__persistant__type__2U0C(Self__K4JH->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM,last_code__41JH,access_list__UJRH,TRUE__,TYPE_VOID__->parent_type__UIB.default__AKC);
  };
  return(result__M4JH);
}

static void* to_run_expr__TIKH(__ITM_READ_ARGS *Self__UIKH)
// ({ITM_READ_ARGS}) With resultRecursive, No inlinable.
{
  __INTEGER __tmp__4IKH,Self__I2MH,__tmp__CCNH,__tmp__MENH,Self__ZXTH;
  void *__tmp__KJKH,*__tmp__D4MH,*__tmp__SENH;
  void *receiver__32MH,*__tmp__Z3MH,*__tmp__TENH,*__tmp__AFNH;
  void *__tmp__BFNH,*__tmp__3FNH,*__tmp__AINH,*__tmp__BINH;
  __POSITION pos_null__A3MH,__tmp__N21P,pos__RTIQ,pos__UWTH,__tmp__WCNH;
  __POSITION __tmp__2CNH,__tmp__QDNH,__tmp__R31P,__tmp__CHNH;
  void *itm_list__D3MH,*__tmp__13MH;
  void *itm_read__E3MH,*__tmp__E4MH,*__tmp__L4MH;
  void *slot_msg__G3MH,*__tmp__55MH;
  void *base__I3MH;
  __ITM_CHARACTER *Self__O21P,*Self__S31P;
  __ITM_STRING *Self__P21P,*Self__T31P;
  void *__tmp__T4MH;
  void *__tmp__U4MH,*__tmp__45MH;
  void *__tmp__24MH,*__tmp__5GNH;
  void *receiver_type__42MH,*__tmp__I5MH,*__tmp__ZANH,*__tmp__0ANH;
  void *__tmp__RANH,*__tmp__XANH,*__tmp__EBNH;
  void *__tmp__SBNH,*__tmp__DCNH;
  void *__tmp__3CNH;
  void *__tmp__0DNH,*em__52MH;
  __STRING_CST *Self__VTIQ,*Self__BUIQ;
  __PROTOTYPE_CST *Self__WTIQ,*Self__CUIQ;
  __INTEGER_CST *Self__XTIQ,*Self__DUIQ;
  __REAL_CST *Self__ZTIQ,*Self__FUIQ;
  __CHARACTER_CST *Self__1TIQ,*Self__HUIQ;
  __IS_EXPANDED *Self__2TIQ,*Self__IUIQ;
  __READ_LOCAL *Self__3TIQ,*Self__5TIQ;
  __READ_GLOBAL *Self__AUIQ;
  void *l_arg__WIKH;
  __BOOLEAN is_resend__F3MH,is_block_value__H3MH,__tmp__Z4MH;
  __BOOLEAN __tmp__J5MH,__tmp__1ANH,__tmp__4ANH,__tmp__XBNH,__tmp__NCNH;
  __BOOLEAN __tmp__KCNH,__tmp__GFNH;
  void *args__22MH;
  l_arg__WIKH=new__KFFC();
  __tmp__4IKH=((__FAST_ARRAYoITM_CODEo *)Self__UIKH->args__TEQC)->parent_arrayed_collection__AFEC.upper__ZAPC;
  Self__I2MH= 1;
  while ((Self__I2MH <= __tmp__4IKH)) {
    add_last__I4PC(l_arg__WIKH,((void **)((__FAST_ARRAYoITM_CODEo *)Self__UIKH->args__TEQC)->parent_arrayed_collection__AFEC.storage__ACPC)[Self__I2MH]);
    Self__I2MH=(__INTEGER)(Self__I2MH +  1);
  };
  __tmp__KJKH=((void **)((__FAST_ARRAYoITM_CODEo *)Self__UIKH->args__TEQC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 0];
  receiver__32MH=NULL;
  pos_null__A3MH=((__POSITION ) 0);
  itm_list__D3MH=NULL;
  itm_read__E3MH=NULL;
  is_resend__F3MH=FALSE__;
  slot_msg__G3MH=NULL;
  is_block_value__H3MH=FALSE__;
  base__I3MH=NULL;
  args__22MH=new__50LH();
  if (((void *)__tmp__KJKH == (void *)NULL)) {
    receiver__32MH=read__IC5G(lookup__SSTH());
  } else {
    switch (((struct ___OBJ *)__tmp__KJKH)->__id) {
    case __ITM_LIST__: {
      __tmp__Z3MH=to_run_expr__D3IH(__tmp__KJKH);
    } break;
    case __ITM_LDOTS__: {
      __tmp__Z3MH=to_run_expr__E0QH(__tmp__KJKH);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__Z3MH=to_run_expr__M3IH(__tmp__KJKH);
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__N21P=((__ITM_LIST_IDF *)__tmp__KJKH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_328));
      put_position__ECH(__tmp__N21P);
      send_error__2FH();
      __tmp__Z3MH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__Z3MH=to_run_expr__UAJH(__tmp__KJKH);
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__Z3MH=to_run_expr__WDJH(__tmp__KJKH);
    } break;
    case __ITM_READ__: {
      __tmp__Z3MH=to_run_expr__JGJH(__tmp__KJKH);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__Z3MH=to_run_expr__MHJH(__tmp__KJKH);
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__Z3MH=to_run_expr__3IJH(__tmp__KJKH);
    } break;
    case __ITM_BINARY__: {
      __tmp__Z3MH=to_run_expr__RMJH(__tmp__KJKH);
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__Z3MH=to_run_expr__0XJH(__tmp__KJKH);
    } break;
    case __ITM_OLD__: {
      __tmp__Z3MH=to_run_expr__5XJH(__tmp__KJKH);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__Z3MH=to_run_expr__U1JH(__tmp__KJKH);
    } break;
    case __ITM_REAL__: {
      __tmp__Z3MH=to_run_expr__J3JH(__tmp__KJKH);
    } break;
    case __ITM_NUMBER__: {
      __tmp__Z3MH=to_run_expr__T3JH(__tmp__KJKH);
    } break;
    case __ITM_CHARACTER__: {
      Self__O21P=((__ITM_CHARACTER *)__tmp__KJKH);
      __tmp__Z3MH=create__char__WTMH(Self__O21P->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__O21P->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__P21P=((__ITM_STRING *)__tmp__KJKH);
      __tmp__Z3MH=create__text__AUMH(Self__P21P->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__P21P->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__Z3MH=to_run_expr__J4JH(__tmp__KJKH);
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__Z3MH=to_run_expr__TIKH(__tmp__KJKH);
    } break;
    case __ITM_RESULT__: {
      print__1ZE((&__string_460));
      fputc((int)('\n'),stdout);
      exit(( 1));
      __tmp__Z3MH=NULL;
    } break;
    };
    receiver__32MH=__tmp__Z3MH;
    if (__tmp__KJKH==NULL) {
      __tmp__13MH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__KJKH)->__id) {
      case __ITM_LIST__: {
        __tmp__13MH=((void *)__tmp__KJKH);
      } break;
      case __ITM_LDOTS__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_LIST_IDF__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_WRITE_VALUE__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_WRITE_CAST__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_READ__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_WRITE_CODE__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_BINARY__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_OLD__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_REAL__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_NUMBER__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_CHARACTER__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_STRING__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__13MH=NULL;
      } break;
      case __ITM_RESULT__: {
        __tmp__13MH=NULL;
      } break;
      }
    };
    itm_list__D3MH=__tmp__13MH;
    if (((void *)__tmp__13MH != (void *)NULL)) {
      __tmp__D4MH=((void **)((__FAST_ARRAYoITM_CODEo *)((__ITM_LIST *)__tmp__13MH)->code__G5OC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 0];
      if (__tmp__D4MH==NULL) {
        __tmp__E4MH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__D4MH)->__id) {
        case __ITM_LIST__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_LDOTS__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_READ__: {
          __tmp__E4MH=((void *)__tmp__D4MH);
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__E4MH=((void *)__tmp__D4MH);
        } break;
        case __ITM_BINARY__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__E4MH=((void *)__tmp__D4MH);
        } break;
        case __ITM_OLD__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_REAL__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_NUMBER__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_STRING__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__E4MH=NULL;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__E4MH=((void *)__tmp__D4MH);
        } break;
        case __ITM_RESULT__: {
          __tmp__E4MH=NULL;
        } break;
        }
      };
      itm_read__E3MH=__tmp__E4MH;
    } else {
      if (__tmp__KJKH==NULL) {
        __tmp__L4MH=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__KJKH)->__id) {
        case __ITM_LIST__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_LDOTS__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_READ__: {
          __tmp__L4MH=((void *)__tmp__KJKH);
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__L4MH=((void *)__tmp__KJKH);
        } break;
        case __ITM_BINARY__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__L4MH=((void *)__tmp__KJKH);
        } break;
        case __ITM_OLD__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_REAL__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_NUMBER__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_STRING__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__L4MH=NULL;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__L4MH=((void *)__tmp__KJKH);
        } break;
        case __ITM_RESULT__: {
          __tmp__L4MH=NULL;
        } break;
        }
      };
      itm_read__E3MH=__tmp__L4MH;
    };
    if (((void *)itm_read__E3MH != (void *)NULL)) {
      __tmp__T4MH=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM)) &  511)];
      switch (((struct ___OBJ *)itm_read__E3MH)->__id) {
      case __ITM_READ__: {
        __tmp__U4MH=((__ITM_READ *)itm_read__E3MH)->name__TVPC;
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__U4MH=((__ITM_READ_ARG2 *)itm_read__E3MH)->parent_itm_read__V4FC.name__TVPC;
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__U4MH=((__ITM_READ_ARG1 *)itm_read__E3MH)->parent_itm_read__S5GC.name__TVPC;
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__U4MH=((__ITM_READ_ARGS *)itm_read__E3MH)->parent_itm_read__J5JC.name__TVPC;
      } break;
      };
      __tmp__Z4MH=search_parent__UJWH(__tmp__T4MH,__tmp__U4MH);
    } else {
      __tmp__Z4MH=FALSE__;
    };
    is_resend__F3MH=__tmp__Z4MH;
  };
  switch (((struct ___OBJ *)receiver__32MH)->__id) {
  case __LIST__: {
    __tmp__24MH=static_type__GIQG(receiver__32MH);
  } break;
  case __STRING_CST__: {
    __tmp__24MH=((__STRING_CST *)receiver__32MH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__24MH=((__EXTERNAL_C *)receiver__32MH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__24MH=((__PROTOTYPE_CST *)receiver__32MH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__24MH=((__INTEGER_CST *)receiver__32MH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__24MH=((__LOCAL *)((__READ_LOCAL *)receiver__32MH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__24MH=static_type__0N1H(receiver__32MH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__24MH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__24MH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__24MH=((__REAL_CST *)receiver__32MH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__24MH=((__CHARACTER_CST *)receiver__32MH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__24MH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__24MH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__24MH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__24MH=static_type__MP1H(receiver__32MH);
  } break;
  case __EXPR_MUL__: {
    __tmp__24MH=static_type__SP1H(receiver__32MH);
  } break;
  case __EXPR_DIV__: {
    __tmp__24MH=static_type__XP1H(receiver__32MH);
  } break;
  case __EXPR_AND__: {
    __tmp__24MH=static_type__2P1H(receiver__32MH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__24MH=static_type__BQ1H(receiver__32MH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__24MH=static_type__GQ1H(receiver__32MH);
  } break;
  case __PUT_TO__: {
    __tmp__24MH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__24MH=static_type__PQ1H(receiver__32MH);
  } break;
  case __SIZE_OF__: {
    __tmp__24MH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__24MH=((__CAST *)receiver__32MH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__24MH=static_type__GIKL(receiver__32MH);
  } break;
  case __READ_SLOT__: {
    __tmp__24MH=((__SLOT_DATA *)((__READ_SLOT *)receiver__32MH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__24MH=((__SLOT_DATA *)((__READ_GLOBAL *)receiver__32MH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__24MH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__24MH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__24MH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__24MH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__24MH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__24MH=static_type__Z2IM(receiver__32MH);
  } break;
  case __EXPR_ADD__: {
    __tmp__24MH=static_type__IXML(receiver__32MH);
  } break;
  case __EXPR_NOT__: {
    __tmp__24MH=static_type__BTXM(receiver__32MH);
  } break;
  case __EXPR_MOD__: {
    __tmp__24MH=static_type__5LEO(receiver__32MH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__24MH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__24MH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__24MH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__24MH=static_type__NOPN(receiver__32MH);
  } break;
  case __EXPR_XOR__: {
    __tmp__24MH=static_type__XCSO(receiver__32MH);
  } break;
  };
  receiver_type__42MH=((__TYPE_FULL *)__tmp__24MH)->parent_type__KTL;
  if (((void *)receiver_type__42MH == (void *)TYPE_VOID__)) {
    pos__RTIQ=Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_463));
    put_position__ECH(pos__RTIQ);
    send_error__2FH();
  };
  __tmp__I5MH=type_block__BLB;
  switch (((struct ___OBJ *)receiver_type__42MH)->__id) {
  case __TYPE__: {
    __tmp__J5MH=((void *)((__TYPE *)receiver_type__42MH) == (void *)__tmp__I5MH);
  } break;
  case __TYPE_NULL__: {
    __tmp__J5MH=((void *)((__TYPE_NULL *)receiver_type__42MH) == (void *)__tmp__I5MH);
  } break;
  case __TYPE_VOID__: {
    __tmp__J5MH=((void *)((__TYPE_VOID *)receiver_type__42MH) == (void *)__tmp__I5MH);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__J5MH=((void *)((__TYPE_CONTEXT *)receiver_type__42MH) == (void *)__tmp__I5MH);
  } break;
  case __TYPE_ID__: {
    __tmp__J5MH=((void *)((__TYPE_ID *)receiver_type__42MH) == (void *)__tmp__I5MH);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__J5MH=((void *)((__TYPE_GENERIC *)receiver_type__42MH) == (void *)__tmp__I5MH);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__J5MH=__infix_equal_equal__GSFJ(receiver_type__42MH,__tmp__I5MH);
  } break;
  };
  if ((__tmp__J5MH && ((void *)Self__UIKH->parent_itm_read__J5JC.name__TVPC == (void *)(&__string_79)))) {
    is_block_value__H3MH=TRUE__;
  } else {
    __tmp__45MH=Self__UIKH->parent_itm_read__J5JC.name__TVPC;
    switch (((struct ___OBJ *)receiver_type__42MH)->__id) {
    case __TYPE__: {
      __tmp__55MH=get_slot__U1BG(receiver_type__42MH,__tmp__45MH);
    } break;
    case __TYPE_NULL__: {
      __tmp__55MH=get_slot__K3BG(receiver_type__42MH,__tmp__45MH);
    } break;
    case __TYPE_VOID__: {
      __tmp__55MH=get_slot__A5BG(receiver_type__42MH,__tmp__45MH);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__55MH=get_slot__WACG(receiver_type__42MH,__tmp__45MH);
    } break;
    case __TYPE_ID__: {
      __tmp__55MH=get_slot__MCCG(receiver_type__42MH,__tmp__45MH);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__55MH=get_slot__CECG(receiver_type__42MH,__tmp__45MH);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__55MH=get_slot__VXEJ(__tmp__45MH);
    } break;
    };
    slot_msg__G3MH=__tmp__55MH;
    if (((void *)__tmp__55MH == (void *)NULL)) {
      copy__BNK(string_tmp__RB,(&__string_456));
      append__MOK(string_tmp__RB,Self__UIKH->parent_itm_read__J5JC.name__TVPC);
      append__MOK(string_tmp__RB,(&__string_464));
      switch (((struct ___OBJ *)receiver_type__42MH)->__id) {
      case __TYPE__: {
        append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)receiver_type__42MH)->prototype__RD)->parent_named__QD.name__1QB);
      } break;
      case __TYPE_NULL__: {
        append__MOK(string_tmp__RB,(&__string_59));
      } break;
      case __TYPE_VOID__: {
        append__MOK(string_tmp__RB,(&__string_2));
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(string_tmp__RB,(&__string_44));
      } break;
      case __TYPE_ID__: {
        append__MOK(string_tmp__RB,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        append__MOK(string_tmp__RB,((__TYPE_GENERIC *)receiver_type__42MH)->name__2R2B);
      } break;
      case __PROFIL_BLOCK__: {
        append__MOK(string_tmp__RB,(&__string_39));
      } break;
      };
      append__MOK(string_tmp__RB,(&__string_465));
      pos__UWTH=Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,string_tmp__RB);
      put_position__ECH(pos__UWTH);
      send_error__2FH();
    };
    if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
      __tmp__RANH=((__SLOT *)((__SLOT_DATA *)__tmp__55MH)->parent_slot__BJZD)->slot_data_intern__1JZD;
    } else {
      __tmp__RANH=((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->slot_data_intern__1JZD;
    };
    if (((void *)__tmp__RANH != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
        __tmp__XANH=((__SLOT *)((__SLOT_DATA *)__tmp__55MH)->parent_slot__BJZD)->slot_data_intern__1JZD;
      } else {
        __tmp__XANH=((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->slot_data_intern__1JZD;
      };
      __tmp__ZANH=((__TYPE_FULL *)((__SLOT_DATA *)__tmp__XANH)->parent_variable__AJZD.type__125F)->parent_type__KTL;
      __tmp__0ANH=type_block__BLB;
      switch (((struct ___OBJ *)__tmp__ZANH)->__id) {
      case __TYPE__: {
        __tmp__1ANH=((void *)((__TYPE *)__tmp__ZANH) == (void *)__tmp__0ANH);
      } break;
      case __TYPE_NULL__: {
        __tmp__1ANH=((void *)((__TYPE_NULL *)__tmp__ZANH) == (void *)__tmp__0ANH);
      } break;
      case __TYPE_VOID__: {
        __tmp__1ANH=((void *)((__TYPE_VOID *)__tmp__ZANH) == (void *)__tmp__0ANH);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__1ANH=((void *)((__TYPE_CONTEXT *)__tmp__ZANH) == (void *)__tmp__0ANH);
      } break;
      case __TYPE_ID__: {
        __tmp__1ANH=((void *)((__TYPE_ID *)__tmp__ZANH) == (void *)__tmp__0ANH);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__1ANH=((void *)((__TYPE_GENERIC *)__tmp__ZANH) == (void *)__tmp__0ANH);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__1ANH=__infix_equal_equal__GSFJ(__tmp__ZANH,__tmp__0ANH);
      } break;
      };
      __tmp__4ANH=__tmp__1ANH;
    } else {
      __tmp__4ANH=FALSE__;
    };
    if (__tmp__4ANH) {
      if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
        __tmp__EBNH=slot_data__Z4TH(__tmp__55MH);
      } else {
        __tmp__EBNH=slot_data__T5TH(__tmp__55MH);
      };
      init__C4OG(__tmp__EBNH);
    };
    if (verify__JDAG) {
      if (((void *)l_arg__WIKH == (void *)NULL)) {
        if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
          __tmp__SBNH=((__SLOT *)((__SLOT_DATA *)__tmp__55MH)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__SBNH=((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->base_slot__P22F;
        };
        __tmp__XBNH=((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__SBNH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) !=  1);
      } else {
        __tmp__XBNH=FALSE__;
      };
      if (__tmp__XBNH) {
        __tmp__NCNH=TRUE__;
      } else {
        if (((void *)l_arg__WIKH != (void *)NULL)) {
          __tmp__CCNH=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_arg__WIKH)->parent_arrayed_collection__AFEC.upper__ZAPC +  1);
          if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
            __tmp__DCNH=((__SLOT *)((__SLOT_DATA *)__tmp__55MH)->parent_slot__BJZD)->base_slot__P22F;
          } else {
            __tmp__DCNH=((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->base_slot__P22F;
          };
          __tmp__KCNH=(__tmp__CCNH != (__INTEGER)((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__DCNH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) -  1));
        } else {
          __tmp__KCNH=FALSE__;
        };
        __tmp__NCNH=__tmp__KCNH;
      };
      if (__tmp__NCNH) {
        put_error__text__0AH( 1,(&__string_466));
        if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
          __tmp__WCNH=((__SLOT_DATA *)__tmp__55MH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__WCNH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__WCNH);
        put_position__ECH(Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
        __tmp__2CNH=((__SLOT_DATA *)__tmp__55MH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      } else {
        __tmp__2CNH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
      };
      last_position__GG1=__tmp__2CNH;
      if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
        __tmp__3CNH=id_section__UG4F(__tmp__55MH);
      } else {
        __tmp__3CNH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      if ((! access__with__2QMM(__tmp__3CNH,receiver_type__42MH,((__TYPE_FULL *)to_run__MPXD())->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_467));
        append_name_in__FBYD(to_run__MPXD(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_468));
        put_error__text__0AH( 2,string_tmp__RB);
        if (((struct ___OBJ *)__tmp__55MH)->__id==__SLOT_DATA__) {
          __tmp__QDNH=((__SLOT_DATA *)__tmp__55MH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__QDNH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__55MH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__QDNH);
        put_position__ECH(Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      last_position__GG1=pos_null__A3MH;
    };
  };
  add_arg__to__in__for__block__R3OH(receiver__32MH, 0,args__22MH,slot_msg__G3MH,is_block_value__H3MH);
  if (receiver__32MH==NULL) {
    __tmp__0DNH=NULL;
  } else {
    switch (((struct ___OBJ *)receiver__32MH)->__id) {
    case __LIST__: {
      __tmp__0DNH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0DNH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0DNH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__0DNH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0DNH=((void *)receiver__32MH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0DNH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__0DNH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__0DNH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__0DNH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0DNH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__0DNH=NULL;
    } break;
    case __ITEM__: {
      __tmp__0DNH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__0DNH=NULL;
    } break;
    case __CAST__: {
      __tmp__0DNH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__0DNH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__0DNH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__0DNH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__0DNH=NULL;
    } break;
    }
  };
  em__52MH=__tmp__0DNH;
  if (((void *)__tmp__0DNH != (void *)NULL)) {
    receiver__32MH=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__0DNH)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
  };
  if (((void *)l_arg__WIKH != (void *)NULL)) {
    __tmp__MENH=((__FAST_ARRAYoITM_CODEo *)l_arg__WIKH)->parent_arrayed_collection__AFEC.upper__ZAPC;
    Self__ZXTH= 0;
    while ((Self__ZXTH <= __tmp__MENH)) {
      __tmp__SENH=((void **)((__FAST_ARRAYoITM_CODEo *)l_arg__WIKH)->parent_arrayed_collection__AFEC.storage__ACPC)[Self__ZXTH];
      switch (((struct ___OBJ *)__tmp__SENH)->__id) {
      case __ITM_LIST__: {
        __tmp__TENH=to_run_expr__D3IH(__tmp__SENH);
      } break;
      case __ITM_LDOTS__: {
        __tmp__TENH=to_run_expr__E0QH(__tmp__SENH);
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__TENH=to_run_expr__M3IH(__tmp__SENH);
      } break;
      case __ITM_LIST_IDF__: {
        __tmp__R31P=((__ITM_LIST_IDF *)__tmp__SENH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 1,(&__string_328));
        put_position__ECH(__tmp__R31P);
        send_error__2FH();
        __tmp__TENH=NULL;
      } break;
      case __ITM_WRITE_VALUE__: {
        __tmp__TENH=to_run_expr__UAJH(__tmp__SENH);
      } break;
      case __ITM_WRITE_CAST__: {
        __tmp__TENH=to_run_expr__WDJH(__tmp__SENH);
      } break;
      case __ITM_READ__: {
        __tmp__TENH=to_run_expr__JGJH(__tmp__SENH);
      } break;
      case __ITM_WRITE_CODE__: {
        __tmp__TENH=to_run_expr__MHJH(__tmp__SENH);
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__TENH=to_run_expr__3IJH(__tmp__SENH);
      } break;
      case __ITM_BINARY__: {
        __tmp__TENH=to_run_expr__RMJH(__tmp__SENH);
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__TENH=to_run_expr__0XJH(__tmp__SENH);
      } break;
      case __ITM_OLD__: {
        __tmp__TENH=to_run_expr__5XJH(__tmp__SENH);
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__TENH=to_run_expr__U1JH(__tmp__SENH);
      } break;
      case __ITM_REAL__: {
        __tmp__TENH=to_run_expr__J3JH(__tmp__SENH);
      } break;
      case __ITM_NUMBER__: {
        __tmp__TENH=to_run_expr__T3JH(__tmp__SENH);
      } break;
      case __ITM_CHARACTER__: {
        Self__S31P=((__ITM_CHARACTER *)__tmp__SENH);
        __tmp__TENH=create__char__WTMH(Self__S31P->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__S31P->character__ED0D);
      } break;
      case __ITM_STRING__: {
        Self__T31P=((__ITM_STRING *)__tmp__SENH);
        __tmp__TENH=create__text__AUMH(Self__T31P->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__T31P->string__QD0D);
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__TENH=to_run_expr__J4JH(__tmp__SENH);
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__TENH=to_run_expr__TIKH(__tmp__SENH);
      } break;
      case __ITM_RESULT__: {
        print__1ZE((&__string_460));
        fputc((int)('\n'),stdout);
        exit(( 1));
        __tmp__TENH=NULL;
      } break;
      };
      add_arg__to__in__for__block__R3OH(__tmp__TENH,(__INTEGER)(Self__ZXTH +  1),args__22MH,slot_msg__G3MH,is_block_value__H3MH);
      Self__ZXTH=(__INTEGER)(Self__ZXTH +  1);
    };
  };
  if (is_block_value__H3MH) {
    args__22MH=copy__QGTH(args__22MH);
    __tmp__AFNH=((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    switch (((struct ___OBJ *)__tmp__AFNH)->__id) {
    case __LIST__: {
      __tmp__BFNH=my_copy__2HYM(__tmp__AFNH);
    } break;
    case __STRING_CST__: {
      Self__VTIQ=((__STRING_CST *)__tmp__AFNH);
      __tmp__BFNH=create__text__AUMH(Self__VTIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VTIQ->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__BFNH=my_copy__2K2H(__tmp__AFNH);
    } break;
    case __PROTOTYPE_CST__: {
      Self__WTIQ=((__PROTOTYPE_CST *)__tmp__AFNH);
      __tmp__BFNH=create__type__CLQC(Self__WTIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WTIQ->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__XTIQ=((__INTEGER_CST *)__tmp__AFNH);
      __tmp__BFNH=create__value__type__DNQC(Self__XTIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XTIQ->value__PAZD,Self__XTIQ->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__BFNH=my_copy__OAFJ(__tmp__AFNH);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BFNH=my_copy__KM2H(__tmp__AFNH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BFNH=my_copy__DN2H(__tmp__AFNH);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BFNH=my_copy__QN2H(__tmp__AFNH);
    } break;
    case __REAL_CST__: {
      Self__ZTIQ=((__REAL_CST *)__tmp__AFNH);
      __tmp__BFNH=create__value__type__1SMH(Self__ZTIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZTIQ->value__5N2H,Self__ZTIQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__1TIQ=((__CHARACTER_CST *)__tmp__AFNH);
      __tmp__BFNH=create__char__WTMH(Self__1TIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1TIQ->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__2TIQ=((__IS_EXPANDED *)__tmp__AFNH);
      __tmp__BFNH=create__receiver__WRWH(Self__2TIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__2TIQ->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BFNH=my_copy__TO2H(__tmp__AFNH);
    } break;
    case __EXPR_SUP__: {
      __tmp__BFNH=my_copy__2O2H(__tmp__AFNH);
    } break;
    case __EXPR_SUB__: {
      __tmp__BFNH=my_copy__HP2H(__tmp__AFNH);
    } break;
    case __EXPR_MUL__: {
      __tmp__BFNH=my_copy__TP2H(__tmp__AFNH);
    } break;
    case __EXPR_DIV__: {
      __tmp__BFNH=my_copy__4P2H(__tmp__AFNH);
    } break;
    case __EXPR_AND__: {
      __tmp__BFNH=my_copy__JQ2H(__tmp__AFNH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BFNH=my_copy__UQ2H(__tmp__AFNH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BFNH=my_copy__5Q2H(__tmp__AFNH);
    } break;
    case __PUT_TO__: {
      __tmp__BFNH=my_copy__KR2H(__tmp__AFNH);
    } break;
    case __ITEM__: {
      __tmp__BFNH=my_copy__1R2H(__tmp__AFNH);
    } break;
    case __SIZE_OF__: {
      __tmp__BFNH=my_copy__HS2H(__tmp__AFNH);
    } break;
    case __CAST__: {
      __tmp__BFNH=my_copy__QS2H(__tmp__AFNH);
    } break;
    case __CALL_SLOT__: {
      __tmp__BFNH=my_copy__PIYM(__tmp__AFNH);
    } break;
    case __READ_SLOT__: {
      __tmp__BFNH=my_copy__AVGK(__tmp__AFNH);
    } break;
    case __READ_GLOBAL__: {
      __tmp__BFNH=my_copy__NVGK(__tmp__AFNH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BFNH=my_copy__RFCN(__tmp__AFNH);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BFNH=my_copy__JMEO(__tmp__AFNH);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BFNH=my_copy__RTJO(__tmp__AFNH);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BFNH=my_copy__WMEO(__tmp__AFNH);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BFNH=my_copy__3TJO(__tmp__AFNH);
    } break;
    case __EXPR_NEG__: {
      __tmp__BFNH=my_copy__YEJM(__tmp__AFNH);
    } break;
    case __EXPR_ADD__: {
      __tmp__BFNH=my_copy__YRLL(__tmp__AFNH);
    } break;
    case __EXPR_NOT__: {
      __tmp__BFNH=my_copy__GLYM(__tmp__AFNH);
    } break;
    case __EXPR_MOD__: {
      __tmp__BFNH=my_copy__BNEO(__tmp__AFNH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BFNH=my_copy__M3DP(__tmp__AFNH);
    } break;
    case __EXPR_INF__: {
      __tmp__BFNH=my_copy__PBSN(__tmp__AFNH);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BFNH=my_copy__0BSN(__tmp__AFNH);
    } break;
    case __EXPR_OR__: {
      __tmp__BFNH=my_copy__ZOPN(__tmp__AFNH);
    } break;
    case __EXPR_XOR__: {
      __tmp__BFNH=my_copy__CYSO(__tmp__AFNH);
    } break;
    };
    ((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__BFNH;
    base__I3MH=new_block__receiver__with__1GTH(Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,receiver__32MH,args__22MH);
    __tmp__GFNH=TRUE__;
  } else {
    __tmp__GFNH=FALSE__;
  };
  if ((! __tmp__GFNH)) {
    if (((__INTEGER)(((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.upper__USSH +  1) ==  1)) {
      if (is_resend__F3MH) {
        ((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__IC5G(lookup__SSTH());
        __tmp__3FNH=((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__3FNH)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__3FNH);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__3FNH);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__3TIQ=((__READ_LOCAL *)__tmp__3FNH);
          unread__YVJK(Self__3TIQ->local__ALZD,Self__3TIQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__3FNH);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__3FNH);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__3FNH);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__5TIQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3FNH)->receiver__OO2H);
          unread__YVJK(Self__5TIQ->local__ALZD,Self__5TIQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__3FNH);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__3FNH);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__3FNH);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__3FNH);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__3FNH);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__3FNH);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__3FNH);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__3FNH);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__3FNH);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__3FNH);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__3FNH);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__3FNH);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__3FNH);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__3FNH);
        } break;
        case __READ_GLOBAL__: {
          Self__AUIQ=((__READ_GLOBAL *)__tmp__3FNH);
          unread__15ML(Self__AUIQ->global__RHJK,Self__AUIQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__3FNH);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__3FNH);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__3FNH);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__3FNH);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__3FNH);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__3FNH);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__3FNH);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__3FNH);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__3FNH);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__3FNH);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__3FNH);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__3FNH);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__3FNH);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__3FNH);
        } break;
        };
      };
      if (((verify__JDAG & is_all_warning__2BB) && __infix_equal_equal__TKW(Self__UIKH->parent_itm_read__J5JC.name__TVPC,(&__string_469)))) {
        copy__BNK(string_tmp__RB,(&__string_470));
        append__MOK(string_tmp__RB,((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB);
        append__MOK(string_tmp__RB,(&__string_471));
        switch (((struct ___OBJ *)receiver__32MH)->__id) {
        case __LIST__: {
          __tmp__5GNH=static_type__GIQG(receiver__32MH);
        } break;
        case __STRING_CST__: {
          __tmp__5GNH=((__STRING_CST *)receiver__32MH)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__5GNH=((__EXTERNAL_C *)receiver__32MH)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__5GNH=((__PROTOTYPE_CST *)receiver__32MH)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__5GNH=((__INTEGER_CST *)receiver__32MH)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__5GNH=((__LOCAL *)((__READ_LOCAL *)receiver__32MH)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__5GNH=static_type__0N1H(receiver__32MH);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__5GNH=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__5GNH=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__5GNH=((__REAL_CST *)receiver__32MH)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__5GNH=((__CHARACTER_CST *)receiver__32MH)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__5GNH=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__5GNH=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__5GNH=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__5GNH=static_type__MP1H(receiver__32MH);
        } break;
        case __EXPR_MUL__: {
          __tmp__5GNH=static_type__SP1H(receiver__32MH);
        } break;
        case __EXPR_DIV__: {
          __tmp__5GNH=static_type__XP1H(receiver__32MH);
        } break;
        case __EXPR_AND__: {
          __tmp__5GNH=static_type__2P1H(receiver__32MH);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__5GNH=static_type__BQ1H(receiver__32MH);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__5GNH=static_type__GQ1H(receiver__32MH);
        } break;
        case __PUT_TO__: {
          __tmp__5GNH=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__5GNH=static_type__PQ1H(receiver__32MH);
        } break;
        case __SIZE_OF__: {
          __tmp__5GNH=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__5GNH=((__CAST *)receiver__32MH)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__5GNH=static_type__GIKL(receiver__32MH);
        } break;
        case __READ_SLOT__: {
          __tmp__5GNH=((__SLOT_DATA *)((__READ_SLOT *)receiver__32MH)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__5GNH=((__SLOT_DATA *)((__READ_GLOBAL *)receiver__32MH)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__5GNH=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__5GNH=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__5GNH=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__5GNH=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__5GNH=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__5GNH=static_type__Z2IM(receiver__32MH);
        } break;
        case __EXPR_ADD__: {
          __tmp__5GNH=static_type__IXML(receiver__32MH);
        } break;
        case __EXPR_NOT__: {
          __tmp__5GNH=static_type__BTXM(receiver__32MH);
        } break;
        case __EXPR_MOD__: {
          __tmp__5GNH=static_type__5LEO(receiver__32MH);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__5GNH=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__5GNH=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__5GNH=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__5GNH=static_type__NOPN(receiver__32MH);
        } break;
        case __EXPR_XOR__: {
          __tmp__5GNH=static_type__XCSO(receiver__32MH);
        } break;
        };
        append_name_in__FBYD(__tmp__5GNH,string_tmp__RB);
        __tmp__CHNH=Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 2,string_tmp__RB);
        put_position__ECH(__tmp__CHNH);
        send_error__2FH();
      };
      base__I3MH=new_read__slot__receiver__self__YLQC(Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__G3MH,receiver__32MH,((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]);
      free__C4LH(args__22MH);
    } else {
      if (is_resend__F3MH) {
        ((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=read__IC5G(lookup__SSTH());
      } else {
        __tmp__AINH=((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__AINH)->__id) {
        case __LIST__: {
          __tmp__BINH=my_copy__2HYM(__tmp__AINH);
        } break;
        case __STRING_CST__: {
          Self__BUIQ=((__STRING_CST *)__tmp__AINH);
          __tmp__BINH=create__text__AUMH(Self__BUIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BUIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__BINH=my_copy__2K2H(__tmp__AINH);
        } break;
        case __PROTOTYPE_CST__: {
          Self__CUIQ=((__PROTOTYPE_CST *)__tmp__AINH);
          __tmp__BINH=create__type__CLQC(Self__CUIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CUIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__DUIQ=((__INTEGER_CST *)__tmp__AINH);
          __tmp__BINH=create__value__type__DNQC(Self__DUIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DUIQ->value__PAZD,Self__DUIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__BINH=my_copy__OAFJ(__tmp__AINH);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__BINH=my_copy__KM2H(__tmp__AINH);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__BINH=my_copy__DN2H(__tmp__AINH);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__BINH=my_copy__QN2H(__tmp__AINH);
        } break;
        case __REAL_CST__: {
          Self__FUIQ=((__REAL_CST *)__tmp__AINH);
          __tmp__BINH=create__value__type__1SMH(Self__FUIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FUIQ->value__5N2H,Self__FUIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__HUIQ=((__CHARACTER_CST *)__tmp__AINH);
          __tmp__BINH=create__char__WTMH(Self__HUIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HUIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__IUIQ=((__IS_EXPANDED *)__tmp__AINH);
          __tmp__BINH=create__receiver__WRWH(Self__IUIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__IUIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__BINH=my_copy__TO2H(__tmp__AINH);
        } break;
        case __EXPR_SUP__: {
          __tmp__BINH=my_copy__2O2H(__tmp__AINH);
        } break;
        case __EXPR_SUB__: {
          __tmp__BINH=my_copy__HP2H(__tmp__AINH);
        } break;
        case __EXPR_MUL__: {
          __tmp__BINH=my_copy__TP2H(__tmp__AINH);
        } break;
        case __EXPR_DIV__: {
          __tmp__BINH=my_copy__4P2H(__tmp__AINH);
        } break;
        case __EXPR_AND__: {
          __tmp__BINH=my_copy__JQ2H(__tmp__AINH);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__BINH=my_copy__UQ2H(__tmp__AINH);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__BINH=my_copy__5Q2H(__tmp__AINH);
        } break;
        case __PUT_TO__: {
          __tmp__BINH=my_copy__KR2H(__tmp__AINH);
        } break;
        case __ITEM__: {
          __tmp__BINH=my_copy__1R2H(__tmp__AINH);
        } break;
        case __SIZE_OF__: {
          __tmp__BINH=my_copy__HS2H(__tmp__AINH);
        } break;
        case __CAST__: {
          __tmp__BINH=my_copy__QS2H(__tmp__AINH);
        } break;
        case __CALL_SLOT__: {
          __tmp__BINH=my_copy__PIYM(__tmp__AINH);
        } break;
        case __READ_SLOT__: {
          __tmp__BINH=my_copy__AVGK(__tmp__AINH);
        } break;
        case __READ_GLOBAL__: {
          __tmp__BINH=my_copy__NVGK(__tmp__AINH);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__BINH=my_copy__RFCN(__tmp__AINH);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__BINH=my_copy__JMEO(__tmp__AINH);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__BINH=my_copy__RTJO(__tmp__AINH);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__BINH=my_copy__WMEO(__tmp__AINH);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__BINH=my_copy__3TJO(__tmp__AINH);
        } break;
        case __EXPR_NEG__: {
          __tmp__BINH=my_copy__YEJM(__tmp__AINH);
        } break;
        case __EXPR_ADD__: {
          __tmp__BINH=my_copy__YRLL(__tmp__AINH);
        } break;
        case __EXPR_NOT__: {
          __tmp__BINH=my_copy__GLYM(__tmp__AINH);
        } break;
        case __EXPR_MOD__: {
          __tmp__BINH=my_copy__BNEO(__tmp__AINH);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__BINH=my_copy__M3DP(__tmp__AINH);
        } break;
        case __EXPR_INF__: {
          __tmp__BINH=my_copy__PBSN(__tmp__AINH);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__BINH=my_copy__0BSN(__tmp__AINH);
        } break;
        case __EXPR_OR__: {
          __tmp__BINH=my_copy__ZOPN(__tmp__AINH);
        } break;
        case __EXPR_XOR__: {
          __tmp__BINH=my_copy__CYSO(__tmp__AINH);
        } break;
        };
        ((void **)((__FAST_ARRAYoEXPRo *)args__22MH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__BINH;
      };
      args__22MH=copy__QGTH(args__22MH);
      base__I3MH=new_read__slot__receiver__with__YOWH(Self__UIKH->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__G3MH,receiver__32MH,args__22MH);
    };
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,base__I3MH);
  if (((void *)l_arg__WIKH != (void *)NULL)) {
    free__MQFC(l_arg__WIKH);
  };
  return(result_expr__PVDI(base__I3MH));
}

static void* check_type__with__T5CN(__LIST *Self__U5CN,void *t__V5CN,__POSITION p__W5CN)
// ({LIST},{NULLxTYPE_FULL},{POSITION}) With resultRecursive, No inlinable.
{
  void *result__Y5CN,*rec__15CN,*__tmp__XHDN,*__tmp__YHDN;
  void *local__Z5CN;
  void *instr__05CN;
  void *slot_name__25CN;
  void *slot_msg__35CN;
  void *node__45CN;
  __TYPE_FULL *Self__JUIQ,*Self__TUIQ;
  void *__tmp__OCDN,*__tmp__0FDN;
  __POSITION __tmp__VCDN,__tmp__3DDN,__tmp__BGDN,__tmp__JHDN;
  __POSITION __tmp__WHDN;
  void *__tmp__1CDN,*__tmp__HGDN;
  __STRING_CST *Self__0UIQ;
  __PROTOTYPE_CST *Self__1UIQ;
  __INTEGER_CST *Self__2UIQ;
  __REAL_CST *Self__4UIQ;
  __CHARACTER_CST *Self__AVIQ;
  __IS_EXPANDED *Self__BVIQ;
  void *args__55CN;
  __BOOLEAN __tmp__KEDN;
  result__Y5CN=NULL;
  local__Z5CN=NULL;
  instr__05CN=NULL;
  rec__15CN=NULL;
  slot_name__25CN=NULL;
  slot_msg__35CN=NULL;
  node__45CN=NULL;
  args__55CN=NULL;
  if (affect_with__ZCHI(t__V5CN,static_type__GIQG(Self__U5CN))) {
    result__Y5CN=Self__U5CN;
  } else {
    Self__JUIQ=((__TYPE_FULL *)static_type__GIQG(Self__U5CN));
    if (is_cast__to__in__ZD0I(Self__JUIQ,(&__string_86),t__V5CN,((__PROTOTYPE *)prototype__NQRF(Self__JUIQ))->export_list__SFDC)) {
      local__Z5CN=create__name__style__type__25JG(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIQG(Self__U5CN)));
      instr__05CN=write__value__T5FH(local__Z5CN,Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__U5CN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__05CN);
      slot_name__25CN=get__QEC(last_cast_name__L42H);
      slot_msg__35CN=get_slot__AP5G(static_type__GIQG(Self__U5CN),slot_name__25CN);
      if (((void *)slot_msg__35CN == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__GIQG(Self__U5CN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__V5CN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__25CN);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__GIQG(Self__U5CN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__W5CN);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__GIQG(Self__U5CN)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
        __tmp__OCDN=((__SLOT *)((__SLOT_DATA *)slot_msg__35CN)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__OCDN=((__SLOT *)((__SLOT_CODE *)slot_msg__35CN)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__OCDN) !=  1)) {
        if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
          __tmp__VCDN=((__SLOT_DATA *)slot_msg__35CN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__VCDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__35CN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__VCDN);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
        __tmp__1CDN=get_type_result__PG2G(slot_msg__35CN);
      } else {
        __tmp__1CDN=get_type_result__ZH2G(slot_msg__35CN);
      };
      if ((((void *)__tmp__1CDN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__1CDN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__V5CN)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__1CDN != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__1CDN,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__V5CN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
          __tmp__3DDN=((__SLOT_DATA *)slot_msg__35CN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__3DDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__35CN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__3DDN);
        put_position__ECH(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__15CN=read__IC5G(local__Z5CN);
      node__45CN=new_read__slot__receiver__self__YLQC(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__35CN,rec__15CN,rec__15CN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__45CN);
      result__Y5CN=result_expr__PVDI(node__45CN);
      __tmp__KEDN=TRUE__;
    } else {
      __tmp__KEDN=FALSE__;
    };
    if ((! __tmp__KEDN)) {
      Self__TUIQ=((__TYPE_FULL *)t__V5CN);
      if (is_cast__to__in__ZD0I(Self__TUIQ,(&__string_87),static_type__GIQG(Self__U5CN),((__PROTOTYPE *)prototype__NQRF(Self__TUIQ))->import_list__0FDC)) {
        local__Z5CN=create__name__style__type__25JG(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIQG(Self__U5CN)));
        instr__05CN=write__value__T5FH(local__Z5CN,Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__U5CN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__05CN);
        slot_name__25CN=get__QEC(last_cast_name__L42H);
        slot_msg__35CN=get_slot__AP5G(t__V5CN,slot_name__25CN);
        if (((void *)slot_msg__35CN == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__V5CN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__GIQG(Self__U5CN),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__25CN);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__V5CN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__W5CN);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__V5CN))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
          __tmp__0FDN=((__SLOT *)((__SLOT_DATA *)slot_msg__35CN)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__0FDN=((__SLOT *)((__SLOT_CODE *)slot_msg__35CN)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__0FDN) !=  2)) {
          if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
            __tmp__BGDN=((__SLOT_DATA *)slot_msg__35CN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__BGDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__35CN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__BGDN);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
          __tmp__HGDN=get_type_result__PG2G(slot_msg__35CN);
        } else {
          __tmp__HGDN=get_type_result__ZH2G(slot_msg__35CN);
        };
        if ((((void *)__tmp__HGDN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__HGDN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__V5CN)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__HGDN != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__HGDN,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__V5CN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__35CN)->__id==__SLOT_DATA__) {
            __tmp__JHDN=((__SLOT_DATA *)slot_msg__35CN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__JHDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__35CN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__JHDN);
          put_position__ECH(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__55CN=create_with_capacity__3THH( 2);
        add_last__XSEI(args__55CN,create__type__CLQC(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,t__V5CN));
        add_last__XSEI(args__55CN,read__IC5G(local__Z5CN));
        __tmp__WHDN=Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__XHDN=((void **)((__FAST_ARRAYoEXPRo *)args__55CN)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__XHDN)->__id) {
        case __LIST__: {
          __tmp__YHDN=my_copy__2HYM(__tmp__XHDN);
        } break;
        case __STRING_CST__: {
          Self__0UIQ=((__STRING_CST *)__tmp__XHDN);
          __tmp__YHDN=create__text__AUMH(Self__0UIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0UIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__YHDN=my_copy__2K2H(__tmp__XHDN);
        } break;
        case __PROTOTYPE_CST__: {
          Self__1UIQ=((__PROTOTYPE_CST *)__tmp__XHDN);
          __tmp__YHDN=create__type__CLQC(Self__1UIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1UIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__2UIQ=((__INTEGER_CST *)__tmp__XHDN);
          __tmp__YHDN=create__value__type__DNQC(Self__2UIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2UIQ->value__PAZD,Self__2UIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__YHDN=my_copy__OAFJ(__tmp__XHDN);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__YHDN=my_copy__KM2H(__tmp__XHDN);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__YHDN=my_copy__DN2H(__tmp__XHDN);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__YHDN=my_copy__QN2H(__tmp__XHDN);
        } break;
        case __REAL_CST__: {
          Self__4UIQ=((__REAL_CST *)__tmp__XHDN);
          __tmp__YHDN=create__value__type__1SMH(Self__4UIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4UIQ->value__5N2H,Self__4UIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__AVIQ=((__CHARACTER_CST *)__tmp__XHDN);
          __tmp__YHDN=create__char__WTMH(Self__AVIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AVIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__BVIQ=((__IS_EXPANDED *)__tmp__XHDN);
          __tmp__YHDN=create__receiver__WRWH(Self__BVIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__BVIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__YHDN=my_copy__TO2H(__tmp__XHDN);
        } break;
        case __EXPR_SUP__: {
          __tmp__YHDN=my_copy__2O2H(__tmp__XHDN);
        } break;
        case __EXPR_SUB__: {
          __tmp__YHDN=my_copy__HP2H(__tmp__XHDN);
        } break;
        case __EXPR_MUL__: {
          __tmp__YHDN=my_copy__TP2H(__tmp__XHDN);
        } break;
        case __EXPR_DIV__: {
          __tmp__YHDN=my_copy__4P2H(__tmp__XHDN);
        } break;
        case __EXPR_AND__: {
          __tmp__YHDN=my_copy__JQ2H(__tmp__XHDN);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__YHDN=my_copy__UQ2H(__tmp__XHDN);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__YHDN=my_copy__5Q2H(__tmp__XHDN);
        } break;
        case __PUT_TO__: {
          __tmp__YHDN=my_copy__KR2H(__tmp__XHDN);
        } break;
        case __ITEM__: {
          __tmp__YHDN=my_copy__1R2H(__tmp__XHDN);
        } break;
        case __SIZE_OF__: {
          __tmp__YHDN=my_copy__HS2H(__tmp__XHDN);
        } break;
        case __CAST__: {
          __tmp__YHDN=my_copy__QS2H(__tmp__XHDN);
        } break;
        case __CALL_SLOT__: {
          __tmp__YHDN=my_copy__PIYM(__tmp__XHDN);
        } break;
        case __READ_SLOT__: {
          __tmp__YHDN=my_copy__AVGK(__tmp__XHDN);
        } break;
        case __READ_GLOBAL__: {
          __tmp__YHDN=my_copy__NVGK(__tmp__XHDN);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__YHDN=my_copy__RFCN(__tmp__XHDN);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__YHDN=my_copy__JMEO(__tmp__XHDN);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__YHDN=my_copy__RTJO(__tmp__XHDN);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__YHDN=my_copy__WMEO(__tmp__XHDN);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__YHDN=my_copy__3TJO(__tmp__XHDN);
        } break;
        case __EXPR_NEG__: {
          __tmp__YHDN=my_copy__YEJM(__tmp__XHDN);
        } break;
        case __EXPR_ADD__: {
          __tmp__YHDN=my_copy__YRLL(__tmp__XHDN);
        } break;
        case __EXPR_NOT__: {
          __tmp__YHDN=my_copy__GLYM(__tmp__XHDN);
        } break;
        case __EXPR_MOD__: {
          __tmp__YHDN=my_copy__BNEO(__tmp__XHDN);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__YHDN=my_copy__M3DP(__tmp__XHDN);
        } break;
        case __EXPR_INF__: {
          __tmp__YHDN=my_copy__PBSN(__tmp__XHDN);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__YHDN=my_copy__0BSN(__tmp__XHDN);
        } break;
        case __EXPR_OR__: {
          __tmp__YHDN=my_copy__ZOPN(__tmp__XHDN);
        } break;
        case __EXPR_XOR__: {
          __tmp__YHDN=my_copy__CYSO(__tmp__XHDN);
        } break;
        };
        node__45CN=new_read__slot__receiver__with__YOWH(__tmp__WHDN,slot_msg__35CN,__tmp__YHDN,args__55CN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__45CN);
        result__Y5CN=result_expr__PVDI(node__45CN);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__V5CN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__GIQG(Self__U5CN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__W5CN);
        put_position__ECH(Self__U5CN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__Y5CN);
}

static void* check_type__with__Q22H(__STRING_CST *Self__R22H,void *t__S22H,__POSITION p__T22H)
// ({STRING_CST},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__V22H,*rec__Y22H,*__tmp__VE3H,*__tmp__WE3H;
  void *local__W22H;
  void *instr__X22H;
  void *slot_name__Z22H;
  void *slot_msg__022H;
  void *node__122H;
  __TYPE_FULL *Self__CVIQ,*Self__MVIQ;
  void *__tmp__M52H,*__tmp__YC3H;
  __POSITION __tmp__T52H,__tmp__1A3H,__tmp__5C3H,__tmp__HE3H;
  __POSITION __tmp__UE3H;
  void *__tmp__Z52H,*__tmp__FD3H;
  __STRING_CST *Self__TVIQ;
  __PROTOTYPE_CST *Self__UVIQ;
  __INTEGER_CST *Self__VVIQ;
  __REAL_CST *Self__XVIQ;
  __CHARACTER_CST *Self__ZVIQ;
  __IS_EXPANDED *Self__0VIQ;
  void *args__222H;
  __BOOLEAN __tmp__IB3H;
  result__V22H=NULL;
  local__W22H=NULL;
  instr__X22H=NULL;
  rec__Y22H=NULL;
  slot_name__Z22H=NULL;
  slot_msg__022H=NULL;
  node__122H=NULL;
  args__222H=NULL;
  if (affect_with__ZCHI(t__S22H,Self__R22H->parent_constant__5F.static_type__F4YD)) {
    result__V22H=Self__R22H;
  } else {
    Self__CVIQ=((__TYPE_FULL *)Self__R22H->parent_constant__5F.static_type__F4YD);
    if (is_cast__to__in__ZD0I(Self__CVIQ,(&__string_86),t__S22H,((__PROTOTYPE *)prototype__NQRF(Self__CVIQ))->export_list__SFDC)) {
      local__W22H=create__name__style__type__25JG(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__R22H->parent_constant__5F.static_type__F4YD));
      instr__X22H=write__value__T5FH(local__W22H,Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R22H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__X22H);
      slot_name__Z22H=get__QEC(last_cast_name__L42H);
      slot_msg__022H=get_slot__AP5G(Self__R22H->parent_constant__5F.static_type__F4YD,slot_name__Z22H);
      if (((void *)slot_msg__022H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__R22H->parent_constant__5F.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__S22H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__Z22H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__R22H->parent_constant__5F.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__T22H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__R22H->parent_constant__5F.static_type__F4YD))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
        __tmp__M52H=((__SLOT *)((__SLOT_DATA *)slot_msg__022H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__M52H=((__SLOT *)((__SLOT_CODE *)slot_msg__022H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__M52H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
          __tmp__T52H=((__SLOT_DATA *)slot_msg__022H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__T52H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__022H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__T52H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
        __tmp__Z52H=get_type_result__PG2G(slot_msg__022H);
      } else {
        __tmp__Z52H=get_type_result__ZH2G(slot_msg__022H);
      };
      if ((((void *)__tmp__Z52H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__Z52H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__S22H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__Z52H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__Z52H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__S22H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
          __tmp__1A3H=((__SLOT_DATA *)slot_msg__022H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__1A3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__022H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__1A3H);
        put_position__ECH(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__Y22H=read__IC5G(local__W22H);
      node__122H=new_read__slot__receiver__self__YLQC(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__022H,rec__Y22H,rec__Y22H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__122H);
      result__V22H=result_expr__PVDI(node__122H);
      __tmp__IB3H=TRUE__;
    } else {
      __tmp__IB3H=FALSE__;
    };
    if ((! __tmp__IB3H)) {
      Self__MVIQ=((__TYPE_FULL *)t__S22H);
      if (is_cast__to__in__ZD0I(Self__MVIQ,(&__string_87),Self__R22H->parent_constant__5F.static_type__F4YD,((__PROTOTYPE *)prototype__NQRF(Self__MVIQ))->import_list__0FDC)) {
        local__W22H=create__name__style__type__25JG(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__R22H->parent_constant__5F.static_type__F4YD));
        instr__X22H=write__value__T5FH(local__W22H,Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R22H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__X22H);
        slot_name__Z22H=get__QEC(last_cast_name__L42H);
        slot_msg__022H=get_slot__AP5G(t__S22H,slot_name__Z22H);
        if (((void *)slot_msg__022H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__S22H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__R22H->parent_constant__5F.static_type__F4YD,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__Z22H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__S22H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__T22H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__S22H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
          __tmp__YC3H=((__SLOT *)((__SLOT_DATA *)slot_msg__022H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__YC3H=((__SLOT *)((__SLOT_CODE *)slot_msg__022H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__YC3H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
            __tmp__5C3H=((__SLOT_DATA *)slot_msg__022H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__5C3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__022H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__5C3H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
          __tmp__FD3H=get_type_result__PG2G(slot_msg__022H);
        } else {
          __tmp__FD3H=get_type_result__ZH2G(slot_msg__022H);
        };
        if ((((void *)__tmp__FD3H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__FD3H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__S22H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__FD3H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__FD3H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__S22H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__022H)->__id==__SLOT_DATA__) {
            __tmp__HE3H=((__SLOT_DATA *)slot_msg__022H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__HE3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__022H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__HE3H);
          put_position__ECH(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__222H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__222H,create__type__CLQC(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,t__S22H));
        add_last__XSEI(args__222H,read__IC5G(local__W22H));
        __tmp__UE3H=Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__VE3H=((void **)((__FAST_ARRAYoEXPRo *)args__222H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__VE3H)->__id) {
        case __LIST__: {
          __tmp__WE3H=my_copy__2HYM(__tmp__VE3H);
        } break;
        case __STRING_CST__: {
          Self__TVIQ=((__STRING_CST *)__tmp__VE3H);
          __tmp__WE3H=create__text__AUMH(Self__TVIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TVIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__WE3H=my_copy__2K2H(__tmp__VE3H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__UVIQ=((__PROTOTYPE_CST *)__tmp__VE3H);
          __tmp__WE3H=create__type__CLQC(Self__UVIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UVIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__VVIQ=((__INTEGER_CST *)__tmp__VE3H);
          __tmp__WE3H=create__value__type__DNQC(Self__VVIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VVIQ->value__PAZD,Self__VVIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__WE3H=my_copy__OAFJ(__tmp__VE3H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__WE3H=my_copy__KM2H(__tmp__VE3H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__WE3H=my_copy__DN2H(__tmp__VE3H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__WE3H=my_copy__QN2H(__tmp__VE3H);
        } break;
        case __REAL_CST__: {
          Self__XVIQ=((__REAL_CST *)__tmp__VE3H);
          __tmp__WE3H=create__value__type__1SMH(Self__XVIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XVIQ->value__5N2H,Self__XVIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__ZVIQ=((__CHARACTER_CST *)__tmp__VE3H);
          __tmp__WE3H=create__char__WTMH(Self__ZVIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZVIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__0VIQ=((__IS_EXPANDED *)__tmp__VE3H);
          __tmp__WE3H=create__receiver__WRWH(Self__0VIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__0VIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__WE3H=my_copy__TO2H(__tmp__VE3H);
        } break;
        case __EXPR_SUP__: {
          __tmp__WE3H=my_copy__2O2H(__tmp__VE3H);
        } break;
        case __EXPR_SUB__: {
          __tmp__WE3H=my_copy__HP2H(__tmp__VE3H);
        } break;
        case __EXPR_MUL__: {
          __tmp__WE3H=my_copy__TP2H(__tmp__VE3H);
        } break;
        case __EXPR_DIV__: {
          __tmp__WE3H=my_copy__4P2H(__tmp__VE3H);
        } break;
        case __EXPR_AND__: {
          __tmp__WE3H=my_copy__JQ2H(__tmp__VE3H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__WE3H=my_copy__UQ2H(__tmp__VE3H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__WE3H=my_copy__5Q2H(__tmp__VE3H);
        } break;
        case __PUT_TO__: {
          __tmp__WE3H=my_copy__KR2H(__tmp__VE3H);
        } break;
        case __ITEM__: {
          __tmp__WE3H=my_copy__1R2H(__tmp__VE3H);
        } break;
        case __SIZE_OF__: {
          __tmp__WE3H=my_copy__HS2H(__tmp__VE3H);
        } break;
        case __CAST__: {
          __tmp__WE3H=my_copy__QS2H(__tmp__VE3H);
        } break;
        case __CALL_SLOT__: {
          __tmp__WE3H=my_copy__PIYM(__tmp__VE3H);
        } break;
        case __READ_SLOT__: {
          __tmp__WE3H=my_copy__AVGK(__tmp__VE3H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__WE3H=my_copy__NVGK(__tmp__VE3H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__WE3H=my_copy__RFCN(__tmp__VE3H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__WE3H=my_copy__JMEO(__tmp__VE3H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__WE3H=my_copy__RTJO(__tmp__VE3H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__WE3H=my_copy__WMEO(__tmp__VE3H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__WE3H=my_copy__3TJO(__tmp__VE3H);
        } break;
        case __EXPR_NEG__: {
          __tmp__WE3H=my_copy__YEJM(__tmp__VE3H);
        } break;
        case __EXPR_ADD__: {
          __tmp__WE3H=my_copy__YRLL(__tmp__VE3H);
        } break;
        case __EXPR_NOT__: {
          __tmp__WE3H=my_copy__GLYM(__tmp__VE3H);
        } break;
        case __EXPR_MOD__: {
          __tmp__WE3H=my_copy__BNEO(__tmp__VE3H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__WE3H=my_copy__M3DP(__tmp__VE3H);
        } break;
        case __EXPR_INF__: {
          __tmp__WE3H=my_copy__PBSN(__tmp__VE3H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__WE3H=my_copy__0BSN(__tmp__VE3H);
        } break;
        case __EXPR_OR__: {
          __tmp__WE3H=my_copy__ZOPN(__tmp__VE3H);
        } break;
        case __EXPR_XOR__: {
          __tmp__WE3H=my_copy__CYSO(__tmp__VE3H);
        } break;
        };
        node__122H=new_read__slot__receiver__with__YOWH(__tmp__UE3H,slot_msg__022H,__tmp__WE3H,args__222H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__122H);
        result__V22H=result_expr__PVDI(node__122H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__S22H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__R22H->parent_constant__5F.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__T22H);
        put_position__ECH(Self__R22H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__V22H);
}

static void* check_type__with__PF3H(__EXTERNAL_C *Self__QF3H,void *t__RF3H,__POSITION p__SF3H)
// ({EXTERNAL_C},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__UF3H,*rec__XF3H,*__tmp__TN3H,*__tmp__UN3H;
  void *local__VF3H;
  void *instr__WF3H;
  void *slot_name__YF3H;
  void *slot_msg__ZF3H;
  void *node__0F3H;
  __TYPE_FULL *Self__1VIQ,*Self__FWIQ;
  void *__tmp__KI3H,*__tmp__WL3H;
  __POSITION __tmp__RI3H,__tmp__ZJ3H,__tmp__3L3H,__tmp__FN3H;
  __POSITION __tmp__SN3H;
  void *__tmp__XI3H,*__tmp__DM3H;
  __STRING_CST *Self__MWIQ;
  __PROTOTYPE_CST *Self__NWIQ;
  __INTEGER_CST *Self__OWIQ;
  __REAL_CST *Self__QWIQ;
  __CHARACTER_CST *Self__SWIQ;
  __IS_EXPANDED *Self__TWIQ;
  void *args__1F3H;
  __BOOLEAN __tmp__GK3H;
  result__UF3H=NULL;
  local__VF3H=NULL;
  instr__WF3H=NULL;
  rec__XF3H=NULL;
  slot_name__YF3H=NULL;
  slot_msg__ZF3H=NULL;
  node__0F3H=NULL;
  args__1F3H=NULL;
  if (affect_with__ZCHI(t__RF3H,Self__QF3H->static_type__UXZD)) {
    result__UF3H=Self__QF3H;
  } else {
    Self__1VIQ=((__TYPE_FULL *)Self__QF3H->static_type__UXZD);
    if (is_cast__to__in__ZD0I(Self__1VIQ,(&__string_86),t__RF3H,((__PROTOTYPE *)prototype__NQRF(Self__1VIQ))->export_list__SFDC)) {
      local__VF3H=create__name__style__type__25JG(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__QF3H->static_type__UXZD));
      instr__WF3H=write__value__T5FH(local__VF3H,Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QF3H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__WF3H);
      slot_name__YF3H=get__QEC(last_cast_name__L42H);
      slot_msg__ZF3H=get_slot__AP5G(Self__QF3H->static_type__UXZD,slot_name__YF3H);
      if (((void *)slot_msg__ZF3H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__QF3H->static_type__UXZD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__RF3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__YF3H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__QF3H->static_type__UXZD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__SF3H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__QF3H->static_type__UXZD))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
        __tmp__KI3H=((__SLOT *)((__SLOT_DATA *)slot_msg__ZF3H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__KI3H=((__SLOT *)((__SLOT_CODE *)slot_msg__ZF3H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__KI3H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
          __tmp__RI3H=((__SLOT_DATA *)slot_msg__ZF3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__RI3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__ZF3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__RI3H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
        __tmp__XI3H=get_type_result__PG2G(slot_msg__ZF3H);
      } else {
        __tmp__XI3H=get_type_result__ZH2G(slot_msg__ZF3H);
      };
      if ((((void *)__tmp__XI3H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__XI3H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__RF3H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__XI3H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__XI3H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__RF3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
          __tmp__ZJ3H=((__SLOT_DATA *)slot_msg__ZF3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__ZJ3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__ZF3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__ZJ3H);
        put_position__ECH(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__XF3H=read__IC5G(local__VF3H);
      node__0F3H=new_read__slot__receiver__self__YLQC(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__ZF3H,rec__XF3H,rec__XF3H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__0F3H);
      result__UF3H=result_expr__PVDI(node__0F3H);
      __tmp__GK3H=TRUE__;
    } else {
      __tmp__GK3H=FALSE__;
    };
    if ((! __tmp__GK3H)) {
      Self__FWIQ=((__TYPE_FULL *)t__RF3H);
      if (is_cast__to__in__ZD0I(Self__FWIQ,(&__string_87),Self__QF3H->static_type__UXZD,((__PROTOTYPE *)prototype__NQRF(Self__FWIQ))->import_list__0FDC)) {
        local__VF3H=create__name__style__type__25JG(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__QF3H->static_type__UXZD));
        instr__WF3H=write__value__T5FH(local__VF3H,Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QF3H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__WF3H);
        slot_name__YF3H=get__QEC(last_cast_name__L42H);
        slot_msg__ZF3H=get_slot__AP5G(t__RF3H,slot_name__YF3H);
        if (((void *)slot_msg__ZF3H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__RF3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__QF3H->static_type__UXZD,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__YF3H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__RF3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__SF3H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__RF3H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
          __tmp__WL3H=((__SLOT *)((__SLOT_DATA *)slot_msg__ZF3H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__WL3H=((__SLOT *)((__SLOT_CODE *)slot_msg__ZF3H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__WL3H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
            __tmp__3L3H=((__SLOT_DATA *)slot_msg__ZF3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__3L3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__ZF3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__3L3H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
          __tmp__DM3H=get_type_result__PG2G(slot_msg__ZF3H);
        } else {
          __tmp__DM3H=get_type_result__ZH2G(slot_msg__ZF3H);
        };
        if ((((void *)__tmp__DM3H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__DM3H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__RF3H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__DM3H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__DM3H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__RF3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__ZF3H)->__id==__SLOT_DATA__) {
            __tmp__FN3H=((__SLOT_DATA *)slot_msg__ZF3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__FN3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__ZF3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__FN3H);
          put_position__ECH(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__1F3H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__1F3H,create__type__CLQC(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,t__RF3H));
        add_last__XSEI(args__1F3H,read__IC5G(local__VF3H));
        __tmp__SN3H=Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__TN3H=((void **)((__FAST_ARRAYoEXPRo *)args__1F3H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__TN3H)->__id) {
        case __LIST__: {
          __tmp__UN3H=my_copy__2HYM(__tmp__TN3H);
        } break;
        case __STRING_CST__: {
          Self__MWIQ=((__STRING_CST *)__tmp__TN3H);
          __tmp__UN3H=create__text__AUMH(Self__MWIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MWIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__UN3H=my_copy__2K2H(__tmp__TN3H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__NWIQ=((__PROTOTYPE_CST *)__tmp__TN3H);
          __tmp__UN3H=create__type__CLQC(Self__NWIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NWIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__OWIQ=((__INTEGER_CST *)__tmp__TN3H);
          __tmp__UN3H=create__value__type__DNQC(Self__OWIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OWIQ->value__PAZD,Self__OWIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__UN3H=my_copy__OAFJ(__tmp__TN3H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__UN3H=my_copy__KM2H(__tmp__TN3H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__UN3H=my_copy__DN2H(__tmp__TN3H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__UN3H=my_copy__QN2H(__tmp__TN3H);
        } break;
        case __REAL_CST__: {
          Self__QWIQ=((__REAL_CST *)__tmp__TN3H);
          __tmp__UN3H=create__value__type__1SMH(Self__QWIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QWIQ->value__5N2H,Self__QWIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__SWIQ=((__CHARACTER_CST *)__tmp__TN3H);
          __tmp__UN3H=create__char__WTMH(Self__SWIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SWIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__TWIQ=((__IS_EXPANDED *)__tmp__TN3H);
          __tmp__UN3H=create__receiver__WRWH(Self__TWIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__TWIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__UN3H=my_copy__TO2H(__tmp__TN3H);
        } break;
        case __EXPR_SUP__: {
          __tmp__UN3H=my_copy__2O2H(__tmp__TN3H);
        } break;
        case __EXPR_SUB__: {
          __tmp__UN3H=my_copy__HP2H(__tmp__TN3H);
        } break;
        case __EXPR_MUL__: {
          __tmp__UN3H=my_copy__TP2H(__tmp__TN3H);
        } break;
        case __EXPR_DIV__: {
          __tmp__UN3H=my_copy__4P2H(__tmp__TN3H);
        } break;
        case __EXPR_AND__: {
          __tmp__UN3H=my_copy__JQ2H(__tmp__TN3H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__UN3H=my_copy__UQ2H(__tmp__TN3H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__UN3H=my_copy__5Q2H(__tmp__TN3H);
        } break;
        case __PUT_TO__: {
          __tmp__UN3H=my_copy__KR2H(__tmp__TN3H);
        } break;
        case __ITEM__: {
          __tmp__UN3H=my_copy__1R2H(__tmp__TN3H);
        } break;
        case __SIZE_OF__: {
          __tmp__UN3H=my_copy__HS2H(__tmp__TN3H);
        } break;
        case __CAST__: {
          __tmp__UN3H=my_copy__QS2H(__tmp__TN3H);
        } break;
        case __CALL_SLOT__: {
          __tmp__UN3H=my_copy__PIYM(__tmp__TN3H);
        } break;
        case __READ_SLOT__: {
          __tmp__UN3H=my_copy__AVGK(__tmp__TN3H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__UN3H=my_copy__NVGK(__tmp__TN3H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__UN3H=my_copy__RFCN(__tmp__TN3H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__UN3H=my_copy__JMEO(__tmp__TN3H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__UN3H=my_copy__RTJO(__tmp__TN3H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__UN3H=my_copy__WMEO(__tmp__TN3H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__UN3H=my_copy__3TJO(__tmp__TN3H);
        } break;
        case __EXPR_NEG__: {
          __tmp__UN3H=my_copy__YEJM(__tmp__TN3H);
        } break;
        case __EXPR_ADD__: {
          __tmp__UN3H=my_copy__YRLL(__tmp__TN3H);
        } break;
        case __EXPR_NOT__: {
          __tmp__UN3H=my_copy__GLYM(__tmp__TN3H);
        } break;
        case __EXPR_MOD__: {
          __tmp__UN3H=my_copy__BNEO(__tmp__TN3H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__UN3H=my_copy__M3DP(__tmp__TN3H);
        } break;
        case __EXPR_INF__: {
          __tmp__UN3H=my_copy__PBSN(__tmp__TN3H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__UN3H=my_copy__0BSN(__tmp__TN3H);
        } break;
        case __EXPR_OR__: {
          __tmp__UN3H=my_copy__ZOPN(__tmp__TN3H);
        } break;
        case __EXPR_XOR__: {
          __tmp__UN3H=my_copy__CYSO(__tmp__TN3H);
        } break;
        };
        node__0F3H=new_read__slot__receiver__with__YOWH(__tmp__SN3H,slot_msg__ZF3H,__tmp__UN3H,args__1F3H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__0F3H);
        result__UF3H=result_expr__PVDI(node__0F3H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__RF3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__QF3H->static_type__UXZD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__SF3H);
        put_position__ECH(Self__QF3H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__UF3H);
}

static void* check_type__with__OO3H(__PROTOTYPE_CST *Self__PO3H,void *t__QO3H,__POSITION p__RO3H)
// ({PROTOTYPE_CST},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__TO3H,*rec__WO3H,*__tmp__SW3H,*__tmp__TW3H;
  void *local__UO3H;
  void *instr__VO3H;
  void *slot_name__XO3H;
  void *slot_msg__YO3H;
  void *node__ZO3H;
  __TYPE_FULL *Self__UWIQ,*Self__4WIQ;
  void *__tmp__JR3H,*__tmp__VU3H;
  __POSITION __tmp__QR3H,__tmp__YS3H,__tmp__2U3H,__tmp__EW3H;
  __POSITION __tmp__RW3H;
  void *__tmp__WR3H,*__tmp__CV3H;
  __STRING_CST *Self__FXIQ;
  __PROTOTYPE_CST *Self__GXIQ;
  __INTEGER_CST *Self__HXIQ;
  __REAL_CST *Self__JXIQ;
  __CHARACTER_CST *Self__LXIQ;
  __IS_EXPANDED *Self__MXIQ;
  void *args__0O3H;
  __BOOLEAN __tmp__FT3H;
  result__TO3H=NULL;
  local__UO3H=NULL;
  instr__VO3H=NULL;
  rec__WO3H=NULL;
  slot_name__XO3H=NULL;
  slot_msg__YO3H=NULL;
  node__ZO3H=NULL;
  args__0O3H=NULL;
  if (affect_with__ZCHI(t__QO3H,Self__PO3H->parent_constant__E3LC.static_type__F4YD)) {
    result__TO3H=Self__PO3H;
  } else {
    Self__UWIQ=((__TYPE_FULL *)Self__PO3H->parent_constant__E3LC.static_type__F4YD);
    if (is_cast__to__in__ZD0I(Self__UWIQ,(&__string_86),t__QO3H,((__PROTOTYPE *)prototype__NQRF(Self__UWIQ))->export_list__SFDC)) {
      local__UO3H=create__name__style__type__25JG(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__PO3H->parent_constant__E3LC.static_type__F4YD));
      instr__VO3H=write__value__T5FH(local__UO3H,Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PO3H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__VO3H);
      slot_name__XO3H=get__QEC(last_cast_name__L42H);
      slot_msg__YO3H=get_slot__AP5G(Self__PO3H->parent_constant__E3LC.static_type__F4YD,slot_name__XO3H);
      if (((void *)slot_msg__YO3H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__PO3H->parent_constant__E3LC.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__QO3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__XO3H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__PO3H->parent_constant__E3LC.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__RO3H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__PO3H->parent_constant__E3LC.static_type__F4YD))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
        __tmp__JR3H=((__SLOT *)((__SLOT_DATA *)slot_msg__YO3H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__JR3H=((__SLOT *)((__SLOT_CODE *)slot_msg__YO3H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__JR3H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
          __tmp__QR3H=((__SLOT_DATA *)slot_msg__YO3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__QR3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__YO3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__QR3H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
        __tmp__WR3H=get_type_result__PG2G(slot_msg__YO3H);
      } else {
        __tmp__WR3H=get_type_result__ZH2G(slot_msg__YO3H);
      };
      if ((((void *)__tmp__WR3H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__WR3H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__QO3H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__WR3H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__WR3H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__QO3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
          __tmp__YS3H=((__SLOT_DATA *)slot_msg__YO3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__YS3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__YO3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__YS3H);
        put_position__ECH(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__WO3H=read__IC5G(local__UO3H);
      node__ZO3H=new_read__slot__receiver__self__YLQC(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__YO3H,rec__WO3H,rec__WO3H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__ZO3H);
      result__TO3H=result_expr__PVDI(node__ZO3H);
      __tmp__FT3H=TRUE__;
    } else {
      __tmp__FT3H=FALSE__;
    };
    if ((! __tmp__FT3H)) {
      Self__4WIQ=((__TYPE_FULL *)t__QO3H);
      if (is_cast__to__in__ZD0I(Self__4WIQ,(&__string_87),Self__PO3H->parent_constant__E3LC.static_type__F4YD,((__PROTOTYPE *)prototype__NQRF(Self__4WIQ))->import_list__0FDC)) {
        local__UO3H=create__name__style__type__25JG(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__PO3H->parent_constant__E3LC.static_type__F4YD));
        instr__VO3H=write__value__T5FH(local__UO3H,Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PO3H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__VO3H);
        slot_name__XO3H=get__QEC(last_cast_name__L42H);
        slot_msg__YO3H=get_slot__AP5G(t__QO3H,slot_name__XO3H);
        if (((void *)slot_msg__YO3H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__QO3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__PO3H->parent_constant__E3LC.static_type__F4YD,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__XO3H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__QO3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__RO3H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__QO3H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
          __tmp__VU3H=((__SLOT *)((__SLOT_DATA *)slot_msg__YO3H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__VU3H=((__SLOT *)((__SLOT_CODE *)slot_msg__YO3H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__VU3H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
            __tmp__2U3H=((__SLOT_DATA *)slot_msg__YO3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__2U3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__YO3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__2U3H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
          __tmp__CV3H=get_type_result__PG2G(slot_msg__YO3H);
        } else {
          __tmp__CV3H=get_type_result__ZH2G(slot_msg__YO3H);
        };
        if ((((void *)__tmp__CV3H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__CV3H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__QO3H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__CV3H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__CV3H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__QO3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__YO3H)->__id==__SLOT_DATA__) {
            __tmp__EW3H=((__SLOT_DATA *)slot_msg__YO3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__EW3H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__YO3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__EW3H);
          put_position__ECH(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__0O3H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__0O3H,create__type__CLQC(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,t__QO3H));
        add_last__XSEI(args__0O3H,read__IC5G(local__UO3H));
        __tmp__RW3H=Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__SW3H=((void **)((__FAST_ARRAYoEXPRo *)args__0O3H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__SW3H)->__id) {
        case __LIST__: {
          __tmp__TW3H=my_copy__2HYM(__tmp__SW3H);
        } break;
        case __STRING_CST__: {
          Self__FXIQ=((__STRING_CST *)__tmp__SW3H);
          __tmp__TW3H=create__text__AUMH(Self__FXIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FXIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__TW3H=my_copy__2K2H(__tmp__SW3H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__GXIQ=((__PROTOTYPE_CST *)__tmp__SW3H);
          __tmp__TW3H=create__type__CLQC(Self__GXIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GXIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__HXIQ=((__INTEGER_CST *)__tmp__SW3H);
          __tmp__TW3H=create__value__type__DNQC(Self__HXIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HXIQ->value__PAZD,Self__HXIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__TW3H=my_copy__OAFJ(__tmp__SW3H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__TW3H=my_copy__KM2H(__tmp__SW3H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__TW3H=my_copy__DN2H(__tmp__SW3H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__TW3H=my_copy__QN2H(__tmp__SW3H);
        } break;
        case __REAL_CST__: {
          Self__JXIQ=((__REAL_CST *)__tmp__SW3H);
          __tmp__TW3H=create__value__type__1SMH(Self__JXIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JXIQ->value__5N2H,Self__JXIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__LXIQ=((__CHARACTER_CST *)__tmp__SW3H);
          __tmp__TW3H=create__char__WTMH(Self__LXIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LXIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__MXIQ=((__IS_EXPANDED *)__tmp__SW3H);
          __tmp__TW3H=create__receiver__WRWH(Self__MXIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__MXIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__TW3H=my_copy__TO2H(__tmp__SW3H);
        } break;
        case __EXPR_SUP__: {
          __tmp__TW3H=my_copy__2O2H(__tmp__SW3H);
        } break;
        case __EXPR_SUB__: {
          __tmp__TW3H=my_copy__HP2H(__tmp__SW3H);
        } break;
        case __EXPR_MUL__: {
          __tmp__TW3H=my_copy__TP2H(__tmp__SW3H);
        } break;
        case __EXPR_DIV__: {
          __tmp__TW3H=my_copy__4P2H(__tmp__SW3H);
        } break;
        case __EXPR_AND__: {
          __tmp__TW3H=my_copy__JQ2H(__tmp__SW3H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__TW3H=my_copy__UQ2H(__tmp__SW3H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__TW3H=my_copy__5Q2H(__tmp__SW3H);
        } break;
        case __PUT_TO__: {
          __tmp__TW3H=my_copy__KR2H(__tmp__SW3H);
        } break;
        case __ITEM__: {
          __tmp__TW3H=my_copy__1R2H(__tmp__SW3H);
        } break;
        case __SIZE_OF__: {
          __tmp__TW3H=my_copy__HS2H(__tmp__SW3H);
        } break;
        case __CAST__: {
          __tmp__TW3H=my_copy__QS2H(__tmp__SW3H);
        } break;
        case __CALL_SLOT__: {
          __tmp__TW3H=my_copy__PIYM(__tmp__SW3H);
        } break;
        case __READ_SLOT__: {
          __tmp__TW3H=my_copy__AVGK(__tmp__SW3H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__TW3H=my_copy__NVGK(__tmp__SW3H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__TW3H=my_copy__RFCN(__tmp__SW3H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__TW3H=my_copy__JMEO(__tmp__SW3H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__TW3H=my_copy__RTJO(__tmp__SW3H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__TW3H=my_copy__WMEO(__tmp__SW3H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__TW3H=my_copy__3TJO(__tmp__SW3H);
        } break;
        case __EXPR_NEG__: {
          __tmp__TW3H=my_copy__YEJM(__tmp__SW3H);
        } break;
        case __EXPR_ADD__: {
          __tmp__TW3H=my_copy__YRLL(__tmp__SW3H);
        } break;
        case __EXPR_NOT__: {
          __tmp__TW3H=my_copy__GLYM(__tmp__SW3H);
        } break;
        case __EXPR_MOD__: {
          __tmp__TW3H=my_copy__BNEO(__tmp__SW3H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__TW3H=my_copy__M3DP(__tmp__SW3H);
        } break;
        case __EXPR_INF__: {
          __tmp__TW3H=my_copy__PBSN(__tmp__SW3H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__TW3H=my_copy__0BSN(__tmp__SW3H);
        } break;
        case __EXPR_OR__: {
          __tmp__TW3H=my_copy__ZOPN(__tmp__SW3H);
        } break;
        case __EXPR_XOR__: {
          __tmp__TW3H=my_copy__CYSO(__tmp__SW3H);
        } break;
        };
        node__ZO3H=new_read__slot__receiver__with__YOWH(__tmp__RW3H,slot_msg__YO3H,__tmp__TW3H,args__0O3H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__ZO3H);
        result__TO3H=result_expr__PVDI(node__ZO3H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__QO3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__PO3H->parent_constant__E3LC.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__RO3H);
        put_position__ECH(Self__PO3H->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__TO3H);
}

static void* check_type__with__NX3H(__INTEGER_CST *Self__OX3H,void *t__PX3H,__POSITION p__QX3H)
// ({INTEGER_CST},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__SX3H,*rec__VX3H,*__tmp__R53H,*__tmp__S53H;
  void *local__TX3H;
  void *instr__UX3H;
  void *slot_name__WX3H;
  void *slot_msg__XX3H;
  void *node__YX3H;
  __TYPE_FULL *Self__NXIQ,*Self__XXIQ;
  void *__tmp__I03H,*__tmp__U33H;
  __POSITION __tmp__P03H,__tmp__X13H,__tmp__133H,__tmp__D53H;
  __POSITION __tmp__Q53H;
  void *__tmp__V03H,*__tmp__B43H;
  __STRING_CST *Self__4XIQ;
  __PROTOTYPE_CST *Self__5XIQ;
  __INTEGER_CST *Self__AYIQ;
  __REAL_CST *Self__CYIQ;
  __CHARACTER_CST *Self__EYIQ;
  __IS_EXPANDED *Self__FYIQ;
  void *args__ZX3H;
  __BOOLEAN __tmp__E23H;
  result__SX3H=NULL;
  local__TX3H=NULL;
  instr__UX3H=NULL;
  rec__VX3H=NULL;
  slot_name__WX3H=NULL;
  slot_msg__XX3H=NULL;
  node__YX3H=NULL;
  args__ZX3H=NULL;
  if (affect_with__ZCHI(t__PX3H,Self__OX3H->parent_constant__P3LC.static_type__F4YD)) {
    result__SX3H=Self__OX3H;
  } else {
    Self__NXIQ=((__TYPE_FULL *)Self__OX3H->parent_constant__P3LC.static_type__F4YD);
    if (is_cast__to__in__ZD0I(Self__NXIQ,(&__string_86),t__PX3H,((__PROTOTYPE *)prototype__NQRF(Self__NXIQ))->export_list__SFDC)) {
      local__TX3H=create__name__style__type__25JG(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__OX3H->parent_constant__P3LC.static_type__F4YD));
      instr__UX3H=write__value__T5FH(local__TX3H,Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OX3H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__UX3H);
      slot_name__WX3H=get__QEC(last_cast_name__L42H);
      slot_msg__XX3H=get_slot__AP5G(Self__OX3H->parent_constant__P3LC.static_type__F4YD,slot_name__WX3H);
      if (((void *)slot_msg__XX3H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__OX3H->parent_constant__P3LC.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__PX3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__WX3H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__OX3H->parent_constant__P3LC.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__QX3H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__OX3H->parent_constant__P3LC.static_type__F4YD))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
        __tmp__I03H=((__SLOT *)((__SLOT_DATA *)slot_msg__XX3H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__I03H=((__SLOT *)((__SLOT_CODE *)slot_msg__XX3H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__I03H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
          __tmp__P03H=((__SLOT_DATA *)slot_msg__XX3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__P03H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__XX3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__P03H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
        __tmp__V03H=get_type_result__PG2G(slot_msg__XX3H);
      } else {
        __tmp__V03H=get_type_result__ZH2G(slot_msg__XX3H);
      };
      if ((((void *)__tmp__V03H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__V03H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__PX3H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__V03H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__V03H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__PX3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
          __tmp__X13H=((__SLOT_DATA *)slot_msg__XX3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__X13H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__XX3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__X13H);
        put_position__ECH(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__VX3H=read__IC5G(local__TX3H);
      node__YX3H=new_read__slot__receiver__self__YLQC(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__XX3H,rec__VX3H,rec__VX3H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__YX3H);
      result__SX3H=result_expr__PVDI(node__YX3H);
      __tmp__E23H=TRUE__;
    } else {
      __tmp__E23H=FALSE__;
    };
    if ((! __tmp__E23H)) {
      Self__XXIQ=((__TYPE_FULL *)t__PX3H);
      if (is_cast__to__in__ZD0I(Self__XXIQ,(&__string_87),Self__OX3H->parent_constant__P3LC.static_type__F4YD,((__PROTOTYPE *)prototype__NQRF(Self__XXIQ))->import_list__0FDC)) {
        local__TX3H=create__name__style__type__25JG(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__OX3H->parent_constant__P3LC.static_type__F4YD));
        instr__UX3H=write__value__T5FH(local__TX3H,Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OX3H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__UX3H);
        slot_name__WX3H=get__QEC(last_cast_name__L42H);
        slot_msg__XX3H=get_slot__AP5G(t__PX3H,slot_name__WX3H);
        if (((void *)slot_msg__XX3H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__PX3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__OX3H->parent_constant__P3LC.static_type__F4YD,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__WX3H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__PX3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__QX3H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__PX3H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
          __tmp__U33H=((__SLOT *)((__SLOT_DATA *)slot_msg__XX3H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__U33H=((__SLOT *)((__SLOT_CODE *)slot_msg__XX3H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__U33H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
            __tmp__133H=((__SLOT_DATA *)slot_msg__XX3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__133H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__XX3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__133H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
          __tmp__B43H=get_type_result__PG2G(slot_msg__XX3H);
        } else {
          __tmp__B43H=get_type_result__ZH2G(slot_msg__XX3H);
        };
        if ((((void *)__tmp__B43H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__B43H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__PX3H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__B43H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__B43H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__PX3H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__XX3H)->__id==__SLOT_DATA__) {
            __tmp__D53H=((__SLOT_DATA *)slot_msg__XX3H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__D53H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__XX3H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__D53H);
          put_position__ECH(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__ZX3H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__ZX3H,create__type__CLQC(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,t__PX3H));
        add_last__XSEI(args__ZX3H,read__IC5G(local__TX3H));
        __tmp__Q53H=Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__R53H=((void **)((__FAST_ARRAYoEXPRo *)args__ZX3H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__R53H)->__id) {
        case __LIST__: {
          __tmp__S53H=my_copy__2HYM(__tmp__R53H);
        } break;
        case __STRING_CST__: {
          Self__4XIQ=((__STRING_CST *)__tmp__R53H);
          __tmp__S53H=create__text__AUMH(Self__4XIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4XIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__S53H=my_copy__2K2H(__tmp__R53H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__5XIQ=((__PROTOTYPE_CST *)__tmp__R53H);
          __tmp__S53H=create__type__CLQC(Self__5XIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5XIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__AYIQ=((__INTEGER_CST *)__tmp__R53H);
          __tmp__S53H=create__value__type__DNQC(Self__AYIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AYIQ->value__PAZD,Self__AYIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__S53H=my_copy__OAFJ(__tmp__R53H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__S53H=my_copy__KM2H(__tmp__R53H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__S53H=my_copy__DN2H(__tmp__R53H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__S53H=my_copy__QN2H(__tmp__R53H);
        } break;
        case __REAL_CST__: {
          Self__CYIQ=((__REAL_CST *)__tmp__R53H);
          __tmp__S53H=create__value__type__1SMH(Self__CYIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CYIQ->value__5N2H,Self__CYIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__EYIQ=((__CHARACTER_CST *)__tmp__R53H);
          __tmp__S53H=create__char__WTMH(Self__EYIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EYIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__FYIQ=((__IS_EXPANDED *)__tmp__R53H);
          __tmp__S53H=create__receiver__WRWH(Self__FYIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__FYIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__S53H=my_copy__TO2H(__tmp__R53H);
        } break;
        case __EXPR_SUP__: {
          __tmp__S53H=my_copy__2O2H(__tmp__R53H);
        } break;
        case __EXPR_SUB__: {
          __tmp__S53H=my_copy__HP2H(__tmp__R53H);
        } break;
        case __EXPR_MUL__: {
          __tmp__S53H=my_copy__TP2H(__tmp__R53H);
        } break;
        case __EXPR_DIV__: {
          __tmp__S53H=my_copy__4P2H(__tmp__R53H);
        } break;
        case __EXPR_AND__: {
          __tmp__S53H=my_copy__JQ2H(__tmp__R53H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__S53H=my_copy__UQ2H(__tmp__R53H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__S53H=my_copy__5Q2H(__tmp__R53H);
        } break;
        case __PUT_TO__: {
          __tmp__S53H=my_copy__KR2H(__tmp__R53H);
        } break;
        case __ITEM__: {
          __tmp__S53H=my_copy__1R2H(__tmp__R53H);
        } break;
        case __SIZE_OF__: {
          __tmp__S53H=my_copy__HS2H(__tmp__R53H);
        } break;
        case __CAST__: {
          __tmp__S53H=my_copy__QS2H(__tmp__R53H);
        } break;
        case __CALL_SLOT__: {
          __tmp__S53H=my_copy__PIYM(__tmp__R53H);
        } break;
        case __READ_SLOT__: {
          __tmp__S53H=my_copy__AVGK(__tmp__R53H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__S53H=my_copy__NVGK(__tmp__R53H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__S53H=my_copy__RFCN(__tmp__R53H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__S53H=my_copy__JMEO(__tmp__R53H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__S53H=my_copy__RTJO(__tmp__R53H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__S53H=my_copy__WMEO(__tmp__R53H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__S53H=my_copy__3TJO(__tmp__R53H);
        } break;
        case __EXPR_NEG__: {
          __tmp__S53H=my_copy__YEJM(__tmp__R53H);
        } break;
        case __EXPR_ADD__: {
          __tmp__S53H=my_copy__YRLL(__tmp__R53H);
        } break;
        case __EXPR_NOT__: {
          __tmp__S53H=my_copy__GLYM(__tmp__R53H);
        } break;
        case __EXPR_MOD__: {
          __tmp__S53H=my_copy__BNEO(__tmp__R53H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__S53H=my_copy__M3DP(__tmp__R53H);
        } break;
        case __EXPR_INF__: {
          __tmp__S53H=my_copy__PBSN(__tmp__R53H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__S53H=my_copy__0BSN(__tmp__R53H);
        } break;
        case __EXPR_OR__: {
          __tmp__S53H=my_copy__ZOPN(__tmp__R53H);
        } break;
        case __EXPR_XOR__: {
          __tmp__S53H=my_copy__CYSO(__tmp__R53H);
        } break;
        };
        node__YX3H=new_read__slot__receiver__with__YOWH(__tmp__Q53H,slot_msg__XX3H,__tmp__S53H,args__ZX3H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__YX3H);
        result__SX3H=result_expr__PVDI(node__YX3H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__PX3H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__OX3H->parent_constant__P3LC.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__QX3H);
        put_position__ECH(Self__OX3H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__SX3H);
}

static void* check_type__with__LEFJ(__READ_LOCAL *Self__MEFJ,void *t__NEFJ,__POSITION p__OEFJ)
// ({READ_LOCAL},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__QEFJ,*rec__TEFJ,*__tmp__PMFJ,*__tmp__QMFJ;
  void *local__REFJ;
  void *instr__SEFJ;
  void *slot_name__UEFJ;
  void *slot_msg__VEFJ;
  void *node__WEFJ;
  __TYPE_FULL *Self__GYIQ,*Self__QYIQ;
  void *__tmp__GHFJ,*__tmp__SKFJ;
  __POSITION __tmp__NHFJ,__tmp__VIFJ,__tmp__ZKFJ,__tmp__BMFJ;
  __POSITION __tmp__OMFJ;
  void *__tmp__THFJ,*__tmp__5KFJ;
  __STRING_CST *Self__XYIQ;
  __PROTOTYPE_CST *Self__YYIQ;
  __INTEGER_CST *Self__ZYIQ;
  __REAL_CST *Self__1YIQ;
  __CHARACTER_CST *Self__3YIQ;
  __IS_EXPANDED *Self__4YIQ;
  void *args__XEFJ;
  __BOOLEAN __tmp__CJFJ;
  result__QEFJ=NULL;
  local__REFJ=NULL;
  instr__SEFJ=NULL;
  rec__TEFJ=NULL;
  slot_name__UEFJ=NULL;
  slot_msg__VEFJ=NULL;
  node__WEFJ=NULL;
  args__XEFJ=NULL;
  if (affect_with__ZCHI(t__NEFJ,((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F)) {
    result__QEFJ=Self__MEFJ;
  } else {
    Self__GYIQ=((__TYPE_FULL *)((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F);
    if (is_cast__to__in__ZD0I(Self__GYIQ,(&__string_86),t__NEFJ,((__PROTOTYPE *)prototype__NQRF(Self__GYIQ))->export_list__SFDC)) {
      local__REFJ=create__name__style__type__25JG(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F));
      instr__SEFJ=write__value__T5FH(local__REFJ,Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MEFJ);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__SEFJ);
      slot_name__UEFJ=get__QEC(last_cast_name__L42H);
      slot_msg__VEFJ=get_slot__AP5G(((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F,slot_name__UEFJ);
      if (((void *)slot_msg__VEFJ == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__NEFJ,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__UEFJ);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__OEFJ);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
        __tmp__GHFJ=((__SLOT *)((__SLOT_DATA *)slot_msg__VEFJ)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__GHFJ=((__SLOT *)((__SLOT_CODE *)slot_msg__VEFJ)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__GHFJ) !=  1)) {
        if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
          __tmp__NHFJ=((__SLOT_DATA *)slot_msg__VEFJ)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__NHFJ=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VEFJ)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__NHFJ);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
        __tmp__THFJ=get_type_result__PG2G(slot_msg__VEFJ);
      } else {
        __tmp__THFJ=get_type_result__ZH2G(slot_msg__VEFJ);
      };
      if ((((void *)__tmp__THFJ == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__THFJ)->parent_type__KTL != (void *)((__TYPE_FULL *)t__NEFJ)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__THFJ != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__THFJ,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__NEFJ,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
          __tmp__VIFJ=((__SLOT_DATA *)slot_msg__VEFJ)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__VIFJ=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VEFJ)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__VIFJ);
        put_position__ECH(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__TEFJ=read__IC5G(local__REFJ);
      node__WEFJ=new_read__slot__receiver__self__YLQC(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__VEFJ,rec__TEFJ,rec__TEFJ);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__WEFJ);
      result__QEFJ=result_expr__PVDI(node__WEFJ);
      __tmp__CJFJ=TRUE__;
    } else {
      __tmp__CJFJ=FALSE__;
    };
    if ((! __tmp__CJFJ)) {
      Self__QYIQ=((__TYPE_FULL *)t__NEFJ);
      if (is_cast__to__in__ZD0I(Self__QYIQ,(&__string_87),((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F,((__PROTOTYPE *)prototype__NQRF(Self__QYIQ))->import_list__0FDC)) {
        local__REFJ=create__name__style__type__25JG(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F));
        instr__SEFJ=write__value__T5FH(local__REFJ,Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MEFJ);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__SEFJ);
        slot_name__UEFJ=get__QEC(last_cast_name__L42H);
        slot_msg__VEFJ=get_slot__AP5G(t__NEFJ,slot_name__UEFJ);
        if (((void *)slot_msg__VEFJ == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__NEFJ,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__UEFJ);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__NEFJ,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__OEFJ);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__NEFJ))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
          __tmp__SKFJ=((__SLOT *)((__SLOT_DATA *)slot_msg__VEFJ)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__SKFJ=((__SLOT *)((__SLOT_CODE *)slot_msg__VEFJ)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__SKFJ) !=  2)) {
          if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
            __tmp__ZKFJ=((__SLOT_DATA *)slot_msg__VEFJ)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__ZKFJ=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VEFJ)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__ZKFJ);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
          __tmp__5KFJ=get_type_result__PG2G(slot_msg__VEFJ);
        } else {
          __tmp__5KFJ=get_type_result__ZH2G(slot_msg__VEFJ);
        };
        if ((((void *)__tmp__5KFJ == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__5KFJ)->parent_type__KTL != (void *)((__TYPE_FULL *)t__NEFJ)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__5KFJ != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__5KFJ,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__NEFJ,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__VEFJ)->__id==__SLOT_DATA__) {
            __tmp__BMFJ=((__SLOT_DATA *)slot_msg__VEFJ)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__BMFJ=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VEFJ)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__BMFJ);
          put_position__ECH(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__XEFJ=create_with_capacity__3THH( 2);
        add_last__XSEI(args__XEFJ,create__type__CLQC(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,t__NEFJ));
        add_last__XSEI(args__XEFJ,read__IC5G(local__REFJ));
        __tmp__OMFJ=Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__PMFJ=((void **)((__FAST_ARRAYoEXPRo *)args__XEFJ)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__PMFJ)->__id) {
        case __LIST__: {
          __tmp__QMFJ=my_copy__2HYM(__tmp__PMFJ);
        } break;
        case __STRING_CST__: {
          Self__XYIQ=((__STRING_CST *)__tmp__PMFJ);
          __tmp__QMFJ=create__text__AUMH(Self__XYIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XYIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__QMFJ=my_copy__2K2H(__tmp__PMFJ);
        } break;
        case __PROTOTYPE_CST__: {
          Self__YYIQ=((__PROTOTYPE_CST *)__tmp__PMFJ);
          __tmp__QMFJ=create__type__CLQC(Self__YYIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YYIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__ZYIQ=((__INTEGER_CST *)__tmp__PMFJ);
          __tmp__QMFJ=create__value__type__DNQC(Self__ZYIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZYIQ->value__PAZD,Self__ZYIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__QMFJ=my_copy__OAFJ(__tmp__PMFJ);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__QMFJ=my_copy__KM2H(__tmp__PMFJ);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__QMFJ=my_copy__DN2H(__tmp__PMFJ);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__QMFJ=my_copy__QN2H(__tmp__PMFJ);
        } break;
        case __REAL_CST__: {
          Self__1YIQ=((__REAL_CST *)__tmp__PMFJ);
          __tmp__QMFJ=create__value__type__1SMH(Self__1YIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1YIQ->value__5N2H,Self__1YIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__3YIQ=((__CHARACTER_CST *)__tmp__PMFJ);
          __tmp__QMFJ=create__char__WTMH(Self__3YIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3YIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__4YIQ=((__IS_EXPANDED *)__tmp__PMFJ);
          __tmp__QMFJ=create__receiver__WRWH(Self__4YIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4YIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__QMFJ=my_copy__TO2H(__tmp__PMFJ);
        } break;
        case __EXPR_SUP__: {
          __tmp__QMFJ=my_copy__2O2H(__tmp__PMFJ);
        } break;
        case __EXPR_SUB__: {
          __tmp__QMFJ=my_copy__HP2H(__tmp__PMFJ);
        } break;
        case __EXPR_MUL__: {
          __tmp__QMFJ=my_copy__TP2H(__tmp__PMFJ);
        } break;
        case __EXPR_DIV__: {
          __tmp__QMFJ=my_copy__4P2H(__tmp__PMFJ);
        } break;
        case __EXPR_AND__: {
          __tmp__QMFJ=my_copy__JQ2H(__tmp__PMFJ);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__QMFJ=my_copy__UQ2H(__tmp__PMFJ);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__QMFJ=my_copy__5Q2H(__tmp__PMFJ);
        } break;
        case __PUT_TO__: {
          __tmp__QMFJ=my_copy__KR2H(__tmp__PMFJ);
        } break;
        case __ITEM__: {
          __tmp__QMFJ=my_copy__1R2H(__tmp__PMFJ);
        } break;
        case __SIZE_OF__: {
          __tmp__QMFJ=my_copy__HS2H(__tmp__PMFJ);
        } break;
        case __CAST__: {
          __tmp__QMFJ=my_copy__QS2H(__tmp__PMFJ);
        } break;
        case __CALL_SLOT__: {
          __tmp__QMFJ=my_copy__PIYM(__tmp__PMFJ);
        } break;
        case __READ_SLOT__: {
          __tmp__QMFJ=my_copy__AVGK(__tmp__PMFJ);
        } break;
        case __READ_GLOBAL__: {
          __tmp__QMFJ=my_copy__NVGK(__tmp__PMFJ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__QMFJ=my_copy__RFCN(__tmp__PMFJ);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__QMFJ=my_copy__JMEO(__tmp__PMFJ);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__QMFJ=my_copy__RTJO(__tmp__PMFJ);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__QMFJ=my_copy__WMEO(__tmp__PMFJ);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__QMFJ=my_copy__3TJO(__tmp__PMFJ);
        } break;
        case __EXPR_NEG__: {
          __tmp__QMFJ=my_copy__YEJM(__tmp__PMFJ);
        } break;
        case __EXPR_ADD__: {
          __tmp__QMFJ=my_copy__YRLL(__tmp__PMFJ);
        } break;
        case __EXPR_NOT__: {
          __tmp__QMFJ=my_copy__GLYM(__tmp__PMFJ);
        } break;
        case __EXPR_MOD__: {
          __tmp__QMFJ=my_copy__BNEO(__tmp__PMFJ);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__QMFJ=my_copy__M3DP(__tmp__PMFJ);
        } break;
        case __EXPR_INF__: {
          __tmp__QMFJ=my_copy__PBSN(__tmp__PMFJ);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__QMFJ=my_copy__0BSN(__tmp__PMFJ);
        } break;
        case __EXPR_OR__: {
          __tmp__QMFJ=my_copy__ZOPN(__tmp__PMFJ);
        } break;
        case __EXPR_XOR__: {
          __tmp__QMFJ=my_copy__CYSO(__tmp__PMFJ);
        } break;
        };
        node__WEFJ=new_read__slot__receiver__with__YOWH(__tmp__OMFJ,slot_msg__VEFJ,__tmp__QMFJ,args__XEFJ);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__WEFJ);
        result__QEFJ=result_expr__PVDI(node__WEFJ);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__NEFJ,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(((__LOCAL *)Self__MEFJ->local__ALZD)->parent_variable__B2LC.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__OEFJ);
        put_position__ECH(Self__MEFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__QEFJ);
}

static void* check_type__with__LA4H(__EXPR_MULTIPLE *Self__MA4H,void *t__NA4H,__POSITION p__OA4H)
// ({EXPR_MULTIPLE},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__QA4H,*rec__TA4H,*__tmp__PI4H,*__tmp__QI4H;
  void *local__RA4H;
  void *instr__SA4H;
  void *slot_name__UA4H;
  void *slot_msg__VA4H;
  void *node__WA4H;
  __TYPE_FULL *Self__5YIQ,*Self__IZIQ;
  void *__tmp__GD4H,*__tmp__SG4H;
  __POSITION __tmp__ND4H,__tmp__VE4H,__tmp__ZG4H,__tmp__BI4H;
  __POSITION __tmp__OI4H;
  void *__tmp__TD4H,*__tmp__5G4H;
  __STRING_CST *Self__PZIQ;
  __PROTOTYPE_CST *Self__QZIQ;
  __INTEGER_CST *Self__RZIQ;
  __REAL_CST *Self__TZIQ;
  __CHARACTER_CST *Self__VZIQ;
  __IS_EXPANDED *Self__WZIQ;
  void *args__XA4H;
  __BOOLEAN __tmp__CF4H;
  result__QA4H=NULL;
  local__RA4H=NULL;
  instr__SA4H=NULL;
  rec__TA4H=NULL;
  slot_name__UA4H=NULL;
  slot_msg__VA4H=NULL;
  node__WA4H=NULL;
  args__XA4H=NULL;
  if (affect_with__ZCHI(t__NA4H,static_type__0N1H(Self__MA4H))) {
    result__QA4H=Self__MA4H;
  } else {
    Self__5YIQ=((__TYPE_FULL *)static_type__0N1H(Self__MA4H));
    if (is_cast__to__in__ZD0I(Self__5YIQ,(&__string_86),t__NA4H,((__PROTOTYPE *)prototype__NQRF(Self__5YIQ))->export_list__SFDC)) {
      local__RA4H=create__name__style__type__25JG(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__0N1H(Self__MA4H)));
      instr__SA4H=write__value__T5FH(local__RA4H,EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MA4H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__SA4H);
      slot_name__UA4H=get__QEC(last_cast_name__L42H);
      slot_msg__VA4H=get_slot__AP5G(static_type__0N1H(Self__MA4H),slot_name__UA4H);
      if (((void *)slot_msg__VA4H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__0N1H(Self__MA4H),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__NA4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__UA4H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__0N1H(Self__MA4H),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__OA4H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__0N1H(Self__MA4H)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
        __tmp__GD4H=((__SLOT *)((__SLOT_DATA *)slot_msg__VA4H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__GD4H=((__SLOT *)((__SLOT_CODE *)slot_msg__VA4H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__GD4H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
          __tmp__ND4H=((__SLOT_DATA *)slot_msg__VA4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__ND4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VA4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__ND4H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
        __tmp__TD4H=get_type_result__PG2G(slot_msg__VA4H);
      } else {
        __tmp__TD4H=get_type_result__ZH2G(slot_msg__VA4H);
      };
      if ((((void *)__tmp__TD4H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__TD4H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__NA4H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__TD4H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__TD4H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__NA4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
          __tmp__VE4H=((__SLOT_DATA *)slot_msg__VA4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__VE4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VA4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__VE4H);
        put_position__ECH(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__TA4H=read__IC5G(local__RA4H);
      node__WA4H=new_read__slot__receiver__self__YLQC(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__VA4H,rec__TA4H,rec__TA4H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__WA4H);
      result__QA4H=result_expr__PVDI(node__WA4H);
      __tmp__CF4H=TRUE__;
    } else {
      __tmp__CF4H=FALSE__;
    };
    if ((! __tmp__CF4H)) {
      Self__IZIQ=((__TYPE_FULL *)t__NA4H);
      if (is_cast__to__in__ZD0I(Self__IZIQ,(&__string_87),static_type__0N1H(Self__MA4H),((__PROTOTYPE *)prototype__NQRF(Self__IZIQ))->import_list__0FDC)) {
        local__RA4H=create__name__style__type__25JG(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__0N1H(Self__MA4H)));
        instr__SA4H=write__value__T5FH(local__RA4H,EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MA4H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__SA4H);
        slot_name__UA4H=get__QEC(last_cast_name__L42H);
        slot_msg__VA4H=get_slot__AP5G(t__NA4H,slot_name__UA4H);
        if (((void *)slot_msg__VA4H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__NA4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__0N1H(Self__MA4H),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__UA4H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__NA4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__OA4H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__NA4H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
          __tmp__SG4H=((__SLOT *)((__SLOT_DATA *)slot_msg__VA4H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__SG4H=((__SLOT *)((__SLOT_CODE *)slot_msg__VA4H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__SG4H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
            __tmp__ZG4H=((__SLOT_DATA *)slot_msg__VA4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__ZG4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VA4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__ZG4H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
          __tmp__5G4H=get_type_result__PG2G(slot_msg__VA4H);
        } else {
          __tmp__5G4H=get_type_result__ZH2G(slot_msg__VA4H);
        };
        if ((((void *)__tmp__5G4H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__5G4H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__NA4H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__5G4H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__5G4H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__NA4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__VA4H)->__id==__SLOT_DATA__) {
            __tmp__BI4H=((__SLOT_DATA *)slot_msg__VA4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__BI4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__VA4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__BI4H);
          put_position__ECH(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__XA4H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__XA4H,create__type__CLQC(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM,t__NA4H));
        add_last__XSEI(args__XA4H,read__IC5G(local__RA4H));
        __tmp__OI4H=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__PI4H=((void **)((__FAST_ARRAYoEXPRo *)args__XA4H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__PI4H)->__id) {
        case __LIST__: {
          __tmp__QI4H=my_copy__2HYM(__tmp__PI4H);
        } break;
        case __STRING_CST__: {
          Self__PZIQ=((__STRING_CST *)__tmp__PI4H);
          __tmp__QI4H=create__text__AUMH(Self__PZIQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PZIQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__QI4H=my_copy__2K2H(__tmp__PI4H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__QZIQ=((__PROTOTYPE_CST *)__tmp__PI4H);
          __tmp__QI4H=create__type__CLQC(Self__QZIQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QZIQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__RZIQ=((__INTEGER_CST *)__tmp__PI4H);
          __tmp__QI4H=create__value__type__DNQC(Self__RZIQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RZIQ->value__PAZD,Self__RZIQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__QI4H=my_copy__OAFJ(__tmp__PI4H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__QI4H=my_copy__KM2H(__tmp__PI4H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__QI4H=my_copy__DN2H(__tmp__PI4H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__QI4H=my_copy__QN2H(__tmp__PI4H);
        } break;
        case __REAL_CST__: {
          Self__TZIQ=((__REAL_CST *)__tmp__PI4H);
          __tmp__QI4H=create__value__type__1SMH(Self__TZIQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TZIQ->value__5N2H,Self__TZIQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__VZIQ=((__CHARACTER_CST *)__tmp__PI4H);
          __tmp__QI4H=create__char__WTMH(Self__VZIQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VZIQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__WZIQ=((__IS_EXPANDED *)__tmp__PI4H);
          __tmp__QI4H=create__receiver__WRWH(Self__WZIQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WZIQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__QI4H=my_copy__TO2H(__tmp__PI4H);
        } break;
        case __EXPR_SUP__: {
          __tmp__QI4H=my_copy__2O2H(__tmp__PI4H);
        } break;
        case __EXPR_SUB__: {
          __tmp__QI4H=my_copy__HP2H(__tmp__PI4H);
        } break;
        case __EXPR_MUL__: {
          __tmp__QI4H=my_copy__TP2H(__tmp__PI4H);
        } break;
        case __EXPR_DIV__: {
          __tmp__QI4H=my_copy__4P2H(__tmp__PI4H);
        } break;
        case __EXPR_AND__: {
          __tmp__QI4H=my_copy__JQ2H(__tmp__PI4H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__QI4H=my_copy__UQ2H(__tmp__PI4H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__QI4H=my_copy__5Q2H(__tmp__PI4H);
        } break;
        case __PUT_TO__: {
          __tmp__QI4H=my_copy__KR2H(__tmp__PI4H);
        } break;
        case __ITEM__: {
          __tmp__QI4H=my_copy__1R2H(__tmp__PI4H);
        } break;
        case __SIZE_OF__: {
          __tmp__QI4H=my_copy__HS2H(__tmp__PI4H);
        } break;
        case __CAST__: {
          __tmp__QI4H=my_copy__QS2H(__tmp__PI4H);
        } break;
        case __CALL_SLOT__: {
          __tmp__QI4H=my_copy__PIYM(__tmp__PI4H);
        } break;
        case __READ_SLOT__: {
          __tmp__QI4H=my_copy__AVGK(__tmp__PI4H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__QI4H=my_copy__NVGK(__tmp__PI4H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__QI4H=my_copy__RFCN(__tmp__PI4H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__QI4H=my_copy__JMEO(__tmp__PI4H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__QI4H=my_copy__RTJO(__tmp__PI4H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__QI4H=my_copy__WMEO(__tmp__PI4H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__QI4H=my_copy__3TJO(__tmp__PI4H);
        } break;
        case __EXPR_NEG__: {
          __tmp__QI4H=my_copy__YEJM(__tmp__PI4H);
        } break;
        case __EXPR_ADD__: {
          __tmp__QI4H=my_copy__YRLL(__tmp__PI4H);
        } break;
        case __EXPR_NOT__: {
          __tmp__QI4H=my_copy__GLYM(__tmp__PI4H);
        } break;
        case __EXPR_MOD__: {
          __tmp__QI4H=my_copy__BNEO(__tmp__PI4H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__QI4H=my_copy__M3DP(__tmp__PI4H);
        } break;
        case __EXPR_INF__: {
          __tmp__QI4H=my_copy__PBSN(__tmp__PI4H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__QI4H=my_copy__0BSN(__tmp__PI4H);
        } break;
        case __EXPR_OR__: {
          __tmp__QI4H=my_copy__ZOPN(__tmp__PI4H);
        } break;
        case __EXPR_XOR__: {
          __tmp__QI4H=my_copy__CYSO(__tmp__PI4H);
        } break;
        };
        node__WA4H=new_read__slot__receiver__with__YOWH(__tmp__OI4H,slot_msg__VA4H,__tmp__QI4H,args__XA4H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__WA4H);
        result__QA4H=result_expr__PVDI(node__WA4H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__NA4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__0N1H(Self__MA4H),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__OA4H);
        put_position__ECH(EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__QA4H);
}

static void* check_type__with__KJ4H(__EXPR_EQUAL *Self__LJ4H,void *t__MJ4H,__POSITION p__NJ4H)
// ({EXPR_EQUAL},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__PJ4H,*rec__SJ4H,*__tmp__OR4H,*__tmp__PR4H;
  void *local__QJ4H;
  void *instr__RJ4H;
  void *slot_name__TJ4H;
  void *slot_msg__UJ4H;
  void *node__VJ4H;
  __TYPE_FULL *Self__XZIQ,*Self__B0IQ;
  void *__tmp__FM4H,*__tmp__RP4H;
  __POSITION __tmp__MM4H,__tmp__UN4H,__tmp__YP4H,__tmp__AR4H;
  __POSITION __tmp__NR4H;
  void *__tmp__SM4H,*__tmp__4P4H;
  __STRING_CST *Self__I0IQ;
  __PROTOTYPE_CST *Self__J0IQ;
  __INTEGER_CST *Self__K0IQ;
  __REAL_CST *Self__M0IQ;
  __CHARACTER_CST *Self__O0IQ;
  __IS_EXPANDED *Self__P0IQ;
  void *args__WJ4H;
  __BOOLEAN __tmp__BO4H;
  result__PJ4H=NULL;
  local__QJ4H=NULL;
  instr__RJ4H=NULL;
  rec__SJ4H=NULL;
  slot_name__TJ4H=NULL;
  slot_msg__UJ4H=NULL;
  node__VJ4H=NULL;
  args__WJ4H=NULL;
  if (affect_with__ZCHI(t__MJ4H,static_type__TO1H())) {
    result__PJ4H=Self__LJ4H;
  } else {
    Self__XZIQ=((__TYPE_FULL *)static_type__TO1H());
    if (is_cast__to__in__ZD0I(Self__XZIQ,(&__string_86),t__MJ4H,((__PROTOTYPE *)prototype__NQRF(Self__XZIQ))->export_list__SFDC)) {
      local__QJ4H=create__name__style__type__25JG(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__TO1H()));
      instr__RJ4H=write__value__T5FH(local__QJ4H,Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LJ4H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__RJ4H);
      slot_name__TJ4H=get__QEC(last_cast_name__L42H);
      slot_msg__UJ4H=get_slot__AP5G(static_type__TO1H(),slot_name__TJ4H);
      if (((void *)slot_msg__UJ4H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__TO1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__MJ4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__TJ4H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__TO1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__NJ4H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__TO1H()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
        __tmp__FM4H=((__SLOT *)((__SLOT_DATA *)slot_msg__UJ4H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__FM4H=((__SLOT *)((__SLOT_CODE *)slot_msg__UJ4H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__FM4H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
          __tmp__MM4H=((__SLOT_DATA *)slot_msg__UJ4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__MM4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__UJ4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__MM4H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
        __tmp__SM4H=get_type_result__PG2G(slot_msg__UJ4H);
      } else {
        __tmp__SM4H=get_type_result__ZH2G(slot_msg__UJ4H);
      };
      if ((((void *)__tmp__SM4H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__SM4H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__MJ4H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__SM4H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__SM4H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__MJ4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
          __tmp__UN4H=((__SLOT_DATA *)slot_msg__UJ4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__UN4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__UJ4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__UN4H);
        put_position__ECH(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__SJ4H=read__IC5G(local__QJ4H);
      node__VJ4H=new_read__slot__receiver__self__YLQC(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__UJ4H,rec__SJ4H,rec__SJ4H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__VJ4H);
      result__PJ4H=result_expr__PVDI(node__VJ4H);
      __tmp__BO4H=TRUE__;
    } else {
      __tmp__BO4H=FALSE__;
    };
    if ((! __tmp__BO4H)) {
      Self__B0IQ=((__TYPE_FULL *)t__MJ4H);
      if (is_cast__to__in__ZD0I(Self__B0IQ,(&__string_87),static_type__TO1H(),((__PROTOTYPE *)prototype__NQRF(Self__B0IQ))->import_list__0FDC)) {
        local__QJ4H=create__name__style__type__25JG(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__TO1H()));
        instr__RJ4H=write__value__T5FH(local__QJ4H,Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LJ4H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__RJ4H);
        slot_name__TJ4H=get__QEC(last_cast_name__L42H);
        slot_msg__UJ4H=get_slot__AP5G(t__MJ4H,slot_name__TJ4H);
        if (((void *)slot_msg__UJ4H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__MJ4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__TO1H(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__TJ4H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__MJ4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__NJ4H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__MJ4H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
          __tmp__RP4H=((__SLOT *)((__SLOT_DATA *)slot_msg__UJ4H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__RP4H=((__SLOT *)((__SLOT_CODE *)slot_msg__UJ4H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__RP4H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
            __tmp__YP4H=((__SLOT_DATA *)slot_msg__UJ4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__YP4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__UJ4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__YP4H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
          __tmp__4P4H=get_type_result__PG2G(slot_msg__UJ4H);
        } else {
          __tmp__4P4H=get_type_result__ZH2G(slot_msg__UJ4H);
        };
        if ((((void *)__tmp__4P4H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__4P4H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__MJ4H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__4P4H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__4P4H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__MJ4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__UJ4H)->__id==__SLOT_DATA__) {
            __tmp__AR4H=((__SLOT_DATA *)slot_msg__UJ4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__AR4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__UJ4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__AR4H);
          put_position__ECH(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__WJ4H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__WJ4H,create__type__CLQC(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__MJ4H));
        add_last__XSEI(args__WJ4H,read__IC5G(local__QJ4H));
        __tmp__NR4H=Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__OR4H=((void **)((__FAST_ARRAYoEXPRo *)args__WJ4H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__OR4H)->__id) {
        case __LIST__: {
          __tmp__PR4H=my_copy__2HYM(__tmp__OR4H);
        } break;
        case __STRING_CST__: {
          Self__I0IQ=((__STRING_CST *)__tmp__OR4H);
          __tmp__PR4H=create__text__AUMH(Self__I0IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__I0IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__PR4H=my_copy__2K2H(__tmp__OR4H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__J0IQ=((__PROTOTYPE_CST *)__tmp__OR4H);
          __tmp__PR4H=create__type__CLQC(Self__J0IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J0IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__K0IQ=((__INTEGER_CST *)__tmp__OR4H);
          __tmp__PR4H=create__value__type__DNQC(Self__K0IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__K0IQ->value__PAZD,Self__K0IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__PR4H=my_copy__OAFJ(__tmp__OR4H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__PR4H=my_copy__KM2H(__tmp__OR4H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__PR4H=my_copy__DN2H(__tmp__OR4H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__PR4H=my_copy__QN2H(__tmp__OR4H);
        } break;
        case __REAL_CST__: {
          Self__M0IQ=((__REAL_CST *)__tmp__OR4H);
          __tmp__PR4H=create__value__type__1SMH(Self__M0IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__M0IQ->value__5N2H,Self__M0IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__O0IQ=((__CHARACTER_CST *)__tmp__OR4H);
          __tmp__PR4H=create__char__WTMH(Self__O0IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O0IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__P0IQ=((__IS_EXPANDED *)__tmp__OR4H);
          __tmp__PR4H=create__receiver__WRWH(Self__P0IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__P0IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__PR4H=my_copy__TO2H(__tmp__OR4H);
        } break;
        case __EXPR_SUP__: {
          __tmp__PR4H=my_copy__2O2H(__tmp__OR4H);
        } break;
        case __EXPR_SUB__: {
          __tmp__PR4H=my_copy__HP2H(__tmp__OR4H);
        } break;
        case __EXPR_MUL__: {
          __tmp__PR4H=my_copy__TP2H(__tmp__OR4H);
        } break;
        case __EXPR_DIV__: {
          __tmp__PR4H=my_copy__4P2H(__tmp__OR4H);
        } break;
        case __EXPR_AND__: {
          __tmp__PR4H=my_copy__JQ2H(__tmp__OR4H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__PR4H=my_copy__UQ2H(__tmp__OR4H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__PR4H=my_copy__5Q2H(__tmp__OR4H);
        } break;
        case __PUT_TO__: {
          __tmp__PR4H=my_copy__KR2H(__tmp__OR4H);
        } break;
        case __ITEM__: {
          __tmp__PR4H=my_copy__1R2H(__tmp__OR4H);
        } break;
        case __SIZE_OF__: {
          __tmp__PR4H=my_copy__HS2H(__tmp__OR4H);
        } break;
        case __CAST__: {
          __tmp__PR4H=my_copy__QS2H(__tmp__OR4H);
        } break;
        case __CALL_SLOT__: {
          __tmp__PR4H=my_copy__PIYM(__tmp__OR4H);
        } break;
        case __READ_SLOT__: {
          __tmp__PR4H=my_copy__AVGK(__tmp__OR4H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__PR4H=my_copy__NVGK(__tmp__OR4H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__PR4H=my_copy__RFCN(__tmp__OR4H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__PR4H=my_copy__JMEO(__tmp__OR4H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__PR4H=my_copy__RTJO(__tmp__OR4H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__PR4H=my_copy__WMEO(__tmp__OR4H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__PR4H=my_copy__3TJO(__tmp__OR4H);
        } break;
        case __EXPR_NEG__: {
          __tmp__PR4H=my_copy__YEJM(__tmp__OR4H);
        } break;
        case __EXPR_ADD__: {
          __tmp__PR4H=my_copy__YRLL(__tmp__OR4H);
        } break;
        case __EXPR_NOT__: {
          __tmp__PR4H=my_copy__GLYM(__tmp__OR4H);
        } break;
        case __EXPR_MOD__: {
          __tmp__PR4H=my_copy__BNEO(__tmp__OR4H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__PR4H=my_copy__M3DP(__tmp__OR4H);
        } break;
        case __EXPR_INF__: {
          __tmp__PR4H=my_copy__PBSN(__tmp__OR4H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__PR4H=my_copy__0BSN(__tmp__OR4H);
        } break;
        case __EXPR_OR__: {
          __tmp__PR4H=my_copy__ZOPN(__tmp__OR4H);
        } break;
        case __EXPR_XOR__: {
          __tmp__PR4H=my_copy__CYSO(__tmp__OR4H);
        } break;
        };
        node__VJ4H=new_read__slot__receiver__with__YOWH(__tmp__NR4H,slot_msg__UJ4H,__tmp__PR4H,args__WJ4H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__VJ4H);
        result__PJ4H=result_expr__PVDI(node__VJ4H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__MJ4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__TO1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__NJ4H);
        put_position__ECH(Self__LJ4H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__PJ4H);
}

static void* check_type__with__JS4H(__EXPR_NOT_EQUAL *Self__KS4H,void *t__LS4H,__POSITION p__MS4H)
// ({EXPR_NOT_EQUAL},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__OS4H,*rec__RS4H,*__tmp__N04H,*__tmp__O04H;
  void *local__PS4H;
  void *instr__QS4H;
  void *slot_name__SS4H;
  void *slot_msg__TS4H;
  void *node__US4H;
  __TYPE_FULL *Self__Q0IQ,*Self__00IQ;
  void *__tmp__EV4H,*__tmp__QY4H;
  __POSITION __tmp__LV4H,__tmp__TW4H,__tmp__XY4H,__tmp__5Z4H;
  __POSITION __tmp__M04H;
  void *__tmp__RV4H,*__tmp__3Y4H;
  __STRING_CST *Self__B1IQ;
  __PROTOTYPE_CST *Self__C1IQ;
  __INTEGER_CST *Self__D1IQ;
  __REAL_CST *Self__F1IQ;
  __CHARACTER_CST *Self__H1IQ;
  __IS_EXPANDED *Self__I1IQ;
  void *args__VS4H;
  __BOOLEAN __tmp__AX4H;
  result__OS4H=NULL;
  local__PS4H=NULL;
  instr__QS4H=NULL;
  rec__RS4H=NULL;
  slot_name__SS4H=NULL;
  slot_msg__TS4H=NULL;
  node__US4H=NULL;
  args__VS4H=NULL;
  if (affect_with__ZCHI(t__LS4H,static_type__YO1H())) {
    result__OS4H=Self__KS4H;
  } else {
    Self__Q0IQ=((__TYPE_FULL *)static_type__YO1H());
    if (is_cast__to__in__ZD0I(Self__Q0IQ,(&__string_86),t__LS4H,((__PROTOTYPE *)prototype__NQRF(Self__Q0IQ))->export_list__SFDC)) {
      local__PS4H=create__name__style__type__25JG(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__YO1H()));
      instr__QS4H=write__value__T5FH(local__PS4H,Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KS4H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__QS4H);
      slot_name__SS4H=get__QEC(last_cast_name__L42H);
      slot_msg__TS4H=get_slot__AP5G(static_type__YO1H(),slot_name__SS4H);
      if (((void *)slot_msg__TS4H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__YO1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__LS4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__SS4H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__YO1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__MS4H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__YO1H()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
        __tmp__EV4H=((__SLOT *)((__SLOT_DATA *)slot_msg__TS4H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__EV4H=((__SLOT *)((__SLOT_CODE *)slot_msg__TS4H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__EV4H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
          __tmp__LV4H=((__SLOT_DATA *)slot_msg__TS4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__LV4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__TS4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__LV4H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
        __tmp__RV4H=get_type_result__PG2G(slot_msg__TS4H);
      } else {
        __tmp__RV4H=get_type_result__ZH2G(slot_msg__TS4H);
      };
      if ((((void *)__tmp__RV4H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__RV4H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__LS4H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__RV4H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__RV4H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__LS4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
          __tmp__TW4H=((__SLOT_DATA *)slot_msg__TS4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__TW4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__TS4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__TW4H);
        put_position__ECH(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__RS4H=read__IC5G(local__PS4H);
      node__US4H=new_read__slot__receiver__self__YLQC(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__TS4H,rec__RS4H,rec__RS4H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__US4H);
      result__OS4H=result_expr__PVDI(node__US4H);
      __tmp__AX4H=TRUE__;
    } else {
      __tmp__AX4H=FALSE__;
    };
    if ((! __tmp__AX4H)) {
      Self__00IQ=((__TYPE_FULL *)t__LS4H);
      if (is_cast__to__in__ZD0I(Self__00IQ,(&__string_87),static_type__YO1H(),((__PROTOTYPE *)prototype__NQRF(Self__00IQ))->import_list__0FDC)) {
        local__PS4H=create__name__style__type__25JG(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__YO1H()));
        instr__QS4H=write__value__T5FH(local__PS4H,Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KS4H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__QS4H);
        slot_name__SS4H=get__QEC(last_cast_name__L42H);
        slot_msg__TS4H=get_slot__AP5G(t__LS4H,slot_name__SS4H);
        if (((void *)slot_msg__TS4H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__LS4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__YO1H(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__SS4H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__LS4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__MS4H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__LS4H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
          __tmp__QY4H=((__SLOT *)((__SLOT_DATA *)slot_msg__TS4H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__QY4H=((__SLOT *)((__SLOT_CODE *)slot_msg__TS4H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__QY4H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
            __tmp__XY4H=((__SLOT_DATA *)slot_msg__TS4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__XY4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__TS4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__XY4H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
          __tmp__3Y4H=get_type_result__PG2G(slot_msg__TS4H);
        } else {
          __tmp__3Y4H=get_type_result__ZH2G(slot_msg__TS4H);
        };
        if ((((void *)__tmp__3Y4H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__3Y4H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__LS4H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__3Y4H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__3Y4H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__LS4H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__TS4H)->__id==__SLOT_DATA__) {
            __tmp__5Z4H=((__SLOT_DATA *)slot_msg__TS4H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__5Z4H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__TS4H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__5Z4H);
          put_position__ECH(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__VS4H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__VS4H,create__type__CLQC(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__LS4H));
        add_last__XSEI(args__VS4H,read__IC5G(local__PS4H));
        __tmp__M04H=Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__N04H=((void **)((__FAST_ARRAYoEXPRo *)args__VS4H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__N04H)->__id) {
        case __LIST__: {
          __tmp__O04H=my_copy__2HYM(__tmp__N04H);
        } break;
        case __STRING_CST__: {
          Self__B1IQ=((__STRING_CST *)__tmp__N04H);
          __tmp__O04H=create__text__AUMH(Self__B1IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B1IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__O04H=my_copy__2K2H(__tmp__N04H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__C1IQ=((__PROTOTYPE_CST *)__tmp__N04H);
          __tmp__O04H=create__type__CLQC(Self__C1IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__C1IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__D1IQ=((__INTEGER_CST *)__tmp__N04H);
          __tmp__O04H=create__value__type__DNQC(Self__D1IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D1IQ->value__PAZD,Self__D1IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__O04H=my_copy__OAFJ(__tmp__N04H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__O04H=my_copy__KM2H(__tmp__N04H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__O04H=my_copy__DN2H(__tmp__N04H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__O04H=my_copy__QN2H(__tmp__N04H);
        } break;
        case __REAL_CST__: {
          Self__F1IQ=((__REAL_CST *)__tmp__N04H);
          __tmp__O04H=create__value__type__1SMH(Self__F1IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F1IQ->value__5N2H,Self__F1IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__H1IQ=((__CHARACTER_CST *)__tmp__N04H);
          __tmp__O04H=create__char__WTMH(Self__H1IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H1IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__I1IQ=((__IS_EXPANDED *)__tmp__N04H);
          __tmp__O04H=create__receiver__WRWH(Self__I1IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__I1IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__O04H=my_copy__TO2H(__tmp__N04H);
        } break;
        case __EXPR_SUP__: {
          __tmp__O04H=my_copy__2O2H(__tmp__N04H);
        } break;
        case __EXPR_SUB__: {
          __tmp__O04H=my_copy__HP2H(__tmp__N04H);
        } break;
        case __EXPR_MUL__: {
          __tmp__O04H=my_copy__TP2H(__tmp__N04H);
        } break;
        case __EXPR_DIV__: {
          __tmp__O04H=my_copy__4P2H(__tmp__N04H);
        } break;
        case __EXPR_AND__: {
          __tmp__O04H=my_copy__JQ2H(__tmp__N04H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__O04H=my_copy__UQ2H(__tmp__N04H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__O04H=my_copy__5Q2H(__tmp__N04H);
        } break;
        case __PUT_TO__: {
          __tmp__O04H=my_copy__KR2H(__tmp__N04H);
        } break;
        case __ITEM__: {
          __tmp__O04H=my_copy__1R2H(__tmp__N04H);
        } break;
        case __SIZE_OF__: {
          __tmp__O04H=my_copy__HS2H(__tmp__N04H);
        } break;
        case __CAST__: {
          __tmp__O04H=my_copy__QS2H(__tmp__N04H);
        } break;
        case __CALL_SLOT__: {
          __tmp__O04H=my_copy__PIYM(__tmp__N04H);
        } break;
        case __READ_SLOT__: {
          __tmp__O04H=my_copy__AVGK(__tmp__N04H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__O04H=my_copy__NVGK(__tmp__N04H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__O04H=my_copy__RFCN(__tmp__N04H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__O04H=my_copy__JMEO(__tmp__N04H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__O04H=my_copy__RTJO(__tmp__N04H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__O04H=my_copy__WMEO(__tmp__N04H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__O04H=my_copy__3TJO(__tmp__N04H);
        } break;
        case __EXPR_NEG__: {
          __tmp__O04H=my_copy__YEJM(__tmp__N04H);
        } break;
        case __EXPR_ADD__: {
          __tmp__O04H=my_copy__YRLL(__tmp__N04H);
        } break;
        case __EXPR_NOT__: {
          __tmp__O04H=my_copy__GLYM(__tmp__N04H);
        } break;
        case __EXPR_MOD__: {
          __tmp__O04H=my_copy__BNEO(__tmp__N04H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__O04H=my_copy__M3DP(__tmp__N04H);
        } break;
        case __EXPR_INF__: {
          __tmp__O04H=my_copy__PBSN(__tmp__N04H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__O04H=my_copy__0BSN(__tmp__N04H);
        } break;
        case __EXPR_OR__: {
          __tmp__O04H=my_copy__ZOPN(__tmp__N04H);
        } break;
        case __EXPR_XOR__: {
          __tmp__O04H=my_copy__CYSO(__tmp__N04H);
        } break;
        };
        node__US4H=new_read__slot__receiver__with__YOWH(__tmp__M04H,slot_msg__TS4H,__tmp__O04H,args__VS4H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__US4H);
        result__OS4H=result_expr__PVDI(node__US4H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__LS4H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__YO1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__MS4H);
        put_position__ECH(Self__KS4H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__OS4H);
}

static void* check_type__with__I14H(__REAL_CST *Self__J14H,void *t__K14H,__POSITION p__L14H)
// ({REAL_CST},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__N14H,*rec__Q14H,*__tmp__MD5H,*__tmp__ND5H;
  void *local__O14H;
  void *instr__P14H;
  void *slot_name__R14H;
  void *slot_msg__S14H;
  void *node__T14H;
  __TYPE_FULL *Self__J1IQ,*Self__T1IQ;
  void *__tmp__D44H,*__tmp__PB5H;
  __POSITION __tmp__K44H,__tmp__S54H,__tmp__WB5H,__tmp__4C5H;
  __POSITION __tmp__LD5H;
  void *__tmp__Q44H,*__tmp__2B5H;
  __STRING_CST *Self__01IQ;
  __PROTOTYPE_CST *Self__11IQ;
  __INTEGER_CST *Self__21IQ;
  __REAL_CST *Self__41IQ;
  __CHARACTER_CST *Self__A2IQ;
  __IS_EXPANDED *Self__B2IQ;
  void *args__U14H;
  __BOOLEAN __tmp__554H;
  result__N14H=NULL;
  local__O14H=NULL;
  instr__P14H=NULL;
  rec__Q14H=NULL;
  slot_name__R14H=NULL;
  slot_msg__S14H=NULL;
  node__T14H=NULL;
  args__U14H=NULL;
  if (affect_with__ZCHI(t__K14H,Self__J14H->parent_constant__M3JH.static_type__F4YD)) {
    result__N14H=Self__J14H;
  } else {
    Self__J1IQ=((__TYPE_FULL *)Self__J14H->parent_constant__M3JH.static_type__F4YD);
    if (is_cast__to__in__ZD0I(Self__J1IQ,(&__string_86),t__K14H,((__PROTOTYPE *)prototype__NQRF(Self__J1IQ))->export_list__SFDC)) {
      local__O14H=create__name__style__type__25JG(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__J14H->parent_constant__M3JH.static_type__F4YD));
      instr__P14H=write__value__T5FH(local__O14H,Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J14H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__P14H);
      slot_name__R14H=get__QEC(last_cast_name__L42H);
      slot_msg__S14H=get_slot__AP5G(Self__J14H->parent_constant__M3JH.static_type__F4YD,slot_name__R14H);
      if (((void *)slot_msg__S14H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__J14H->parent_constant__M3JH.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__K14H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__R14H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__J14H->parent_constant__M3JH.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__L14H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__J14H->parent_constant__M3JH.static_type__F4YD))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
        __tmp__D44H=((__SLOT *)((__SLOT_DATA *)slot_msg__S14H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__D44H=((__SLOT *)((__SLOT_CODE *)slot_msg__S14H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__D44H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
          __tmp__K44H=((__SLOT_DATA *)slot_msg__S14H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__K44H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__S14H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__K44H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
        __tmp__Q44H=get_type_result__PG2G(slot_msg__S14H);
      } else {
        __tmp__Q44H=get_type_result__ZH2G(slot_msg__S14H);
      };
      if ((((void *)__tmp__Q44H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__Q44H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__K14H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__Q44H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__Q44H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__K14H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
          __tmp__S54H=((__SLOT_DATA *)slot_msg__S14H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__S54H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__S14H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__S54H);
        put_position__ECH(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__Q14H=read__IC5G(local__O14H);
      node__T14H=new_read__slot__receiver__self__YLQC(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__S14H,rec__Q14H,rec__Q14H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__T14H);
      result__N14H=result_expr__PVDI(node__T14H);
      __tmp__554H=TRUE__;
    } else {
      __tmp__554H=FALSE__;
    };
    if ((! __tmp__554H)) {
      Self__T1IQ=((__TYPE_FULL *)t__K14H);
      if (is_cast__to__in__ZD0I(Self__T1IQ,(&__string_87),Self__J14H->parent_constant__M3JH.static_type__F4YD,((__PROTOTYPE *)prototype__NQRF(Self__T1IQ))->import_list__0FDC)) {
        local__O14H=create__name__style__type__25JG(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__J14H->parent_constant__M3JH.static_type__F4YD));
        instr__P14H=write__value__T5FH(local__O14H,Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J14H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__P14H);
        slot_name__R14H=get__QEC(last_cast_name__L42H);
        slot_msg__S14H=get_slot__AP5G(t__K14H,slot_name__R14H);
        if (((void *)slot_msg__S14H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__K14H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__J14H->parent_constant__M3JH.static_type__F4YD,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__R14H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__K14H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__L14H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__K14H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
          __tmp__PB5H=((__SLOT *)((__SLOT_DATA *)slot_msg__S14H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__PB5H=((__SLOT *)((__SLOT_CODE *)slot_msg__S14H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__PB5H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
            __tmp__WB5H=((__SLOT_DATA *)slot_msg__S14H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__WB5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__S14H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__WB5H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
          __tmp__2B5H=get_type_result__PG2G(slot_msg__S14H);
        } else {
          __tmp__2B5H=get_type_result__ZH2G(slot_msg__S14H);
        };
        if ((((void *)__tmp__2B5H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__2B5H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__K14H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__2B5H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__2B5H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__K14H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__S14H)->__id==__SLOT_DATA__) {
            __tmp__4C5H=((__SLOT_DATA *)slot_msg__S14H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__4C5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__S14H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__4C5H);
          put_position__ECH(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__U14H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__U14H,create__type__CLQC(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,t__K14H));
        add_last__XSEI(args__U14H,read__IC5G(local__O14H));
        __tmp__LD5H=Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__MD5H=((void **)((__FAST_ARRAYoEXPRo *)args__U14H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__MD5H)->__id) {
        case __LIST__: {
          __tmp__ND5H=my_copy__2HYM(__tmp__MD5H);
        } break;
        case __STRING_CST__: {
          Self__01IQ=((__STRING_CST *)__tmp__MD5H);
          __tmp__ND5H=create__text__AUMH(Self__01IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__01IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__ND5H=my_copy__2K2H(__tmp__MD5H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__11IQ=((__PROTOTYPE_CST *)__tmp__MD5H);
          __tmp__ND5H=create__type__CLQC(Self__11IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__11IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__21IQ=((__INTEGER_CST *)__tmp__MD5H);
          __tmp__ND5H=create__value__type__DNQC(Self__21IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__21IQ->value__PAZD,Self__21IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__ND5H=my_copy__OAFJ(__tmp__MD5H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ND5H=my_copy__KM2H(__tmp__MD5H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ND5H=my_copy__DN2H(__tmp__MD5H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ND5H=my_copy__QN2H(__tmp__MD5H);
        } break;
        case __REAL_CST__: {
          Self__41IQ=((__REAL_CST *)__tmp__MD5H);
          __tmp__ND5H=create__value__type__1SMH(Self__41IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__41IQ->value__5N2H,Self__41IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__A2IQ=((__CHARACTER_CST *)__tmp__MD5H);
          __tmp__ND5H=create__char__WTMH(Self__A2IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__A2IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__B2IQ=((__IS_EXPANDED *)__tmp__MD5H);
          __tmp__ND5H=create__receiver__WRWH(Self__B2IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__B2IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ND5H=my_copy__TO2H(__tmp__MD5H);
        } break;
        case __EXPR_SUP__: {
          __tmp__ND5H=my_copy__2O2H(__tmp__MD5H);
        } break;
        case __EXPR_SUB__: {
          __tmp__ND5H=my_copy__HP2H(__tmp__MD5H);
        } break;
        case __EXPR_MUL__: {
          __tmp__ND5H=my_copy__TP2H(__tmp__MD5H);
        } break;
        case __EXPR_DIV__: {
          __tmp__ND5H=my_copy__4P2H(__tmp__MD5H);
        } break;
        case __EXPR_AND__: {
          __tmp__ND5H=my_copy__JQ2H(__tmp__MD5H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ND5H=my_copy__UQ2H(__tmp__MD5H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ND5H=my_copy__5Q2H(__tmp__MD5H);
        } break;
        case __PUT_TO__: {
          __tmp__ND5H=my_copy__KR2H(__tmp__MD5H);
        } break;
        case __ITEM__: {
          __tmp__ND5H=my_copy__1R2H(__tmp__MD5H);
        } break;
        case __SIZE_OF__: {
          __tmp__ND5H=my_copy__HS2H(__tmp__MD5H);
        } break;
        case __CAST__: {
          __tmp__ND5H=my_copy__QS2H(__tmp__MD5H);
        } break;
        case __CALL_SLOT__: {
          __tmp__ND5H=my_copy__PIYM(__tmp__MD5H);
        } break;
        case __READ_SLOT__: {
          __tmp__ND5H=my_copy__AVGK(__tmp__MD5H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__ND5H=my_copy__NVGK(__tmp__MD5H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ND5H=my_copy__RFCN(__tmp__MD5H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ND5H=my_copy__JMEO(__tmp__MD5H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ND5H=my_copy__RTJO(__tmp__MD5H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ND5H=my_copy__WMEO(__tmp__MD5H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ND5H=my_copy__3TJO(__tmp__MD5H);
        } break;
        case __EXPR_NEG__: {
          __tmp__ND5H=my_copy__YEJM(__tmp__MD5H);
        } break;
        case __EXPR_ADD__: {
          __tmp__ND5H=my_copy__YRLL(__tmp__MD5H);
        } break;
        case __EXPR_NOT__: {
          __tmp__ND5H=my_copy__GLYM(__tmp__MD5H);
        } break;
        case __EXPR_MOD__: {
          __tmp__ND5H=my_copy__BNEO(__tmp__MD5H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ND5H=my_copy__M3DP(__tmp__MD5H);
        } break;
        case __EXPR_INF__: {
          __tmp__ND5H=my_copy__PBSN(__tmp__MD5H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ND5H=my_copy__0BSN(__tmp__MD5H);
        } break;
        case __EXPR_OR__: {
          __tmp__ND5H=my_copy__ZOPN(__tmp__MD5H);
        } break;
        case __EXPR_XOR__: {
          __tmp__ND5H=my_copy__CYSO(__tmp__MD5H);
        } break;
        };
        node__T14H=new_read__slot__receiver__with__YOWH(__tmp__LD5H,slot_msg__S14H,__tmp__ND5H,args__U14H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__T14H);
        result__N14H=result_expr__PVDI(node__T14H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__K14H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__J14H->parent_constant__M3JH.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__L14H);
        put_position__ECH(Self__J14H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__N14H);
}

static void* check_type__with__HE5H(__CHARACTER_CST *Self__IE5H,void *t__JE5H,__POSITION p__KE5H)
// ({CHARACTER_CST},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__ME5H,*rec__PE5H,*__tmp__LM5H,*__tmp__MM5H;
  void *local__NE5H;
  void *instr__OE5H;
  void *slot_name__QE5H;
  void *slot_msg__RE5H;
  void *node__SE5H;
  __TYPE_FULL *Self__C2IQ,*Self__M2IQ;
  void *__tmp__CH5H,*__tmp__OK5H;
  __POSITION __tmp__JH5H,__tmp__RI5H,__tmp__VK5H,__tmp__3L5H;
  __POSITION __tmp__KM5H;
  void *__tmp__PH5H,*__tmp__1K5H;
  __STRING_CST *Self__T2IQ;
  __PROTOTYPE_CST *Self__U2IQ;
  __INTEGER_CST *Self__V2IQ;
  __REAL_CST *Self__X2IQ;
  __CHARACTER_CST *Self__Z2IQ;
  __IS_EXPANDED *Self__02IQ;
  void *args__TE5H;
  __BOOLEAN __tmp__4I5H;
  result__ME5H=NULL;
  local__NE5H=NULL;
  instr__OE5H=NULL;
  rec__PE5H=NULL;
  slot_name__QE5H=NULL;
  slot_msg__RE5H=NULL;
  node__SE5H=NULL;
  args__TE5H=NULL;
  if (affect_with__ZCHI(t__JE5H,Self__IE5H->parent_constant__53JH.static_type__F4YD)) {
    result__ME5H=Self__IE5H;
  } else {
    Self__C2IQ=((__TYPE_FULL *)Self__IE5H->parent_constant__53JH.static_type__F4YD);
    if (is_cast__to__in__ZD0I(Self__C2IQ,(&__string_86),t__JE5H,((__PROTOTYPE *)prototype__NQRF(Self__C2IQ))->export_list__SFDC)) {
      local__NE5H=create__name__style__type__25JG(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__IE5H->parent_constant__53JH.static_type__F4YD));
      instr__OE5H=write__value__T5FH(local__NE5H,Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IE5H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__OE5H);
      slot_name__QE5H=get__QEC(last_cast_name__L42H);
      slot_msg__RE5H=get_slot__AP5G(Self__IE5H->parent_constant__53JH.static_type__F4YD,slot_name__QE5H);
      if (((void *)slot_msg__RE5H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__IE5H->parent_constant__53JH.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__JE5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__QE5H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__IE5H->parent_constant__53JH.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__KE5H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__IE5H->parent_constant__53JH.static_type__F4YD))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
        __tmp__CH5H=((__SLOT *)((__SLOT_DATA *)slot_msg__RE5H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__CH5H=((__SLOT *)((__SLOT_CODE *)slot_msg__RE5H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__CH5H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
          __tmp__JH5H=((__SLOT_DATA *)slot_msg__RE5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__JH5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__RE5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__JH5H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
        __tmp__PH5H=get_type_result__PG2G(slot_msg__RE5H);
      } else {
        __tmp__PH5H=get_type_result__ZH2G(slot_msg__RE5H);
      };
      if ((((void *)__tmp__PH5H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__PH5H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__JE5H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__PH5H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__PH5H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__JE5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
          __tmp__RI5H=((__SLOT_DATA *)slot_msg__RE5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__RI5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__RE5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__RI5H);
        put_position__ECH(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__PE5H=read__IC5G(local__NE5H);
      node__SE5H=new_read__slot__receiver__self__YLQC(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__RE5H,rec__PE5H,rec__PE5H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__SE5H);
      result__ME5H=result_expr__PVDI(node__SE5H);
      __tmp__4I5H=TRUE__;
    } else {
      __tmp__4I5H=FALSE__;
    };
    if ((! __tmp__4I5H)) {
      Self__M2IQ=((__TYPE_FULL *)t__JE5H);
      if (is_cast__to__in__ZD0I(Self__M2IQ,(&__string_87),Self__IE5H->parent_constant__53JH.static_type__F4YD,((__PROTOTYPE *)prototype__NQRF(Self__M2IQ))->import_list__0FDC)) {
        local__NE5H=create__name__style__type__25JG(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__IE5H->parent_constant__53JH.static_type__F4YD));
        instr__OE5H=write__value__T5FH(local__NE5H,Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IE5H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__OE5H);
        slot_name__QE5H=get__QEC(last_cast_name__L42H);
        slot_msg__RE5H=get_slot__AP5G(t__JE5H,slot_name__QE5H);
        if (((void *)slot_msg__RE5H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__JE5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__IE5H->parent_constant__53JH.static_type__F4YD,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__QE5H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__JE5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__KE5H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__JE5H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
          __tmp__OK5H=((__SLOT *)((__SLOT_DATA *)slot_msg__RE5H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__OK5H=((__SLOT *)((__SLOT_CODE *)slot_msg__RE5H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__OK5H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
            __tmp__VK5H=((__SLOT_DATA *)slot_msg__RE5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__VK5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__RE5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__VK5H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
          __tmp__1K5H=get_type_result__PG2G(slot_msg__RE5H);
        } else {
          __tmp__1K5H=get_type_result__ZH2G(slot_msg__RE5H);
        };
        if ((((void *)__tmp__1K5H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__1K5H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__JE5H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__1K5H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__1K5H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__JE5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__RE5H)->__id==__SLOT_DATA__) {
            __tmp__3L5H=((__SLOT_DATA *)slot_msg__RE5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__3L5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__RE5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__3L5H);
          put_position__ECH(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__TE5H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__TE5H,create__type__CLQC(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,t__JE5H));
        add_last__XSEI(args__TE5H,read__IC5G(local__NE5H));
        __tmp__KM5H=Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__LM5H=((void **)((__FAST_ARRAYoEXPRo *)args__TE5H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__LM5H)->__id) {
        case __LIST__: {
          __tmp__MM5H=my_copy__2HYM(__tmp__LM5H);
        } break;
        case __STRING_CST__: {
          Self__T2IQ=((__STRING_CST *)__tmp__LM5H);
          __tmp__MM5H=create__text__AUMH(Self__T2IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T2IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__MM5H=my_copy__2K2H(__tmp__LM5H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__U2IQ=((__PROTOTYPE_CST *)__tmp__LM5H);
          __tmp__MM5H=create__type__CLQC(Self__U2IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__U2IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__V2IQ=((__INTEGER_CST *)__tmp__LM5H);
          __tmp__MM5H=create__value__type__DNQC(Self__V2IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__V2IQ->value__PAZD,Self__V2IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__MM5H=my_copy__OAFJ(__tmp__LM5H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__MM5H=my_copy__KM2H(__tmp__LM5H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__MM5H=my_copy__DN2H(__tmp__LM5H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__MM5H=my_copy__QN2H(__tmp__LM5H);
        } break;
        case __REAL_CST__: {
          Self__X2IQ=((__REAL_CST *)__tmp__LM5H);
          __tmp__MM5H=create__value__type__1SMH(Self__X2IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X2IQ->value__5N2H,Self__X2IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__Z2IQ=((__CHARACTER_CST *)__tmp__LM5H);
          __tmp__MM5H=create__char__WTMH(Self__Z2IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z2IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__02IQ=((__IS_EXPANDED *)__tmp__LM5H);
          __tmp__MM5H=create__receiver__WRWH(Self__02IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__02IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__MM5H=my_copy__TO2H(__tmp__LM5H);
        } break;
        case __EXPR_SUP__: {
          __tmp__MM5H=my_copy__2O2H(__tmp__LM5H);
        } break;
        case __EXPR_SUB__: {
          __tmp__MM5H=my_copy__HP2H(__tmp__LM5H);
        } break;
        case __EXPR_MUL__: {
          __tmp__MM5H=my_copy__TP2H(__tmp__LM5H);
        } break;
        case __EXPR_DIV__: {
          __tmp__MM5H=my_copy__4P2H(__tmp__LM5H);
        } break;
        case __EXPR_AND__: {
          __tmp__MM5H=my_copy__JQ2H(__tmp__LM5H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__MM5H=my_copy__UQ2H(__tmp__LM5H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__MM5H=my_copy__5Q2H(__tmp__LM5H);
        } break;
        case __PUT_TO__: {
          __tmp__MM5H=my_copy__KR2H(__tmp__LM5H);
        } break;
        case __ITEM__: {
          __tmp__MM5H=my_copy__1R2H(__tmp__LM5H);
        } break;
        case __SIZE_OF__: {
          __tmp__MM5H=my_copy__HS2H(__tmp__LM5H);
        } break;
        case __CAST__: {
          __tmp__MM5H=my_copy__QS2H(__tmp__LM5H);
        } break;
        case __CALL_SLOT__: {
          __tmp__MM5H=my_copy__PIYM(__tmp__LM5H);
        } break;
        case __READ_SLOT__: {
          __tmp__MM5H=my_copy__AVGK(__tmp__LM5H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__MM5H=my_copy__NVGK(__tmp__LM5H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__MM5H=my_copy__RFCN(__tmp__LM5H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__MM5H=my_copy__JMEO(__tmp__LM5H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__MM5H=my_copy__RTJO(__tmp__LM5H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__MM5H=my_copy__WMEO(__tmp__LM5H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__MM5H=my_copy__3TJO(__tmp__LM5H);
        } break;
        case __EXPR_NEG__: {
          __tmp__MM5H=my_copy__YEJM(__tmp__LM5H);
        } break;
        case __EXPR_ADD__: {
          __tmp__MM5H=my_copy__YRLL(__tmp__LM5H);
        } break;
        case __EXPR_NOT__: {
          __tmp__MM5H=my_copy__GLYM(__tmp__LM5H);
        } break;
        case __EXPR_MOD__: {
          __tmp__MM5H=my_copy__BNEO(__tmp__LM5H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__MM5H=my_copy__M3DP(__tmp__LM5H);
        } break;
        case __EXPR_INF__: {
          __tmp__MM5H=my_copy__PBSN(__tmp__LM5H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__MM5H=my_copy__0BSN(__tmp__LM5H);
        } break;
        case __EXPR_OR__: {
          __tmp__MM5H=my_copy__ZOPN(__tmp__LM5H);
        } break;
        case __EXPR_XOR__: {
          __tmp__MM5H=my_copy__CYSO(__tmp__LM5H);
        } break;
        };
        node__SE5H=new_read__slot__receiver__with__YOWH(__tmp__KM5H,slot_msg__RE5H,__tmp__MM5H,args__TE5H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__SE5H);
        result__ME5H=result_expr__PVDI(node__SE5H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__JE5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__IE5H->parent_constant__53JH.static_type__F4YD,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__KE5H);
        put_position__ECH(Self__IE5H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__ME5H);
}

static void* check_type__with__FN5H(__IS_EXPANDED *Self__GN5H,void *t__HN5H,__POSITION p__IN5H)
// ({IS_EXPANDED},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__KN5H,*rec__NN5H,*__tmp__JV5H,*__tmp__KV5H;
  void *local__LN5H;
  void *instr__MN5H;
  void *slot_name__ON5H;
  void *slot_msg__PN5H;
  void *node__QN5H;
  __TYPE_FULL *Self__12IQ,*Self__F3IQ;
  void *__tmp__AQ5H,*__tmp__MT5H;
  __POSITION __tmp__HQ5H,__tmp__PR5H,__tmp__TT5H,__tmp__1U5H;
  __POSITION __tmp__IV5H;
  void *__tmp__NQ5H,*__tmp__ZT5H;
  __STRING_CST *Self__M3IQ;
  __PROTOTYPE_CST *Self__N3IQ;
  __INTEGER_CST *Self__O3IQ;
  __REAL_CST *Self__Q3IQ;
  __CHARACTER_CST *Self__S3IQ;
  __IS_EXPANDED *Self__T3IQ;
  void *args__RN5H;
  __BOOLEAN __tmp__2R5H;
  result__KN5H=NULL;
  local__LN5H=NULL;
  instr__MN5H=NULL;
  rec__NN5H=NULL;
  slot_name__ON5H=NULL;
  slot_msg__PN5H=NULL;
  node__QN5H=NULL;
  args__RN5H=NULL;
  if (affect_with__ZCHI(t__HN5H,static_type__3O1H())) {
    result__KN5H=Self__GN5H;
  } else {
    Self__12IQ=((__TYPE_FULL *)static_type__3O1H());
    if (is_cast__to__in__ZD0I(Self__12IQ,(&__string_86),t__HN5H,((__PROTOTYPE *)prototype__NQRF(Self__12IQ))->export_list__SFDC)) {
      local__LN5H=create__name__style__type__25JG(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__3O1H()));
      instr__MN5H=write__value__T5FH(local__LN5H,Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GN5H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__MN5H);
      slot_name__ON5H=get__QEC(last_cast_name__L42H);
      slot_msg__PN5H=get_slot__AP5G(static_type__3O1H(),slot_name__ON5H);
      if (((void *)slot_msg__PN5H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__3O1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__HN5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__ON5H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__3O1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__IN5H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__3O1H()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
        __tmp__AQ5H=((__SLOT *)((__SLOT_DATA *)slot_msg__PN5H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__AQ5H=((__SLOT *)((__SLOT_CODE *)slot_msg__PN5H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__AQ5H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
          __tmp__HQ5H=((__SLOT_DATA *)slot_msg__PN5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__HQ5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PN5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__HQ5H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
        __tmp__NQ5H=get_type_result__PG2G(slot_msg__PN5H);
      } else {
        __tmp__NQ5H=get_type_result__ZH2G(slot_msg__PN5H);
      };
      if ((((void *)__tmp__NQ5H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__NQ5H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__HN5H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__NQ5H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__NQ5H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__HN5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
          __tmp__PR5H=((__SLOT_DATA *)slot_msg__PN5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__PR5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PN5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__PR5H);
        put_position__ECH(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__NN5H=read__IC5G(local__LN5H);
      node__QN5H=new_read__slot__receiver__self__YLQC(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__PN5H,rec__NN5H,rec__NN5H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__QN5H);
      result__KN5H=result_expr__PVDI(node__QN5H);
      __tmp__2R5H=TRUE__;
    } else {
      __tmp__2R5H=FALSE__;
    };
    if ((! __tmp__2R5H)) {
      Self__F3IQ=((__TYPE_FULL *)t__HN5H);
      if (is_cast__to__in__ZD0I(Self__F3IQ,(&__string_87),static_type__3O1H(),((__PROTOTYPE *)prototype__NQRF(Self__F3IQ))->import_list__0FDC)) {
        local__LN5H=create__name__style__type__25JG(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__3O1H()));
        instr__MN5H=write__value__T5FH(local__LN5H,Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GN5H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__MN5H);
        slot_name__ON5H=get__QEC(last_cast_name__L42H);
        slot_msg__PN5H=get_slot__AP5G(t__HN5H,slot_name__ON5H);
        if (((void *)slot_msg__PN5H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__HN5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__3O1H(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__ON5H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__HN5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__IN5H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__HN5H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
          __tmp__MT5H=((__SLOT *)((__SLOT_DATA *)slot_msg__PN5H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__MT5H=((__SLOT *)((__SLOT_CODE *)slot_msg__PN5H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__MT5H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
            __tmp__TT5H=((__SLOT_DATA *)slot_msg__PN5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__TT5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PN5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__TT5H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
          __tmp__ZT5H=get_type_result__PG2G(slot_msg__PN5H);
        } else {
          __tmp__ZT5H=get_type_result__ZH2G(slot_msg__PN5H);
        };
        if ((((void *)__tmp__ZT5H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__ZT5H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__HN5H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__ZT5H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__ZT5H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__HN5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__PN5H)->__id==__SLOT_DATA__) {
            __tmp__1U5H=((__SLOT_DATA *)slot_msg__PN5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__1U5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PN5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__1U5H);
          put_position__ECH(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__RN5H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__RN5H,create__type__CLQC(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__HN5H));
        add_last__XSEI(args__RN5H,read__IC5G(local__LN5H));
        __tmp__IV5H=Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__JV5H=((void **)((__FAST_ARRAYoEXPRo *)args__RN5H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__JV5H)->__id) {
        case __LIST__: {
          __tmp__KV5H=my_copy__2HYM(__tmp__JV5H);
        } break;
        case __STRING_CST__: {
          Self__M3IQ=((__STRING_CST *)__tmp__JV5H);
          __tmp__KV5H=create__text__AUMH(Self__M3IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__M3IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__KV5H=my_copy__2K2H(__tmp__JV5H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__N3IQ=((__PROTOTYPE_CST *)__tmp__JV5H);
          __tmp__KV5H=create__type__CLQC(Self__N3IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N3IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__O3IQ=((__INTEGER_CST *)__tmp__JV5H);
          __tmp__KV5H=create__value__type__DNQC(Self__O3IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O3IQ->value__PAZD,Self__O3IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__KV5H=my_copy__OAFJ(__tmp__JV5H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__KV5H=my_copy__KM2H(__tmp__JV5H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__KV5H=my_copy__DN2H(__tmp__JV5H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__KV5H=my_copy__QN2H(__tmp__JV5H);
        } break;
        case __REAL_CST__: {
          Self__Q3IQ=((__REAL_CST *)__tmp__JV5H);
          __tmp__KV5H=create__value__type__1SMH(Self__Q3IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Q3IQ->value__5N2H,Self__Q3IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__S3IQ=((__CHARACTER_CST *)__tmp__JV5H);
          __tmp__KV5H=create__char__WTMH(Self__S3IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__S3IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__T3IQ=((__IS_EXPANDED *)__tmp__JV5H);
          __tmp__KV5H=create__receiver__WRWH(Self__T3IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__T3IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__KV5H=my_copy__TO2H(__tmp__JV5H);
        } break;
        case __EXPR_SUP__: {
          __tmp__KV5H=my_copy__2O2H(__tmp__JV5H);
        } break;
        case __EXPR_SUB__: {
          __tmp__KV5H=my_copy__HP2H(__tmp__JV5H);
        } break;
        case __EXPR_MUL__: {
          __tmp__KV5H=my_copy__TP2H(__tmp__JV5H);
        } break;
        case __EXPR_DIV__: {
          __tmp__KV5H=my_copy__4P2H(__tmp__JV5H);
        } break;
        case __EXPR_AND__: {
          __tmp__KV5H=my_copy__JQ2H(__tmp__JV5H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__KV5H=my_copy__UQ2H(__tmp__JV5H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__KV5H=my_copy__5Q2H(__tmp__JV5H);
        } break;
        case __PUT_TO__: {
          __tmp__KV5H=my_copy__KR2H(__tmp__JV5H);
        } break;
        case __ITEM__: {
          __tmp__KV5H=my_copy__1R2H(__tmp__JV5H);
        } break;
        case __SIZE_OF__: {
          __tmp__KV5H=my_copy__HS2H(__tmp__JV5H);
        } break;
        case __CAST__: {
          __tmp__KV5H=my_copy__QS2H(__tmp__JV5H);
        } break;
        case __CALL_SLOT__: {
          __tmp__KV5H=my_copy__PIYM(__tmp__JV5H);
        } break;
        case __READ_SLOT__: {
          __tmp__KV5H=my_copy__AVGK(__tmp__JV5H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__KV5H=my_copy__NVGK(__tmp__JV5H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__KV5H=my_copy__RFCN(__tmp__JV5H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__KV5H=my_copy__JMEO(__tmp__JV5H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__KV5H=my_copy__RTJO(__tmp__JV5H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__KV5H=my_copy__WMEO(__tmp__JV5H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__KV5H=my_copy__3TJO(__tmp__JV5H);
        } break;
        case __EXPR_NEG__: {
          __tmp__KV5H=my_copy__YEJM(__tmp__JV5H);
        } break;
        case __EXPR_ADD__: {
          __tmp__KV5H=my_copy__YRLL(__tmp__JV5H);
        } break;
        case __EXPR_NOT__: {
          __tmp__KV5H=my_copy__GLYM(__tmp__JV5H);
        } break;
        case __EXPR_MOD__: {
          __tmp__KV5H=my_copy__BNEO(__tmp__JV5H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__KV5H=my_copy__M3DP(__tmp__JV5H);
        } break;
        case __EXPR_INF__: {
          __tmp__KV5H=my_copy__PBSN(__tmp__JV5H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__KV5H=my_copy__0BSN(__tmp__JV5H);
        } break;
        case __EXPR_OR__: {
          __tmp__KV5H=my_copy__ZOPN(__tmp__JV5H);
        } break;
        case __EXPR_XOR__: {
          __tmp__KV5H=my_copy__CYSO(__tmp__JV5H);
        } break;
        };
        node__QN5H=new_read__slot__receiver__with__YOWH(__tmp__IV5H,slot_msg__PN5H,__tmp__KV5H,args__RN5H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__QN5H);
        result__KN5H=result_expr__PVDI(node__QN5H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__HN5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__3O1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__IN5H);
        put_position__ECH(Self__GN5H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__KN5H);
}

static void* check_type__with__DW5H(__GET_TYPE_ID *Self__EW5H,void *t__FW5H,__POSITION p__GW5H)
// ({GET_TYPE_ID},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__IW5H,*rec__LW5H,*__tmp__H45H,*__tmp__I45H;
  void *local__JW5H;
  void *instr__KW5H;
  void *slot_name__MW5H;
  void *slot_msg__NW5H;
  void *node__OW5H;
  __TYPE_FULL *Self__U3IQ,*Self__43IQ;
  void *__tmp__4Y5H,*__tmp__K25H;
  __POSITION __tmp__FZ5H,__tmp__N05H,__tmp__R25H,__tmp__Z35H;
  __POSITION __tmp__G45H;
  void *__tmp__LZ5H,*__tmp__X25H;
  __STRING_CST *Self__F4IQ;
  __PROTOTYPE_CST *Self__G4IQ;
  __INTEGER_CST *Self__H4IQ;
  __REAL_CST *Self__J4IQ;
  __CHARACTER_CST *Self__L4IQ;
  __IS_EXPANDED *Self__M4IQ;
  void *args__PW5H;
  __BOOLEAN __tmp__005H;
  result__IW5H=NULL;
  local__JW5H=NULL;
  instr__KW5H=NULL;
  rec__LW5H=NULL;
  slot_name__MW5H=NULL;
  slot_msg__NW5H=NULL;
  node__OW5H=NULL;
  args__PW5H=NULL;
  if (affect_with__ZCHI(t__FW5H,static_type__CP1H())) {
    result__IW5H=Self__EW5H;
  } else {
    Self__U3IQ=((__TYPE_FULL *)static_type__CP1H());
    if (is_cast__to__in__ZD0I(Self__U3IQ,(&__string_86),t__FW5H,((__PROTOTYPE *)prototype__NQRF(Self__U3IQ))->export_list__SFDC)) {
      local__JW5H=create__name__style__type__25JG(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__CP1H()));
      instr__KW5H=write__value__T5FH(local__JW5H,Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EW5H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__KW5H);
      slot_name__MW5H=get__QEC(last_cast_name__L42H);
      slot_msg__NW5H=get_slot__AP5G(static_type__CP1H(),slot_name__MW5H);
      if (((void *)slot_msg__NW5H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__CP1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__FW5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__MW5H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__CP1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__GW5H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__CP1H()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
        __tmp__4Y5H=((__SLOT *)((__SLOT_DATA *)slot_msg__NW5H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__4Y5H=((__SLOT *)((__SLOT_CODE *)slot_msg__NW5H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__4Y5H) !=  1)) {
        if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
          __tmp__FZ5H=((__SLOT_DATA *)slot_msg__NW5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__FZ5H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__NW5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__FZ5H);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
        __tmp__LZ5H=get_type_result__PG2G(slot_msg__NW5H);
      } else {
        __tmp__LZ5H=get_type_result__ZH2G(slot_msg__NW5H);
      };
      if ((((void *)__tmp__LZ5H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__LZ5H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__FW5H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__LZ5H != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__LZ5H,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__FW5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
          __tmp__N05H=((__SLOT_DATA *)slot_msg__NW5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__N05H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__NW5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__N05H);
        put_position__ECH(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__LW5H=read__IC5G(local__JW5H);
      node__OW5H=new_read__slot__receiver__self__YLQC(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__NW5H,rec__LW5H,rec__LW5H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__OW5H);
      result__IW5H=result_expr__PVDI(node__OW5H);
      __tmp__005H=TRUE__;
    } else {
      __tmp__005H=FALSE__;
    };
    if ((! __tmp__005H)) {
      Self__43IQ=((__TYPE_FULL *)t__FW5H);
      if (is_cast__to__in__ZD0I(Self__43IQ,(&__string_87),static_type__CP1H(),((__PROTOTYPE *)prototype__NQRF(Self__43IQ))->import_list__0FDC)) {
        local__JW5H=create__name__style__type__25JG(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__CP1H()));
        instr__KW5H=write__value__T5FH(local__JW5H,Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EW5H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__KW5H);
        slot_name__MW5H=get__QEC(last_cast_name__L42H);
        slot_msg__NW5H=get_slot__AP5G(t__FW5H,slot_name__MW5H);
        if (((void *)slot_msg__NW5H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__FW5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__CP1H(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__MW5H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__FW5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__GW5H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__FW5H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
          __tmp__K25H=((__SLOT *)((__SLOT_DATA *)slot_msg__NW5H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__K25H=((__SLOT *)((__SLOT_CODE *)slot_msg__NW5H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__K25H) !=  2)) {
          if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
            __tmp__R25H=((__SLOT_DATA *)slot_msg__NW5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__R25H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__NW5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__R25H);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
          __tmp__X25H=get_type_result__PG2G(slot_msg__NW5H);
        } else {
          __tmp__X25H=get_type_result__ZH2G(slot_msg__NW5H);
        };
        if ((((void *)__tmp__X25H == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__X25H)->parent_type__KTL != (void *)((__TYPE_FULL *)t__FW5H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__X25H != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__X25H,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__FW5H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__NW5H)->__id==__SLOT_DATA__) {
            __tmp__Z35H=((__SLOT_DATA *)slot_msg__NW5H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__Z35H=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__NW5H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__Z35H);
          put_position__ECH(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__PW5H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__PW5H,create__type__CLQC(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__FW5H));
        add_last__XSEI(args__PW5H,read__IC5G(local__JW5H));
        __tmp__G45H=Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__H45H=((void **)((__FAST_ARRAYoEXPRo *)args__PW5H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__H45H)->__id) {
        case __LIST__: {
          __tmp__I45H=my_copy__2HYM(__tmp__H45H);
        } break;
        case __STRING_CST__: {
          Self__F4IQ=((__STRING_CST *)__tmp__H45H);
          __tmp__I45H=create__text__AUMH(Self__F4IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F4IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__I45H=my_copy__2K2H(__tmp__H45H);
        } break;
        case __PROTOTYPE_CST__: {
          Self__G4IQ=((__PROTOTYPE_CST *)__tmp__H45H);
          __tmp__I45H=create__type__CLQC(Self__G4IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__G4IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__H4IQ=((__INTEGER_CST *)__tmp__H45H);
          __tmp__I45H=create__value__type__DNQC(Self__H4IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H4IQ->value__PAZD,Self__H4IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__I45H=my_copy__OAFJ(__tmp__H45H);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__I45H=my_copy__KM2H(__tmp__H45H);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__I45H=my_copy__DN2H(__tmp__H45H);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__I45H=my_copy__QN2H(__tmp__H45H);
        } break;
        case __REAL_CST__: {
          Self__J4IQ=((__REAL_CST *)__tmp__H45H);
          __tmp__I45H=create__value__type__1SMH(Self__J4IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J4IQ->value__5N2H,Self__J4IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__L4IQ=((__CHARACTER_CST *)__tmp__H45H);
          __tmp__I45H=create__char__WTMH(Self__L4IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L4IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__M4IQ=((__IS_EXPANDED *)__tmp__H45H);
          __tmp__I45H=create__receiver__WRWH(Self__M4IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__M4IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__I45H=my_copy__TO2H(__tmp__H45H);
        } break;
        case __EXPR_SUP__: {
          __tmp__I45H=my_copy__2O2H(__tmp__H45H);
        } break;
        case __EXPR_SUB__: {
          __tmp__I45H=my_copy__HP2H(__tmp__H45H);
        } break;
        case __EXPR_MUL__: {
          __tmp__I45H=my_copy__TP2H(__tmp__H45H);
        } break;
        case __EXPR_DIV__: {
          __tmp__I45H=my_copy__4P2H(__tmp__H45H);
        } break;
        case __EXPR_AND__: {
          __tmp__I45H=my_copy__JQ2H(__tmp__H45H);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__I45H=my_copy__UQ2H(__tmp__H45H);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__I45H=my_copy__5Q2H(__tmp__H45H);
        } break;
        case __PUT_TO__: {
          __tmp__I45H=my_copy__KR2H(__tmp__H45H);
        } break;
        case __ITEM__: {
          __tmp__I45H=my_copy__1R2H(__tmp__H45H);
        } break;
        case __SIZE_OF__: {
          __tmp__I45H=my_copy__HS2H(__tmp__H45H);
        } break;
        case __CAST__: {
          __tmp__I45H=my_copy__QS2H(__tmp__H45H);
        } break;
        case __CALL_SLOT__: {
          __tmp__I45H=my_copy__PIYM(__tmp__H45H);
        } break;
        case __READ_SLOT__: {
          __tmp__I45H=my_copy__AVGK(__tmp__H45H);
        } break;
        case __READ_GLOBAL__: {
          __tmp__I45H=my_copy__NVGK(__tmp__H45H);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__I45H=my_copy__RFCN(__tmp__H45H);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__I45H=my_copy__JMEO(__tmp__H45H);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__I45H=my_copy__RTJO(__tmp__H45H);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__I45H=my_copy__WMEO(__tmp__H45H);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__I45H=my_copy__3TJO(__tmp__H45H);
        } break;
        case __EXPR_NEG__: {
          __tmp__I45H=my_copy__YEJM(__tmp__H45H);
        } break;
        case __EXPR_ADD__: {
          __tmp__I45H=my_copy__YRLL(__tmp__H45H);
        } break;
        case __EXPR_NOT__: {
          __tmp__I45H=my_copy__GLYM(__tmp__H45H);
        } break;
        case __EXPR_MOD__: {
          __tmp__I45H=my_copy__BNEO(__tmp__H45H);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__I45H=my_copy__M3DP(__tmp__H45H);
        } break;
        case __EXPR_INF__: {
          __tmp__I45H=my_copy__PBSN(__tmp__H45H);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__I45H=my_copy__0BSN(__tmp__H45H);
        } break;
        case __EXPR_OR__: {
          __tmp__I45H=my_copy__ZOPN(__tmp__H45H);
        } break;
        case __EXPR_XOR__: {
          __tmp__I45H=my_copy__CYSO(__tmp__H45H);
        } break;
        };
        node__OW5H=new_read__slot__receiver__with__YOWH(__tmp__G45H,slot_msg__NW5H,__tmp__I45H,args__PW5H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__OW5H);
        result__IW5H=result_expr__PVDI(node__OW5H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__FW5H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__CP1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__GW5H);
        put_position__ECH(Self__EW5H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__IW5H);
}

static void* check_type__with__C55H(__EXPR_SUP *Self__D55H,void *t__E55H,__POSITION p__F55H)
// ({EXPR_SUP},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__H55H,*rec__K55H,*__tmp__GHAI,*__tmp__HHAI;
  void *local__I55H;
  void *instr__J55H;
  void *slot_name__L55H;
  void *slot_msg__M55H;
  void *node__N55H;
  __TYPE_FULL *Self__N4IQ,*Self__X4IQ;
  void *__tmp__3BAI,*__tmp__JFAI;
  __POSITION __tmp__ECAI,__tmp__MDAI,__tmp__QFAI,__tmp__YGAI;
  __POSITION __tmp__FHAI;
  void *__tmp__KCAI,*__tmp__WFAI;
  __STRING_CST *Self__44IQ;
  __PROTOTYPE_CST *Self__54IQ;
  __INTEGER_CST *Self__A5IQ;
  __REAL_CST *Self__C5IQ;
  __CHARACTER_CST *Self__E5IQ;
  __IS_EXPANDED *Self__F5IQ;
  void *args__O55H;
  __BOOLEAN __tmp__ZDAI;
  result__H55H=NULL;
  local__I55H=NULL;
  instr__J55H=NULL;
  rec__K55H=NULL;
  slot_name__L55H=NULL;
  slot_msg__M55H=NULL;
  node__N55H=NULL;
  args__O55H=NULL;
  if (affect_with__ZCHI(t__E55H,static_type__HP1H())) {
    result__H55H=Self__D55H;
  } else {
    Self__N4IQ=((__TYPE_FULL *)static_type__HP1H());
    if (is_cast__to__in__ZD0I(Self__N4IQ,(&__string_86),t__E55H,((__PROTOTYPE *)prototype__NQRF(Self__N4IQ))->export_list__SFDC)) {
      local__I55H=create__name__style__type__25JG(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__HP1H()));
      instr__J55H=write__value__T5FH(local__I55H,Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D55H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__J55H);
      slot_name__L55H=get__QEC(last_cast_name__L42H);
      slot_msg__M55H=get_slot__AP5G(static_type__HP1H(),slot_name__L55H);
      if (((void *)slot_msg__M55H == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__HP1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__E55H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__L55H);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__HP1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__F55H);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__HP1H()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
        __tmp__3BAI=((__SLOT *)((__SLOT_DATA *)slot_msg__M55H)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__3BAI=((__SLOT *)((__SLOT_CODE *)slot_msg__M55H)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__3BAI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
          __tmp__ECAI=((__SLOT_DATA *)slot_msg__M55H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__ECAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__M55H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__ECAI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
        __tmp__KCAI=get_type_result__PG2G(slot_msg__M55H);
      } else {
        __tmp__KCAI=get_type_result__ZH2G(slot_msg__M55H);
      };
      if ((((void *)__tmp__KCAI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__KCAI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__E55H)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__KCAI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__KCAI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__E55H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
          __tmp__MDAI=((__SLOT_DATA *)slot_msg__M55H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__MDAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__M55H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__MDAI);
        put_position__ECH(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__K55H=read__IC5G(local__I55H);
      node__N55H=new_read__slot__receiver__self__YLQC(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__M55H,rec__K55H,rec__K55H);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__N55H);
      result__H55H=result_expr__PVDI(node__N55H);
      __tmp__ZDAI=TRUE__;
    } else {
      __tmp__ZDAI=FALSE__;
    };
    if ((! __tmp__ZDAI)) {
      Self__X4IQ=((__TYPE_FULL *)t__E55H);
      if (is_cast__to__in__ZD0I(Self__X4IQ,(&__string_87),static_type__HP1H(),((__PROTOTYPE *)prototype__NQRF(Self__X4IQ))->import_list__0FDC)) {
        local__I55H=create__name__style__type__25JG(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__HP1H()));
        instr__J55H=write__value__T5FH(local__I55H,Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D55H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__J55H);
        slot_name__L55H=get__QEC(last_cast_name__L42H);
        slot_msg__M55H=get_slot__AP5G(t__E55H,slot_name__L55H);
        if (((void *)slot_msg__M55H == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__E55H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__HP1H(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__L55H);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__E55H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__F55H);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__E55H))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
          __tmp__JFAI=((__SLOT *)((__SLOT_DATA *)slot_msg__M55H)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__JFAI=((__SLOT *)((__SLOT_CODE *)slot_msg__M55H)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__JFAI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
            __tmp__QFAI=((__SLOT_DATA *)slot_msg__M55H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__QFAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__M55H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__QFAI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
          __tmp__WFAI=get_type_result__PG2G(slot_msg__M55H);
        } else {
          __tmp__WFAI=get_type_result__ZH2G(slot_msg__M55H);
        };
        if ((((void *)__tmp__WFAI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__WFAI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__E55H)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__WFAI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__WFAI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__E55H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__M55H)->__id==__SLOT_DATA__) {
            __tmp__YGAI=((__SLOT_DATA *)slot_msg__M55H)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__YGAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__M55H)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__YGAI);
          put_position__ECH(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__O55H=create_with_capacity__3THH( 2);
        add_last__XSEI(args__O55H,create__type__CLQC(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__E55H));
        add_last__XSEI(args__O55H,read__IC5G(local__I55H));
        __tmp__FHAI=Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__GHAI=((void **)((__FAST_ARRAYoEXPRo *)args__O55H)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__GHAI)->__id) {
        case __LIST__: {
          __tmp__HHAI=my_copy__2HYM(__tmp__GHAI);
        } break;
        case __STRING_CST__: {
          Self__44IQ=((__STRING_CST *)__tmp__GHAI);
          __tmp__HHAI=create__text__AUMH(Self__44IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__44IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__HHAI=my_copy__2K2H(__tmp__GHAI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__54IQ=((__PROTOTYPE_CST *)__tmp__GHAI);
          __tmp__HHAI=create__type__CLQC(Self__54IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__54IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__A5IQ=((__INTEGER_CST *)__tmp__GHAI);
          __tmp__HHAI=create__value__type__DNQC(Self__A5IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__A5IQ->value__PAZD,Self__A5IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__HHAI=my_copy__OAFJ(__tmp__GHAI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__HHAI=my_copy__KM2H(__tmp__GHAI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__HHAI=my_copy__DN2H(__tmp__GHAI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__HHAI=my_copy__QN2H(__tmp__GHAI);
        } break;
        case __REAL_CST__: {
          Self__C5IQ=((__REAL_CST *)__tmp__GHAI);
          __tmp__HHAI=create__value__type__1SMH(Self__C5IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__C5IQ->value__5N2H,Self__C5IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__E5IQ=((__CHARACTER_CST *)__tmp__GHAI);
          __tmp__HHAI=create__char__WTMH(Self__E5IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__E5IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__F5IQ=((__IS_EXPANDED *)__tmp__GHAI);
          __tmp__HHAI=create__receiver__WRWH(Self__F5IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__F5IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__HHAI=my_copy__TO2H(__tmp__GHAI);
        } break;
        case __EXPR_SUP__: {
          __tmp__HHAI=my_copy__2O2H(__tmp__GHAI);
        } break;
        case __EXPR_SUB__: {
          __tmp__HHAI=my_copy__HP2H(__tmp__GHAI);
        } break;
        case __EXPR_MUL__: {
          __tmp__HHAI=my_copy__TP2H(__tmp__GHAI);
        } break;
        case __EXPR_DIV__: {
          __tmp__HHAI=my_copy__4P2H(__tmp__GHAI);
        } break;
        case __EXPR_AND__: {
          __tmp__HHAI=my_copy__JQ2H(__tmp__GHAI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__HHAI=my_copy__UQ2H(__tmp__GHAI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__HHAI=my_copy__5Q2H(__tmp__GHAI);
        } break;
        case __PUT_TO__: {
          __tmp__HHAI=my_copy__KR2H(__tmp__GHAI);
        } break;
        case __ITEM__: {
          __tmp__HHAI=my_copy__1R2H(__tmp__GHAI);
        } break;
        case __SIZE_OF__: {
          __tmp__HHAI=my_copy__HS2H(__tmp__GHAI);
        } break;
        case __CAST__: {
          __tmp__HHAI=my_copy__QS2H(__tmp__GHAI);
        } break;
        case __CALL_SLOT__: {
          __tmp__HHAI=my_copy__PIYM(__tmp__GHAI);
        } break;
        case __READ_SLOT__: {
          __tmp__HHAI=my_copy__AVGK(__tmp__GHAI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__HHAI=my_copy__NVGK(__tmp__GHAI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__HHAI=my_copy__RFCN(__tmp__GHAI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__HHAI=my_copy__JMEO(__tmp__GHAI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__HHAI=my_copy__RTJO(__tmp__GHAI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__HHAI=my_copy__WMEO(__tmp__GHAI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__HHAI=my_copy__3TJO(__tmp__GHAI);
        } break;
        case __EXPR_NEG__: {
          __tmp__HHAI=my_copy__YEJM(__tmp__GHAI);
        } break;
        case __EXPR_ADD__: {
          __tmp__HHAI=my_copy__YRLL(__tmp__GHAI);
        } break;
        case __EXPR_NOT__: {
          __tmp__HHAI=my_copy__GLYM(__tmp__GHAI);
        } break;
        case __EXPR_MOD__: {
          __tmp__HHAI=my_copy__BNEO(__tmp__GHAI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__HHAI=my_copy__M3DP(__tmp__GHAI);
        } break;
        case __EXPR_INF__: {
          __tmp__HHAI=my_copy__PBSN(__tmp__GHAI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__HHAI=my_copy__0BSN(__tmp__GHAI);
        } break;
        case __EXPR_OR__: {
          __tmp__HHAI=my_copy__ZOPN(__tmp__GHAI);
        } break;
        case __EXPR_XOR__: {
          __tmp__HHAI=my_copy__CYSO(__tmp__GHAI);
        } break;
        };
        node__N55H=new_read__slot__receiver__with__YOWH(__tmp__FHAI,slot_msg__M55H,__tmp__HHAI,args__O55H);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__N55H);
        result__H55H=result_expr__PVDI(node__N55H);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__E55H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__HP1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__F55H);
        put_position__ECH(Self__D55H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__H55H);
}

static void* check_type__with__BIAI(__EXPR_SUB *Self__CIAI,void *t__DIAI,__POSITION p__EIAI)
// ({EXPR_SUB},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__GIAI,*rec__JIAI,*__tmp__FQAI,*__tmp__GQAI;
  void *local__HIAI;
  void *instr__IIAI;
  void *slot_name__KIAI;
  void *slot_msg__LIAI;
  void *node__MIAI;
  __TYPE_FULL *Self__G5IQ,*Self__Q5IQ;
  void *__tmp__2KAI,*__tmp__IOAI;
  __POSITION __tmp__DLAI,__tmp__LMAI,__tmp__POAI,__tmp__XPAI;
  __POSITION __tmp__EQAI;
  void *__tmp__JLAI,*__tmp__VOAI;
  __STRING_CST *Self__X5IQ;
  __PROTOTYPE_CST *Self__Y5IQ;
  __INTEGER_CST *Self__Z5IQ;
  __REAL_CST *Self__15IQ;
  __CHARACTER_CST *Self__35IQ;
  __IS_EXPANDED *Self__45IQ;
  void *args__NIAI;
  __BOOLEAN __tmp__YMAI;
  result__GIAI=NULL;
  local__HIAI=NULL;
  instr__IIAI=NULL;
  rec__JIAI=NULL;
  slot_name__KIAI=NULL;
  slot_msg__LIAI=NULL;
  node__MIAI=NULL;
  args__NIAI=NULL;
  if (affect_with__ZCHI(t__DIAI,static_type__MP1H(Self__CIAI))) {
    result__GIAI=Self__CIAI;
  } else {
    Self__G5IQ=((__TYPE_FULL *)static_type__MP1H(Self__CIAI));
    if (is_cast__to__in__ZD0I(Self__G5IQ,(&__string_86),t__DIAI,((__PROTOTYPE *)prototype__NQRF(Self__G5IQ))->export_list__SFDC)) {
      local__HIAI=create__name__style__type__25JG(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__MP1H(Self__CIAI)));
      instr__IIAI=write__value__T5FH(local__HIAI,Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CIAI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__IIAI);
      slot_name__KIAI=get__QEC(last_cast_name__L42H);
      slot_msg__LIAI=get_slot__AP5G(static_type__MP1H(Self__CIAI),slot_name__KIAI);
      if (((void *)slot_msg__LIAI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__MP1H(Self__CIAI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__DIAI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__KIAI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__MP1H(Self__CIAI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__EIAI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__MP1H(Self__CIAI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
        __tmp__2KAI=((__SLOT *)((__SLOT_DATA *)slot_msg__LIAI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__2KAI=((__SLOT *)((__SLOT_CODE *)slot_msg__LIAI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__2KAI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
          __tmp__DLAI=((__SLOT_DATA *)slot_msg__LIAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__DLAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__LIAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__DLAI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
        __tmp__JLAI=get_type_result__PG2G(slot_msg__LIAI);
      } else {
        __tmp__JLAI=get_type_result__ZH2G(slot_msg__LIAI);
      };
      if ((((void *)__tmp__JLAI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__JLAI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__DIAI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__JLAI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__JLAI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__DIAI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
          __tmp__LMAI=((__SLOT_DATA *)slot_msg__LIAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__LMAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__LIAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__LMAI);
        put_position__ECH(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__JIAI=read__IC5G(local__HIAI);
      node__MIAI=new_read__slot__receiver__self__YLQC(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__LIAI,rec__JIAI,rec__JIAI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__MIAI);
      result__GIAI=result_expr__PVDI(node__MIAI);
      __tmp__YMAI=TRUE__;
    } else {
      __tmp__YMAI=FALSE__;
    };
    if ((! __tmp__YMAI)) {
      Self__Q5IQ=((__TYPE_FULL *)t__DIAI);
      if (is_cast__to__in__ZD0I(Self__Q5IQ,(&__string_87),static_type__MP1H(Self__CIAI),((__PROTOTYPE *)prototype__NQRF(Self__Q5IQ))->import_list__0FDC)) {
        local__HIAI=create__name__style__type__25JG(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__MP1H(Self__CIAI)));
        instr__IIAI=write__value__T5FH(local__HIAI,Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CIAI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__IIAI);
        slot_name__KIAI=get__QEC(last_cast_name__L42H);
        slot_msg__LIAI=get_slot__AP5G(t__DIAI,slot_name__KIAI);
        if (((void *)slot_msg__LIAI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__DIAI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__MP1H(Self__CIAI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__KIAI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__DIAI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__EIAI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__DIAI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
          __tmp__IOAI=((__SLOT *)((__SLOT_DATA *)slot_msg__LIAI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__IOAI=((__SLOT *)((__SLOT_CODE *)slot_msg__LIAI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__IOAI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
            __tmp__POAI=((__SLOT_DATA *)slot_msg__LIAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__POAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__LIAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__POAI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
          __tmp__VOAI=get_type_result__PG2G(slot_msg__LIAI);
        } else {
          __tmp__VOAI=get_type_result__ZH2G(slot_msg__LIAI);
        };
        if ((((void *)__tmp__VOAI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__VOAI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__DIAI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__VOAI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__VOAI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__DIAI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__LIAI)->__id==__SLOT_DATA__) {
            __tmp__XPAI=((__SLOT_DATA *)slot_msg__LIAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__XPAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__LIAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__XPAI);
          put_position__ECH(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__NIAI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__NIAI,create__type__CLQC(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__DIAI));
        add_last__XSEI(args__NIAI,read__IC5G(local__HIAI));
        __tmp__EQAI=Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__FQAI=((void **)((__FAST_ARRAYoEXPRo *)args__NIAI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__FQAI)->__id) {
        case __LIST__: {
          __tmp__GQAI=my_copy__2HYM(__tmp__FQAI);
        } break;
        case __STRING_CST__: {
          Self__X5IQ=((__STRING_CST *)__tmp__FQAI);
          __tmp__GQAI=create__text__AUMH(Self__X5IQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X5IQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__GQAI=my_copy__2K2H(__tmp__FQAI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__Y5IQ=((__PROTOTYPE_CST *)__tmp__FQAI);
          __tmp__GQAI=create__type__CLQC(Self__Y5IQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Y5IQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__Z5IQ=((__INTEGER_CST *)__tmp__FQAI);
          __tmp__GQAI=create__value__type__DNQC(Self__Z5IQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z5IQ->value__PAZD,Self__Z5IQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__GQAI=my_copy__OAFJ(__tmp__FQAI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__GQAI=my_copy__KM2H(__tmp__FQAI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__GQAI=my_copy__DN2H(__tmp__FQAI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__GQAI=my_copy__QN2H(__tmp__FQAI);
        } break;
        case __REAL_CST__: {
          Self__15IQ=((__REAL_CST *)__tmp__FQAI);
          __tmp__GQAI=create__value__type__1SMH(Self__15IQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__15IQ->value__5N2H,Self__15IQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__35IQ=((__CHARACTER_CST *)__tmp__FQAI);
          __tmp__GQAI=create__char__WTMH(Self__35IQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__35IQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__45IQ=((__IS_EXPANDED *)__tmp__FQAI);
          __tmp__GQAI=create__receiver__WRWH(Self__45IQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__45IQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__GQAI=my_copy__TO2H(__tmp__FQAI);
        } break;
        case __EXPR_SUP__: {
          __tmp__GQAI=my_copy__2O2H(__tmp__FQAI);
        } break;
        case __EXPR_SUB__: {
          __tmp__GQAI=my_copy__HP2H(__tmp__FQAI);
        } break;
        case __EXPR_MUL__: {
          __tmp__GQAI=my_copy__TP2H(__tmp__FQAI);
        } break;
        case __EXPR_DIV__: {
          __tmp__GQAI=my_copy__4P2H(__tmp__FQAI);
        } break;
        case __EXPR_AND__: {
          __tmp__GQAI=my_copy__JQ2H(__tmp__FQAI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__GQAI=my_copy__UQ2H(__tmp__FQAI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__GQAI=my_copy__5Q2H(__tmp__FQAI);
        } break;
        case __PUT_TO__: {
          __tmp__GQAI=my_copy__KR2H(__tmp__FQAI);
        } break;
        case __ITEM__: {
          __tmp__GQAI=my_copy__1R2H(__tmp__FQAI);
        } break;
        case __SIZE_OF__: {
          __tmp__GQAI=my_copy__HS2H(__tmp__FQAI);
        } break;
        case __CAST__: {
          __tmp__GQAI=my_copy__QS2H(__tmp__FQAI);
        } break;
        case __CALL_SLOT__: {
          __tmp__GQAI=my_copy__PIYM(__tmp__FQAI);
        } break;
        case __READ_SLOT__: {
          __tmp__GQAI=my_copy__AVGK(__tmp__FQAI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__GQAI=my_copy__NVGK(__tmp__FQAI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__GQAI=my_copy__RFCN(__tmp__FQAI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__GQAI=my_copy__JMEO(__tmp__FQAI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__GQAI=my_copy__RTJO(__tmp__FQAI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__GQAI=my_copy__WMEO(__tmp__FQAI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__GQAI=my_copy__3TJO(__tmp__FQAI);
        } break;
        case __EXPR_NEG__: {
          __tmp__GQAI=my_copy__YEJM(__tmp__FQAI);
        } break;
        case __EXPR_ADD__: {
          __tmp__GQAI=my_copy__YRLL(__tmp__FQAI);
        } break;
        case __EXPR_NOT__: {
          __tmp__GQAI=my_copy__GLYM(__tmp__FQAI);
        } break;
        case __EXPR_MOD__: {
          __tmp__GQAI=my_copy__BNEO(__tmp__FQAI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__GQAI=my_copy__M3DP(__tmp__FQAI);
        } break;
        case __EXPR_INF__: {
          __tmp__GQAI=my_copy__PBSN(__tmp__FQAI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__GQAI=my_copy__0BSN(__tmp__FQAI);
        } break;
        case __EXPR_OR__: {
          __tmp__GQAI=my_copy__ZOPN(__tmp__FQAI);
        } break;
        case __EXPR_XOR__: {
          __tmp__GQAI=my_copy__CYSO(__tmp__FQAI);
        } break;
        };
        node__MIAI=new_read__slot__receiver__with__YOWH(__tmp__EQAI,slot_msg__LIAI,__tmp__GQAI,args__NIAI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__MIAI);
        result__GIAI=result_expr__PVDI(node__MIAI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__DIAI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__MP1H(Self__CIAI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__EIAI);
        put_position__ECH(Self__CIAI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__GIAI);
}

static void* check_type__with__ARAI(__EXPR_MUL *Self__BRAI,void *t__CRAI,__POSITION p__DRAI)
// ({EXPR_MUL},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__FRAI,*rec__IRAI,*__tmp__EZAI,*__tmp__FZAI;
  void *local__GRAI;
  void *instr__HRAI;
  void *slot_name__JRAI;
  void *slot_msg__KRAI;
  void *node__LRAI;
  __TYPE_FULL *Self__55IQ,*Self__JAJQ;
  void *__tmp__1TAI,*__tmp__HXAI;
  __POSITION __tmp__CUAI,__tmp__KVAI,__tmp__OXAI,__tmp__WYAI;
  __POSITION __tmp__DZAI;
  void *__tmp__IUAI,*__tmp__UXAI;
  __STRING_CST *Self__QAJQ;
  __PROTOTYPE_CST *Self__RAJQ;
  __INTEGER_CST *Self__SAJQ;
  __REAL_CST *Self__UAJQ;
  __CHARACTER_CST *Self__WAJQ;
  __IS_EXPANDED *Self__XAJQ;
  void *args__MRAI;
  __BOOLEAN __tmp__XVAI;
  result__FRAI=NULL;
  local__GRAI=NULL;
  instr__HRAI=NULL;
  rec__IRAI=NULL;
  slot_name__JRAI=NULL;
  slot_msg__KRAI=NULL;
  node__LRAI=NULL;
  args__MRAI=NULL;
  if (affect_with__ZCHI(t__CRAI,static_type__SP1H(Self__BRAI))) {
    result__FRAI=Self__BRAI;
  } else {
    Self__55IQ=((__TYPE_FULL *)static_type__SP1H(Self__BRAI));
    if (is_cast__to__in__ZD0I(Self__55IQ,(&__string_86),t__CRAI,((__PROTOTYPE *)prototype__NQRF(Self__55IQ))->export_list__SFDC)) {
      local__GRAI=create__name__style__type__25JG(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__SP1H(Self__BRAI)));
      instr__HRAI=write__value__T5FH(local__GRAI,Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BRAI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__HRAI);
      slot_name__JRAI=get__QEC(last_cast_name__L42H);
      slot_msg__KRAI=get_slot__AP5G(static_type__SP1H(Self__BRAI),slot_name__JRAI);
      if (((void *)slot_msg__KRAI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__SP1H(Self__BRAI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__CRAI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__JRAI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__SP1H(Self__BRAI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__DRAI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__SP1H(Self__BRAI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
        __tmp__1TAI=((__SLOT *)((__SLOT_DATA *)slot_msg__KRAI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__1TAI=((__SLOT *)((__SLOT_CODE *)slot_msg__KRAI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__1TAI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
          __tmp__CUAI=((__SLOT_DATA *)slot_msg__KRAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__CUAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KRAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__CUAI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
        __tmp__IUAI=get_type_result__PG2G(slot_msg__KRAI);
      } else {
        __tmp__IUAI=get_type_result__ZH2G(slot_msg__KRAI);
      };
      if ((((void *)__tmp__IUAI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__IUAI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__CRAI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__IUAI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__IUAI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__CRAI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
          __tmp__KVAI=((__SLOT_DATA *)slot_msg__KRAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__KVAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KRAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__KVAI);
        put_position__ECH(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__IRAI=read__IC5G(local__GRAI);
      node__LRAI=new_read__slot__receiver__self__YLQC(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__KRAI,rec__IRAI,rec__IRAI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__LRAI);
      result__FRAI=result_expr__PVDI(node__LRAI);
      __tmp__XVAI=TRUE__;
    } else {
      __tmp__XVAI=FALSE__;
    };
    if ((! __tmp__XVAI)) {
      Self__JAJQ=((__TYPE_FULL *)t__CRAI);
      if (is_cast__to__in__ZD0I(Self__JAJQ,(&__string_87),static_type__SP1H(Self__BRAI),((__PROTOTYPE *)prototype__NQRF(Self__JAJQ))->import_list__0FDC)) {
        local__GRAI=create__name__style__type__25JG(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__SP1H(Self__BRAI)));
        instr__HRAI=write__value__T5FH(local__GRAI,Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BRAI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__HRAI);
        slot_name__JRAI=get__QEC(last_cast_name__L42H);
        slot_msg__KRAI=get_slot__AP5G(t__CRAI,slot_name__JRAI);
        if (((void *)slot_msg__KRAI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__CRAI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__SP1H(Self__BRAI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__JRAI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__CRAI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__DRAI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__CRAI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
          __tmp__HXAI=((__SLOT *)((__SLOT_DATA *)slot_msg__KRAI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__HXAI=((__SLOT *)((__SLOT_CODE *)slot_msg__KRAI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__HXAI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
            __tmp__OXAI=((__SLOT_DATA *)slot_msg__KRAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__OXAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KRAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__OXAI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
          __tmp__UXAI=get_type_result__PG2G(slot_msg__KRAI);
        } else {
          __tmp__UXAI=get_type_result__ZH2G(slot_msg__KRAI);
        };
        if ((((void *)__tmp__UXAI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__UXAI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__CRAI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__UXAI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__UXAI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__CRAI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__KRAI)->__id==__SLOT_DATA__) {
            __tmp__WYAI=((__SLOT_DATA *)slot_msg__KRAI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__WYAI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KRAI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__WYAI);
          put_position__ECH(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__MRAI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__MRAI,create__type__CLQC(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__CRAI));
        add_last__XSEI(args__MRAI,read__IC5G(local__GRAI));
        __tmp__DZAI=Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__EZAI=((void **)((__FAST_ARRAYoEXPRo *)args__MRAI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__EZAI)->__id) {
        case __LIST__: {
          __tmp__FZAI=my_copy__2HYM(__tmp__EZAI);
        } break;
        case __STRING_CST__: {
          Self__QAJQ=((__STRING_CST *)__tmp__EZAI);
          __tmp__FZAI=create__text__AUMH(Self__QAJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QAJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__FZAI=my_copy__2K2H(__tmp__EZAI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__RAJQ=((__PROTOTYPE_CST *)__tmp__EZAI);
          __tmp__FZAI=create__type__CLQC(Self__RAJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RAJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__SAJQ=((__INTEGER_CST *)__tmp__EZAI);
          __tmp__FZAI=create__value__type__DNQC(Self__SAJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SAJQ->value__PAZD,Self__SAJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__FZAI=my_copy__OAFJ(__tmp__EZAI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__FZAI=my_copy__KM2H(__tmp__EZAI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__FZAI=my_copy__DN2H(__tmp__EZAI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__FZAI=my_copy__QN2H(__tmp__EZAI);
        } break;
        case __REAL_CST__: {
          Self__UAJQ=((__REAL_CST *)__tmp__EZAI);
          __tmp__FZAI=create__value__type__1SMH(Self__UAJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UAJQ->value__5N2H,Self__UAJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__WAJQ=((__CHARACTER_CST *)__tmp__EZAI);
          __tmp__FZAI=create__char__WTMH(Self__WAJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WAJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__XAJQ=((__IS_EXPANDED *)__tmp__EZAI);
          __tmp__FZAI=create__receiver__WRWH(Self__XAJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__XAJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__FZAI=my_copy__TO2H(__tmp__EZAI);
        } break;
        case __EXPR_SUP__: {
          __tmp__FZAI=my_copy__2O2H(__tmp__EZAI);
        } break;
        case __EXPR_SUB__: {
          __tmp__FZAI=my_copy__HP2H(__tmp__EZAI);
        } break;
        case __EXPR_MUL__: {
          __tmp__FZAI=my_copy__TP2H(__tmp__EZAI);
        } break;
        case __EXPR_DIV__: {
          __tmp__FZAI=my_copy__4P2H(__tmp__EZAI);
        } break;
        case __EXPR_AND__: {
          __tmp__FZAI=my_copy__JQ2H(__tmp__EZAI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__FZAI=my_copy__UQ2H(__tmp__EZAI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__FZAI=my_copy__5Q2H(__tmp__EZAI);
        } break;
        case __PUT_TO__: {
          __tmp__FZAI=my_copy__KR2H(__tmp__EZAI);
        } break;
        case __ITEM__: {
          __tmp__FZAI=my_copy__1R2H(__tmp__EZAI);
        } break;
        case __SIZE_OF__: {
          __tmp__FZAI=my_copy__HS2H(__tmp__EZAI);
        } break;
        case __CAST__: {
          __tmp__FZAI=my_copy__QS2H(__tmp__EZAI);
        } break;
        case __CALL_SLOT__: {
          __tmp__FZAI=my_copy__PIYM(__tmp__EZAI);
        } break;
        case __READ_SLOT__: {
          __tmp__FZAI=my_copy__AVGK(__tmp__EZAI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__FZAI=my_copy__NVGK(__tmp__EZAI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__FZAI=my_copy__RFCN(__tmp__EZAI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__FZAI=my_copy__JMEO(__tmp__EZAI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__FZAI=my_copy__RTJO(__tmp__EZAI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__FZAI=my_copy__WMEO(__tmp__EZAI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__FZAI=my_copy__3TJO(__tmp__EZAI);
        } break;
        case __EXPR_NEG__: {
          __tmp__FZAI=my_copy__YEJM(__tmp__EZAI);
        } break;
        case __EXPR_ADD__: {
          __tmp__FZAI=my_copy__YRLL(__tmp__EZAI);
        } break;
        case __EXPR_NOT__: {
          __tmp__FZAI=my_copy__GLYM(__tmp__EZAI);
        } break;
        case __EXPR_MOD__: {
          __tmp__FZAI=my_copy__BNEO(__tmp__EZAI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__FZAI=my_copy__M3DP(__tmp__EZAI);
        } break;
        case __EXPR_INF__: {
          __tmp__FZAI=my_copy__PBSN(__tmp__EZAI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__FZAI=my_copy__0BSN(__tmp__EZAI);
        } break;
        case __EXPR_OR__: {
          __tmp__FZAI=my_copy__ZOPN(__tmp__EZAI);
        } break;
        case __EXPR_XOR__: {
          __tmp__FZAI=my_copy__CYSO(__tmp__EZAI);
        } break;
        };
        node__LRAI=new_read__slot__receiver__with__YOWH(__tmp__DZAI,slot_msg__KRAI,__tmp__FZAI,args__MRAI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__LRAI);
        result__FRAI=result_expr__PVDI(node__LRAI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__CRAI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__SP1H(Self__BRAI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__DRAI);
        put_position__ECH(Self__BRAI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__FRAI);
}

static void* check_type__with__5ZAI(__EXPR_DIV *Self__A0AI,void *t__B0AI,__POSITION p__C0AI)
// ({EXPR_DIV},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__E0AI,*rec__H0AI,*__tmp__DCBI,*__tmp__ECBI;
  void *local__F0AI;
  void *instr__G0AI;
  void *slot_name__I0AI;
  void *slot_msg__J0AI;
  void *node__K0AI;
  __TYPE_FULL *Self__YAJQ,*Self__CBJQ;
  void *__tmp__02AI,*__tmp__GABI;
  __POSITION __tmp__B3AI,__tmp__J4AI,__tmp__NABI,__tmp__VBBI;
  __POSITION __tmp__CCBI;
  void *__tmp__H3AI,*__tmp__TABI;
  __STRING_CST *Self__JBJQ;
  __PROTOTYPE_CST *Self__KBJQ;
  __INTEGER_CST *Self__LBJQ;
  __REAL_CST *Self__NBJQ;
  __CHARACTER_CST *Self__PBJQ;
  __IS_EXPANDED *Self__QBJQ;
  void *args__L0AI;
  __BOOLEAN __tmp__W4AI;
  result__E0AI=NULL;
  local__F0AI=NULL;
  instr__G0AI=NULL;
  rec__H0AI=NULL;
  slot_name__I0AI=NULL;
  slot_msg__J0AI=NULL;
  node__K0AI=NULL;
  args__L0AI=NULL;
  if (affect_with__ZCHI(t__B0AI,static_type__XP1H(Self__A0AI))) {
    result__E0AI=Self__A0AI;
  } else {
    Self__YAJQ=((__TYPE_FULL *)static_type__XP1H(Self__A0AI));
    if (is_cast__to__in__ZD0I(Self__YAJQ,(&__string_86),t__B0AI,((__PROTOTYPE *)prototype__NQRF(Self__YAJQ))->export_list__SFDC)) {
      local__F0AI=create__name__style__type__25JG(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__XP1H(Self__A0AI)));
      instr__G0AI=write__value__T5FH(local__F0AI,Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__A0AI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__G0AI);
      slot_name__I0AI=get__QEC(last_cast_name__L42H);
      slot_msg__J0AI=get_slot__AP5G(static_type__XP1H(Self__A0AI),slot_name__I0AI);
      if (((void *)slot_msg__J0AI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__XP1H(Self__A0AI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__B0AI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__I0AI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__XP1H(Self__A0AI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__C0AI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__XP1H(Self__A0AI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
        __tmp__02AI=((__SLOT *)((__SLOT_DATA *)slot_msg__J0AI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__02AI=((__SLOT *)((__SLOT_CODE *)slot_msg__J0AI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__02AI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
          __tmp__B3AI=((__SLOT_DATA *)slot_msg__J0AI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__B3AI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__J0AI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__B3AI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
        __tmp__H3AI=get_type_result__PG2G(slot_msg__J0AI);
      } else {
        __tmp__H3AI=get_type_result__ZH2G(slot_msg__J0AI);
      };
      if ((((void *)__tmp__H3AI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__H3AI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__B0AI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__H3AI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__H3AI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__B0AI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
          __tmp__J4AI=((__SLOT_DATA *)slot_msg__J0AI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__J4AI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__J0AI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__J4AI);
        put_position__ECH(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__H0AI=read__IC5G(local__F0AI);
      node__K0AI=new_read__slot__receiver__self__YLQC(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__J0AI,rec__H0AI,rec__H0AI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__K0AI);
      result__E0AI=result_expr__PVDI(node__K0AI);
      __tmp__W4AI=TRUE__;
    } else {
      __tmp__W4AI=FALSE__;
    };
    if ((! __tmp__W4AI)) {
      Self__CBJQ=((__TYPE_FULL *)t__B0AI);
      if (is_cast__to__in__ZD0I(Self__CBJQ,(&__string_87),static_type__XP1H(Self__A0AI),((__PROTOTYPE *)prototype__NQRF(Self__CBJQ))->import_list__0FDC)) {
        local__F0AI=create__name__style__type__25JG(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__XP1H(Self__A0AI)));
        instr__G0AI=write__value__T5FH(local__F0AI,Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__A0AI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__G0AI);
        slot_name__I0AI=get__QEC(last_cast_name__L42H);
        slot_msg__J0AI=get_slot__AP5G(t__B0AI,slot_name__I0AI);
        if (((void *)slot_msg__J0AI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__B0AI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__XP1H(Self__A0AI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__I0AI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__B0AI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__C0AI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__B0AI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
          __tmp__GABI=((__SLOT *)((__SLOT_DATA *)slot_msg__J0AI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__GABI=((__SLOT *)((__SLOT_CODE *)slot_msg__J0AI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__GABI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
            __tmp__NABI=((__SLOT_DATA *)slot_msg__J0AI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__NABI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__J0AI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__NABI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
          __tmp__TABI=get_type_result__PG2G(slot_msg__J0AI);
        } else {
          __tmp__TABI=get_type_result__ZH2G(slot_msg__J0AI);
        };
        if ((((void *)__tmp__TABI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__TABI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__B0AI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__TABI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__TABI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__B0AI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__J0AI)->__id==__SLOT_DATA__) {
            __tmp__VBBI=((__SLOT_DATA *)slot_msg__J0AI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__VBBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__J0AI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__VBBI);
          put_position__ECH(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__L0AI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__L0AI,create__type__CLQC(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__B0AI));
        add_last__XSEI(args__L0AI,read__IC5G(local__F0AI));
        __tmp__CCBI=Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__DCBI=((void **)((__FAST_ARRAYoEXPRo *)args__L0AI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__DCBI)->__id) {
        case __LIST__: {
          __tmp__ECBI=my_copy__2HYM(__tmp__DCBI);
        } break;
        case __STRING_CST__: {
          Self__JBJQ=((__STRING_CST *)__tmp__DCBI);
          __tmp__ECBI=create__text__AUMH(Self__JBJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JBJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__ECBI=my_copy__2K2H(__tmp__DCBI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__KBJQ=((__PROTOTYPE_CST *)__tmp__DCBI);
          __tmp__ECBI=create__type__CLQC(Self__KBJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KBJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__LBJQ=((__INTEGER_CST *)__tmp__DCBI);
          __tmp__ECBI=create__value__type__DNQC(Self__LBJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LBJQ->value__PAZD,Self__LBJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__ECBI=my_copy__OAFJ(__tmp__DCBI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ECBI=my_copy__KM2H(__tmp__DCBI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ECBI=my_copy__DN2H(__tmp__DCBI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ECBI=my_copy__QN2H(__tmp__DCBI);
        } break;
        case __REAL_CST__: {
          Self__NBJQ=((__REAL_CST *)__tmp__DCBI);
          __tmp__ECBI=create__value__type__1SMH(Self__NBJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NBJQ->value__5N2H,Self__NBJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__PBJQ=((__CHARACTER_CST *)__tmp__DCBI);
          __tmp__ECBI=create__char__WTMH(Self__PBJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PBJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__QBJQ=((__IS_EXPANDED *)__tmp__DCBI);
          __tmp__ECBI=create__receiver__WRWH(Self__QBJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__QBJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ECBI=my_copy__TO2H(__tmp__DCBI);
        } break;
        case __EXPR_SUP__: {
          __tmp__ECBI=my_copy__2O2H(__tmp__DCBI);
        } break;
        case __EXPR_SUB__: {
          __tmp__ECBI=my_copy__HP2H(__tmp__DCBI);
        } break;
        case __EXPR_MUL__: {
          __tmp__ECBI=my_copy__TP2H(__tmp__DCBI);
        } break;
        case __EXPR_DIV__: {
          __tmp__ECBI=my_copy__4P2H(__tmp__DCBI);
        } break;
        case __EXPR_AND__: {
          __tmp__ECBI=my_copy__JQ2H(__tmp__DCBI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ECBI=my_copy__UQ2H(__tmp__DCBI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ECBI=my_copy__5Q2H(__tmp__DCBI);
        } break;
        case __PUT_TO__: {
          __tmp__ECBI=my_copy__KR2H(__tmp__DCBI);
        } break;
        case __ITEM__: {
          __tmp__ECBI=my_copy__1R2H(__tmp__DCBI);
        } break;
        case __SIZE_OF__: {
          __tmp__ECBI=my_copy__HS2H(__tmp__DCBI);
        } break;
        case __CAST__: {
          __tmp__ECBI=my_copy__QS2H(__tmp__DCBI);
        } break;
        case __CALL_SLOT__: {
          __tmp__ECBI=my_copy__PIYM(__tmp__DCBI);
        } break;
        case __READ_SLOT__: {
          __tmp__ECBI=my_copy__AVGK(__tmp__DCBI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__ECBI=my_copy__NVGK(__tmp__DCBI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ECBI=my_copy__RFCN(__tmp__DCBI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ECBI=my_copy__JMEO(__tmp__DCBI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ECBI=my_copy__RTJO(__tmp__DCBI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ECBI=my_copy__WMEO(__tmp__DCBI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ECBI=my_copy__3TJO(__tmp__DCBI);
        } break;
        case __EXPR_NEG__: {
          __tmp__ECBI=my_copy__YEJM(__tmp__DCBI);
        } break;
        case __EXPR_ADD__: {
          __tmp__ECBI=my_copy__YRLL(__tmp__DCBI);
        } break;
        case __EXPR_NOT__: {
          __tmp__ECBI=my_copy__GLYM(__tmp__DCBI);
        } break;
        case __EXPR_MOD__: {
          __tmp__ECBI=my_copy__BNEO(__tmp__DCBI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ECBI=my_copy__M3DP(__tmp__DCBI);
        } break;
        case __EXPR_INF__: {
          __tmp__ECBI=my_copy__PBSN(__tmp__DCBI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ECBI=my_copy__0BSN(__tmp__DCBI);
        } break;
        case __EXPR_OR__: {
          __tmp__ECBI=my_copy__ZOPN(__tmp__DCBI);
        } break;
        case __EXPR_XOR__: {
          __tmp__ECBI=my_copy__CYSO(__tmp__DCBI);
        } break;
        };
        node__K0AI=new_read__slot__receiver__with__YOWH(__tmp__CCBI,slot_msg__J0AI,__tmp__ECBI,args__L0AI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__K0AI);
        result__E0AI=result_expr__PVDI(node__K0AI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__B0AI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__XP1H(Self__A0AI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__C0AI);
        put_position__ECH(Self__A0AI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__E0AI);
}

static void* check_type__with__4CBI(__EXPR_AND *Self__5CBI,void *t__ADBI,__POSITION p__BDBI)
// ({EXPR_AND},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__DDBI,*rec__GDBI,*__tmp__CLBI,*__tmp__DLBI;
  void *local__EDBI;
  void *instr__FDBI;
  void *slot_name__HDBI;
  void *slot_msg__IDBI;
  void *node__JDBI;
  __TYPE_FULL *Self__RBJQ,*Self__1BJQ;
  void *__tmp__ZFBI,*__tmp__FJBI;
  __POSITION __tmp__AGBI,__tmp__IHBI,__tmp__MJBI,__tmp__UKBI;
  __POSITION __tmp__BLBI;
  void *__tmp__GGBI,*__tmp__SJBI;
  __STRING_CST *Self__CCJQ;
  __PROTOTYPE_CST *Self__DCJQ;
  __INTEGER_CST *Self__ECJQ;
  __REAL_CST *Self__GCJQ;
  __CHARACTER_CST *Self__ICJQ;
  __IS_EXPANDED *Self__JCJQ;
  void *args__KDBI;
  __BOOLEAN __tmp__VHBI;
  result__DDBI=NULL;
  local__EDBI=NULL;
  instr__FDBI=NULL;
  rec__GDBI=NULL;
  slot_name__HDBI=NULL;
  slot_msg__IDBI=NULL;
  node__JDBI=NULL;
  args__KDBI=NULL;
  if (affect_with__ZCHI(t__ADBI,static_type__2P1H(Self__5CBI))) {
    result__DDBI=Self__5CBI;
  } else {
    Self__RBJQ=((__TYPE_FULL *)static_type__2P1H(Self__5CBI));
    if (is_cast__to__in__ZD0I(Self__RBJQ,(&__string_86),t__ADBI,((__PROTOTYPE *)prototype__NQRF(Self__RBJQ))->export_list__SFDC)) {
      local__EDBI=create__name__style__type__25JG(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__2P1H(Self__5CBI)));
      instr__FDBI=write__value__T5FH(local__EDBI,Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5CBI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__FDBI);
      slot_name__HDBI=get__QEC(last_cast_name__L42H);
      slot_msg__IDBI=get_slot__AP5G(static_type__2P1H(Self__5CBI),slot_name__HDBI);
      if (((void *)slot_msg__IDBI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__2P1H(Self__5CBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__ADBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__HDBI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__2P1H(Self__5CBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__BDBI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__2P1H(Self__5CBI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
        __tmp__ZFBI=((__SLOT *)((__SLOT_DATA *)slot_msg__IDBI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__ZFBI=((__SLOT *)((__SLOT_CODE *)slot_msg__IDBI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__ZFBI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
          __tmp__AGBI=((__SLOT_DATA *)slot_msg__IDBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__AGBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IDBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__AGBI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
        __tmp__GGBI=get_type_result__PG2G(slot_msg__IDBI);
      } else {
        __tmp__GGBI=get_type_result__ZH2G(slot_msg__IDBI);
      };
      if ((((void *)__tmp__GGBI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__GGBI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__ADBI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__GGBI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__GGBI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__ADBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
          __tmp__IHBI=((__SLOT_DATA *)slot_msg__IDBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__IHBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IDBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__IHBI);
        put_position__ECH(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__GDBI=read__IC5G(local__EDBI);
      node__JDBI=new_read__slot__receiver__self__YLQC(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__IDBI,rec__GDBI,rec__GDBI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__JDBI);
      result__DDBI=result_expr__PVDI(node__JDBI);
      __tmp__VHBI=TRUE__;
    } else {
      __tmp__VHBI=FALSE__;
    };
    if ((! __tmp__VHBI)) {
      Self__1BJQ=((__TYPE_FULL *)t__ADBI);
      if (is_cast__to__in__ZD0I(Self__1BJQ,(&__string_87),static_type__2P1H(Self__5CBI),((__PROTOTYPE *)prototype__NQRF(Self__1BJQ))->import_list__0FDC)) {
        local__EDBI=create__name__style__type__25JG(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__2P1H(Self__5CBI)));
        instr__FDBI=write__value__T5FH(local__EDBI,Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5CBI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__FDBI);
        slot_name__HDBI=get__QEC(last_cast_name__L42H);
        slot_msg__IDBI=get_slot__AP5G(t__ADBI,slot_name__HDBI);
        if (((void *)slot_msg__IDBI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__ADBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__2P1H(Self__5CBI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__HDBI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__ADBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__BDBI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__ADBI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
          __tmp__FJBI=((__SLOT *)((__SLOT_DATA *)slot_msg__IDBI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__FJBI=((__SLOT *)((__SLOT_CODE *)slot_msg__IDBI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__FJBI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
            __tmp__MJBI=((__SLOT_DATA *)slot_msg__IDBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__MJBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IDBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__MJBI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
          __tmp__SJBI=get_type_result__PG2G(slot_msg__IDBI);
        } else {
          __tmp__SJBI=get_type_result__ZH2G(slot_msg__IDBI);
        };
        if ((((void *)__tmp__SJBI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__SJBI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__ADBI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__SJBI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__SJBI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__ADBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__IDBI)->__id==__SLOT_DATA__) {
            __tmp__UKBI=((__SLOT_DATA *)slot_msg__IDBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__UKBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IDBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__UKBI);
          put_position__ECH(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__KDBI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__KDBI,create__type__CLQC(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__ADBI));
        add_last__XSEI(args__KDBI,read__IC5G(local__EDBI));
        __tmp__BLBI=Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__CLBI=((void **)((__FAST_ARRAYoEXPRo *)args__KDBI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__CLBI)->__id) {
        case __LIST__: {
          __tmp__DLBI=my_copy__2HYM(__tmp__CLBI);
        } break;
        case __STRING_CST__: {
          Self__CCJQ=((__STRING_CST *)__tmp__CLBI);
          __tmp__DLBI=create__text__AUMH(Self__CCJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CCJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__DLBI=my_copy__2K2H(__tmp__CLBI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__DCJQ=((__PROTOTYPE_CST *)__tmp__CLBI);
          __tmp__DLBI=create__type__CLQC(Self__DCJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DCJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__ECJQ=((__INTEGER_CST *)__tmp__CLBI);
          __tmp__DLBI=create__value__type__DNQC(Self__ECJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ECJQ->value__PAZD,Self__ECJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__DLBI=my_copy__OAFJ(__tmp__CLBI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__DLBI=my_copy__KM2H(__tmp__CLBI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__DLBI=my_copy__DN2H(__tmp__CLBI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__DLBI=my_copy__QN2H(__tmp__CLBI);
        } break;
        case __REAL_CST__: {
          Self__GCJQ=((__REAL_CST *)__tmp__CLBI);
          __tmp__DLBI=create__value__type__1SMH(Self__GCJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GCJQ->value__5N2H,Self__GCJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__ICJQ=((__CHARACTER_CST *)__tmp__CLBI);
          __tmp__DLBI=create__char__WTMH(Self__ICJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ICJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__JCJQ=((__IS_EXPANDED *)__tmp__CLBI);
          __tmp__DLBI=create__receiver__WRWH(Self__JCJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__JCJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__DLBI=my_copy__TO2H(__tmp__CLBI);
        } break;
        case __EXPR_SUP__: {
          __tmp__DLBI=my_copy__2O2H(__tmp__CLBI);
        } break;
        case __EXPR_SUB__: {
          __tmp__DLBI=my_copy__HP2H(__tmp__CLBI);
        } break;
        case __EXPR_MUL__: {
          __tmp__DLBI=my_copy__TP2H(__tmp__CLBI);
        } break;
        case __EXPR_DIV__: {
          __tmp__DLBI=my_copy__4P2H(__tmp__CLBI);
        } break;
        case __EXPR_AND__: {
          __tmp__DLBI=my_copy__JQ2H(__tmp__CLBI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__DLBI=my_copy__UQ2H(__tmp__CLBI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__DLBI=my_copy__5Q2H(__tmp__CLBI);
        } break;
        case __PUT_TO__: {
          __tmp__DLBI=my_copy__KR2H(__tmp__CLBI);
        } break;
        case __ITEM__: {
          __tmp__DLBI=my_copy__1R2H(__tmp__CLBI);
        } break;
        case __SIZE_OF__: {
          __tmp__DLBI=my_copy__HS2H(__tmp__CLBI);
        } break;
        case __CAST__: {
          __tmp__DLBI=my_copy__QS2H(__tmp__CLBI);
        } break;
        case __CALL_SLOT__: {
          __tmp__DLBI=my_copy__PIYM(__tmp__CLBI);
        } break;
        case __READ_SLOT__: {
          __tmp__DLBI=my_copy__AVGK(__tmp__CLBI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__DLBI=my_copy__NVGK(__tmp__CLBI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__DLBI=my_copy__RFCN(__tmp__CLBI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__DLBI=my_copy__JMEO(__tmp__CLBI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__DLBI=my_copy__RTJO(__tmp__CLBI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__DLBI=my_copy__WMEO(__tmp__CLBI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__DLBI=my_copy__3TJO(__tmp__CLBI);
        } break;
        case __EXPR_NEG__: {
          __tmp__DLBI=my_copy__YEJM(__tmp__CLBI);
        } break;
        case __EXPR_ADD__: {
          __tmp__DLBI=my_copy__YRLL(__tmp__CLBI);
        } break;
        case __EXPR_NOT__: {
          __tmp__DLBI=my_copy__GLYM(__tmp__CLBI);
        } break;
        case __EXPR_MOD__: {
          __tmp__DLBI=my_copy__BNEO(__tmp__CLBI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__DLBI=my_copy__M3DP(__tmp__CLBI);
        } break;
        case __EXPR_INF__: {
          __tmp__DLBI=my_copy__PBSN(__tmp__CLBI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__DLBI=my_copy__0BSN(__tmp__CLBI);
        } break;
        case __EXPR_OR__: {
          __tmp__DLBI=my_copy__ZOPN(__tmp__CLBI);
        } break;
        case __EXPR_XOR__: {
          __tmp__DLBI=my_copy__CYSO(__tmp__CLBI);
        } break;
        };
        node__JDBI=new_read__slot__receiver__with__YOWH(__tmp__BLBI,slot_msg__IDBI,__tmp__DLBI,args__KDBI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__JDBI);
        result__DDBI=result_expr__PVDI(node__JDBI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__ADBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__2P1H(Self__5CBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__BDBI);
        put_position__ECH(Self__5CBI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__DDBI);
}

static void* check_type__with__3LBI(__EXPR_SHIFT_R *Self__4LBI,void *t__5LBI,__POSITION p__AMBI)
// ({EXPR_SHIFT_R},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__CMBI,*rec__FMBI,*__tmp__BUBI,*__tmp__CUBI;
  void *local__DMBI;
  void *instr__EMBI;
  void *slot_name__GMBI;
  void *slot_msg__HMBI;
  void *node__IMBI;
  __TYPE_FULL *Self__KCJQ,*Self__UCJQ;
  void *__tmp__YOBI,*__tmp__ESBI;
  __POSITION __tmp__5OBI,__tmp__HQBI,__tmp__LSBI,__tmp__TTBI;
  __POSITION __tmp__AUBI;
  void *__tmp__FPBI,*__tmp__RSBI;
  __STRING_CST *Self__1CJQ;
  __PROTOTYPE_CST *Self__2CJQ;
  __INTEGER_CST *Self__3CJQ;
  __REAL_CST *Self__5CJQ;
  __CHARACTER_CST *Self__BDJQ;
  __IS_EXPANDED *Self__CDJQ;
  void *args__JMBI;
  __BOOLEAN __tmp__UQBI;
  result__CMBI=NULL;
  local__DMBI=NULL;
  instr__EMBI=NULL;
  rec__FMBI=NULL;
  slot_name__GMBI=NULL;
  slot_msg__HMBI=NULL;
  node__IMBI=NULL;
  args__JMBI=NULL;
  if (affect_with__ZCHI(t__5LBI,static_type__BQ1H(Self__4LBI))) {
    result__CMBI=Self__4LBI;
  } else {
    Self__KCJQ=((__TYPE_FULL *)static_type__BQ1H(Self__4LBI));
    if (is_cast__to__in__ZD0I(Self__KCJQ,(&__string_86),t__5LBI,((__PROTOTYPE *)prototype__NQRF(Self__KCJQ))->export_list__SFDC)) {
      local__DMBI=create__name__style__type__25JG(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__BQ1H(Self__4LBI)));
      instr__EMBI=write__value__T5FH(local__DMBI,Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4LBI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__EMBI);
      slot_name__GMBI=get__QEC(last_cast_name__L42H);
      slot_msg__HMBI=get_slot__AP5G(static_type__BQ1H(Self__4LBI),slot_name__GMBI);
      if (((void *)slot_msg__HMBI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__BQ1H(Self__4LBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__5LBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__GMBI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__BQ1H(Self__4LBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__AMBI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__BQ1H(Self__4LBI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
        __tmp__YOBI=((__SLOT *)((__SLOT_DATA *)slot_msg__HMBI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__YOBI=((__SLOT *)((__SLOT_CODE *)slot_msg__HMBI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__YOBI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
          __tmp__5OBI=((__SLOT_DATA *)slot_msg__HMBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__5OBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__HMBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__5OBI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
        __tmp__FPBI=get_type_result__PG2G(slot_msg__HMBI);
      } else {
        __tmp__FPBI=get_type_result__ZH2G(slot_msg__HMBI);
      };
      if ((((void *)__tmp__FPBI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__FPBI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__5LBI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__FPBI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__FPBI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__5LBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
          __tmp__HQBI=((__SLOT_DATA *)slot_msg__HMBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__HQBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__HMBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__HQBI);
        put_position__ECH(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__FMBI=read__IC5G(local__DMBI);
      node__IMBI=new_read__slot__receiver__self__YLQC(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__HMBI,rec__FMBI,rec__FMBI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__IMBI);
      result__CMBI=result_expr__PVDI(node__IMBI);
      __tmp__UQBI=TRUE__;
    } else {
      __tmp__UQBI=FALSE__;
    };
    if ((! __tmp__UQBI)) {
      Self__UCJQ=((__TYPE_FULL *)t__5LBI);
      if (is_cast__to__in__ZD0I(Self__UCJQ,(&__string_87),static_type__BQ1H(Self__4LBI),((__PROTOTYPE *)prototype__NQRF(Self__UCJQ))->import_list__0FDC)) {
        local__DMBI=create__name__style__type__25JG(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__BQ1H(Self__4LBI)));
        instr__EMBI=write__value__T5FH(local__DMBI,Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4LBI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__EMBI);
        slot_name__GMBI=get__QEC(last_cast_name__L42H);
        slot_msg__HMBI=get_slot__AP5G(t__5LBI,slot_name__GMBI);
        if (((void *)slot_msg__HMBI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__5LBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__BQ1H(Self__4LBI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__GMBI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__5LBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__AMBI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__5LBI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
          __tmp__ESBI=((__SLOT *)((__SLOT_DATA *)slot_msg__HMBI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__ESBI=((__SLOT *)((__SLOT_CODE *)slot_msg__HMBI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__ESBI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
            __tmp__LSBI=((__SLOT_DATA *)slot_msg__HMBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__LSBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__HMBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__LSBI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
          __tmp__RSBI=get_type_result__PG2G(slot_msg__HMBI);
        } else {
          __tmp__RSBI=get_type_result__ZH2G(slot_msg__HMBI);
        };
        if ((((void *)__tmp__RSBI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__RSBI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__5LBI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__RSBI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__RSBI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__5LBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__HMBI)->__id==__SLOT_DATA__) {
            __tmp__TTBI=((__SLOT_DATA *)slot_msg__HMBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__TTBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__HMBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__TTBI);
          put_position__ECH(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__JMBI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__JMBI,create__type__CLQC(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__5LBI));
        add_last__XSEI(args__JMBI,read__IC5G(local__DMBI));
        __tmp__AUBI=Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__BUBI=((void **)((__FAST_ARRAYoEXPRo *)args__JMBI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__BUBI)->__id) {
        case __LIST__: {
          __tmp__CUBI=my_copy__2HYM(__tmp__BUBI);
        } break;
        case __STRING_CST__: {
          Self__1CJQ=((__STRING_CST *)__tmp__BUBI);
          __tmp__CUBI=create__text__AUMH(Self__1CJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1CJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__CUBI=my_copy__2K2H(__tmp__BUBI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__2CJQ=((__PROTOTYPE_CST *)__tmp__BUBI);
          __tmp__CUBI=create__type__CLQC(Self__2CJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2CJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__3CJQ=((__INTEGER_CST *)__tmp__BUBI);
          __tmp__CUBI=create__value__type__DNQC(Self__3CJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3CJQ->value__PAZD,Self__3CJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__CUBI=my_copy__OAFJ(__tmp__BUBI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__CUBI=my_copy__KM2H(__tmp__BUBI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__CUBI=my_copy__DN2H(__tmp__BUBI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__CUBI=my_copy__QN2H(__tmp__BUBI);
        } break;
        case __REAL_CST__: {
          Self__5CJQ=((__REAL_CST *)__tmp__BUBI);
          __tmp__CUBI=create__value__type__1SMH(Self__5CJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5CJQ->value__5N2H,Self__5CJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__BDJQ=((__CHARACTER_CST *)__tmp__BUBI);
          __tmp__CUBI=create__char__WTMH(Self__BDJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BDJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__CDJQ=((__IS_EXPANDED *)__tmp__BUBI);
          __tmp__CUBI=create__receiver__WRWH(Self__CDJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__CDJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__CUBI=my_copy__TO2H(__tmp__BUBI);
        } break;
        case __EXPR_SUP__: {
          __tmp__CUBI=my_copy__2O2H(__tmp__BUBI);
        } break;
        case __EXPR_SUB__: {
          __tmp__CUBI=my_copy__HP2H(__tmp__BUBI);
        } break;
        case __EXPR_MUL__: {
          __tmp__CUBI=my_copy__TP2H(__tmp__BUBI);
        } break;
        case __EXPR_DIV__: {
          __tmp__CUBI=my_copy__4P2H(__tmp__BUBI);
        } break;
        case __EXPR_AND__: {
          __tmp__CUBI=my_copy__JQ2H(__tmp__BUBI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__CUBI=my_copy__UQ2H(__tmp__BUBI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__CUBI=my_copy__5Q2H(__tmp__BUBI);
        } break;
        case __PUT_TO__: {
          __tmp__CUBI=my_copy__KR2H(__tmp__BUBI);
        } break;
        case __ITEM__: {
          __tmp__CUBI=my_copy__1R2H(__tmp__BUBI);
        } break;
        case __SIZE_OF__: {
          __tmp__CUBI=my_copy__HS2H(__tmp__BUBI);
        } break;
        case __CAST__: {
          __tmp__CUBI=my_copy__QS2H(__tmp__BUBI);
        } break;
        case __CALL_SLOT__: {
          __tmp__CUBI=my_copy__PIYM(__tmp__BUBI);
        } break;
        case __READ_SLOT__: {
          __tmp__CUBI=my_copy__AVGK(__tmp__BUBI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__CUBI=my_copy__NVGK(__tmp__BUBI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__CUBI=my_copy__RFCN(__tmp__BUBI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__CUBI=my_copy__JMEO(__tmp__BUBI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__CUBI=my_copy__RTJO(__tmp__BUBI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__CUBI=my_copy__WMEO(__tmp__BUBI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__CUBI=my_copy__3TJO(__tmp__BUBI);
        } break;
        case __EXPR_NEG__: {
          __tmp__CUBI=my_copy__YEJM(__tmp__BUBI);
        } break;
        case __EXPR_ADD__: {
          __tmp__CUBI=my_copy__YRLL(__tmp__BUBI);
        } break;
        case __EXPR_NOT__: {
          __tmp__CUBI=my_copy__GLYM(__tmp__BUBI);
        } break;
        case __EXPR_MOD__: {
          __tmp__CUBI=my_copy__BNEO(__tmp__BUBI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__CUBI=my_copy__M3DP(__tmp__BUBI);
        } break;
        case __EXPR_INF__: {
          __tmp__CUBI=my_copy__PBSN(__tmp__BUBI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__CUBI=my_copy__0BSN(__tmp__BUBI);
        } break;
        case __EXPR_OR__: {
          __tmp__CUBI=my_copy__ZOPN(__tmp__BUBI);
        } break;
        case __EXPR_XOR__: {
          __tmp__CUBI=my_copy__CYSO(__tmp__BUBI);
        } break;
        };
        node__IMBI=new_read__slot__receiver__with__YOWH(__tmp__AUBI,slot_msg__HMBI,__tmp__CUBI,args__JMBI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__IMBI);
        result__CMBI=result_expr__PVDI(node__IMBI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__5LBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__BQ1H(Self__4LBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__AMBI);
        put_position__ECH(Self__4LBI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__CMBI);
}

static void* check_type__with__2UBI(__EXPR_SHIFT_L *Self__3UBI,void *t__4UBI,__POSITION p__5UBI)
// ({EXPR_SHIFT_L},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__BVBI,*rec__EVBI,*__tmp__A3BI,*__tmp__B3BI;
  void *local__CVBI;
  void *instr__DVBI;
  void *slot_name__FVBI;
  void *slot_msg__GVBI;
  void *node__HVBI;
  __TYPE_FULL *Self__DDJQ,*Self__NDJQ;
  void *__tmp__XXBI,*__tmp__D1BI;
  __POSITION __tmp__4XBI,__tmp__GZBI,__tmp__K1BI,__tmp__S2BI;
  __POSITION __tmp__52BI;
  void *__tmp__EYBI,*__tmp__Q1BI;
  __STRING_CST *Self__UDJQ;
  __PROTOTYPE_CST *Self__VDJQ;
  __INTEGER_CST *Self__WDJQ;
  __REAL_CST *Self__YDJQ;
  __CHARACTER_CST *Self__0DJQ;
  __IS_EXPANDED *Self__1DJQ;
  void *args__IVBI;
  __BOOLEAN __tmp__TZBI;
  result__BVBI=NULL;
  local__CVBI=NULL;
  instr__DVBI=NULL;
  rec__EVBI=NULL;
  slot_name__FVBI=NULL;
  slot_msg__GVBI=NULL;
  node__HVBI=NULL;
  args__IVBI=NULL;
  if (affect_with__ZCHI(t__4UBI,static_type__GQ1H(Self__3UBI))) {
    result__BVBI=Self__3UBI;
  } else {
    Self__DDJQ=((__TYPE_FULL *)static_type__GQ1H(Self__3UBI));
    if (is_cast__to__in__ZD0I(Self__DDJQ,(&__string_86),t__4UBI,((__PROTOTYPE *)prototype__NQRF(Self__DDJQ))->export_list__SFDC)) {
      local__CVBI=create__name__style__type__25JG(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GQ1H(Self__3UBI)));
      instr__DVBI=write__value__T5FH(local__CVBI,Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3UBI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__DVBI);
      slot_name__FVBI=get__QEC(last_cast_name__L42H);
      slot_msg__GVBI=get_slot__AP5G(static_type__GQ1H(Self__3UBI),slot_name__FVBI);
      if (((void *)slot_msg__GVBI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__GQ1H(Self__3UBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__4UBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__FVBI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__GQ1H(Self__3UBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__5UBI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__GQ1H(Self__3UBI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
        __tmp__XXBI=((__SLOT *)((__SLOT_DATA *)slot_msg__GVBI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__XXBI=((__SLOT *)((__SLOT_CODE *)slot_msg__GVBI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__XXBI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
          __tmp__4XBI=((__SLOT_DATA *)slot_msg__GVBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__4XBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__GVBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__4XBI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
        __tmp__EYBI=get_type_result__PG2G(slot_msg__GVBI);
      } else {
        __tmp__EYBI=get_type_result__ZH2G(slot_msg__GVBI);
      };
      if ((((void *)__tmp__EYBI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__EYBI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__4UBI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__EYBI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__EYBI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__4UBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
          __tmp__GZBI=((__SLOT_DATA *)slot_msg__GVBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__GZBI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__GVBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__GZBI);
        put_position__ECH(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__EVBI=read__IC5G(local__CVBI);
      node__HVBI=new_read__slot__receiver__self__YLQC(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__GVBI,rec__EVBI,rec__EVBI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__HVBI);
      result__BVBI=result_expr__PVDI(node__HVBI);
      __tmp__TZBI=TRUE__;
    } else {
      __tmp__TZBI=FALSE__;
    };
    if ((! __tmp__TZBI)) {
      Self__NDJQ=((__TYPE_FULL *)t__4UBI);
      if (is_cast__to__in__ZD0I(Self__NDJQ,(&__string_87),static_type__GQ1H(Self__3UBI),((__PROTOTYPE *)prototype__NQRF(Self__NDJQ))->import_list__0FDC)) {
        local__CVBI=create__name__style__type__25JG(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GQ1H(Self__3UBI)));
        instr__DVBI=write__value__T5FH(local__CVBI,Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3UBI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__DVBI);
        slot_name__FVBI=get__QEC(last_cast_name__L42H);
        slot_msg__GVBI=get_slot__AP5G(t__4UBI,slot_name__FVBI);
        if (((void *)slot_msg__GVBI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__4UBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__GQ1H(Self__3UBI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__FVBI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__4UBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__5UBI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__4UBI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
          __tmp__D1BI=((__SLOT *)((__SLOT_DATA *)slot_msg__GVBI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__D1BI=((__SLOT *)((__SLOT_CODE *)slot_msg__GVBI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__D1BI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
            __tmp__K1BI=((__SLOT_DATA *)slot_msg__GVBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__K1BI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__GVBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__K1BI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
          __tmp__Q1BI=get_type_result__PG2G(slot_msg__GVBI);
        } else {
          __tmp__Q1BI=get_type_result__ZH2G(slot_msg__GVBI);
        };
        if ((((void *)__tmp__Q1BI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__Q1BI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__4UBI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__Q1BI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__Q1BI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__4UBI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__GVBI)->__id==__SLOT_DATA__) {
            __tmp__S2BI=((__SLOT_DATA *)slot_msg__GVBI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__S2BI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__GVBI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__S2BI);
          put_position__ECH(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__IVBI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__IVBI,create__type__CLQC(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__4UBI));
        add_last__XSEI(args__IVBI,read__IC5G(local__CVBI));
        __tmp__52BI=Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__A3BI=((void **)((__FAST_ARRAYoEXPRo *)args__IVBI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__A3BI)->__id) {
        case __LIST__: {
          __tmp__B3BI=my_copy__2HYM(__tmp__A3BI);
        } break;
        case __STRING_CST__: {
          Self__UDJQ=((__STRING_CST *)__tmp__A3BI);
          __tmp__B3BI=create__text__AUMH(Self__UDJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UDJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__B3BI=my_copy__2K2H(__tmp__A3BI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__VDJQ=((__PROTOTYPE_CST *)__tmp__A3BI);
          __tmp__B3BI=create__type__CLQC(Self__VDJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VDJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__WDJQ=((__INTEGER_CST *)__tmp__A3BI);
          __tmp__B3BI=create__value__type__DNQC(Self__WDJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WDJQ->value__PAZD,Self__WDJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__B3BI=my_copy__OAFJ(__tmp__A3BI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__B3BI=my_copy__KM2H(__tmp__A3BI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__B3BI=my_copy__DN2H(__tmp__A3BI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__B3BI=my_copy__QN2H(__tmp__A3BI);
        } break;
        case __REAL_CST__: {
          Self__YDJQ=((__REAL_CST *)__tmp__A3BI);
          __tmp__B3BI=create__value__type__1SMH(Self__YDJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YDJQ->value__5N2H,Self__YDJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__0DJQ=((__CHARACTER_CST *)__tmp__A3BI);
          __tmp__B3BI=create__char__WTMH(Self__0DJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0DJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__1DJQ=((__IS_EXPANDED *)__tmp__A3BI);
          __tmp__B3BI=create__receiver__WRWH(Self__1DJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__1DJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__B3BI=my_copy__TO2H(__tmp__A3BI);
        } break;
        case __EXPR_SUP__: {
          __tmp__B3BI=my_copy__2O2H(__tmp__A3BI);
        } break;
        case __EXPR_SUB__: {
          __tmp__B3BI=my_copy__HP2H(__tmp__A3BI);
        } break;
        case __EXPR_MUL__: {
          __tmp__B3BI=my_copy__TP2H(__tmp__A3BI);
        } break;
        case __EXPR_DIV__: {
          __tmp__B3BI=my_copy__4P2H(__tmp__A3BI);
        } break;
        case __EXPR_AND__: {
          __tmp__B3BI=my_copy__JQ2H(__tmp__A3BI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__B3BI=my_copy__UQ2H(__tmp__A3BI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__B3BI=my_copy__5Q2H(__tmp__A3BI);
        } break;
        case __PUT_TO__: {
          __tmp__B3BI=my_copy__KR2H(__tmp__A3BI);
        } break;
        case __ITEM__: {
          __tmp__B3BI=my_copy__1R2H(__tmp__A3BI);
        } break;
        case __SIZE_OF__: {
          __tmp__B3BI=my_copy__HS2H(__tmp__A3BI);
        } break;
        case __CAST__: {
          __tmp__B3BI=my_copy__QS2H(__tmp__A3BI);
        } break;
        case __CALL_SLOT__: {
          __tmp__B3BI=my_copy__PIYM(__tmp__A3BI);
        } break;
        case __READ_SLOT__: {
          __tmp__B3BI=my_copy__AVGK(__tmp__A3BI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__B3BI=my_copy__NVGK(__tmp__A3BI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__B3BI=my_copy__RFCN(__tmp__A3BI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__B3BI=my_copy__JMEO(__tmp__A3BI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__B3BI=my_copy__RTJO(__tmp__A3BI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__B3BI=my_copy__WMEO(__tmp__A3BI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__B3BI=my_copy__3TJO(__tmp__A3BI);
        } break;
        case __EXPR_NEG__: {
          __tmp__B3BI=my_copy__YEJM(__tmp__A3BI);
        } break;
        case __EXPR_ADD__: {
          __tmp__B3BI=my_copy__YRLL(__tmp__A3BI);
        } break;
        case __EXPR_NOT__: {
          __tmp__B3BI=my_copy__GLYM(__tmp__A3BI);
        } break;
        case __EXPR_MOD__: {
          __tmp__B3BI=my_copy__BNEO(__tmp__A3BI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__B3BI=my_copy__M3DP(__tmp__A3BI);
        } break;
        case __EXPR_INF__: {
          __tmp__B3BI=my_copy__PBSN(__tmp__A3BI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__B3BI=my_copy__0BSN(__tmp__A3BI);
        } break;
        case __EXPR_OR__: {
          __tmp__B3BI=my_copy__ZOPN(__tmp__A3BI);
        } break;
        case __EXPR_XOR__: {
          __tmp__B3BI=my_copy__CYSO(__tmp__A3BI);
        } break;
        };
        node__HVBI=new_read__slot__receiver__with__YOWH(__tmp__52BI,slot_msg__GVBI,__tmp__B3BI,args__IVBI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__HVBI);
        result__BVBI=result_expr__PVDI(node__HVBI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__4UBI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__GQ1H(Self__3UBI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__5UBI);
        put_position__ECH(Self__3UBI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__BVBI);
}

static void* check_type__with__03BI(__PUT_TO *Self__13BI,void *t__23BI,__POSITION p__33BI)
// ({PUT_TO},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__53BI,*rec__C4BI,*__tmp__4FCI,*__tmp__5FCI;
  void *local__A4BI;
  void *instr__B4BI;
  void *slot_name__D4BI;
  void *slot_msg__E4BI;
  void *node__F4BI;
  __TYPE_FULL *Self__2DJQ,*Self__GEJQ;
  void *__tmp__VACI,*__tmp__BECI;
  __POSITION __tmp__2ACI,__tmp__ECCI,__tmp__IECI,__tmp__QFCI;
  __POSITION __tmp__3FCI;
  void *__tmp__CBCI,*__tmp__OECI;
  __STRING_CST *Self__NEJQ;
  __PROTOTYPE_CST *Self__OEJQ;
  __INTEGER_CST *Self__PEJQ;
  __REAL_CST *Self__REJQ;
  __CHARACTER_CST *Self__TEJQ;
  __IS_EXPANDED *Self__UEJQ;
  void *args__G4BI;
  __BOOLEAN __tmp__RCCI;
  result__53BI=NULL;
  local__A4BI=NULL;
  instr__B4BI=NULL;
  rec__C4BI=NULL;
  slot_name__D4BI=NULL;
  slot_msg__E4BI=NULL;
  node__F4BI=NULL;
  args__G4BI=NULL;
  if (affect_with__ZCHI(t__23BI,TYPE_VOID__->parent_type__UIB.default__AKC)) {
    result__53BI=Self__13BI;
  } else {
    Self__2DJQ=((__TYPE_FULL *)TYPE_VOID__->parent_type__UIB.default__AKC);
    if (is_cast__to__in__ZD0I(Self__2DJQ,(&__string_86),t__23BI,((__PROTOTYPE *)prototype__NQRF(Self__2DJQ))->export_list__SFDC)) {
      local__A4BI=create__name__style__type__25JG(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)TYPE_VOID__->parent_type__UIB.default__AKC));
      instr__B4BI=write__value__T5FH(local__A4BI,Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__13BI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__B4BI);
      slot_name__D4BI=get__QEC(last_cast_name__L42H);
      slot_msg__E4BI=get_slot__AP5G(TYPE_VOID__->parent_type__UIB.default__AKC,slot_name__D4BI);
      if (((void *)slot_msg__E4BI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(TYPE_VOID__->parent_type__UIB.default__AKC,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__23BI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__D4BI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(TYPE_VOID__->parent_type__UIB.default__AKC,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__33BI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(TYPE_VOID__->parent_type__UIB.default__AKC))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
        __tmp__VACI=((__SLOT *)((__SLOT_DATA *)slot_msg__E4BI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__VACI=((__SLOT *)((__SLOT_CODE *)slot_msg__E4BI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__VACI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
          __tmp__2ACI=((__SLOT_DATA *)slot_msg__E4BI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__2ACI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__E4BI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__2ACI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
        __tmp__CBCI=get_type_result__PG2G(slot_msg__E4BI);
      } else {
        __tmp__CBCI=get_type_result__ZH2G(slot_msg__E4BI);
      };
      if ((((void *)__tmp__CBCI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__CBCI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__23BI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__CBCI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__CBCI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__23BI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
          __tmp__ECCI=((__SLOT_DATA *)slot_msg__E4BI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__ECCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__E4BI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__ECCI);
        put_position__ECH(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__C4BI=read__IC5G(local__A4BI);
      node__F4BI=new_read__slot__receiver__self__YLQC(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__E4BI,rec__C4BI,rec__C4BI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__F4BI);
      result__53BI=result_expr__PVDI(node__F4BI);
      __tmp__RCCI=TRUE__;
    } else {
      __tmp__RCCI=FALSE__;
    };
    if ((! __tmp__RCCI)) {
      Self__GEJQ=((__TYPE_FULL *)t__23BI);
      if (is_cast__to__in__ZD0I(Self__GEJQ,(&__string_87),TYPE_VOID__->parent_type__UIB.default__AKC,((__PROTOTYPE *)prototype__NQRF(Self__GEJQ))->import_list__0FDC)) {
        local__A4BI=create__name__style__type__25JG(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)TYPE_VOID__->parent_type__UIB.default__AKC));
        instr__B4BI=write__value__T5FH(local__A4BI,Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__13BI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__B4BI);
        slot_name__D4BI=get__QEC(last_cast_name__L42H);
        slot_msg__E4BI=get_slot__AP5G(t__23BI,slot_name__D4BI);
        if (((void *)slot_msg__E4BI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__23BI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(TYPE_VOID__->parent_type__UIB.default__AKC,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__D4BI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__23BI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__33BI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__23BI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
          __tmp__BECI=((__SLOT *)((__SLOT_DATA *)slot_msg__E4BI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__BECI=((__SLOT *)((__SLOT_CODE *)slot_msg__E4BI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__BECI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
            __tmp__IECI=((__SLOT_DATA *)slot_msg__E4BI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__IECI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__E4BI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__IECI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
          __tmp__OECI=get_type_result__PG2G(slot_msg__E4BI);
        } else {
          __tmp__OECI=get_type_result__ZH2G(slot_msg__E4BI);
        };
        if ((((void *)__tmp__OECI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__OECI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__23BI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__OECI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__OECI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__23BI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__E4BI)->__id==__SLOT_DATA__) {
            __tmp__QFCI=((__SLOT_DATA *)slot_msg__E4BI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__QFCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__E4BI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__QFCI);
          put_position__ECH(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__G4BI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__G4BI,create__type__CLQC(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__23BI));
        add_last__XSEI(args__G4BI,read__IC5G(local__A4BI));
        __tmp__3FCI=Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__4FCI=((void **)((__FAST_ARRAYoEXPRo *)args__G4BI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__4FCI)->__id) {
        case __LIST__: {
          __tmp__5FCI=my_copy__2HYM(__tmp__4FCI);
        } break;
        case __STRING_CST__: {
          Self__NEJQ=((__STRING_CST *)__tmp__4FCI);
          __tmp__5FCI=create__text__AUMH(Self__NEJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NEJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__5FCI=my_copy__2K2H(__tmp__4FCI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__OEJQ=((__PROTOTYPE_CST *)__tmp__4FCI);
          __tmp__5FCI=create__type__CLQC(Self__OEJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OEJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__PEJQ=((__INTEGER_CST *)__tmp__4FCI);
          __tmp__5FCI=create__value__type__DNQC(Self__PEJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PEJQ->value__PAZD,Self__PEJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__5FCI=my_copy__OAFJ(__tmp__4FCI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__5FCI=my_copy__KM2H(__tmp__4FCI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__5FCI=my_copy__DN2H(__tmp__4FCI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__5FCI=my_copy__QN2H(__tmp__4FCI);
        } break;
        case __REAL_CST__: {
          Self__REJQ=((__REAL_CST *)__tmp__4FCI);
          __tmp__5FCI=create__value__type__1SMH(Self__REJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__REJQ->value__5N2H,Self__REJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__TEJQ=((__CHARACTER_CST *)__tmp__4FCI);
          __tmp__5FCI=create__char__WTMH(Self__TEJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TEJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__UEJQ=((__IS_EXPANDED *)__tmp__4FCI);
          __tmp__5FCI=create__receiver__WRWH(Self__UEJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__UEJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__5FCI=my_copy__TO2H(__tmp__4FCI);
        } break;
        case __EXPR_SUP__: {
          __tmp__5FCI=my_copy__2O2H(__tmp__4FCI);
        } break;
        case __EXPR_SUB__: {
          __tmp__5FCI=my_copy__HP2H(__tmp__4FCI);
        } break;
        case __EXPR_MUL__: {
          __tmp__5FCI=my_copy__TP2H(__tmp__4FCI);
        } break;
        case __EXPR_DIV__: {
          __tmp__5FCI=my_copy__4P2H(__tmp__4FCI);
        } break;
        case __EXPR_AND__: {
          __tmp__5FCI=my_copy__JQ2H(__tmp__4FCI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__5FCI=my_copy__UQ2H(__tmp__4FCI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__5FCI=my_copy__5Q2H(__tmp__4FCI);
        } break;
        case __PUT_TO__: {
          __tmp__5FCI=my_copy__KR2H(__tmp__4FCI);
        } break;
        case __ITEM__: {
          __tmp__5FCI=my_copy__1R2H(__tmp__4FCI);
        } break;
        case __SIZE_OF__: {
          __tmp__5FCI=my_copy__HS2H(__tmp__4FCI);
        } break;
        case __CAST__: {
          __tmp__5FCI=my_copy__QS2H(__tmp__4FCI);
        } break;
        case __CALL_SLOT__: {
          __tmp__5FCI=my_copy__PIYM(__tmp__4FCI);
        } break;
        case __READ_SLOT__: {
          __tmp__5FCI=my_copy__AVGK(__tmp__4FCI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__5FCI=my_copy__NVGK(__tmp__4FCI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__5FCI=my_copy__RFCN(__tmp__4FCI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__5FCI=my_copy__JMEO(__tmp__4FCI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__5FCI=my_copy__RTJO(__tmp__4FCI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__5FCI=my_copy__WMEO(__tmp__4FCI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__5FCI=my_copy__3TJO(__tmp__4FCI);
        } break;
        case __EXPR_NEG__: {
          __tmp__5FCI=my_copy__YEJM(__tmp__4FCI);
        } break;
        case __EXPR_ADD__: {
          __tmp__5FCI=my_copy__YRLL(__tmp__4FCI);
        } break;
        case __EXPR_NOT__: {
          __tmp__5FCI=my_copy__GLYM(__tmp__4FCI);
        } break;
        case __EXPR_MOD__: {
          __tmp__5FCI=my_copy__BNEO(__tmp__4FCI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__5FCI=my_copy__M3DP(__tmp__4FCI);
        } break;
        case __EXPR_INF__: {
          __tmp__5FCI=my_copy__PBSN(__tmp__4FCI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__5FCI=my_copy__0BSN(__tmp__4FCI);
        } break;
        case __EXPR_OR__: {
          __tmp__5FCI=my_copy__ZOPN(__tmp__4FCI);
        } break;
        case __EXPR_XOR__: {
          __tmp__5FCI=my_copy__CYSO(__tmp__4FCI);
        } break;
        };
        node__F4BI=new_read__slot__receiver__with__YOWH(__tmp__3FCI,slot_msg__E4BI,__tmp__5FCI,args__G4BI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__F4BI);
        result__53BI=result_expr__PVDI(node__F4BI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__23BI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(TYPE_VOID__->parent_type__UIB.default__AKC,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__33BI);
        put_position__ECH(Self__13BI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__53BI);
}

static void* check_type__with__YGCI(__ITEM *Self__ZGCI,void *t__0GCI,__POSITION p__1GCI)
// ({ITEM},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__3GCI,*rec__AHCI,*__tmp__2OCI,*__tmp__3OCI;
  void *local__4GCI;
  void *instr__5GCI;
  void *slot_name__BHCI;
  void *slot_msg__CHCI;
  void *node__DHCI;
  __TYPE_FULL *Self__VEJQ,*Self__5EJQ;
  void *__tmp__TJCI,*__tmp__5MCI;
  __POSITION __tmp__0JCI,__tmp__CLCI,__tmp__GNCI,__tmp__OOCI;
  __POSITION __tmp__1OCI;
  void *__tmp__AKCI,*__tmp__MNCI;
  __STRING_CST *Self__GFJQ;
  __PROTOTYPE_CST *Self__HFJQ;
  __INTEGER_CST *Self__IFJQ;
  __REAL_CST *Self__KFJQ;
  __CHARACTER_CST *Self__MFJQ;
  __IS_EXPANDED *Self__NFJQ;
  void *args__EHCI;
  __BOOLEAN __tmp__PLCI;
  result__3GCI=NULL;
  local__4GCI=NULL;
  instr__5GCI=NULL;
  rec__AHCI=NULL;
  slot_name__BHCI=NULL;
  slot_msg__CHCI=NULL;
  node__DHCI=NULL;
  args__EHCI=NULL;
  if (affect_with__ZCHI(t__0GCI,static_type__PQ1H(Self__ZGCI))) {
    result__3GCI=Self__ZGCI;
  } else {
    Self__VEJQ=((__TYPE_FULL *)static_type__PQ1H(Self__ZGCI));
    if (is_cast__to__in__ZD0I(Self__VEJQ,(&__string_86),t__0GCI,((__PROTOTYPE *)prototype__NQRF(Self__VEJQ))->export_list__SFDC)) {
      local__4GCI=create__name__style__type__25JG(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__PQ1H(Self__ZGCI)));
      instr__5GCI=write__value__T5FH(local__4GCI,Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZGCI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__5GCI);
      slot_name__BHCI=get__QEC(last_cast_name__L42H);
      slot_msg__CHCI=get_slot__AP5G(static_type__PQ1H(Self__ZGCI),slot_name__BHCI);
      if (((void *)slot_msg__CHCI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__PQ1H(Self__ZGCI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__0GCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__BHCI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__PQ1H(Self__ZGCI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__1GCI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__PQ1H(Self__ZGCI)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
        __tmp__TJCI=((__SLOT *)((__SLOT_DATA *)slot_msg__CHCI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__TJCI=((__SLOT *)((__SLOT_CODE *)slot_msg__CHCI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__TJCI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
          __tmp__0JCI=((__SLOT_DATA *)slot_msg__CHCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__0JCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__CHCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__0JCI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
        __tmp__AKCI=get_type_result__PG2G(slot_msg__CHCI);
      } else {
        __tmp__AKCI=get_type_result__ZH2G(slot_msg__CHCI);
      };
      if ((((void *)__tmp__AKCI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__AKCI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__0GCI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__AKCI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__AKCI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__0GCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
          __tmp__CLCI=((__SLOT_DATA *)slot_msg__CHCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__CLCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__CHCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__CLCI);
        put_position__ECH(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__AHCI=read__IC5G(local__4GCI);
      node__DHCI=new_read__slot__receiver__self__YLQC(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__CHCI,rec__AHCI,rec__AHCI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__DHCI);
      result__3GCI=result_expr__PVDI(node__DHCI);
      __tmp__PLCI=TRUE__;
    } else {
      __tmp__PLCI=FALSE__;
    };
    if ((! __tmp__PLCI)) {
      Self__5EJQ=((__TYPE_FULL *)t__0GCI);
      if (is_cast__to__in__ZD0I(Self__5EJQ,(&__string_87),static_type__PQ1H(Self__ZGCI),((__PROTOTYPE *)prototype__NQRF(Self__5EJQ))->import_list__0FDC)) {
        local__4GCI=create__name__style__type__25JG(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__PQ1H(Self__ZGCI)));
        instr__5GCI=write__value__T5FH(local__4GCI,Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZGCI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__5GCI);
        slot_name__BHCI=get__QEC(last_cast_name__L42H);
        slot_msg__CHCI=get_slot__AP5G(t__0GCI,slot_name__BHCI);
        if (((void *)slot_msg__CHCI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__0GCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__PQ1H(Self__ZGCI),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__BHCI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__0GCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__1GCI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__0GCI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
          __tmp__5MCI=((__SLOT *)((__SLOT_DATA *)slot_msg__CHCI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__5MCI=((__SLOT *)((__SLOT_CODE *)slot_msg__CHCI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__5MCI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
            __tmp__GNCI=((__SLOT_DATA *)slot_msg__CHCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__GNCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__CHCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__GNCI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
          __tmp__MNCI=get_type_result__PG2G(slot_msg__CHCI);
        } else {
          __tmp__MNCI=get_type_result__ZH2G(slot_msg__CHCI);
        };
        if ((((void *)__tmp__MNCI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__MNCI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__0GCI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__MNCI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__MNCI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__0GCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__CHCI)->__id==__SLOT_DATA__) {
            __tmp__OOCI=((__SLOT_DATA *)slot_msg__CHCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__OOCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__CHCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__OOCI);
          put_position__ECH(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__EHCI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__EHCI,create__type__CLQC(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__0GCI));
        add_last__XSEI(args__EHCI,read__IC5G(local__4GCI));
        __tmp__1OCI=Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__2OCI=((void **)((__FAST_ARRAYoEXPRo *)args__EHCI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__2OCI)->__id) {
        case __LIST__: {
          __tmp__3OCI=my_copy__2HYM(__tmp__2OCI);
        } break;
        case __STRING_CST__: {
          Self__GFJQ=((__STRING_CST *)__tmp__2OCI);
          __tmp__3OCI=create__text__AUMH(Self__GFJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GFJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__3OCI=my_copy__2K2H(__tmp__2OCI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__HFJQ=((__PROTOTYPE_CST *)__tmp__2OCI);
          __tmp__3OCI=create__type__CLQC(Self__HFJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HFJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__IFJQ=((__INTEGER_CST *)__tmp__2OCI);
          __tmp__3OCI=create__value__type__DNQC(Self__IFJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IFJQ->value__PAZD,Self__IFJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__3OCI=my_copy__OAFJ(__tmp__2OCI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__3OCI=my_copy__KM2H(__tmp__2OCI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__3OCI=my_copy__DN2H(__tmp__2OCI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__3OCI=my_copy__QN2H(__tmp__2OCI);
        } break;
        case __REAL_CST__: {
          Self__KFJQ=((__REAL_CST *)__tmp__2OCI);
          __tmp__3OCI=create__value__type__1SMH(Self__KFJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KFJQ->value__5N2H,Self__KFJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__MFJQ=((__CHARACTER_CST *)__tmp__2OCI);
          __tmp__3OCI=create__char__WTMH(Self__MFJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MFJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__NFJQ=((__IS_EXPANDED *)__tmp__2OCI);
          __tmp__3OCI=create__receiver__WRWH(Self__NFJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__NFJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__3OCI=my_copy__TO2H(__tmp__2OCI);
        } break;
        case __EXPR_SUP__: {
          __tmp__3OCI=my_copy__2O2H(__tmp__2OCI);
        } break;
        case __EXPR_SUB__: {
          __tmp__3OCI=my_copy__HP2H(__tmp__2OCI);
        } break;
        case __EXPR_MUL__: {
          __tmp__3OCI=my_copy__TP2H(__tmp__2OCI);
        } break;
        case __EXPR_DIV__: {
          __tmp__3OCI=my_copy__4P2H(__tmp__2OCI);
        } break;
        case __EXPR_AND__: {
          __tmp__3OCI=my_copy__JQ2H(__tmp__2OCI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__3OCI=my_copy__UQ2H(__tmp__2OCI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__3OCI=my_copy__5Q2H(__tmp__2OCI);
        } break;
        case __PUT_TO__: {
          __tmp__3OCI=my_copy__KR2H(__tmp__2OCI);
        } break;
        case __ITEM__: {
          __tmp__3OCI=my_copy__1R2H(__tmp__2OCI);
        } break;
        case __SIZE_OF__: {
          __tmp__3OCI=my_copy__HS2H(__tmp__2OCI);
        } break;
        case __CAST__: {
          __tmp__3OCI=my_copy__QS2H(__tmp__2OCI);
        } break;
        case __CALL_SLOT__: {
          __tmp__3OCI=my_copy__PIYM(__tmp__2OCI);
        } break;
        case __READ_SLOT__: {
          __tmp__3OCI=my_copy__AVGK(__tmp__2OCI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__3OCI=my_copy__NVGK(__tmp__2OCI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__3OCI=my_copy__RFCN(__tmp__2OCI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__3OCI=my_copy__JMEO(__tmp__2OCI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__3OCI=my_copy__RTJO(__tmp__2OCI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__3OCI=my_copy__WMEO(__tmp__2OCI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__3OCI=my_copy__3TJO(__tmp__2OCI);
        } break;
        case __EXPR_NEG__: {
          __tmp__3OCI=my_copy__YEJM(__tmp__2OCI);
        } break;
        case __EXPR_ADD__: {
          __tmp__3OCI=my_copy__YRLL(__tmp__2OCI);
        } break;
        case __EXPR_NOT__: {
          __tmp__3OCI=my_copy__GLYM(__tmp__2OCI);
        } break;
        case __EXPR_MOD__: {
          __tmp__3OCI=my_copy__BNEO(__tmp__2OCI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__3OCI=my_copy__M3DP(__tmp__2OCI);
        } break;
        case __EXPR_INF__: {
          __tmp__3OCI=my_copy__PBSN(__tmp__2OCI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__3OCI=my_copy__0BSN(__tmp__2OCI);
        } break;
        case __EXPR_OR__: {
          __tmp__3OCI=my_copy__ZOPN(__tmp__2OCI);
        } break;
        case __EXPR_XOR__: {
          __tmp__3OCI=my_copy__CYSO(__tmp__2OCI);
        } break;
        };
        node__DHCI=new_read__slot__receiver__with__YOWH(__tmp__1OCI,slot_msg__CHCI,__tmp__3OCI,args__EHCI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__DHCI);
        result__3GCI=result_expr__PVDI(node__DHCI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__0GCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__PQ1H(Self__ZGCI),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__1GCI);
        put_position__ECH(Self__ZGCI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__3GCI);
}

static void* check_type__with__WPCI(__SIZE_OF *Self__XPCI,void *t__YPCI,__POSITION p__ZPCI)
// ({SIZE_OF},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__1PCI,*rec__4PCI,*__tmp__0XCI,*__tmp__1XCI;
  void *local__2PCI;
  void *instr__3PCI;
  void *slot_name__5PCI;
  void *slot_msg__AQCI;
  void *node__BQCI;
  __TYPE_FULL *Self__OFJQ,*Self__YFJQ;
  void *__tmp__RSCI,*__tmp__3VCI;
  __POSITION __tmp__YSCI,__tmp__AUCI,__tmp__EWCI,__tmp__MXCI;
  __POSITION __tmp__ZXCI;
  void *__tmp__4SCI,*__tmp__KWCI;
  __STRING_CST *Self__5FJQ;
  __PROTOTYPE_CST *Self__AGJQ;
  __INTEGER_CST *Self__BGJQ;
  __REAL_CST *Self__DGJQ;
  __CHARACTER_CST *Self__FGJQ;
  __IS_EXPANDED *Self__GGJQ;
  void *args__CQCI;
  __BOOLEAN __tmp__NUCI;
  result__1PCI=NULL;
  local__2PCI=NULL;
  instr__3PCI=NULL;
  rec__4PCI=NULL;
  slot_name__5PCI=NULL;
  slot_msg__AQCI=NULL;
  node__BQCI=NULL;
  args__CQCI=NULL;
  if (affect_with__ZCHI(t__YPCI,static_type__1Q1H())) {
    result__1PCI=Self__XPCI;
  } else {
    Self__OFJQ=((__TYPE_FULL *)static_type__1Q1H());
    if (is_cast__to__in__ZD0I(Self__OFJQ,(&__string_86),t__YPCI,((__PROTOTYPE *)prototype__NQRF(Self__OFJQ))->export_list__SFDC)) {
      local__2PCI=create__name__style__type__25JG(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__1Q1H()));
      instr__3PCI=write__value__T5FH(local__2PCI,Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XPCI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__3PCI);
      slot_name__5PCI=get__QEC(last_cast_name__L42H);
      slot_msg__AQCI=get_slot__AP5G(static_type__1Q1H(),slot_name__5PCI);
      if (((void *)slot_msg__AQCI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__1Q1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__YPCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__5PCI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__1Q1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__ZPCI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__1Q1H()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
        __tmp__RSCI=((__SLOT *)((__SLOT_DATA *)slot_msg__AQCI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__RSCI=((__SLOT *)((__SLOT_CODE *)slot_msg__AQCI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__RSCI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
          __tmp__YSCI=((__SLOT_DATA *)slot_msg__AQCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__YSCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__AQCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__YSCI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
        __tmp__4SCI=get_type_result__PG2G(slot_msg__AQCI);
      } else {
        __tmp__4SCI=get_type_result__ZH2G(slot_msg__AQCI);
      };
      if ((((void *)__tmp__4SCI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__4SCI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__YPCI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__4SCI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__4SCI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__YPCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
          __tmp__AUCI=((__SLOT_DATA *)slot_msg__AQCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__AUCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__AQCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__AUCI);
        put_position__ECH(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__4PCI=read__IC5G(local__2PCI);
      node__BQCI=new_read__slot__receiver__self__YLQC(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__AQCI,rec__4PCI,rec__4PCI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__BQCI);
      result__1PCI=result_expr__PVDI(node__BQCI);
      __tmp__NUCI=TRUE__;
    } else {
      __tmp__NUCI=FALSE__;
    };
    if ((! __tmp__NUCI)) {
      Self__YFJQ=((__TYPE_FULL *)t__YPCI);
      if (is_cast__to__in__ZD0I(Self__YFJQ,(&__string_87),static_type__1Q1H(),((__PROTOTYPE *)prototype__NQRF(Self__YFJQ))->import_list__0FDC)) {
        local__2PCI=create__name__style__type__25JG(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__1Q1H()));
        instr__3PCI=write__value__T5FH(local__2PCI,Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XPCI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__3PCI);
        slot_name__5PCI=get__QEC(last_cast_name__L42H);
        slot_msg__AQCI=get_slot__AP5G(t__YPCI,slot_name__5PCI);
        if (((void *)slot_msg__AQCI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__YPCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__1Q1H(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__5PCI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__YPCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__ZPCI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__YPCI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
          __tmp__3VCI=((__SLOT *)((__SLOT_DATA *)slot_msg__AQCI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__3VCI=((__SLOT *)((__SLOT_CODE *)slot_msg__AQCI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__3VCI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
            __tmp__EWCI=((__SLOT_DATA *)slot_msg__AQCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__EWCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__AQCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__EWCI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
          __tmp__KWCI=get_type_result__PG2G(slot_msg__AQCI);
        } else {
          __tmp__KWCI=get_type_result__ZH2G(slot_msg__AQCI);
        };
        if ((((void *)__tmp__KWCI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__KWCI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__YPCI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__KWCI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__KWCI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__YPCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__AQCI)->__id==__SLOT_DATA__) {
            __tmp__MXCI=((__SLOT_DATA *)slot_msg__AQCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__MXCI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__AQCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__MXCI);
          put_position__ECH(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__CQCI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__CQCI,create__type__CLQC(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__YPCI));
        add_last__XSEI(args__CQCI,read__IC5G(local__2PCI));
        __tmp__ZXCI=Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__0XCI=((void **)((__FAST_ARRAYoEXPRo *)args__CQCI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__0XCI)->__id) {
        case __LIST__: {
          __tmp__1XCI=my_copy__2HYM(__tmp__0XCI);
        } break;
        case __STRING_CST__: {
          Self__5FJQ=((__STRING_CST *)__tmp__0XCI);
          __tmp__1XCI=create__text__AUMH(Self__5FJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5FJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__1XCI=my_copy__2K2H(__tmp__0XCI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__AGJQ=((__PROTOTYPE_CST *)__tmp__0XCI);
          __tmp__1XCI=create__type__CLQC(Self__AGJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AGJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__BGJQ=((__INTEGER_CST *)__tmp__0XCI);
          __tmp__1XCI=create__value__type__DNQC(Self__BGJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BGJQ->value__PAZD,Self__BGJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__1XCI=my_copy__OAFJ(__tmp__0XCI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__1XCI=my_copy__KM2H(__tmp__0XCI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__1XCI=my_copy__DN2H(__tmp__0XCI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__1XCI=my_copy__QN2H(__tmp__0XCI);
        } break;
        case __REAL_CST__: {
          Self__DGJQ=((__REAL_CST *)__tmp__0XCI);
          __tmp__1XCI=create__value__type__1SMH(Self__DGJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DGJQ->value__5N2H,Self__DGJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__FGJQ=((__CHARACTER_CST *)__tmp__0XCI);
          __tmp__1XCI=create__char__WTMH(Self__FGJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FGJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__GGJQ=((__IS_EXPANDED *)__tmp__0XCI);
          __tmp__1XCI=create__receiver__WRWH(Self__GGJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GGJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__1XCI=my_copy__TO2H(__tmp__0XCI);
        } break;
        case __EXPR_SUP__: {
          __tmp__1XCI=my_copy__2O2H(__tmp__0XCI);
        } break;
        case __EXPR_SUB__: {
          __tmp__1XCI=my_copy__HP2H(__tmp__0XCI);
        } break;
        case __EXPR_MUL__: {
          __tmp__1XCI=my_copy__TP2H(__tmp__0XCI);
        } break;
        case __EXPR_DIV__: {
          __tmp__1XCI=my_copy__4P2H(__tmp__0XCI);
        } break;
        case __EXPR_AND__: {
          __tmp__1XCI=my_copy__JQ2H(__tmp__0XCI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__1XCI=my_copy__UQ2H(__tmp__0XCI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__1XCI=my_copy__5Q2H(__tmp__0XCI);
        } break;
        case __PUT_TO__: {
          __tmp__1XCI=my_copy__KR2H(__tmp__0XCI);
        } break;
        case __ITEM__: {
          __tmp__1XCI=my_copy__1R2H(__tmp__0XCI);
        } break;
        case __SIZE_OF__: {
          __tmp__1XCI=my_copy__HS2H(__tmp__0XCI);
        } break;
        case __CAST__: {
          __tmp__1XCI=my_copy__QS2H(__tmp__0XCI);
        } break;
        case __CALL_SLOT__: {
          __tmp__1XCI=my_copy__PIYM(__tmp__0XCI);
        } break;
        case __READ_SLOT__: {
          __tmp__1XCI=my_copy__AVGK(__tmp__0XCI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__1XCI=my_copy__NVGK(__tmp__0XCI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__1XCI=my_copy__RFCN(__tmp__0XCI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__1XCI=my_copy__JMEO(__tmp__0XCI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__1XCI=my_copy__RTJO(__tmp__0XCI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__1XCI=my_copy__WMEO(__tmp__0XCI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__1XCI=my_copy__3TJO(__tmp__0XCI);
        } break;
        case __EXPR_NEG__: {
          __tmp__1XCI=my_copy__YEJM(__tmp__0XCI);
        } break;
        case __EXPR_ADD__: {
          __tmp__1XCI=my_copy__YRLL(__tmp__0XCI);
        } break;
        case __EXPR_NOT__: {
          __tmp__1XCI=my_copy__GLYM(__tmp__0XCI);
        } break;
        case __EXPR_MOD__: {
          __tmp__1XCI=my_copy__BNEO(__tmp__0XCI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__1XCI=my_copy__M3DP(__tmp__0XCI);
        } break;
        case __EXPR_INF__: {
          __tmp__1XCI=my_copy__PBSN(__tmp__0XCI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__1XCI=my_copy__0BSN(__tmp__0XCI);
        } break;
        case __EXPR_OR__: {
          __tmp__1XCI=my_copy__ZOPN(__tmp__0XCI);
        } break;
        case __EXPR_XOR__: {
          __tmp__1XCI=my_copy__CYSO(__tmp__0XCI);
        } break;
        };
        node__BQCI=new_read__slot__receiver__with__YOWH(__tmp__ZXCI,slot_msg__AQCI,__tmp__1XCI,args__CQCI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__BQCI);
        result__1PCI=result_expr__PVDI(node__BQCI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__YPCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__1Q1H(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__ZPCI);
        put_position__ECH(Self__XPCI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__1PCI);
}

static void* check_type__with__UYCI(__CAST *Self__VYCI,void *t__WYCI,__POSITION p__XYCI)
// ({CAST},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__ZYCI,*rec__2YCI,*__tmp__YADI,*__tmp__ZADI;
  void *local__0YCI;
  void *instr__1YCI;
  void *slot_name__3YCI;
  void *slot_msg__4YCI;
  void *node__5YCI;
  __TYPE_FULL *Self__HGJQ,*Self__RGJQ;
  void *__tmp__P1CI,*__tmp__14CI;
  __POSITION __tmp__W1CI,__tmp__42CI,__tmp__C5CI,__tmp__KADI;
  __POSITION __tmp__XADI;
  void *__tmp__21CI,*__tmp__I5CI;
  __STRING_CST *Self__YGJQ;
  __PROTOTYPE_CST *Self__ZGJQ;
  __INTEGER_CST *Self__0GJQ;
  __REAL_CST *Self__2GJQ;
  __CHARACTER_CST *Self__4GJQ;
  __IS_EXPANDED *Self__5GJQ;
  void *args__AZCI;
  __BOOLEAN __tmp__L3CI;
  result__ZYCI=NULL;
  local__0YCI=NULL;
  instr__1YCI=NULL;
  rec__2YCI=NULL;
  slot_name__3YCI=NULL;
  slot_msg__4YCI=NULL;
  node__5YCI=NULL;
  args__AZCI=NULL;
  if (affect_with__ZCHI(t__WYCI,Self__VYCI->static_type__SO1H)) {
    result__ZYCI=Self__VYCI;
  } else {
    Self__HGJQ=((__TYPE_FULL *)Self__VYCI->static_type__SO1H);
    if (is_cast__to__in__ZD0I(Self__HGJQ,(&__string_86),t__WYCI,((__PROTOTYPE *)prototype__NQRF(Self__HGJQ))->export_list__SFDC)) {
      local__0YCI=create__name__style__type__25JG(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__VYCI->static_type__SO1H));
      instr__1YCI=write__value__T5FH(local__0YCI,Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VYCI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__1YCI);
      slot_name__3YCI=get__QEC(last_cast_name__L42H);
      slot_msg__4YCI=get_slot__AP5G(Self__VYCI->static_type__SO1H,slot_name__3YCI);
      if (((void *)slot_msg__4YCI == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(Self__VYCI->static_type__SO1H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__WYCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__3YCI);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(Self__VYCI->static_type__SO1H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__XYCI);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(Self__VYCI->static_type__SO1H))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
        __tmp__P1CI=((__SLOT *)((__SLOT_DATA *)slot_msg__4YCI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__P1CI=((__SLOT *)((__SLOT_CODE *)slot_msg__4YCI)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__P1CI) !=  1)) {
        if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
          __tmp__W1CI=((__SLOT_DATA *)slot_msg__4YCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__W1CI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__W1CI);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
        __tmp__21CI=get_type_result__PG2G(slot_msg__4YCI);
      } else {
        __tmp__21CI=get_type_result__ZH2G(slot_msg__4YCI);
      };
      if ((((void *)__tmp__21CI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__21CI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__WYCI)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__21CI != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__21CI,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__WYCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
          __tmp__42CI=((__SLOT_DATA *)slot_msg__4YCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__42CI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__42CI);
        put_position__ECH(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__2YCI=read__IC5G(local__0YCI);
      node__5YCI=new_read__slot__receiver__self__YLQC(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__4YCI,rec__2YCI,rec__2YCI);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__5YCI);
      result__ZYCI=result_expr__PVDI(node__5YCI);
      __tmp__L3CI=TRUE__;
    } else {
      __tmp__L3CI=FALSE__;
    };
    if ((! __tmp__L3CI)) {
      Self__RGJQ=((__TYPE_FULL *)t__WYCI);
      if (is_cast__to__in__ZD0I(Self__RGJQ,(&__string_87),Self__VYCI->static_type__SO1H,((__PROTOTYPE *)prototype__NQRF(Self__RGJQ))->import_list__0FDC)) {
        local__0YCI=create__name__style__type__25JG(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__VYCI->static_type__SO1H));
        instr__1YCI=write__value__T5FH(local__0YCI,Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VYCI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__1YCI);
        slot_name__3YCI=get__QEC(last_cast_name__L42H);
        slot_msg__4YCI=get_slot__AP5G(t__WYCI,slot_name__3YCI);
        if (((void *)slot_msg__4YCI == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__WYCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(Self__VYCI->static_type__SO1H,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__3YCI);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__WYCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__XYCI);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__WYCI))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
          __tmp__14CI=((__SLOT *)((__SLOT_DATA *)slot_msg__4YCI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__14CI=((__SLOT *)((__SLOT_CODE *)slot_msg__4YCI)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__14CI) !=  2)) {
          if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
            __tmp__C5CI=((__SLOT_DATA *)slot_msg__4YCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__C5CI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__C5CI);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
          __tmp__I5CI=get_type_result__PG2G(slot_msg__4YCI);
        } else {
          __tmp__I5CI=get_type_result__ZH2G(slot_msg__4YCI);
        };
        if ((((void *)__tmp__I5CI == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__I5CI)->parent_type__KTL != (void *)((__TYPE_FULL *)t__WYCI)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__I5CI != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__I5CI,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__WYCI,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__4YCI)->__id==__SLOT_DATA__) {
            __tmp__KADI=((__SLOT_DATA *)slot_msg__4YCI)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__KADI=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YCI)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__KADI);
          put_position__ECH(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__AZCI=create_with_capacity__3THH( 2);
        add_last__XSEI(args__AZCI,create__type__CLQC(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__WYCI));
        add_last__XSEI(args__AZCI,read__IC5G(local__0YCI));
        __tmp__XADI=Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__YADI=((void **)((__FAST_ARRAYoEXPRo *)args__AZCI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__YADI)->__id) {
        case __LIST__: {
          __tmp__ZADI=my_copy__2HYM(__tmp__YADI);
        } break;
        case __STRING_CST__: {
          Self__YGJQ=((__STRING_CST *)__tmp__YADI);
          __tmp__ZADI=create__text__AUMH(Self__YGJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YGJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZADI=my_copy__2K2H(__tmp__YADI);
        } break;
        case __PROTOTYPE_CST__: {
          Self__ZGJQ=((__PROTOTYPE_CST *)__tmp__YADI);
          __tmp__ZADI=create__type__CLQC(Self__ZGJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZGJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__0GJQ=((__INTEGER_CST *)__tmp__YADI);
          __tmp__ZADI=create__value__type__DNQC(Self__0GJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0GJQ->value__PAZD,Self__0GJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__ZADI=my_copy__OAFJ(__tmp__YADI);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZADI=my_copy__KM2H(__tmp__YADI);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZADI=my_copy__DN2H(__tmp__YADI);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZADI=my_copy__QN2H(__tmp__YADI);
        } break;
        case __REAL_CST__: {
          Self__2GJQ=((__REAL_CST *)__tmp__YADI);
          __tmp__ZADI=create__value__type__1SMH(Self__2GJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2GJQ->value__5N2H,Self__2GJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__4GJQ=((__CHARACTER_CST *)__tmp__YADI);
          __tmp__ZADI=create__char__WTMH(Self__4GJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4GJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__5GJQ=((__IS_EXPANDED *)__tmp__YADI);
          __tmp__ZADI=create__receiver__WRWH(Self__5GJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__5GJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZADI=my_copy__TO2H(__tmp__YADI);
        } break;
        case __EXPR_SUP__: {
          __tmp__ZADI=my_copy__2O2H(__tmp__YADI);
        } break;
        case __EXPR_SUB__: {
          __tmp__ZADI=my_copy__HP2H(__tmp__YADI);
        } break;
        case __EXPR_MUL__: {
          __tmp__ZADI=my_copy__TP2H(__tmp__YADI);
        } break;
        case __EXPR_DIV__: {
          __tmp__ZADI=my_copy__4P2H(__tmp__YADI);
        } break;
        case __EXPR_AND__: {
          __tmp__ZADI=my_copy__JQ2H(__tmp__YADI);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZADI=my_copy__UQ2H(__tmp__YADI);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZADI=my_copy__5Q2H(__tmp__YADI);
        } break;
        case __PUT_TO__: {
          __tmp__ZADI=my_copy__KR2H(__tmp__YADI);
        } break;
        case __ITEM__: {
          __tmp__ZADI=my_copy__1R2H(__tmp__YADI);
        } break;
        case __SIZE_OF__: {
          __tmp__ZADI=my_copy__HS2H(__tmp__YADI);
        } break;
        case __CAST__: {
          __tmp__ZADI=my_copy__QS2H(__tmp__YADI);
        } break;
        case __CALL_SLOT__: {
          __tmp__ZADI=my_copy__PIYM(__tmp__YADI);
        } break;
        case __READ_SLOT__: {
          __tmp__ZADI=my_copy__AVGK(__tmp__YADI);
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZADI=my_copy__NVGK(__tmp__YADI);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZADI=my_copy__RFCN(__tmp__YADI);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZADI=my_copy__JMEO(__tmp__YADI);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZADI=my_copy__RTJO(__tmp__YADI);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZADI=my_copy__WMEO(__tmp__YADI);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZADI=my_copy__3TJO(__tmp__YADI);
        } break;
        case __EXPR_NEG__: {
          __tmp__ZADI=my_copy__YEJM(__tmp__YADI);
        } break;
        case __EXPR_ADD__: {
          __tmp__ZADI=my_copy__YRLL(__tmp__YADI);
        } break;
        case __EXPR_NOT__: {
          __tmp__ZADI=my_copy__GLYM(__tmp__YADI);
        } break;
        case __EXPR_MOD__: {
          __tmp__ZADI=my_copy__BNEO(__tmp__YADI);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZADI=my_copy__M3DP(__tmp__YADI);
        } break;
        case __EXPR_INF__: {
          __tmp__ZADI=my_copy__PBSN(__tmp__YADI);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZADI=my_copy__0BSN(__tmp__YADI);
        } break;
        case __EXPR_OR__: {
          __tmp__ZADI=my_copy__ZOPN(__tmp__YADI);
        } break;
        case __EXPR_XOR__: {
          __tmp__ZADI=my_copy__CYSO(__tmp__YADI);
        } break;
        };
        node__5YCI=new_read__slot__receiver__with__YOWH(__tmp__XADI,slot_msg__4YCI,__tmp__ZADI,args__AZCI);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__5YCI);
        result__ZYCI=result_expr__PVDI(node__5YCI);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__WYCI,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(Self__VYCI->static_type__SO1H,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__XYCI);
        put_position__ECH(Self__VYCI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__ZYCI);
}

static void* check_type__with__RIDN(__CALL_SLOT *Self__SIDN,void *t__TIDN,__POSITION p__UIDN)
// ({CALL_SLOT},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__WIDN,*rec__ZIDN,*__tmp__VQDN,*__tmp__WQDN;
  void *local__XIDN;
  void *instr__YIDN;
  void *slot_name__0IDN;
  void *slot_msg__1IDN;
  void *node__2IDN;
  __TYPE_FULL *Self__AHJQ,*Self__KHJQ;
  void *__tmp__MLDN,*__tmp__YODN;
  __POSITION __tmp__TLDN,__tmp__1MDN,__tmp__5ODN,__tmp__HQDN;
  __POSITION __tmp__UQDN;
  void *__tmp__ZLDN,*__tmp__FPDN;
  __STRING_CST *Self__RHJQ;
  __PROTOTYPE_CST *Self__SHJQ;
  __INTEGER_CST *Self__THJQ;
  __REAL_CST *Self__VHJQ;
  __CHARACTER_CST *Self__XHJQ;
  __IS_EXPANDED *Self__YHJQ;
  void *args__3IDN;
  __BOOLEAN __tmp__INDN;
  result__WIDN=NULL;
  local__XIDN=NULL;
  instr__YIDN=NULL;
  rec__ZIDN=NULL;
  slot_name__0IDN=NULL;
  slot_msg__1IDN=NULL;
  node__2IDN=NULL;
  args__3IDN=NULL;
  if (affect_with__ZCHI(t__TIDN,static_type__GIKL(Self__SIDN))) {
    result__WIDN=Self__SIDN;
  } else {
    Self__AHJQ=((__TYPE_FULL *)static_type__GIKL(Self__SIDN));
    if (is_cast__to__in__ZD0I(Self__AHJQ,(&__string_86),t__TIDN,((__PROTOTYPE *)prototype__NQRF(Self__AHJQ))->export_list__SFDC)) {
      local__XIDN=create__name__style__type__25JG(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIKL(Self__SIDN)));
      instr__YIDN=write__value__T5FH(local__XIDN,Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SIDN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__YIDN);
      slot_name__0IDN=get__QEC(last_cast_name__L42H);
      slot_msg__1IDN=get_slot__AP5G(static_type__GIKL(Self__SIDN),slot_name__0IDN);
      if (((void *)slot_msg__1IDN == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__GIKL(Self__SIDN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__TIDN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__0IDN);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__GIKL(Self__SIDN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__UIDN);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__GIKL(Self__SIDN)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
        __tmp__MLDN=((__SLOT *)((__SLOT_DATA *)slot_msg__1IDN)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__MLDN=((__SLOT *)((__SLOT_CODE *)slot_msg__1IDN)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__MLDN) !=  1)) {
        if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
          __tmp__TLDN=((__SLOT_DATA *)slot_msg__1IDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__TLDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__1IDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__TLDN);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
        __tmp__ZLDN=get_type_result__PG2G(slot_msg__1IDN);
      } else {
        __tmp__ZLDN=get_type_result__ZH2G(slot_msg__1IDN);
      };
      if ((((void *)__tmp__ZLDN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__ZLDN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__TIDN)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__ZLDN != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__ZLDN,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__TIDN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
          __tmp__1MDN=((__SLOT_DATA *)slot_msg__1IDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__1MDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__1IDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__1MDN);
        put_position__ECH(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__ZIDN=read__IC5G(local__XIDN);
      node__2IDN=new_read__slot__receiver__self__YLQC(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__1IDN,rec__ZIDN,rec__ZIDN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__2IDN);
      result__WIDN=result_expr__PVDI(node__2IDN);
      __tmp__INDN=TRUE__;
    } else {
      __tmp__INDN=FALSE__;
    };
    if ((! __tmp__INDN)) {
      Self__KHJQ=((__TYPE_FULL *)t__TIDN);
      if (is_cast__to__in__ZD0I(Self__KHJQ,(&__string_87),static_type__GIKL(Self__SIDN),((__PROTOTYPE *)prototype__NQRF(Self__KHJQ))->import_list__0FDC)) {
        local__XIDN=create__name__style__type__25JG(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIKL(Self__SIDN)));
        instr__YIDN=write__value__T5FH(local__XIDN,Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SIDN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__YIDN);
        slot_name__0IDN=get__QEC(last_cast_name__L42H);
        slot_msg__1IDN=get_slot__AP5G(t__TIDN,slot_name__0IDN);
        if (((void *)slot_msg__1IDN == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__TIDN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__GIKL(Self__SIDN),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__0IDN);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__TIDN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__UIDN);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__TIDN))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
          __tmp__YODN=((__SLOT *)((__SLOT_DATA *)slot_msg__1IDN)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__YODN=((__SLOT *)((__SLOT_CODE *)slot_msg__1IDN)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__YODN) !=  2)) {
          if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
            __tmp__5ODN=((__SLOT_DATA *)slot_msg__1IDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__5ODN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__1IDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__5ODN);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
          __tmp__FPDN=get_type_result__PG2G(slot_msg__1IDN);
        } else {
          __tmp__FPDN=get_type_result__ZH2G(slot_msg__1IDN);
        };
        if ((((void *)__tmp__FPDN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__FPDN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__TIDN)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__FPDN != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__FPDN,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__TIDN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__1IDN)->__id==__SLOT_DATA__) {
            __tmp__HQDN=((__SLOT_DATA *)slot_msg__1IDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__HQDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__1IDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__HQDN);
          put_position__ECH(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__3IDN=create_with_capacity__3THH( 2);
        add_last__XSEI(args__3IDN,create__type__CLQC(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,t__TIDN));
        add_last__XSEI(args__3IDN,read__IC5G(local__XIDN));
        __tmp__UQDN=Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__VQDN=((void **)((__FAST_ARRAYoEXPRo *)args__3IDN)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__VQDN)->__id) {
        case __LIST__: {
          __tmp__WQDN=my_copy__2HYM(__tmp__VQDN);
        } break;
        case __STRING_CST__: {
          Self__RHJQ=((__STRING_CST *)__tmp__VQDN);
          __tmp__WQDN=create__text__AUMH(Self__RHJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RHJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__WQDN=my_copy__2K2H(__tmp__VQDN);
        } break;
        case __PROTOTYPE_CST__: {
          Self__SHJQ=((__PROTOTYPE_CST *)__tmp__VQDN);
          __tmp__WQDN=create__type__CLQC(Self__SHJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SHJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__THJQ=((__INTEGER_CST *)__tmp__VQDN);
          __tmp__WQDN=create__value__type__DNQC(Self__THJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__THJQ->value__PAZD,Self__THJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__WQDN=my_copy__OAFJ(__tmp__VQDN);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__WQDN=my_copy__KM2H(__tmp__VQDN);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__WQDN=my_copy__DN2H(__tmp__VQDN);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__WQDN=my_copy__QN2H(__tmp__VQDN);
        } break;
        case __REAL_CST__: {
          Self__VHJQ=((__REAL_CST *)__tmp__VQDN);
          __tmp__WQDN=create__value__type__1SMH(Self__VHJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VHJQ->value__5N2H,Self__VHJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__XHJQ=((__CHARACTER_CST *)__tmp__VQDN);
          __tmp__WQDN=create__char__WTMH(Self__XHJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XHJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__YHJQ=((__IS_EXPANDED *)__tmp__VQDN);
          __tmp__WQDN=create__receiver__WRWH(Self__YHJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__YHJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__WQDN=my_copy__TO2H(__tmp__VQDN);
        } break;
        case __EXPR_SUP__: {
          __tmp__WQDN=my_copy__2O2H(__tmp__VQDN);
        } break;
        case __EXPR_SUB__: {
          __tmp__WQDN=my_copy__HP2H(__tmp__VQDN);
        } break;
        case __EXPR_MUL__: {
          __tmp__WQDN=my_copy__TP2H(__tmp__VQDN);
        } break;
        case __EXPR_DIV__: {
          __tmp__WQDN=my_copy__4P2H(__tmp__VQDN);
        } break;
        case __EXPR_AND__: {
          __tmp__WQDN=my_copy__JQ2H(__tmp__VQDN);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__WQDN=my_copy__UQ2H(__tmp__VQDN);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__WQDN=my_copy__5Q2H(__tmp__VQDN);
        } break;
        case __PUT_TO__: {
          __tmp__WQDN=my_copy__KR2H(__tmp__VQDN);
        } break;
        case __ITEM__: {
          __tmp__WQDN=my_copy__1R2H(__tmp__VQDN);
        } break;
        case __SIZE_OF__: {
          __tmp__WQDN=my_copy__HS2H(__tmp__VQDN);
        } break;
        case __CAST__: {
          __tmp__WQDN=my_copy__QS2H(__tmp__VQDN);
        } break;
        case __CALL_SLOT__: {
          __tmp__WQDN=my_copy__PIYM(__tmp__VQDN);
        } break;
        case __READ_SLOT__: {
          __tmp__WQDN=my_copy__AVGK(__tmp__VQDN);
        } break;
        case __READ_GLOBAL__: {
          __tmp__WQDN=my_copy__NVGK(__tmp__VQDN);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__WQDN=my_copy__RFCN(__tmp__VQDN);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__WQDN=my_copy__JMEO(__tmp__VQDN);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__WQDN=my_copy__RTJO(__tmp__VQDN);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__WQDN=my_copy__WMEO(__tmp__VQDN);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__WQDN=my_copy__3TJO(__tmp__VQDN);
        } break;
        case __EXPR_NEG__: {
          __tmp__WQDN=my_copy__YEJM(__tmp__VQDN);
        } break;
        case __EXPR_ADD__: {
          __tmp__WQDN=my_copy__YRLL(__tmp__VQDN);
        } break;
        case __EXPR_NOT__: {
          __tmp__WQDN=my_copy__GLYM(__tmp__VQDN);
        } break;
        case __EXPR_MOD__: {
          __tmp__WQDN=my_copy__BNEO(__tmp__VQDN);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__WQDN=my_copy__M3DP(__tmp__VQDN);
        } break;
        case __EXPR_INF__: {
          __tmp__WQDN=my_copy__PBSN(__tmp__VQDN);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__WQDN=my_copy__0BSN(__tmp__VQDN);
        } break;
        case __EXPR_OR__: {
          __tmp__WQDN=my_copy__ZOPN(__tmp__VQDN);
        } break;
        case __EXPR_XOR__: {
          __tmp__WQDN=my_copy__CYSO(__tmp__VQDN);
        } break;
        };
        node__2IDN=new_read__slot__receiver__with__YOWH(__tmp__UQDN,slot_msg__1IDN,__tmp__WQDN,args__3IDN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__2IDN);
        result__WIDN=result_expr__PVDI(node__2IDN);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__TIDN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__GIKL(Self__SIDN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__UIDN);
        put_position__ECH(Self__SIDN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__WIDN);
}

static void* check_type__with__VPKL(__READ_SLOT *Self__WPKL,void *t__XPKL,__POSITION p__YPKL)
// ({READ_SLOT},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__0PKL,*rec__3PKL,*__tmp__ZXKL,*__tmp__0XKL;
  void *local__1PKL;
  void *instr__2PKL;
  void *slot_name__4PKL;
  void *slot_msg__5PKL;
  void *node__AQKL;
  __TYPE_FULL *Self__ZHJQ,*Self__DIJQ;
  void *__tmp__QSKL,*__tmp__2VKL;
  __POSITION __tmp__XSKL,__tmp__5TKL,__tmp__DWKL,__tmp__LXKL;
  __POSITION __tmp__YXKL;
  void *__tmp__3SKL,*__tmp__JWKL;
  __STRING_CST *Self__KIJQ;
  __PROTOTYPE_CST *Self__LIJQ;
  __INTEGER_CST *Self__MIJQ;
  __REAL_CST *Self__OIJQ;
  __CHARACTER_CST *Self__QIJQ;
  __IS_EXPANDED *Self__RIJQ;
  void *args__BQKL;
  __BOOLEAN __tmp__MUKL;
  result__0PKL=NULL;
  local__1PKL=NULL;
  instr__2PKL=NULL;
  rec__3PKL=NULL;
  slot_name__4PKL=NULL;
  slot_msg__5PKL=NULL;
  node__AQKL=NULL;
  args__BQKL=NULL;
  if (affect_with__ZCHI(t__XPKL,((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F)) {
    result__0PKL=Self__WPKL;
  } else {
    Self__ZHJQ=((__TYPE_FULL *)((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F);
    if (is_cast__to__in__ZD0I(Self__ZHJQ,(&__string_86),t__XPKL,((__PROTOTYPE *)prototype__NQRF(Self__ZHJQ))->export_list__SFDC)) {
      local__1PKL=create__name__style__type__25JG(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F));
      instr__2PKL=write__value__T5FH(local__1PKL,Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WPKL);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__2PKL);
      slot_name__4PKL=get__QEC(last_cast_name__L42H);
      slot_msg__5PKL=get_slot__AP5G(((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F,slot_name__4PKL);
      if (((void *)slot_msg__5PKL == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__XPKL,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__4PKL);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__YPKL);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
        __tmp__QSKL=((__SLOT *)((__SLOT_DATA *)slot_msg__5PKL)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__QSKL=((__SLOT *)((__SLOT_CODE *)slot_msg__5PKL)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__QSKL) !=  1)) {
        if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
          __tmp__XSKL=((__SLOT_DATA *)slot_msg__5PKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__XSKL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__5PKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__XSKL);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
        __tmp__3SKL=get_type_result__PG2G(slot_msg__5PKL);
      } else {
        __tmp__3SKL=get_type_result__ZH2G(slot_msg__5PKL);
      };
      if ((((void *)__tmp__3SKL == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__3SKL)->parent_type__KTL != (void *)((__TYPE_FULL *)t__XPKL)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__3SKL != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__3SKL,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__XPKL,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
          __tmp__5TKL=((__SLOT_DATA *)slot_msg__5PKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__5TKL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__5PKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__5TKL);
        put_position__ECH(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__3PKL=read__IC5G(local__1PKL);
      node__AQKL=new_read__slot__receiver__self__YLQC(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__5PKL,rec__3PKL,rec__3PKL);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__AQKL);
      result__0PKL=result_expr__PVDI(node__AQKL);
      __tmp__MUKL=TRUE__;
    } else {
      __tmp__MUKL=FALSE__;
    };
    if ((! __tmp__MUKL)) {
      Self__DIJQ=((__TYPE_FULL *)t__XPKL);
      if (is_cast__to__in__ZD0I(Self__DIJQ,(&__string_87),((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F,((__PROTOTYPE *)prototype__NQRF(Self__DIJQ))->import_list__0FDC)) {
        local__1PKL=create__name__style__type__25JG(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F));
        instr__2PKL=write__value__T5FH(local__1PKL,Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WPKL);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__2PKL);
        slot_name__4PKL=get__QEC(last_cast_name__L42H);
        slot_msg__5PKL=get_slot__AP5G(t__XPKL,slot_name__4PKL);
        if (((void *)slot_msg__5PKL == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__XPKL,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__4PKL);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__XPKL,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__YPKL);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__XPKL))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
          __tmp__2VKL=((__SLOT *)((__SLOT_DATA *)slot_msg__5PKL)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__2VKL=((__SLOT *)((__SLOT_CODE *)slot_msg__5PKL)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__2VKL) !=  2)) {
          if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
            __tmp__DWKL=((__SLOT_DATA *)slot_msg__5PKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__DWKL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__5PKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__DWKL);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
          __tmp__JWKL=get_type_result__PG2G(slot_msg__5PKL);
        } else {
          __tmp__JWKL=get_type_result__ZH2G(slot_msg__5PKL);
        };
        if ((((void *)__tmp__JWKL == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__JWKL)->parent_type__KTL != (void *)((__TYPE_FULL *)t__XPKL)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__JWKL != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__JWKL,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__XPKL,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__5PKL)->__id==__SLOT_DATA__) {
            __tmp__LXKL=((__SLOT_DATA *)slot_msg__5PKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__LXKL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__5PKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__LXKL);
          put_position__ECH(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__BQKL=create_with_capacity__3THH( 2);
        add_last__XSEI(args__BQKL,create__type__CLQC(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,t__XPKL));
        add_last__XSEI(args__BQKL,read__IC5G(local__1PKL));
        __tmp__YXKL=Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__ZXKL=((void **)((__FAST_ARRAYoEXPRo *)args__BQKL)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__ZXKL)->__id) {
        case __LIST__: {
          __tmp__0XKL=my_copy__2HYM(__tmp__ZXKL);
        } break;
        case __STRING_CST__: {
          Self__KIJQ=((__STRING_CST *)__tmp__ZXKL);
          __tmp__0XKL=create__text__AUMH(Self__KIJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KIJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__0XKL=my_copy__2K2H(__tmp__ZXKL);
        } break;
        case __PROTOTYPE_CST__: {
          Self__LIJQ=((__PROTOTYPE_CST *)__tmp__ZXKL);
          __tmp__0XKL=create__type__CLQC(Self__LIJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LIJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__MIJQ=((__INTEGER_CST *)__tmp__ZXKL);
          __tmp__0XKL=create__value__type__DNQC(Self__MIJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MIJQ->value__PAZD,Self__MIJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__0XKL=my_copy__OAFJ(__tmp__ZXKL);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__0XKL=my_copy__KM2H(__tmp__ZXKL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__0XKL=my_copy__DN2H(__tmp__ZXKL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__0XKL=my_copy__QN2H(__tmp__ZXKL);
        } break;
        case __REAL_CST__: {
          Self__OIJQ=((__REAL_CST *)__tmp__ZXKL);
          __tmp__0XKL=create__value__type__1SMH(Self__OIJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OIJQ->value__5N2H,Self__OIJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__QIJQ=((__CHARACTER_CST *)__tmp__ZXKL);
          __tmp__0XKL=create__char__WTMH(Self__QIJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QIJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__RIJQ=((__IS_EXPANDED *)__tmp__ZXKL);
          __tmp__0XKL=create__receiver__WRWH(Self__RIJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__RIJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__0XKL=my_copy__TO2H(__tmp__ZXKL);
        } break;
        case __EXPR_SUP__: {
          __tmp__0XKL=my_copy__2O2H(__tmp__ZXKL);
        } break;
        case __EXPR_SUB__: {
          __tmp__0XKL=my_copy__HP2H(__tmp__ZXKL);
        } break;
        case __EXPR_MUL__: {
          __tmp__0XKL=my_copy__TP2H(__tmp__ZXKL);
        } break;
        case __EXPR_DIV__: {
          __tmp__0XKL=my_copy__4P2H(__tmp__ZXKL);
        } break;
        case __EXPR_AND__: {
          __tmp__0XKL=my_copy__JQ2H(__tmp__ZXKL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__0XKL=my_copy__UQ2H(__tmp__ZXKL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__0XKL=my_copy__5Q2H(__tmp__ZXKL);
        } break;
        case __PUT_TO__: {
          __tmp__0XKL=my_copy__KR2H(__tmp__ZXKL);
        } break;
        case __ITEM__: {
          __tmp__0XKL=my_copy__1R2H(__tmp__ZXKL);
        } break;
        case __SIZE_OF__: {
          __tmp__0XKL=my_copy__HS2H(__tmp__ZXKL);
        } break;
        case __CAST__: {
          __tmp__0XKL=my_copy__QS2H(__tmp__ZXKL);
        } break;
        case __CALL_SLOT__: {
          __tmp__0XKL=my_copy__PIYM(__tmp__ZXKL);
        } break;
        case __READ_SLOT__: {
          __tmp__0XKL=my_copy__AVGK(__tmp__ZXKL);
        } break;
        case __READ_GLOBAL__: {
          __tmp__0XKL=my_copy__NVGK(__tmp__ZXKL);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__0XKL=my_copy__RFCN(__tmp__ZXKL);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__0XKL=my_copy__JMEO(__tmp__ZXKL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__0XKL=my_copy__RTJO(__tmp__ZXKL);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__0XKL=my_copy__WMEO(__tmp__ZXKL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__0XKL=my_copy__3TJO(__tmp__ZXKL);
        } break;
        case __EXPR_NEG__: {
          __tmp__0XKL=my_copy__YEJM(__tmp__ZXKL);
        } break;
        case __EXPR_ADD__: {
          __tmp__0XKL=my_copy__YRLL(__tmp__ZXKL);
        } break;
        case __EXPR_NOT__: {
          __tmp__0XKL=my_copy__GLYM(__tmp__ZXKL);
        } break;
        case __EXPR_MOD__: {
          __tmp__0XKL=my_copy__BNEO(__tmp__ZXKL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__0XKL=my_copy__M3DP(__tmp__ZXKL);
        } break;
        case __EXPR_INF__: {
          __tmp__0XKL=my_copy__PBSN(__tmp__ZXKL);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__0XKL=my_copy__0BSN(__tmp__ZXKL);
        } break;
        case __EXPR_OR__: {
          __tmp__0XKL=my_copy__ZOPN(__tmp__ZXKL);
        } break;
        case __EXPR_XOR__: {
          __tmp__0XKL=my_copy__CYSO(__tmp__ZXKL);
        } break;
        };
        node__AQKL=new_read__slot__receiver__with__YOWH(__tmp__YXKL,slot_msg__5PKL,__tmp__0XKL,args__BQKL);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__AQKL);
        result__0PKL=result_expr__PVDI(node__AQKL);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__XPKL,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(((__SLOT_DATA *)Self__WPKL->slot__EVGK)->parent_variable__AJZD.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__YPKL);
        put_position__ECH(Self__WPKL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__0PKL);
}

static void* check_type__with__UYKL(__READ_GLOBAL *Self__VYKL,void *t__WYKL,__POSITION p__XYKL)
// ({READ_GLOBAL},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__ZYKL,*rec__2YKL,*__tmp__YALL,*__tmp__ZALL;
  void *local__0YKL;
  void *instr__1YKL;
  void *slot_name__3YKL;
  void *slot_msg__4YKL;
  void *node__5YKL;
  __TYPE_FULL *Self__SIJQ,*Self__2IJQ;
  void *__tmp__P1KL,*__tmp__14KL;
  __POSITION __tmp__W1KL,__tmp__42KL,__tmp__C5KL,__tmp__KALL;
  __POSITION __tmp__XALL;
  void *__tmp__21KL,*__tmp__I5KL;
  __STRING_CST *Self__DJJQ;
  __PROTOTYPE_CST *Self__EJJQ;
  __INTEGER_CST *Self__FJJQ;
  __REAL_CST *Self__HJJQ;
  __CHARACTER_CST *Self__JJJQ;
  __IS_EXPANDED *Self__KJJQ;
  void *args__AZKL;
  __BOOLEAN __tmp__L3KL;
  result__ZYKL=NULL;
  local__0YKL=NULL;
  instr__1YKL=NULL;
  rec__2YKL=NULL;
  slot_name__3YKL=NULL;
  slot_msg__4YKL=NULL;
  node__5YKL=NULL;
  args__AZKL=NULL;
  if (affect_with__ZCHI(t__WYKL,((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F)) {
    result__ZYKL=Self__VYKL;
  } else {
    Self__SIJQ=((__TYPE_FULL *)((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F);
    if (is_cast__to__in__ZD0I(Self__SIJQ,(&__string_86),t__WYKL,((__PROTOTYPE *)prototype__NQRF(Self__SIJQ))->export_list__SFDC)) {
      local__0YKL=create__name__style__type__25JG(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F));
      instr__1YKL=write__value__T5FH(local__0YKL,Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VYKL);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__1YKL);
      slot_name__3YKL=get__QEC(last_cast_name__L42H);
      slot_msg__4YKL=get_slot__AP5G(((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F,slot_name__3YKL);
      if (((void *)slot_msg__4YKL == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__WYKL,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__3YKL);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__XYKL);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
        __tmp__P1KL=((__SLOT *)((__SLOT_DATA *)slot_msg__4YKL)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__P1KL=((__SLOT *)((__SLOT_CODE *)slot_msg__4YKL)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__P1KL) !=  1)) {
        if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
          __tmp__W1KL=((__SLOT_DATA *)slot_msg__4YKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__W1KL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__W1KL);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
        __tmp__21KL=get_type_result__PG2G(slot_msg__4YKL);
      } else {
        __tmp__21KL=get_type_result__ZH2G(slot_msg__4YKL);
      };
      if ((((void *)__tmp__21KL == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__21KL)->parent_type__KTL != (void *)((__TYPE_FULL *)t__WYKL)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__21KL != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__21KL,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__WYKL,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
          __tmp__42KL=((__SLOT_DATA *)slot_msg__4YKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__42KL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__42KL);
        put_position__ECH(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__2YKL=read__IC5G(local__0YKL);
      node__5YKL=new_read__slot__receiver__self__YLQC(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__4YKL,rec__2YKL,rec__2YKL);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__5YKL);
      result__ZYKL=result_expr__PVDI(node__5YKL);
      __tmp__L3KL=TRUE__;
    } else {
      __tmp__L3KL=FALSE__;
    };
    if ((! __tmp__L3KL)) {
      Self__2IJQ=((__TYPE_FULL *)t__WYKL);
      if (is_cast__to__in__ZD0I(Self__2IJQ,(&__string_87),((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F,((__PROTOTYPE *)prototype__NQRF(Self__2IJQ))->import_list__0FDC)) {
        local__0YKL=create__name__style__type__25JG(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F));
        instr__1YKL=write__value__T5FH(local__0YKL,Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VYKL);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__1YKL);
        slot_name__3YKL=get__QEC(last_cast_name__L42H);
        slot_msg__4YKL=get_slot__AP5G(t__WYKL,slot_name__3YKL);
        if (((void *)slot_msg__4YKL == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__WYKL,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__3YKL);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__WYKL,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__XYKL);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__WYKL))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
          __tmp__14KL=((__SLOT *)((__SLOT_DATA *)slot_msg__4YKL)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__14KL=((__SLOT *)((__SLOT_CODE *)slot_msg__4YKL)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__14KL) !=  2)) {
          if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
            __tmp__C5KL=((__SLOT_DATA *)slot_msg__4YKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__C5KL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__C5KL);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
          __tmp__I5KL=get_type_result__PG2G(slot_msg__4YKL);
        } else {
          __tmp__I5KL=get_type_result__ZH2G(slot_msg__4YKL);
        };
        if ((((void *)__tmp__I5KL == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__I5KL)->parent_type__KTL != (void *)((__TYPE_FULL *)t__WYKL)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__I5KL != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__I5KL,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__WYKL,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__4YKL)->__id==__SLOT_DATA__) {
            __tmp__KALL=((__SLOT_DATA *)slot_msg__4YKL)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__KALL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__4YKL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__KALL);
          put_position__ECH(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__AZKL=create_with_capacity__3THH( 2);
        add_last__XSEI(args__AZKL,create__type__CLQC(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,t__WYKL));
        add_last__XSEI(args__AZKL,read__IC5G(local__0YKL));
        __tmp__XALL=Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__YALL=((void **)((__FAST_ARRAYoEXPRo *)args__AZKL)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__YALL)->__id) {
        case __LIST__: {
          __tmp__ZALL=my_copy__2HYM(__tmp__YALL);
        } break;
        case __STRING_CST__: {
          Self__DJJQ=((__STRING_CST *)__tmp__YALL);
          __tmp__ZALL=create__text__AUMH(Self__DJJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DJJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZALL=my_copy__2K2H(__tmp__YALL);
        } break;
        case __PROTOTYPE_CST__: {
          Self__EJJQ=((__PROTOTYPE_CST *)__tmp__YALL);
          __tmp__ZALL=create__type__CLQC(Self__EJJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EJJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__FJJQ=((__INTEGER_CST *)__tmp__YALL);
          __tmp__ZALL=create__value__type__DNQC(Self__FJJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FJJQ->value__PAZD,Self__FJJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__ZALL=my_copy__OAFJ(__tmp__YALL);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZALL=my_copy__KM2H(__tmp__YALL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZALL=my_copy__DN2H(__tmp__YALL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZALL=my_copy__QN2H(__tmp__YALL);
        } break;
        case __REAL_CST__: {
          Self__HJJQ=((__REAL_CST *)__tmp__YALL);
          __tmp__ZALL=create__value__type__1SMH(Self__HJJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HJJQ->value__5N2H,Self__HJJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__JJJQ=((__CHARACTER_CST *)__tmp__YALL);
          __tmp__ZALL=create__char__WTMH(Self__JJJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JJJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__KJJQ=((__IS_EXPANDED *)__tmp__YALL);
          __tmp__ZALL=create__receiver__WRWH(Self__KJJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__KJJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZALL=my_copy__TO2H(__tmp__YALL);
        } break;
        case __EXPR_SUP__: {
          __tmp__ZALL=my_copy__2O2H(__tmp__YALL);
        } break;
        case __EXPR_SUB__: {
          __tmp__ZALL=my_copy__HP2H(__tmp__YALL);
        } break;
        case __EXPR_MUL__: {
          __tmp__ZALL=my_copy__TP2H(__tmp__YALL);
        } break;
        case __EXPR_DIV__: {
          __tmp__ZALL=my_copy__4P2H(__tmp__YALL);
        } break;
        case __EXPR_AND__: {
          __tmp__ZALL=my_copy__JQ2H(__tmp__YALL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZALL=my_copy__UQ2H(__tmp__YALL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZALL=my_copy__5Q2H(__tmp__YALL);
        } break;
        case __PUT_TO__: {
          __tmp__ZALL=my_copy__KR2H(__tmp__YALL);
        } break;
        case __ITEM__: {
          __tmp__ZALL=my_copy__1R2H(__tmp__YALL);
        } break;
        case __SIZE_OF__: {
          __tmp__ZALL=my_copy__HS2H(__tmp__YALL);
        } break;
        case __CAST__: {
          __tmp__ZALL=my_copy__QS2H(__tmp__YALL);
        } break;
        case __CALL_SLOT__: {
          __tmp__ZALL=my_copy__PIYM(__tmp__YALL);
        } break;
        case __READ_SLOT__: {
          __tmp__ZALL=my_copy__AVGK(__tmp__YALL);
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZALL=my_copy__NVGK(__tmp__YALL);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZALL=my_copy__RFCN(__tmp__YALL);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZALL=my_copy__JMEO(__tmp__YALL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZALL=my_copy__RTJO(__tmp__YALL);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZALL=my_copy__WMEO(__tmp__YALL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZALL=my_copy__3TJO(__tmp__YALL);
        } break;
        case __EXPR_NEG__: {
          __tmp__ZALL=my_copy__YEJM(__tmp__YALL);
        } break;
        case __EXPR_ADD__: {
          __tmp__ZALL=my_copy__YRLL(__tmp__YALL);
        } break;
        case __EXPR_NOT__: {
          __tmp__ZALL=my_copy__GLYM(__tmp__YALL);
        } break;
        case __EXPR_MOD__: {
          __tmp__ZALL=my_copy__BNEO(__tmp__YALL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZALL=my_copy__M3DP(__tmp__YALL);
        } break;
        case __EXPR_INF__: {
          __tmp__ZALL=my_copy__PBSN(__tmp__YALL);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZALL=my_copy__0BSN(__tmp__YALL);
        } break;
        case __EXPR_OR__: {
          __tmp__ZALL=my_copy__ZOPN(__tmp__YALL);
        } break;
        case __EXPR_XOR__: {
          __tmp__ZALL=my_copy__CYSO(__tmp__YALL);
        } break;
        };
        node__5YKL=new_read__slot__receiver__with__YOWH(__tmp__XALL,slot_msg__4YKL,__tmp__ZALL,args__AZKL);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__5YKL);
        result__ZYKL=result_expr__PVDI(node__5YKL);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__WYKL,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(((__SLOT_DATA *)Self__VYKL->global__RHJK)->parent_variable__AJZD.type__125F,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__XYKL);
        put_position__ECH(Self__VYKL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__ZYKL);
}

static void* check_type__with__IW2O(__EXPR_NOT_LOGIC *Self__JW2O,void *t__KW2O,__POSITION p__LW2O)
// ({EXPR_NOT_LOGIC},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__NW2O,*rec__QW2O,*__tmp__M42O,*__tmp__N42O;
  void *local__OW2O;
  void *instr__PW2O;
  void *slot_name__RW2O;
  void *slot_msg__SW2O;
  void *node__TW2O;
  __TYPE_FULL *Self__LJJQ,*Self__VJJQ;
  void *__tmp__DZ2O,*__tmp__P22O;
  __POSITION __tmp__KZ2O,__tmp__S02O,__tmp__W22O,__tmp__432O;
  __POSITION __tmp__L42O;
  void *__tmp__QZ2O,*__tmp__222O;
  __STRING_CST *Self__2JJQ;
  __PROTOTYPE_CST *Self__3JJQ;
  __INTEGER_CST *Self__4JJQ;
  __REAL_CST *Self__AKJQ;
  __CHARACTER_CST *Self__CKJQ;
  __IS_EXPANDED *Self__DKJQ;
  void *args__UW2O;
  __BOOLEAN __tmp__502O;
  result__NW2O=NULL;
  local__OW2O=NULL;
  instr__PW2O=NULL;
  rec__QW2O=NULL;
  slot_name__RW2O=NULL;
  slot_msg__SW2O=NULL;
  node__TW2O=NULL;
  args__UW2O=NULL;
  if (affect_with__ZCHI(t__KW2O,static_type__JRZM())) {
    result__NW2O=Self__JW2O;
  } else {
    Self__LJJQ=((__TYPE_FULL *)static_type__JRZM());
    if (is_cast__to__in__ZD0I(Self__LJJQ,(&__string_86),t__KW2O,((__PROTOTYPE *)prototype__NQRF(Self__LJJQ))->export_list__SFDC)) {
      local__OW2O=create__name__style__type__25JG(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__JRZM()));
      instr__PW2O=write__value__T5FH(local__OW2O,Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JW2O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__PW2O);
      slot_name__RW2O=get__QEC(last_cast_name__L42H);
      slot_msg__SW2O=get_slot__AP5G(static_type__JRZM(),slot_name__RW2O);
      if (((void *)slot_msg__SW2O == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__JRZM(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__KW2O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__RW2O);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__JRZM(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__LW2O);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__JRZM()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
        __tmp__DZ2O=((__SLOT *)((__SLOT_DATA *)slot_msg__SW2O)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__DZ2O=((__SLOT *)((__SLOT_CODE *)slot_msg__SW2O)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__DZ2O) !=  1)) {
        if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
          __tmp__KZ2O=((__SLOT_DATA *)slot_msg__SW2O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__KZ2O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SW2O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__KZ2O);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
        __tmp__QZ2O=get_type_result__PG2G(slot_msg__SW2O);
      } else {
        __tmp__QZ2O=get_type_result__ZH2G(slot_msg__SW2O);
      };
      if ((((void *)__tmp__QZ2O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__QZ2O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__KW2O)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__QZ2O != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__QZ2O,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__KW2O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
          __tmp__S02O=((__SLOT_DATA *)slot_msg__SW2O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__S02O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SW2O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__S02O);
        put_position__ECH(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__QW2O=read__IC5G(local__OW2O);
      node__TW2O=new_read__slot__receiver__self__YLQC(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__SW2O,rec__QW2O,rec__QW2O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__TW2O);
      result__NW2O=result_expr__PVDI(node__TW2O);
      __tmp__502O=TRUE__;
    } else {
      __tmp__502O=FALSE__;
    };
    if ((! __tmp__502O)) {
      Self__VJJQ=((__TYPE_FULL *)t__KW2O);
      if (is_cast__to__in__ZD0I(Self__VJJQ,(&__string_87),static_type__JRZM(),((__PROTOTYPE *)prototype__NQRF(Self__VJJQ))->import_list__0FDC)) {
        local__OW2O=create__name__style__type__25JG(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__JRZM()));
        instr__PW2O=write__value__T5FH(local__OW2O,Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JW2O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__PW2O);
        slot_name__RW2O=get__QEC(last_cast_name__L42H);
        slot_msg__SW2O=get_slot__AP5G(t__KW2O,slot_name__RW2O);
        if (((void *)slot_msg__SW2O == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__KW2O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__JRZM(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__RW2O);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__KW2O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__LW2O);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__KW2O))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
          __tmp__P22O=((__SLOT *)((__SLOT_DATA *)slot_msg__SW2O)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__P22O=((__SLOT *)((__SLOT_CODE *)slot_msg__SW2O)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__P22O) !=  2)) {
          if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
            __tmp__W22O=((__SLOT_DATA *)slot_msg__SW2O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__W22O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SW2O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__W22O);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
          __tmp__222O=get_type_result__PG2G(slot_msg__SW2O);
        } else {
          __tmp__222O=get_type_result__ZH2G(slot_msg__SW2O);
        };
        if ((((void *)__tmp__222O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__222O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__KW2O)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__222O != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__222O,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__KW2O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__SW2O)->__id==__SLOT_DATA__) {
            __tmp__432O=((__SLOT_DATA *)slot_msg__SW2O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__432O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SW2O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__432O);
          put_position__ECH(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__UW2O=create_with_capacity__3THH( 2);
        add_last__XSEI(args__UW2O,create__type__CLQC(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,t__KW2O));
        add_last__XSEI(args__UW2O,read__IC5G(local__OW2O));
        __tmp__L42O=Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__M42O=((void **)((__FAST_ARRAYoEXPRo *)args__UW2O)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__M42O)->__id) {
        case __LIST__: {
          __tmp__N42O=my_copy__2HYM(__tmp__M42O);
        } break;
        case __STRING_CST__: {
          Self__2JJQ=((__STRING_CST *)__tmp__M42O);
          __tmp__N42O=create__text__AUMH(Self__2JJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2JJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__N42O=my_copy__2K2H(__tmp__M42O);
        } break;
        case __PROTOTYPE_CST__: {
          Self__3JJQ=((__PROTOTYPE_CST *)__tmp__M42O);
          __tmp__N42O=create__type__CLQC(Self__3JJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3JJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__4JJQ=((__INTEGER_CST *)__tmp__M42O);
          __tmp__N42O=create__value__type__DNQC(Self__4JJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4JJQ->value__PAZD,Self__4JJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__N42O=my_copy__OAFJ(__tmp__M42O);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__N42O=my_copy__KM2H(__tmp__M42O);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__N42O=my_copy__DN2H(__tmp__M42O);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__N42O=my_copy__QN2H(__tmp__M42O);
        } break;
        case __REAL_CST__: {
          Self__AKJQ=((__REAL_CST *)__tmp__M42O);
          __tmp__N42O=create__value__type__1SMH(Self__AKJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AKJQ->value__5N2H,Self__AKJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__CKJQ=((__CHARACTER_CST *)__tmp__M42O);
          __tmp__N42O=create__char__WTMH(Self__CKJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CKJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__DKJQ=((__IS_EXPANDED *)__tmp__M42O);
          __tmp__N42O=create__receiver__WRWH(Self__DKJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__DKJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__N42O=my_copy__TO2H(__tmp__M42O);
        } break;
        case __EXPR_SUP__: {
          __tmp__N42O=my_copy__2O2H(__tmp__M42O);
        } break;
        case __EXPR_SUB__: {
          __tmp__N42O=my_copy__HP2H(__tmp__M42O);
        } break;
        case __EXPR_MUL__: {
          __tmp__N42O=my_copy__TP2H(__tmp__M42O);
        } break;
        case __EXPR_DIV__: {
          __tmp__N42O=my_copy__4P2H(__tmp__M42O);
        } break;
        case __EXPR_AND__: {
          __tmp__N42O=my_copy__JQ2H(__tmp__M42O);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__N42O=my_copy__UQ2H(__tmp__M42O);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__N42O=my_copy__5Q2H(__tmp__M42O);
        } break;
        case __PUT_TO__: {
          __tmp__N42O=my_copy__KR2H(__tmp__M42O);
        } break;
        case __ITEM__: {
          __tmp__N42O=my_copy__1R2H(__tmp__M42O);
        } break;
        case __SIZE_OF__: {
          __tmp__N42O=my_copy__HS2H(__tmp__M42O);
        } break;
        case __CAST__: {
          __tmp__N42O=my_copy__QS2H(__tmp__M42O);
        } break;
        case __CALL_SLOT__: {
          __tmp__N42O=my_copy__PIYM(__tmp__M42O);
        } break;
        case __READ_SLOT__: {
          __tmp__N42O=my_copy__AVGK(__tmp__M42O);
        } break;
        case __READ_GLOBAL__: {
          __tmp__N42O=my_copy__NVGK(__tmp__M42O);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__N42O=my_copy__RFCN(__tmp__M42O);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__N42O=my_copy__JMEO(__tmp__M42O);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__N42O=my_copy__RTJO(__tmp__M42O);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__N42O=my_copy__WMEO(__tmp__M42O);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__N42O=my_copy__3TJO(__tmp__M42O);
        } break;
        case __EXPR_NEG__: {
          __tmp__N42O=my_copy__YEJM(__tmp__M42O);
        } break;
        case __EXPR_ADD__: {
          __tmp__N42O=my_copy__YRLL(__tmp__M42O);
        } break;
        case __EXPR_NOT__: {
          __tmp__N42O=my_copy__GLYM(__tmp__M42O);
        } break;
        case __EXPR_MOD__: {
          __tmp__N42O=my_copy__BNEO(__tmp__M42O);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__N42O=my_copy__M3DP(__tmp__M42O);
        } break;
        case __EXPR_INF__: {
          __tmp__N42O=my_copy__PBSN(__tmp__M42O);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__N42O=my_copy__0BSN(__tmp__M42O);
        } break;
        case __EXPR_OR__: {
          __tmp__N42O=my_copy__ZOPN(__tmp__M42O);
        } break;
        case __EXPR_XOR__: {
          __tmp__N42O=my_copy__CYSO(__tmp__M42O);
        } break;
        };
        node__TW2O=new_read__slot__receiver__with__YOWH(__tmp__L42O,slot_msg__SW2O,__tmp__N42O,args__UW2O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__TW2O);
        result__NW2O=result_expr__PVDI(node__TW2O);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__KW2O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__JRZM(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__LW2O);
        put_position__ECH(Self__JW2O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__NW2O);
}

static void* check_type__with__AYIO(__EXPR_OR_LOGIC *Self__BYIO,void *t__CYIO,__POSITION p__DYIO)
// ({EXPR_OR_LOGIC},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__FYIO,*rec__IYIO,*__tmp__EAJO,*__tmp__FAJO;
  void *local__GYIO;
  void *instr__HYIO;
  void *slot_name__JYIO;
  void *slot_msg__KYIO;
  void *node__LYIO;
  __TYPE_FULL *Self__EKJQ,*Self__OKJQ;
  void *__tmp__10IO,*__tmp__H4IO;
  __POSITION __tmp__C1IO,__tmp__K2IO,__tmp__O4IO,__tmp__W5IO;
  __POSITION __tmp__DAJO;
  void *__tmp__I1IO,*__tmp__U4IO;
  __STRING_CST *Self__VKJQ;
  __PROTOTYPE_CST *Self__WKJQ;
  __INTEGER_CST *Self__XKJQ;
  __REAL_CST *Self__ZKJQ;
  __CHARACTER_CST *Self__1KJQ;
  __IS_EXPANDED *Self__2KJQ;
  void *args__MYIO;
  __BOOLEAN __tmp__X2IO;
  result__FYIO=NULL;
  local__GYIO=NULL;
  instr__HYIO=NULL;
  rec__IYIO=NULL;
  slot_name__JYIO=NULL;
  slot_msg__KYIO=NULL;
  node__LYIO=NULL;
  args__MYIO=NULL;
  if (affect_with__ZCHI(t__CYIO,static_type__VLEO())) {
    result__FYIO=Self__BYIO;
  } else {
    Self__EKJQ=((__TYPE_FULL *)static_type__VLEO());
    if (is_cast__to__in__ZD0I(Self__EKJQ,(&__string_86),t__CYIO,((__PROTOTYPE *)prototype__NQRF(Self__EKJQ))->export_list__SFDC)) {
      local__GYIO=create__name__style__type__25JG(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__VLEO()));
      instr__HYIO=write__value__T5FH(local__GYIO,Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BYIO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__HYIO);
      slot_name__JYIO=get__QEC(last_cast_name__L42H);
      slot_msg__KYIO=get_slot__AP5G(static_type__VLEO(),slot_name__JYIO);
      if (((void *)slot_msg__KYIO == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__VLEO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__CYIO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__JYIO);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__VLEO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__DYIO);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__VLEO()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
        __tmp__10IO=((__SLOT *)((__SLOT_DATA *)slot_msg__KYIO)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__10IO=((__SLOT *)((__SLOT_CODE *)slot_msg__KYIO)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__10IO) !=  1)) {
        if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
          __tmp__C1IO=((__SLOT_DATA *)slot_msg__KYIO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__C1IO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KYIO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__C1IO);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
        __tmp__I1IO=get_type_result__PG2G(slot_msg__KYIO);
      } else {
        __tmp__I1IO=get_type_result__ZH2G(slot_msg__KYIO);
      };
      if ((((void *)__tmp__I1IO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__I1IO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__CYIO)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__I1IO != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__I1IO,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__CYIO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
          __tmp__K2IO=((__SLOT_DATA *)slot_msg__KYIO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__K2IO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KYIO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__K2IO);
        put_position__ECH(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__IYIO=read__IC5G(local__GYIO);
      node__LYIO=new_read__slot__receiver__self__YLQC(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__KYIO,rec__IYIO,rec__IYIO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__LYIO);
      result__FYIO=result_expr__PVDI(node__LYIO);
      __tmp__X2IO=TRUE__;
    } else {
      __tmp__X2IO=FALSE__;
    };
    if ((! __tmp__X2IO)) {
      Self__OKJQ=((__TYPE_FULL *)t__CYIO);
      if (is_cast__to__in__ZD0I(Self__OKJQ,(&__string_87),static_type__VLEO(),((__PROTOTYPE *)prototype__NQRF(Self__OKJQ))->import_list__0FDC)) {
        local__GYIO=create__name__style__type__25JG(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__VLEO()));
        instr__HYIO=write__value__T5FH(local__GYIO,Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BYIO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__HYIO);
        slot_name__JYIO=get__QEC(last_cast_name__L42H);
        slot_msg__KYIO=get_slot__AP5G(t__CYIO,slot_name__JYIO);
        if (((void *)slot_msg__KYIO == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__CYIO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__VLEO(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__JYIO);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__CYIO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__DYIO);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__CYIO))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
          __tmp__H4IO=((__SLOT *)((__SLOT_DATA *)slot_msg__KYIO)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__H4IO=((__SLOT *)((__SLOT_CODE *)slot_msg__KYIO)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__H4IO) !=  2)) {
          if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
            __tmp__O4IO=((__SLOT_DATA *)slot_msg__KYIO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__O4IO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KYIO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__O4IO);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
          __tmp__U4IO=get_type_result__PG2G(slot_msg__KYIO);
        } else {
          __tmp__U4IO=get_type_result__ZH2G(slot_msg__KYIO);
        };
        if ((((void *)__tmp__U4IO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__U4IO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__CYIO)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__U4IO != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__U4IO,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__CYIO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__KYIO)->__id==__SLOT_DATA__) {
            __tmp__W5IO=((__SLOT_DATA *)slot_msg__KYIO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__W5IO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__KYIO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__W5IO);
          put_position__ECH(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__MYIO=create_with_capacity__3THH( 2);
        add_last__XSEI(args__MYIO,create__type__CLQC(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,t__CYIO));
        add_last__XSEI(args__MYIO,read__IC5G(local__GYIO));
        __tmp__DAJO=Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__EAJO=((void **)((__FAST_ARRAYoEXPRo *)args__MYIO)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__EAJO)->__id) {
        case __LIST__: {
          __tmp__FAJO=my_copy__2HYM(__tmp__EAJO);
        } break;
        case __STRING_CST__: {
          Self__VKJQ=((__STRING_CST *)__tmp__EAJO);
          __tmp__FAJO=create__text__AUMH(Self__VKJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VKJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__FAJO=my_copy__2K2H(__tmp__EAJO);
        } break;
        case __PROTOTYPE_CST__: {
          Self__WKJQ=((__PROTOTYPE_CST *)__tmp__EAJO);
          __tmp__FAJO=create__type__CLQC(Self__WKJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WKJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__XKJQ=((__INTEGER_CST *)__tmp__EAJO);
          __tmp__FAJO=create__value__type__DNQC(Self__XKJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XKJQ->value__PAZD,Self__XKJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__FAJO=my_copy__OAFJ(__tmp__EAJO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__FAJO=my_copy__KM2H(__tmp__EAJO);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__FAJO=my_copy__DN2H(__tmp__EAJO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__FAJO=my_copy__QN2H(__tmp__EAJO);
        } break;
        case __REAL_CST__: {
          Self__ZKJQ=((__REAL_CST *)__tmp__EAJO);
          __tmp__FAJO=create__value__type__1SMH(Self__ZKJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZKJQ->value__5N2H,Self__ZKJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__1KJQ=((__CHARACTER_CST *)__tmp__EAJO);
          __tmp__FAJO=create__char__WTMH(Self__1KJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1KJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__2KJQ=((__IS_EXPANDED *)__tmp__EAJO);
          __tmp__FAJO=create__receiver__WRWH(Self__2KJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__2KJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__FAJO=my_copy__TO2H(__tmp__EAJO);
        } break;
        case __EXPR_SUP__: {
          __tmp__FAJO=my_copy__2O2H(__tmp__EAJO);
        } break;
        case __EXPR_SUB__: {
          __tmp__FAJO=my_copy__HP2H(__tmp__EAJO);
        } break;
        case __EXPR_MUL__: {
          __tmp__FAJO=my_copy__TP2H(__tmp__EAJO);
        } break;
        case __EXPR_DIV__: {
          __tmp__FAJO=my_copy__4P2H(__tmp__EAJO);
        } break;
        case __EXPR_AND__: {
          __tmp__FAJO=my_copy__JQ2H(__tmp__EAJO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__FAJO=my_copy__UQ2H(__tmp__EAJO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__FAJO=my_copy__5Q2H(__tmp__EAJO);
        } break;
        case __PUT_TO__: {
          __tmp__FAJO=my_copy__KR2H(__tmp__EAJO);
        } break;
        case __ITEM__: {
          __tmp__FAJO=my_copy__1R2H(__tmp__EAJO);
        } break;
        case __SIZE_OF__: {
          __tmp__FAJO=my_copy__HS2H(__tmp__EAJO);
        } break;
        case __CAST__: {
          __tmp__FAJO=my_copy__QS2H(__tmp__EAJO);
        } break;
        case __CALL_SLOT__: {
          __tmp__FAJO=my_copy__PIYM(__tmp__EAJO);
        } break;
        case __READ_SLOT__: {
          __tmp__FAJO=my_copy__AVGK(__tmp__EAJO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__FAJO=my_copy__NVGK(__tmp__EAJO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__FAJO=my_copy__RFCN(__tmp__EAJO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__FAJO=my_copy__JMEO(__tmp__EAJO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__FAJO=my_copy__RTJO(__tmp__EAJO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__FAJO=my_copy__WMEO(__tmp__EAJO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__FAJO=my_copy__3TJO(__tmp__EAJO);
        } break;
        case __EXPR_NEG__: {
          __tmp__FAJO=my_copy__YEJM(__tmp__EAJO);
        } break;
        case __EXPR_ADD__: {
          __tmp__FAJO=my_copy__YRLL(__tmp__EAJO);
        } break;
        case __EXPR_NOT__: {
          __tmp__FAJO=my_copy__GLYM(__tmp__EAJO);
        } break;
        case __EXPR_MOD__: {
          __tmp__FAJO=my_copy__BNEO(__tmp__EAJO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__FAJO=my_copy__M3DP(__tmp__EAJO);
        } break;
        case __EXPR_INF__: {
          __tmp__FAJO=my_copy__PBSN(__tmp__EAJO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__FAJO=my_copy__0BSN(__tmp__EAJO);
        } break;
        case __EXPR_OR__: {
          __tmp__FAJO=my_copy__ZOPN(__tmp__EAJO);
        } break;
        case __EXPR_XOR__: {
          __tmp__FAJO=my_copy__CYSO(__tmp__EAJO);
        } break;
        };
        node__LYIO=new_read__slot__receiver__with__YOWH(__tmp__DAJO,slot_msg__KYIO,__tmp__FAJO,args__MYIO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__LYIO);
        result__FYIO=result_expr__PVDI(node__LYIO);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__CYIO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__VLEO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__DYIO);
        put_position__ECH(Self__BYIO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__FYIO);
}

static void* check_type__with__IFSO(__EXPR_OR_OR_LOGIC *Self__JFSO,void *t__KFSO,__POSITION p__LFSO)
// ({EXPR_OR_OR_LOGIC},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__NFSO,*rec__QFSO,*__tmp__MNSO,*__tmp__NNSO;
  void *local__OFSO;
  void *instr__PFSO;
  void *slot_name__RFSO;
  void *slot_msg__SFSO;
  void *node__TFSO;
  __TYPE_FULL *Self__3KJQ,*Self__HLJQ;
  void *__tmp__DISO,*__tmp__PLSO;
  __POSITION __tmp__KISO,__tmp__SJSO,__tmp__WLSO,__tmp__4MSO;
  __POSITION __tmp__LNSO;
  void *__tmp__QISO,*__tmp__2LSO;
  __STRING_CST *Self__OLJQ;
  __PROTOTYPE_CST *Self__PLJQ;
  __INTEGER_CST *Self__QLJQ;
  __REAL_CST *Self__SLJQ;
  __CHARACTER_CST *Self__ULJQ;
  __IS_EXPANDED *Self__VLJQ;
  void *args__UFSO;
  __BOOLEAN __tmp__5JSO;
  result__NFSO=NULL;
  local__OFSO=NULL;
  instr__PFSO=NULL;
  rec__QFSO=NULL;
  slot_name__RFSO=NULL;
  slot_msg__SFSO=NULL;
  node__TFSO=NULL;
  args__UFSO=NULL;
  if (affect_with__ZCHI(t__KFSO,static_type__LVIO())) {
    result__NFSO=Self__JFSO;
  } else {
    Self__3KJQ=((__TYPE_FULL *)static_type__LVIO());
    if (is_cast__to__in__ZD0I(Self__3KJQ,(&__string_86),t__KFSO,((__PROTOTYPE *)prototype__NQRF(Self__3KJQ))->export_list__SFDC)) {
      local__OFSO=create__name__style__type__25JG(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__LVIO()));
      instr__PFSO=write__value__T5FH(local__OFSO,Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JFSO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__PFSO);
      slot_name__RFSO=get__QEC(last_cast_name__L42H);
      slot_msg__SFSO=get_slot__AP5G(static_type__LVIO(),slot_name__RFSO);
      if (((void *)slot_msg__SFSO == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__LVIO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__KFSO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__RFSO);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__LVIO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__LFSO);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__LVIO()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
        __tmp__DISO=((__SLOT *)((__SLOT_DATA *)slot_msg__SFSO)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__DISO=((__SLOT *)((__SLOT_CODE *)slot_msg__SFSO)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__DISO) !=  1)) {
        if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
          __tmp__KISO=((__SLOT_DATA *)slot_msg__SFSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__KISO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SFSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__KISO);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
        __tmp__QISO=get_type_result__PG2G(slot_msg__SFSO);
      } else {
        __tmp__QISO=get_type_result__ZH2G(slot_msg__SFSO);
      };
      if ((((void *)__tmp__QISO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__QISO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__KFSO)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__QISO != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__QISO,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__KFSO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
          __tmp__SJSO=((__SLOT_DATA *)slot_msg__SFSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__SJSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SFSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__SJSO);
        put_position__ECH(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__QFSO=read__IC5G(local__OFSO);
      node__TFSO=new_read__slot__receiver__self__YLQC(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__SFSO,rec__QFSO,rec__QFSO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__TFSO);
      result__NFSO=result_expr__PVDI(node__TFSO);
      __tmp__5JSO=TRUE__;
    } else {
      __tmp__5JSO=FALSE__;
    };
    if ((! __tmp__5JSO)) {
      Self__HLJQ=((__TYPE_FULL *)t__KFSO);
      if (is_cast__to__in__ZD0I(Self__HLJQ,(&__string_87),static_type__LVIO(),((__PROTOTYPE *)prototype__NQRF(Self__HLJQ))->import_list__0FDC)) {
        local__OFSO=create__name__style__type__25JG(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__LVIO()));
        instr__PFSO=write__value__T5FH(local__OFSO,Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JFSO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__PFSO);
        slot_name__RFSO=get__QEC(last_cast_name__L42H);
        slot_msg__SFSO=get_slot__AP5G(t__KFSO,slot_name__RFSO);
        if (((void *)slot_msg__SFSO == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__KFSO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__LVIO(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__RFSO);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__KFSO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__LFSO);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__KFSO))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
          __tmp__PLSO=((__SLOT *)((__SLOT_DATA *)slot_msg__SFSO)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__PLSO=((__SLOT *)((__SLOT_CODE *)slot_msg__SFSO)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__PLSO) !=  2)) {
          if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
            __tmp__WLSO=((__SLOT_DATA *)slot_msg__SFSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__WLSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SFSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__WLSO);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
          __tmp__2LSO=get_type_result__PG2G(slot_msg__SFSO);
        } else {
          __tmp__2LSO=get_type_result__ZH2G(slot_msg__SFSO);
        };
        if ((((void *)__tmp__2LSO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__2LSO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__KFSO)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__2LSO != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__2LSO,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__KFSO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__SFSO)->__id==__SLOT_DATA__) {
            __tmp__4MSO=((__SLOT_DATA *)slot_msg__SFSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__4MSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SFSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__4MSO);
          put_position__ECH(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__UFSO=create_with_capacity__3THH( 2);
        add_last__XSEI(args__UFSO,create__type__CLQC(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,t__KFSO));
        add_last__XSEI(args__UFSO,read__IC5G(local__OFSO));
        __tmp__LNSO=Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__MNSO=((void **)((__FAST_ARRAYoEXPRo *)args__UFSO)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__MNSO)->__id) {
        case __LIST__: {
          __tmp__NNSO=my_copy__2HYM(__tmp__MNSO);
        } break;
        case __STRING_CST__: {
          Self__OLJQ=((__STRING_CST *)__tmp__MNSO);
          __tmp__NNSO=create__text__AUMH(Self__OLJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OLJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__NNSO=my_copy__2K2H(__tmp__MNSO);
        } break;
        case __PROTOTYPE_CST__: {
          Self__PLJQ=((__PROTOTYPE_CST *)__tmp__MNSO);
          __tmp__NNSO=create__type__CLQC(Self__PLJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PLJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__QLJQ=((__INTEGER_CST *)__tmp__MNSO);
          __tmp__NNSO=create__value__type__DNQC(Self__QLJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QLJQ->value__PAZD,Self__QLJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__NNSO=my_copy__OAFJ(__tmp__MNSO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__NNSO=my_copy__KM2H(__tmp__MNSO);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__NNSO=my_copy__DN2H(__tmp__MNSO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__NNSO=my_copy__QN2H(__tmp__MNSO);
        } break;
        case __REAL_CST__: {
          Self__SLJQ=((__REAL_CST *)__tmp__MNSO);
          __tmp__NNSO=create__value__type__1SMH(Self__SLJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SLJQ->value__5N2H,Self__SLJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__ULJQ=((__CHARACTER_CST *)__tmp__MNSO);
          __tmp__NNSO=create__char__WTMH(Self__ULJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ULJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__VLJQ=((__IS_EXPANDED *)__tmp__MNSO);
          __tmp__NNSO=create__receiver__WRWH(Self__VLJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__VLJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__NNSO=my_copy__TO2H(__tmp__MNSO);
        } break;
        case __EXPR_SUP__: {
          __tmp__NNSO=my_copy__2O2H(__tmp__MNSO);
        } break;
        case __EXPR_SUB__: {
          __tmp__NNSO=my_copy__HP2H(__tmp__MNSO);
        } break;
        case __EXPR_MUL__: {
          __tmp__NNSO=my_copy__TP2H(__tmp__MNSO);
        } break;
        case __EXPR_DIV__: {
          __tmp__NNSO=my_copy__4P2H(__tmp__MNSO);
        } break;
        case __EXPR_AND__: {
          __tmp__NNSO=my_copy__JQ2H(__tmp__MNSO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__NNSO=my_copy__UQ2H(__tmp__MNSO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__NNSO=my_copy__5Q2H(__tmp__MNSO);
        } break;
        case __PUT_TO__: {
          __tmp__NNSO=my_copy__KR2H(__tmp__MNSO);
        } break;
        case __ITEM__: {
          __tmp__NNSO=my_copy__1R2H(__tmp__MNSO);
        } break;
        case __SIZE_OF__: {
          __tmp__NNSO=my_copy__HS2H(__tmp__MNSO);
        } break;
        case __CAST__: {
          __tmp__NNSO=my_copy__QS2H(__tmp__MNSO);
        } break;
        case __CALL_SLOT__: {
          __tmp__NNSO=my_copy__PIYM(__tmp__MNSO);
        } break;
        case __READ_SLOT__: {
          __tmp__NNSO=my_copy__AVGK(__tmp__MNSO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__NNSO=my_copy__NVGK(__tmp__MNSO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__NNSO=my_copy__RFCN(__tmp__MNSO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__NNSO=my_copy__JMEO(__tmp__MNSO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__NNSO=my_copy__RTJO(__tmp__MNSO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__NNSO=my_copy__WMEO(__tmp__MNSO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__NNSO=my_copy__3TJO(__tmp__MNSO);
        } break;
        case __EXPR_NEG__: {
          __tmp__NNSO=my_copy__YEJM(__tmp__MNSO);
        } break;
        case __EXPR_ADD__: {
          __tmp__NNSO=my_copy__YRLL(__tmp__MNSO);
        } break;
        case __EXPR_NOT__: {
          __tmp__NNSO=my_copy__GLYM(__tmp__MNSO);
        } break;
        case __EXPR_MOD__: {
          __tmp__NNSO=my_copy__BNEO(__tmp__MNSO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__NNSO=my_copy__M3DP(__tmp__MNSO);
        } break;
        case __EXPR_INF__: {
          __tmp__NNSO=my_copy__PBSN(__tmp__MNSO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__NNSO=my_copy__0BSN(__tmp__MNSO);
        } break;
        case __EXPR_OR__: {
          __tmp__NNSO=my_copy__ZOPN(__tmp__MNSO);
        } break;
        case __EXPR_XOR__: {
          __tmp__NNSO=my_copy__CYSO(__tmp__MNSO);
        } break;
        };
        node__TFSO=new_read__slot__receiver__with__YOWH(__tmp__LNSO,slot_msg__SFSO,__tmp__NNSO,args__UFSO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__TFSO);
        result__NFSO=result_expr__PVDI(node__TFSO);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__KFSO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__LVIO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__LFSO);
        put_position__ECH(Self__JFSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__NFSO);
}

static void* check_type__with__5AJO(__EXPR_AND_LOGIC *Self__ABJO,void *t__BBJO,__POSITION p__CBJO)
// ({EXPR_AND_LOGIC},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__EBJO,*rec__HBJO,*__tmp__DJJO,*__tmp__EJJO;
  void *local__FBJO;
  void *instr__GBJO;
  void *slot_name__IBJO;
  void *slot_msg__JBJO;
  void *node__KBJO;
  __TYPE_FULL *Self__WLJQ,*Self__AMJQ;
  void *__tmp__0DJO,*__tmp__GHJO;
  __POSITION __tmp__BEJO,__tmp__JFJO,__tmp__NHJO,__tmp__VIJO;
  __POSITION __tmp__CJJO;
  void *__tmp__HEJO,*__tmp__THJO;
  __STRING_CST *Self__HMJQ;
  __PROTOTYPE_CST *Self__IMJQ;
  __INTEGER_CST *Self__JMJQ;
  __REAL_CST *Self__LMJQ;
  __CHARACTER_CST *Self__NMJQ;
  __IS_EXPANDED *Self__OMJQ;
  void *args__LBJO;
  __BOOLEAN __tmp__WFJO;
  result__EBJO=NULL;
  local__FBJO=NULL;
  instr__GBJO=NULL;
  rec__HBJO=NULL;
  slot_name__IBJO=NULL;
  slot_msg__JBJO=NULL;
  node__KBJO=NULL;
  args__LBJO=NULL;
  if (affect_with__ZCHI(t__BBJO,static_type__0LEO())) {
    result__EBJO=Self__ABJO;
  } else {
    Self__WLJQ=((__TYPE_FULL *)static_type__0LEO());
    if (is_cast__to__in__ZD0I(Self__WLJQ,(&__string_86),t__BBJO,((__PROTOTYPE *)prototype__NQRF(Self__WLJQ))->export_list__SFDC)) {
      local__FBJO=create__name__style__type__25JG(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__0LEO()));
      instr__GBJO=write__value__T5FH(local__FBJO,Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ABJO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__GBJO);
      slot_name__IBJO=get__QEC(last_cast_name__L42H);
      slot_msg__JBJO=get_slot__AP5G(static_type__0LEO(),slot_name__IBJO);
      if (((void *)slot_msg__JBJO == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__0LEO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__BBJO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__IBJO);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__0LEO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__CBJO);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__0LEO()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
        __tmp__0DJO=((__SLOT *)((__SLOT_DATA *)slot_msg__JBJO)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__0DJO=((__SLOT *)((__SLOT_CODE *)slot_msg__JBJO)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__0DJO) !=  1)) {
        if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
          __tmp__BEJO=((__SLOT_DATA *)slot_msg__JBJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__BEJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__JBJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__BEJO);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
        __tmp__HEJO=get_type_result__PG2G(slot_msg__JBJO);
      } else {
        __tmp__HEJO=get_type_result__ZH2G(slot_msg__JBJO);
      };
      if ((((void *)__tmp__HEJO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__HEJO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__BBJO)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__HEJO != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__HEJO,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__BBJO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
          __tmp__JFJO=((__SLOT_DATA *)slot_msg__JBJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__JFJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__JBJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__JFJO);
        put_position__ECH(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__HBJO=read__IC5G(local__FBJO);
      node__KBJO=new_read__slot__receiver__self__YLQC(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__JBJO,rec__HBJO,rec__HBJO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__KBJO);
      result__EBJO=result_expr__PVDI(node__KBJO);
      __tmp__WFJO=TRUE__;
    } else {
      __tmp__WFJO=FALSE__;
    };
    if ((! __tmp__WFJO)) {
      Self__AMJQ=((__TYPE_FULL *)t__BBJO);
      if (is_cast__to__in__ZD0I(Self__AMJQ,(&__string_87),static_type__0LEO(),((__PROTOTYPE *)prototype__NQRF(Self__AMJQ))->import_list__0FDC)) {
        local__FBJO=create__name__style__type__25JG(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__0LEO()));
        instr__GBJO=write__value__T5FH(local__FBJO,Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ABJO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__GBJO);
        slot_name__IBJO=get__QEC(last_cast_name__L42H);
        slot_msg__JBJO=get_slot__AP5G(t__BBJO,slot_name__IBJO);
        if (((void *)slot_msg__JBJO == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__BBJO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__0LEO(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__IBJO);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__BBJO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__CBJO);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__BBJO))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
          __tmp__GHJO=((__SLOT *)((__SLOT_DATA *)slot_msg__JBJO)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__GHJO=((__SLOT *)((__SLOT_CODE *)slot_msg__JBJO)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__GHJO) !=  2)) {
          if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
            __tmp__NHJO=((__SLOT_DATA *)slot_msg__JBJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__NHJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__JBJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__NHJO);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
          __tmp__THJO=get_type_result__PG2G(slot_msg__JBJO);
        } else {
          __tmp__THJO=get_type_result__ZH2G(slot_msg__JBJO);
        };
        if ((((void *)__tmp__THJO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__THJO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__BBJO)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__THJO != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__THJO,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__BBJO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__JBJO)->__id==__SLOT_DATA__) {
            __tmp__VIJO=((__SLOT_DATA *)slot_msg__JBJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__VIJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__JBJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__VIJO);
          put_position__ECH(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__LBJO=create_with_capacity__3THH( 2);
        add_last__XSEI(args__LBJO,create__type__CLQC(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,t__BBJO));
        add_last__XSEI(args__LBJO,read__IC5G(local__FBJO));
        __tmp__CJJO=Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__DJJO=((void **)((__FAST_ARRAYoEXPRo *)args__LBJO)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__DJJO)->__id) {
        case __LIST__: {
          __tmp__EJJO=my_copy__2HYM(__tmp__DJJO);
        } break;
        case __STRING_CST__: {
          Self__HMJQ=((__STRING_CST *)__tmp__DJJO);
          __tmp__EJJO=create__text__AUMH(Self__HMJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HMJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__EJJO=my_copy__2K2H(__tmp__DJJO);
        } break;
        case __PROTOTYPE_CST__: {
          Self__IMJQ=((__PROTOTYPE_CST *)__tmp__DJJO);
          __tmp__EJJO=create__type__CLQC(Self__IMJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IMJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__JMJQ=((__INTEGER_CST *)__tmp__DJJO);
          __tmp__EJJO=create__value__type__DNQC(Self__JMJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JMJQ->value__PAZD,Self__JMJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__EJJO=my_copy__OAFJ(__tmp__DJJO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__EJJO=my_copy__KM2H(__tmp__DJJO);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__EJJO=my_copy__DN2H(__tmp__DJJO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__EJJO=my_copy__QN2H(__tmp__DJJO);
        } break;
        case __REAL_CST__: {
          Self__LMJQ=((__REAL_CST *)__tmp__DJJO);
          __tmp__EJJO=create__value__type__1SMH(Self__LMJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LMJQ->value__5N2H,Self__LMJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__NMJQ=((__CHARACTER_CST *)__tmp__DJJO);
          __tmp__EJJO=create__char__WTMH(Self__NMJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NMJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__OMJQ=((__IS_EXPANDED *)__tmp__DJJO);
          __tmp__EJJO=create__receiver__WRWH(Self__OMJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__OMJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__EJJO=my_copy__TO2H(__tmp__DJJO);
        } break;
        case __EXPR_SUP__: {
          __tmp__EJJO=my_copy__2O2H(__tmp__DJJO);
        } break;
        case __EXPR_SUB__: {
          __tmp__EJJO=my_copy__HP2H(__tmp__DJJO);
        } break;
        case __EXPR_MUL__: {
          __tmp__EJJO=my_copy__TP2H(__tmp__DJJO);
        } break;
        case __EXPR_DIV__: {
          __tmp__EJJO=my_copy__4P2H(__tmp__DJJO);
        } break;
        case __EXPR_AND__: {
          __tmp__EJJO=my_copy__JQ2H(__tmp__DJJO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__EJJO=my_copy__UQ2H(__tmp__DJJO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__EJJO=my_copy__5Q2H(__tmp__DJJO);
        } break;
        case __PUT_TO__: {
          __tmp__EJJO=my_copy__KR2H(__tmp__DJJO);
        } break;
        case __ITEM__: {
          __tmp__EJJO=my_copy__1R2H(__tmp__DJJO);
        } break;
        case __SIZE_OF__: {
          __tmp__EJJO=my_copy__HS2H(__tmp__DJJO);
        } break;
        case __CAST__: {
          __tmp__EJJO=my_copy__QS2H(__tmp__DJJO);
        } break;
        case __CALL_SLOT__: {
          __tmp__EJJO=my_copy__PIYM(__tmp__DJJO);
        } break;
        case __READ_SLOT__: {
          __tmp__EJJO=my_copy__AVGK(__tmp__DJJO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__EJJO=my_copy__NVGK(__tmp__DJJO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__EJJO=my_copy__RFCN(__tmp__DJJO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__EJJO=my_copy__JMEO(__tmp__DJJO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__EJJO=my_copy__RTJO(__tmp__DJJO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__EJJO=my_copy__WMEO(__tmp__DJJO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__EJJO=my_copy__3TJO(__tmp__DJJO);
        } break;
        case __EXPR_NEG__: {
          __tmp__EJJO=my_copy__YEJM(__tmp__DJJO);
        } break;
        case __EXPR_ADD__: {
          __tmp__EJJO=my_copy__YRLL(__tmp__DJJO);
        } break;
        case __EXPR_NOT__: {
          __tmp__EJJO=my_copy__GLYM(__tmp__DJJO);
        } break;
        case __EXPR_MOD__: {
          __tmp__EJJO=my_copy__BNEO(__tmp__DJJO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__EJJO=my_copy__M3DP(__tmp__DJJO);
        } break;
        case __EXPR_INF__: {
          __tmp__EJJO=my_copy__PBSN(__tmp__DJJO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__EJJO=my_copy__0BSN(__tmp__DJJO);
        } break;
        case __EXPR_OR__: {
          __tmp__EJJO=my_copy__ZOPN(__tmp__DJJO);
        } break;
        case __EXPR_XOR__: {
          __tmp__EJJO=my_copy__CYSO(__tmp__DJJO);
        } break;
        };
        node__KBJO=new_read__slot__receiver__with__YOWH(__tmp__CJJO,slot_msg__JBJO,__tmp__EJJO,args__LBJO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__KBJO);
        result__EBJO=result_expr__PVDI(node__KBJO);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__BBJO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__0LEO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__CBJO);
        put_position__ECH(Self__ABJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__EBJO);
}

static void* check_type__with__IOSO(__EXPR_AND_AND_LOGIC *Self__JOSO,void *t__KOSO,__POSITION p__LOSO)
// ({EXPR_AND_AND_LOGIC},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__NOSO,*rec__QOSO,*__tmp__MWSO,*__tmp__NWSO;
  void *local__OOSO;
  void *instr__POSO;
  void *slot_name__ROSO;
  void *slot_msg__SOSO;
  void *node__TOSO;
  __TYPE_FULL *Self__PMJQ,*Self__ZMJQ;
  void *__tmp__DRSO,*__tmp__PUSO;
  __POSITION __tmp__KRSO,__tmp__SSSO,__tmp__WUSO,__tmp__4VSO;
  __POSITION __tmp__LWSO;
  void *__tmp__QRSO,*__tmp__2USO;
  __STRING_CST *Self__ANJQ;
  __PROTOTYPE_CST *Self__BNJQ;
  __INTEGER_CST *Self__CNJQ;
  __REAL_CST *Self__ENJQ;
  __CHARACTER_CST *Self__GNJQ;
  __IS_EXPANDED *Self__HNJQ;
  void *args__UOSO;
  __BOOLEAN __tmp__5SSO;
  result__NOSO=NULL;
  local__OOSO=NULL;
  instr__POSO=NULL;
  rec__QOSO=NULL;
  slot_name__ROSO=NULL;
  slot_msg__SOSO=NULL;
  node__TOSO=NULL;
  args__UOSO=NULL;
  if (affect_with__ZCHI(t__KOSO,static_type__RVIO())) {
    result__NOSO=Self__JOSO;
  } else {
    Self__PMJQ=((__TYPE_FULL *)static_type__RVIO());
    if (is_cast__to__in__ZD0I(Self__PMJQ,(&__string_86),t__KOSO,((__PROTOTYPE *)prototype__NQRF(Self__PMJQ))->export_list__SFDC)) {
      local__OOSO=create__name__style__type__25JG(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__RVIO()));
      instr__POSO=write__value__T5FH(local__OOSO,Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JOSO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__POSO);
      slot_name__ROSO=get__QEC(last_cast_name__L42H);
      slot_msg__SOSO=get_slot__AP5G(static_type__RVIO(),slot_name__ROSO);
      if (((void *)slot_msg__SOSO == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__RVIO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__KOSO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__ROSO);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__RVIO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__LOSO);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__RVIO()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
        __tmp__DRSO=((__SLOT *)((__SLOT_DATA *)slot_msg__SOSO)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__DRSO=((__SLOT *)((__SLOT_CODE *)slot_msg__SOSO)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__DRSO) !=  1)) {
        if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
          __tmp__KRSO=((__SLOT_DATA *)slot_msg__SOSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__KRSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SOSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__KRSO);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
        __tmp__QRSO=get_type_result__PG2G(slot_msg__SOSO);
      } else {
        __tmp__QRSO=get_type_result__ZH2G(slot_msg__SOSO);
      };
      if ((((void *)__tmp__QRSO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__QRSO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__KOSO)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__QRSO != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__QRSO,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__KOSO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
          __tmp__SSSO=((__SLOT_DATA *)slot_msg__SOSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__SSSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SOSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__SSSO);
        put_position__ECH(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__QOSO=read__IC5G(local__OOSO);
      node__TOSO=new_read__slot__receiver__self__YLQC(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__SOSO,rec__QOSO,rec__QOSO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__TOSO);
      result__NOSO=result_expr__PVDI(node__TOSO);
      __tmp__5SSO=TRUE__;
    } else {
      __tmp__5SSO=FALSE__;
    };
    if ((! __tmp__5SSO)) {
      Self__ZMJQ=((__TYPE_FULL *)t__KOSO);
      if (is_cast__to__in__ZD0I(Self__ZMJQ,(&__string_87),static_type__RVIO(),((__PROTOTYPE *)prototype__NQRF(Self__ZMJQ))->import_list__0FDC)) {
        local__OOSO=create__name__style__type__25JG(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__RVIO()));
        instr__POSO=write__value__T5FH(local__OOSO,Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JOSO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__POSO);
        slot_name__ROSO=get__QEC(last_cast_name__L42H);
        slot_msg__SOSO=get_slot__AP5G(t__KOSO,slot_name__ROSO);
        if (((void *)slot_msg__SOSO == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__KOSO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__RVIO(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__ROSO);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__KOSO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__LOSO);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__KOSO))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
          __tmp__PUSO=((__SLOT *)((__SLOT_DATA *)slot_msg__SOSO)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__PUSO=((__SLOT *)((__SLOT_CODE *)slot_msg__SOSO)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__PUSO) !=  2)) {
          if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
            __tmp__WUSO=((__SLOT_DATA *)slot_msg__SOSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__WUSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SOSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__WUSO);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
          __tmp__2USO=get_type_result__PG2G(slot_msg__SOSO);
        } else {
          __tmp__2USO=get_type_result__ZH2G(slot_msg__SOSO);
        };
        if ((((void *)__tmp__2USO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__2USO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__KOSO)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__2USO != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__2USO,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__KOSO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__SOSO)->__id==__SLOT_DATA__) {
            __tmp__4VSO=((__SLOT_DATA *)slot_msg__SOSO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__4VSO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__SOSO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__4VSO);
          put_position__ECH(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__UOSO=create_with_capacity__3THH( 2);
        add_last__XSEI(args__UOSO,create__type__CLQC(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,t__KOSO));
        add_last__XSEI(args__UOSO,read__IC5G(local__OOSO));
        __tmp__LWSO=Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__MWSO=((void **)((__FAST_ARRAYoEXPRo *)args__UOSO)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__MWSO)->__id) {
        case __LIST__: {
          __tmp__NWSO=my_copy__2HYM(__tmp__MWSO);
        } break;
        case __STRING_CST__: {
          Self__ANJQ=((__STRING_CST *)__tmp__MWSO);
          __tmp__NWSO=create__text__AUMH(Self__ANJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ANJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__NWSO=my_copy__2K2H(__tmp__MWSO);
        } break;
        case __PROTOTYPE_CST__: {
          Self__BNJQ=((__PROTOTYPE_CST *)__tmp__MWSO);
          __tmp__NWSO=create__type__CLQC(Self__BNJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BNJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__CNJQ=((__INTEGER_CST *)__tmp__MWSO);
          __tmp__NWSO=create__value__type__DNQC(Self__CNJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CNJQ->value__PAZD,Self__CNJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__NWSO=my_copy__OAFJ(__tmp__MWSO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__NWSO=my_copy__KM2H(__tmp__MWSO);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__NWSO=my_copy__DN2H(__tmp__MWSO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__NWSO=my_copy__QN2H(__tmp__MWSO);
        } break;
        case __REAL_CST__: {
          Self__ENJQ=((__REAL_CST *)__tmp__MWSO);
          __tmp__NWSO=create__value__type__1SMH(Self__ENJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ENJQ->value__5N2H,Self__ENJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__GNJQ=((__CHARACTER_CST *)__tmp__MWSO);
          __tmp__NWSO=create__char__WTMH(Self__GNJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GNJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__HNJQ=((__IS_EXPANDED *)__tmp__MWSO);
          __tmp__NWSO=create__receiver__WRWH(Self__HNJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__HNJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__NWSO=my_copy__TO2H(__tmp__MWSO);
        } break;
        case __EXPR_SUP__: {
          __tmp__NWSO=my_copy__2O2H(__tmp__MWSO);
        } break;
        case __EXPR_SUB__: {
          __tmp__NWSO=my_copy__HP2H(__tmp__MWSO);
        } break;
        case __EXPR_MUL__: {
          __tmp__NWSO=my_copy__TP2H(__tmp__MWSO);
        } break;
        case __EXPR_DIV__: {
          __tmp__NWSO=my_copy__4P2H(__tmp__MWSO);
        } break;
        case __EXPR_AND__: {
          __tmp__NWSO=my_copy__JQ2H(__tmp__MWSO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__NWSO=my_copy__UQ2H(__tmp__MWSO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__NWSO=my_copy__5Q2H(__tmp__MWSO);
        } break;
        case __PUT_TO__: {
          __tmp__NWSO=my_copy__KR2H(__tmp__MWSO);
        } break;
        case __ITEM__: {
          __tmp__NWSO=my_copy__1R2H(__tmp__MWSO);
        } break;
        case __SIZE_OF__: {
          __tmp__NWSO=my_copy__HS2H(__tmp__MWSO);
        } break;
        case __CAST__: {
          __tmp__NWSO=my_copy__QS2H(__tmp__MWSO);
        } break;
        case __CALL_SLOT__: {
          __tmp__NWSO=my_copy__PIYM(__tmp__MWSO);
        } break;
        case __READ_SLOT__: {
          __tmp__NWSO=my_copy__AVGK(__tmp__MWSO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__NWSO=my_copy__NVGK(__tmp__MWSO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__NWSO=my_copy__RFCN(__tmp__MWSO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__NWSO=my_copy__JMEO(__tmp__MWSO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__NWSO=my_copy__RTJO(__tmp__MWSO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__NWSO=my_copy__WMEO(__tmp__MWSO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__NWSO=my_copy__3TJO(__tmp__MWSO);
        } break;
        case __EXPR_NEG__: {
          __tmp__NWSO=my_copy__YEJM(__tmp__MWSO);
        } break;
        case __EXPR_ADD__: {
          __tmp__NWSO=my_copy__YRLL(__tmp__MWSO);
        } break;
        case __EXPR_NOT__: {
          __tmp__NWSO=my_copy__GLYM(__tmp__MWSO);
        } break;
        case __EXPR_MOD__: {
          __tmp__NWSO=my_copy__BNEO(__tmp__MWSO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__NWSO=my_copy__M3DP(__tmp__MWSO);
        } break;
        case __EXPR_INF__: {
          __tmp__NWSO=my_copy__PBSN(__tmp__MWSO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__NWSO=my_copy__0BSN(__tmp__MWSO);
        } break;
        case __EXPR_OR__: {
          __tmp__NWSO=my_copy__ZOPN(__tmp__MWSO);
        } break;
        case __EXPR_XOR__: {
          __tmp__NWSO=my_copy__CYSO(__tmp__MWSO);
        } break;
        };
        node__TOSO=new_read__slot__receiver__with__YOWH(__tmp__LWSO,slot_msg__SOSO,__tmp__NWSO,args__UOSO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__TOSO);
        result__NOSO=result_expr__PVDI(node__TOSO);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__KOSO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__RVIO(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__LOSO);
        put_position__ECH(Self__JOSO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__NOSO);
}

static void* check_type__with__SVXM(__EXPR_NEG *Self__TVXM,void *t__UVXM,__POSITION p__VVXM)
// ({EXPR_NEG},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__XVXM,*rec__0VXM,*__tmp__W3XM,*__tmp__X3XM;
  void *local__YVXM;
  void *instr__ZVXM;
  void *slot_name__1VXM;
  void *slot_msg__2VXM;
  void *node__3VXM;
  __TYPE_FULL *Self__INJQ,*Self__SNJQ;
  void *__tmp__NYXM,*__tmp__Z1XM;
  __POSITION __tmp__UYXM,__tmp__2ZXM,__tmp__A2XM,__tmp__I3XM;
  __POSITION __tmp__V3XM;
  void *__tmp__0YXM,*__tmp__G2XM;
  __STRING_CST *Self__ZNJQ;
  __PROTOTYPE_CST *Self__0NJQ;
  __INTEGER_CST *Self__1NJQ;
  __REAL_CST *Self__3NJQ;
  __CHARACTER_CST *Self__5NJQ;
  __IS_EXPANDED *Self__AOJQ;
  void *args__4VXM;
  __BOOLEAN __tmp__J0XM;
  result__XVXM=NULL;
  local__YVXM=NULL;
  instr__ZVXM=NULL;
  rec__0VXM=NULL;
  slot_name__1VXM=NULL;
  slot_msg__2VXM=NULL;
  node__3VXM=NULL;
  args__4VXM=NULL;
  if (affect_with__ZCHI(t__UVXM,static_type__Z2IM(Self__TVXM))) {
    result__XVXM=Self__TVXM;
  } else {
    Self__INJQ=((__TYPE_FULL *)static_type__Z2IM(Self__TVXM));
    if (is_cast__to__in__ZD0I(Self__INJQ,(&__string_86),t__UVXM,((__PROTOTYPE *)prototype__NQRF(Self__INJQ))->export_list__SFDC)) {
      local__YVXM=create__name__style__type__25JG(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__Z2IM(Self__TVXM)));
      instr__ZVXM=write__value__T5FH(local__YVXM,Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TVXM);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__ZVXM);
      slot_name__1VXM=get__QEC(last_cast_name__L42H);
      slot_msg__2VXM=get_slot__AP5G(static_type__Z2IM(Self__TVXM),slot_name__1VXM);
      if (((void *)slot_msg__2VXM == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__Z2IM(Self__TVXM),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__UVXM,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__1VXM);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__Z2IM(Self__TVXM),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__VVXM);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__Z2IM(Self__TVXM)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
        __tmp__NYXM=((__SLOT *)((__SLOT_DATA *)slot_msg__2VXM)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__NYXM=((__SLOT *)((__SLOT_CODE *)slot_msg__2VXM)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__NYXM) !=  1)) {
        if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
          __tmp__UYXM=((__SLOT_DATA *)slot_msg__2VXM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__UYXM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2VXM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__UYXM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
        __tmp__0YXM=get_type_result__PG2G(slot_msg__2VXM);
      } else {
        __tmp__0YXM=get_type_result__ZH2G(slot_msg__2VXM);
      };
      if ((((void *)__tmp__0YXM == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__0YXM)->parent_type__KTL != (void *)((__TYPE_FULL *)t__UVXM)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__0YXM != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__0YXM,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__UVXM,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
          __tmp__2ZXM=((__SLOT_DATA *)slot_msg__2VXM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__2ZXM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2VXM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__2ZXM);
        put_position__ECH(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__0VXM=read__IC5G(local__YVXM);
      node__3VXM=new_read__slot__receiver__self__YLQC(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__2VXM,rec__0VXM,rec__0VXM);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__3VXM);
      result__XVXM=result_expr__PVDI(node__3VXM);
      __tmp__J0XM=TRUE__;
    } else {
      __tmp__J0XM=FALSE__;
    };
    if ((! __tmp__J0XM)) {
      Self__SNJQ=((__TYPE_FULL *)t__UVXM);
      if (is_cast__to__in__ZD0I(Self__SNJQ,(&__string_87),static_type__Z2IM(Self__TVXM),((__PROTOTYPE *)prototype__NQRF(Self__SNJQ))->import_list__0FDC)) {
        local__YVXM=create__name__style__type__25JG(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__Z2IM(Self__TVXM)));
        instr__ZVXM=write__value__T5FH(local__YVXM,Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TVXM);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__ZVXM);
        slot_name__1VXM=get__QEC(last_cast_name__L42H);
        slot_msg__2VXM=get_slot__AP5G(t__UVXM,slot_name__1VXM);
        if (((void *)slot_msg__2VXM == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__UVXM,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__Z2IM(Self__TVXM),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__1VXM);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__UVXM,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__VVXM);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__UVXM))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
          __tmp__Z1XM=((__SLOT *)((__SLOT_DATA *)slot_msg__2VXM)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__Z1XM=((__SLOT *)((__SLOT_CODE *)slot_msg__2VXM)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__Z1XM) !=  2)) {
          if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
            __tmp__A2XM=((__SLOT_DATA *)slot_msg__2VXM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__A2XM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2VXM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__A2XM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
          __tmp__G2XM=get_type_result__PG2G(slot_msg__2VXM);
        } else {
          __tmp__G2XM=get_type_result__ZH2G(slot_msg__2VXM);
        };
        if ((((void *)__tmp__G2XM == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__G2XM)->parent_type__KTL != (void *)((__TYPE_FULL *)t__UVXM)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__G2XM != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__G2XM,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__UVXM,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__2VXM)->__id==__SLOT_DATA__) {
            __tmp__I3XM=((__SLOT_DATA *)slot_msg__2VXM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__I3XM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2VXM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__I3XM);
          put_position__ECH(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__4VXM=create_with_capacity__3THH( 2);
        add_last__XSEI(args__4VXM,create__type__CLQC(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,t__UVXM));
        add_last__XSEI(args__4VXM,read__IC5G(local__YVXM));
        __tmp__V3XM=Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__W3XM=((void **)((__FAST_ARRAYoEXPRo *)args__4VXM)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__W3XM)->__id) {
        case __LIST__: {
          __tmp__X3XM=my_copy__2HYM(__tmp__W3XM);
        } break;
        case __STRING_CST__: {
          Self__ZNJQ=((__STRING_CST *)__tmp__W3XM);
          __tmp__X3XM=create__text__AUMH(Self__ZNJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZNJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__X3XM=my_copy__2K2H(__tmp__W3XM);
        } break;
        case __PROTOTYPE_CST__: {
          Self__0NJQ=((__PROTOTYPE_CST *)__tmp__W3XM);
          __tmp__X3XM=create__type__CLQC(Self__0NJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0NJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__1NJQ=((__INTEGER_CST *)__tmp__W3XM);
          __tmp__X3XM=create__value__type__DNQC(Self__1NJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1NJQ->value__PAZD,Self__1NJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__X3XM=my_copy__OAFJ(__tmp__W3XM);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__X3XM=my_copy__KM2H(__tmp__W3XM);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__X3XM=my_copy__DN2H(__tmp__W3XM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__X3XM=my_copy__QN2H(__tmp__W3XM);
        } break;
        case __REAL_CST__: {
          Self__3NJQ=((__REAL_CST *)__tmp__W3XM);
          __tmp__X3XM=create__value__type__1SMH(Self__3NJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3NJQ->value__5N2H,Self__3NJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__5NJQ=((__CHARACTER_CST *)__tmp__W3XM);
          __tmp__X3XM=create__char__WTMH(Self__5NJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5NJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__AOJQ=((__IS_EXPANDED *)__tmp__W3XM);
          __tmp__X3XM=create__receiver__WRWH(Self__AOJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__AOJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__X3XM=my_copy__TO2H(__tmp__W3XM);
        } break;
        case __EXPR_SUP__: {
          __tmp__X3XM=my_copy__2O2H(__tmp__W3XM);
        } break;
        case __EXPR_SUB__: {
          __tmp__X3XM=my_copy__HP2H(__tmp__W3XM);
        } break;
        case __EXPR_MUL__: {
          __tmp__X3XM=my_copy__TP2H(__tmp__W3XM);
        } break;
        case __EXPR_DIV__: {
          __tmp__X3XM=my_copy__4P2H(__tmp__W3XM);
        } break;
        case __EXPR_AND__: {
          __tmp__X3XM=my_copy__JQ2H(__tmp__W3XM);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__X3XM=my_copy__UQ2H(__tmp__W3XM);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__X3XM=my_copy__5Q2H(__tmp__W3XM);
        } break;
        case __PUT_TO__: {
          __tmp__X3XM=my_copy__KR2H(__tmp__W3XM);
        } break;
        case __ITEM__: {
          __tmp__X3XM=my_copy__1R2H(__tmp__W3XM);
        } break;
        case __SIZE_OF__: {
          __tmp__X3XM=my_copy__HS2H(__tmp__W3XM);
        } break;
        case __CAST__: {
          __tmp__X3XM=my_copy__QS2H(__tmp__W3XM);
        } break;
        case __CALL_SLOT__: {
          __tmp__X3XM=my_copy__PIYM(__tmp__W3XM);
        } break;
        case __READ_SLOT__: {
          __tmp__X3XM=my_copy__AVGK(__tmp__W3XM);
        } break;
        case __READ_GLOBAL__: {
          __tmp__X3XM=my_copy__NVGK(__tmp__W3XM);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__X3XM=my_copy__RFCN(__tmp__W3XM);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__X3XM=my_copy__JMEO(__tmp__W3XM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__X3XM=my_copy__RTJO(__tmp__W3XM);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__X3XM=my_copy__WMEO(__tmp__W3XM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__X3XM=my_copy__3TJO(__tmp__W3XM);
        } break;
        case __EXPR_NEG__: {
          __tmp__X3XM=my_copy__YEJM(__tmp__W3XM);
        } break;
        case __EXPR_ADD__: {
          __tmp__X3XM=my_copy__YRLL(__tmp__W3XM);
        } break;
        case __EXPR_NOT__: {
          __tmp__X3XM=my_copy__GLYM(__tmp__W3XM);
        } break;
        case __EXPR_MOD__: {
          __tmp__X3XM=my_copy__BNEO(__tmp__W3XM);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__X3XM=my_copy__M3DP(__tmp__W3XM);
        } break;
        case __EXPR_INF__: {
          __tmp__X3XM=my_copy__PBSN(__tmp__W3XM);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__X3XM=my_copy__0BSN(__tmp__W3XM);
        } break;
        case __EXPR_OR__: {
          __tmp__X3XM=my_copy__ZOPN(__tmp__W3XM);
        } break;
        case __EXPR_XOR__: {
          __tmp__X3XM=my_copy__CYSO(__tmp__W3XM);
        } break;
        };
        node__3VXM=new_read__slot__receiver__with__YOWH(__tmp__V3XM,slot_msg__2VXM,__tmp__X3XM,args__4VXM);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__3VXM);
        result__XVXM=result_expr__PVDI(node__3VXM);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__UVXM,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__Z2IM(Self__TVXM),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__VVXM);
        put_position__ECH(Self__TVXM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__XVXM);
}

static void* check_type__with__R4XM(__EXPR_ADD *Self__S4XM,void *t__T4XM,__POSITION p__U4XM)
// ({EXPR_ADD},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__W4XM,*rec__Z4XM,*__tmp__VGYM,*__tmp__WGYM;
  void *local__X4XM;
  void *instr__Y4XM;
  void *slot_name__04XM;
  void *slot_msg__14XM;
  void *node__24XM;
  __TYPE_FULL *Self__BOJQ,*Self__LOJQ;
  void *__tmp__MBYM,*__tmp__YEYM;
  __POSITION __tmp__TBYM,__tmp__1CYM,__tmp__5EYM,__tmp__HGYM;
  __POSITION __tmp__UGYM;
  void *__tmp__ZBYM,*__tmp__FFYM;
  __STRING_CST *Self__SOJQ;
  __PROTOTYPE_CST *Self__TOJQ;
  __INTEGER_CST *Self__UOJQ;
  __REAL_CST *Self__WOJQ;
  __CHARACTER_CST *Self__YOJQ;
  __IS_EXPANDED *Self__ZOJQ;
  void *args__34XM;
  __BOOLEAN __tmp__IDYM;
  result__W4XM=NULL;
  local__X4XM=NULL;
  instr__Y4XM=NULL;
  rec__Z4XM=NULL;
  slot_name__04XM=NULL;
  slot_msg__14XM=NULL;
  node__24XM=NULL;
  args__34XM=NULL;
  if (affect_with__ZCHI(t__T4XM,static_type__IXML(Self__S4XM))) {
    result__W4XM=Self__S4XM;
  } else {
    Self__BOJQ=((__TYPE_FULL *)static_type__IXML(Self__S4XM));
    if (is_cast__to__in__ZD0I(Self__BOJQ,(&__string_86),t__T4XM,((__PROTOTYPE *)prototype__NQRF(Self__BOJQ))->export_list__SFDC)) {
      local__X4XM=create__name__style__type__25JG(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__IXML(Self__S4XM)));
      instr__Y4XM=write__value__T5FH(local__X4XM,Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__S4XM);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__Y4XM);
      slot_name__04XM=get__QEC(last_cast_name__L42H);
      slot_msg__14XM=get_slot__AP5G(static_type__IXML(Self__S4XM),slot_name__04XM);
      if (((void *)slot_msg__14XM == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__IXML(Self__S4XM),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__T4XM,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__04XM);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__IXML(Self__S4XM),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__U4XM);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__IXML(Self__S4XM)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
        __tmp__MBYM=((__SLOT *)((__SLOT_DATA *)slot_msg__14XM)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__MBYM=((__SLOT *)((__SLOT_CODE *)slot_msg__14XM)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__MBYM) !=  1)) {
        if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
          __tmp__TBYM=((__SLOT_DATA *)slot_msg__14XM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__TBYM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__14XM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__TBYM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
        __tmp__ZBYM=get_type_result__PG2G(slot_msg__14XM);
      } else {
        __tmp__ZBYM=get_type_result__ZH2G(slot_msg__14XM);
      };
      if ((((void *)__tmp__ZBYM == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__ZBYM)->parent_type__KTL != (void *)((__TYPE_FULL *)t__T4XM)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__ZBYM != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__ZBYM,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__T4XM,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
          __tmp__1CYM=((__SLOT_DATA *)slot_msg__14XM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__1CYM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__14XM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__1CYM);
        put_position__ECH(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__Z4XM=read__IC5G(local__X4XM);
      node__24XM=new_read__slot__receiver__self__YLQC(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__14XM,rec__Z4XM,rec__Z4XM);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__24XM);
      result__W4XM=result_expr__PVDI(node__24XM);
      __tmp__IDYM=TRUE__;
    } else {
      __tmp__IDYM=FALSE__;
    };
    if ((! __tmp__IDYM)) {
      Self__LOJQ=((__TYPE_FULL *)t__T4XM);
      if (is_cast__to__in__ZD0I(Self__LOJQ,(&__string_87),static_type__IXML(Self__S4XM),((__PROTOTYPE *)prototype__NQRF(Self__LOJQ))->import_list__0FDC)) {
        local__X4XM=create__name__style__type__25JG(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__IXML(Self__S4XM)));
        instr__Y4XM=write__value__T5FH(local__X4XM,Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__S4XM);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__Y4XM);
        slot_name__04XM=get__QEC(last_cast_name__L42H);
        slot_msg__14XM=get_slot__AP5G(t__T4XM,slot_name__04XM);
        if (((void *)slot_msg__14XM == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__T4XM,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__IXML(Self__S4XM),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__04XM);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__T4XM,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__U4XM);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__T4XM))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
          __tmp__YEYM=((__SLOT *)((__SLOT_DATA *)slot_msg__14XM)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__YEYM=((__SLOT *)((__SLOT_CODE *)slot_msg__14XM)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__YEYM) !=  2)) {
          if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
            __tmp__5EYM=((__SLOT_DATA *)slot_msg__14XM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__5EYM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__14XM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__5EYM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
          __tmp__FFYM=get_type_result__PG2G(slot_msg__14XM);
        } else {
          __tmp__FFYM=get_type_result__ZH2G(slot_msg__14XM);
        };
        if ((((void *)__tmp__FFYM == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__FFYM)->parent_type__KTL != (void *)((__TYPE_FULL *)t__T4XM)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__FFYM != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__FFYM,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__T4XM,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__14XM)->__id==__SLOT_DATA__) {
            __tmp__HGYM=((__SLOT_DATA *)slot_msg__14XM)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__HGYM=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__14XM)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__HGYM);
          put_position__ECH(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__34XM=create_with_capacity__3THH( 2);
        add_last__XSEI(args__34XM,create__type__CLQC(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__T4XM));
        add_last__XSEI(args__34XM,read__IC5G(local__X4XM));
        __tmp__UGYM=Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__VGYM=((void **)((__FAST_ARRAYoEXPRo *)args__34XM)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__VGYM)->__id) {
        case __LIST__: {
          __tmp__WGYM=my_copy__2HYM(__tmp__VGYM);
        } break;
        case __STRING_CST__: {
          Self__SOJQ=((__STRING_CST *)__tmp__VGYM);
          __tmp__WGYM=create__text__AUMH(Self__SOJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SOJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__WGYM=my_copy__2K2H(__tmp__VGYM);
        } break;
        case __PROTOTYPE_CST__: {
          Self__TOJQ=((__PROTOTYPE_CST *)__tmp__VGYM);
          __tmp__WGYM=create__type__CLQC(Self__TOJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TOJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__UOJQ=((__INTEGER_CST *)__tmp__VGYM);
          __tmp__WGYM=create__value__type__DNQC(Self__UOJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UOJQ->value__PAZD,Self__UOJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__WGYM=my_copy__OAFJ(__tmp__VGYM);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__WGYM=my_copy__KM2H(__tmp__VGYM);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__WGYM=my_copy__DN2H(__tmp__VGYM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__WGYM=my_copy__QN2H(__tmp__VGYM);
        } break;
        case __REAL_CST__: {
          Self__WOJQ=((__REAL_CST *)__tmp__VGYM);
          __tmp__WGYM=create__value__type__1SMH(Self__WOJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WOJQ->value__5N2H,Self__WOJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__YOJQ=((__CHARACTER_CST *)__tmp__VGYM);
          __tmp__WGYM=create__char__WTMH(Self__YOJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YOJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__ZOJQ=((__IS_EXPANDED *)__tmp__VGYM);
          __tmp__WGYM=create__receiver__WRWH(Self__ZOJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__ZOJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__WGYM=my_copy__TO2H(__tmp__VGYM);
        } break;
        case __EXPR_SUP__: {
          __tmp__WGYM=my_copy__2O2H(__tmp__VGYM);
        } break;
        case __EXPR_SUB__: {
          __tmp__WGYM=my_copy__HP2H(__tmp__VGYM);
        } break;
        case __EXPR_MUL__: {
          __tmp__WGYM=my_copy__TP2H(__tmp__VGYM);
        } break;
        case __EXPR_DIV__: {
          __tmp__WGYM=my_copy__4P2H(__tmp__VGYM);
        } break;
        case __EXPR_AND__: {
          __tmp__WGYM=my_copy__JQ2H(__tmp__VGYM);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__WGYM=my_copy__UQ2H(__tmp__VGYM);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__WGYM=my_copy__5Q2H(__tmp__VGYM);
        } break;
        case __PUT_TO__: {
          __tmp__WGYM=my_copy__KR2H(__tmp__VGYM);
        } break;
        case __ITEM__: {
          __tmp__WGYM=my_copy__1R2H(__tmp__VGYM);
        } break;
        case __SIZE_OF__: {
          __tmp__WGYM=my_copy__HS2H(__tmp__VGYM);
        } break;
        case __CAST__: {
          __tmp__WGYM=my_copy__QS2H(__tmp__VGYM);
        } break;
        case __CALL_SLOT__: {
          __tmp__WGYM=my_copy__PIYM(__tmp__VGYM);
        } break;
        case __READ_SLOT__: {
          __tmp__WGYM=my_copy__AVGK(__tmp__VGYM);
        } break;
        case __READ_GLOBAL__: {
          __tmp__WGYM=my_copy__NVGK(__tmp__VGYM);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__WGYM=my_copy__RFCN(__tmp__VGYM);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__WGYM=my_copy__JMEO(__tmp__VGYM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__WGYM=my_copy__RTJO(__tmp__VGYM);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__WGYM=my_copy__WMEO(__tmp__VGYM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__WGYM=my_copy__3TJO(__tmp__VGYM);
        } break;
        case __EXPR_NEG__: {
          __tmp__WGYM=my_copy__YEJM(__tmp__VGYM);
        } break;
        case __EXPR_ADD__: {
          __tmp__WGYM=my_copy__YRLL(__tmp__VGYM);
        } break;
        case __EXPR_NOT__: {
          __tmp__WGYM=my_copy__GLYM(__tmp__VGYM);
        } break;
        case __EXPR_MOD__: {
          __tmp__WGYM=my_copy__BNEO(__tmp__VGYM);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__WGYM=my_copy__M3DP(__tmp__VGYM);
        } break;
        case __EXPR_INF__: {
          __tmp__WGYM=my_copy__PBSN(__tmp__VGYM);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__WGYM=my_copy__0BSN(__tmp__VGYM);
        } break;
        case __EXPR_OR__: {
          __tmp__WGYM=my_copy__ZOPN(__tmp__VGYM);
        } break;
        case __EXPR_XOR__: {
          __tmp__WGYM=my_copy__CYSO(__tmp__VGYM);
        } break;
        };
        node__24XM=new_read__slot__receiver__with__YOWH(__tmp__UGYM,slot_msg__14XM,__tmp__WGYM,args__34XM);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__24XM);
        result__W4XM=result_expr__PVDI(node__24XM);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__T4XM,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__IXML(Self__S4XM),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__U4XM);
        put_position__ECH(Self__S4XM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__W4XM);
}

static void* check_type__with__QRDN(__EXPR_NOT *Self__RRDN,void *t__SRDN,__POSITION p__TRDN)
// ({EXPR_NOT},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__VRDN,*rec__YRDN,*__tmp__UZDN,*__tmp__VZDN;
  void *local__WRDN;
  void *instr__XRDN;
  void *slot_name__ZRDN;
  void *slot_msg__0RDN;
  void *node__1RDN;
  __TYPE_FULL *Self__0OJQ,*Self__EPJQ;
  void *__tmp__LUDN,*__tmp__XXDN;
  __POSITION __tmp__SUDN,__tmp__0VDN,__tmp__4XDN,__tmp__GZDN;
  __POSITION __tmp__TZDN;
  void *__tmp__YUDN,*__tmp__EYDN;
  __STRING_CST *Self__LPJQ;
  __PROTOTYPE_CST *Self__MPJQ;
  __INTEGER_CST *Self__NPJQ;
  __REAL_CST *Self__PPJQ;
  __CHARACTER_CST *Self__RPJQ;
  __IS_EXPANDED *Self__SPJQ;
  void *args__2RDN;
  __BOOLEAN __tmp__HWDN;
  result__VRDN=NULL;
  local__WRDN=NULL;
  instr__XRDN=NULL;
  rec__YRDN=NULL;
  slot_name__ZRDN=NULL;
  slot_msg__0RDN=NULL;
  node__1RDN=NULL;
  args__2RDN=NULL;
  if (affect_with__ZCHI(t__SRDN,static_type__BTXM(Self__RRDN))) {
    result__VRDN=Self__RRDN;
  } else {
    Self__0OJQ=((__TYPE_FULL *)static_type__BTXM(Self__RRDN));
    if (is_cast__to__in__ZD0I(Self__0OJQ,(&__string_86),t__SRDN,((__PROTOTYPE *)prototype__NQRF(Self__0OJQ))->export_list__SFDC)) {
      local__WRDN=create__name__style__type__25JG(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__BTXM(Self__RRDN)));
      instr__XRDN=write__value__T5FH(local__WRDN,Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RRDN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__XRDN);
      slot_name__ZRDN=get__QEC(last_cast_name__L42H);
      slot_msg__0RDN=get_slot__AP5G(static_type__BTXM(Self__RRDN),slot_name__ZRDN);
      if (((void *)slot_msg__0RDN == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__BTXM(Self__RRDN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__SRDN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__ZRDN);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__BTXM(Self__RRDN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__TRDN);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__BTXM(Self__RRDN)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
        __tmp__LUDN=((__SLOT *)((__SLOT_DATA *)slot_msg__0RDN)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__LUDN=((__SLOT *)((__SLOT_CODE *)slot_msg__0RDN)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__LUDN) !=  1)) {
        if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
          __tmp__SUDN=((__SLOT_DATA *)slot_msg__0RDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__SUDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__0RDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__SUDN);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
        __tmp__YUDN=get_type_result__PG2G(slot_msg__0RDN);
      } else {
        __tmp__YUDN=get_type_result__ZH2G(slot_msg__0RDN);
      };
      if ((((void *)__tmp__YUDN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__YUDN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__SRDN)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__YUDN != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__YUDN,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__SRDN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
          __tmp__0VDN=((__SLOT_DATA *)slot_msg__0RDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__0VDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__0RDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__0VDN);
        put_position__ECH(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__YRDN=read__IC5G(local__WRDN);
      node__1RDN=new_read__slot__receiver__self__YLQC(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__0RDN,rec__YRDN,rec__YRDN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__1RDN);
      result__VRDN=result_expr__PVDI(node__1RDN);
      __tmp__HWDN=TRUE__;
    } else {
      __tmp__HWDN=FALSE__;
    };
    if ((! __tmp__HWDN)) {
      Self__EPJQ=((__TYPE_FULL *)t__SRDN);
      if (is_cast__to__in__ZD0I(Self__EPJQ,(&__string_87),static_type__BTXM(Self__RRDN),((__PROTOTYPE *)prototype__NQRF(Self__EPJQ))->import_list__0FDC)) {
        local__WRDN=create__name__style__type__25JG(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__BTXM(Self__RRDN)));
        instr__XRDN=write__value__T5FH(local__WRDN,Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RRDN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__XRDN);
        slot_name__ZRDN=get__QEC(last_cast_name__L42H);
        slot_msg__0RDN=get_slot__AP5G(t__SRDN,slot_name__ZRDN);
        if (((void *)slot_msg__0RDN == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__SRDN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__BTXM(Self__RRDN),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__ZRDN);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__SRDN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__TRDN);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__SRDN))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
          __tmp__XXDN=((__SLOT *)((__SLOT_DATA *)slot_msg__0RDN)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__XXDN=((__SLOT *)((__SLOT_CODE *)slot_msg__0RDN)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__XXDN) !=  2)) {
          if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
            __tmp__4XDN=((__SLOT_DATA *)slot_msg__0RDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__4XDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__0RDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__4XDN);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
          __tmp__EYDN=get_type_result__PG2G(slot_msg__0RDN);
        } else {
          __tmp__EYDN=get_type_result__ZH2G(slot_msg__0RDN);
        };
        if ((((void *)__tmp__EYDN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__EYDN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__SRDN)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__EYDN != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__EYDN,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__SRDN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__0RDN)->__id==__SLOT_DATA__) {
            __tmp__GZDN=((__SLOT_DATA *)slot_msg__0RDN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__GZDN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__0RDN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__GZDN);
          put_position__ECH(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__2RDN=create_with_capacity__3THH( 2);
        add_last__XSEI(args__2RDN,create__type__CLQC(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,t__SRDN));
        add_last__XSEI(args__2RDN,read__IC5G(local__WRDN));
        __tmp__TZDN=Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__UZDN=((void **)((__FAST_ARRAYoEXPRo *)args__2RDN)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__UZDN)->__id) {
        case __LIST__: {
          __tmp__VZDN=my_copy__2HYM(__tmp__UZDN);
        } break;
        case __STRING_CST__: {
          Self__LPJQ=((__STRING_CST *)__tmp__UZDN);
          __tmp__VZDN=create__text__AUMH(Self__LPJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LPJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__VZDN=my_copy__2K2H(__tmp__UZDN);
        } break;
        case __PROTOTYPE_CST__: {
          Self__MPJQ=((__PROTOTYPE_CST *)__tmp__UZDN);
          __tmp__VZDN=create__type__CLQC(Self__MPJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MPJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__NPJQ=((__INTEGER_CST *)__tmp__UZDN);
          __tmp__VZDN=create__value__type__DNQC(Self__NPJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NPJQ->value__PAZD,Self__NPJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__VZDN=my_copy__OAFJ(__tmp__UZDN);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__VZDN=my_copy__KM2H(__tmp__UZDN);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__VZDN=my_copy__DN2H(__tmp__UZDN);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__VZDN=my_copy__QN2H(__tmp__UZDN);
        } break;
        case __REAL_CST__: {
          Self__PPJQ=((__REAL_CST *)__tmp__UZDN);
          __tmp__VZDN=create__value__type__1SMH(Self__PPJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PPJQ->value__5N2H,Self__PPJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__RPJQ=((__CHARACTER_CST *)__tmp__UZDN);
          __tmp__VZDN=create__char__WTMH(Self__RPJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RPJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__SPJQ=((__IS_EXPANDED *)__tmp__UZDN);
          __tmp__VZDN=create__receiver__WRWH(Self__SPJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__SPJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__VZDN=my_copy__TO2H(__tmp__UZDN);
        } break;
        case __EXPR_SUP__: {
          __tmp__VZDN=my_copy__2O2H(__tmp__UZDN);
        } break;
        case __EXPR_SUB__: {
          __tmp__VZDN=my_copy__HP2H(__tmp__UZDN);
        } break;
        case __EXPR_MUL__: {
          __tmp__VZDN=my_copy__TP2H(__tmp__UZDN);
        } break;
        case __EXPR_DIV__: {
          __tmp__VZDN=my_copy__4P2H(__tmp__UZDN);
        } break;
        case __EXPR_AND__: {
          __tmp__VZDN=my_copy__JQ2H(__tmp__UZDN);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__VZDN=my_copy__UQ2H(__tmp__UZDN);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__VZDN=my_copy__5Q2H(__tmp__UZDN);
        } break;
        case __PUT_TO__: {
          __tmp__VZDN=my_copy__KR2H(__tmp__UZDN);
        } break;
        case __ITEM__: {
          __tmp__VZDN=my_copy__1R2H(__tmp__UZDN);
        } break;
        case __SIZE_OF__: {
          __tmp__VZDN=my_copy__HS2H(__tmp__UZDN);
        } break;
        case __CAST__: {
          __tmp__VZDN=my_copy__QS2H(__tmp__UZDN);
        } break;
        case __CALL_SLOT__: {
          __tmp__VZDN=my_copy__PIYM(__tmp__UZDN);
        } break;
        case __READ_SLOT__: {
          __tmp__VZDN=my_copy__AVGK(__tmp__UZDN);
        } break;
        case __READ_GLOBAL__: {
          __tmp__VZDN=my_copy__NVGK(__tmp__UZDN);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__VZDN=my_copy__RFCN(__tmp__UZDN);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__VZDN=my_copy__JMEO(__tmp__UZDN);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__VZDN=my_copy__RTJO(__tmp__UZDN);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__VZDN=my_copy__WMEO(__tmp__UZDN);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__VZDN=my_copy__3TJO(__tmp__UZDN);
        } break;
        case __EXPR_NEG__: {
          __tmp__VZDN=my_copy__YEJM(__tmp__UZDN);
        } break;
        case __EXPR_ADD__: {
          __tmp__VZDN=my_copy__YRLL(__tmp__UZDN);
        } break;
        case __EXPR_NOT__: {
          __tmp__VZDN=my_copy__GLYM(__tmp__UZDN);
        } break;
        case __EXPR_MOD__: {
          __tmp__VZDN=my_copy__BNEO(__tmp__UZDN);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__VZDN=my_copy__M3DP(__tmp__UZDN);
        } break;
        case __EXPR_INF__: {
          __tmp__VZDN=my_copy__PBSN(__tmp__UZDN);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__VZDN=my_copy__0BSN(__tmp__UZDN);
        } break;
        case __EXPR_OR__: {
          __tmp__VZDN=my_copy__ZOPN(__tmp__UZDN);
        } break;
        case __EXPR_XOR__: {
          __tmp__VZDN=my_copy__CYSO(__tmp__UZDN);
        } break;
        };
        node__1RDN=new_read__slot__receiver__with__YOWH(__tmp__TZDN,slot_msg__0RDN,__tmp__VZDN,args__2RDN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__1RDN);
        result__VRDN=result_expr__PVDI(node__1RDN);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__SRDN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__BTXM(Self__RRDN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__TRDN);
        put_position__ECH(Self__RRDN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__VRDN);
}

static void* check_type__with__4JJO(__EXPR_MOD *Self__5JJO,void *t__AKJO,__POSITION p__BKJO)
// ({EXPR_MOD},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__DKJO,*rec__GKJO,*__tmp__CSJO,*__tmp__DSJO;
  void *local__EKJO;
  void *instr__FKJO;
  void *slot_name__HKJO;
  void *slot_msg__IKJO;
  void *node__JKJO;
  __TYPE_FULL *Self__TPJQ,*Self__3PJQ;
  void *__tmp__ZMJO,*__tmp__FQJO;
  __POSITION __tmp__ANJO,__tmp__IOJO,__tmp__MQJO,__tmp__URJO;
  __POSITION __tmp__BSJO;
  void *__tmp__GNJO,*__tmp__SQJO;
  __STRING_CST *Self__EQJQ;
  __PROTOTYPE_CST *Self__FQJQ;
  __INTEGER_CST *Self__GQJQ;
  __REAL_CST *Self__IQJQ;
  __CHARACTER_CST *Self__KQJQ;
  __IS_EXPANDED *Self__LQJQ;
  void *args__KKJO;
  __BOOLEAN __tmp__VOJO;
  result__DKJO=NULL;
  local__EKJO=NULL;
  instr__FKJO=NULL;
  rec__GKJO=NULL;
  slot_name__HKJO=NULL;
  slot_msg__IKJO=NULL;
  node__JKJO=NULL;
  args__KKJO=NULL;
  if (affect_with__ZCHI(t__AKJO,static_type__5LEO(Self__5JJO))) {
    result__DKJO=Self__5JJO;
  } else {
    Self__TPJQ=((__TYPE_FULL *)static_type__5LEO(Self__5JJO));
    if (is_cast__to__in__ZD0I(Self__TPJQ,(&__string_86),t__AKJO,((__PROTOTYPE *)prototype__NQRF(Self__TPJQ))->export_list__SFDC)) {
      local__EKJO=create__name__style__type__25JG(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__5LEO(Self__5JJO)));
      instr__FKJO=write__value__T5FH(local__EKJO,Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5JJO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__FKJO);
      slot_name__HKJO=get__QEC(last_cast_name__L42H);
      slot_msg__IKJO=get_slot__AP5G(static_type__5LEO(Self__5JJO),slot_name__HKJO);
      if (((void *)slot_msg__IKJO == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__5LEO(Self__5JJO),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__AKJO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__HKJO);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__5LEO(Self__5JJO),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__BKJO);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__5LEO(Self__5JJO)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
        __tmp__ZMJO=((__SLOT *)((__SLOT_DATA *)slot_msg__IKJO)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__ZMJO=((__SLOT *)((__SLOT_CODE *)slot_msg__IKJO)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__ZMJO) !=  1)) {
        if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
          __tmp__ANJO=((__SLOT_DATA *)slot_msg__IKJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__ANJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IKJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__ANJO);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
        __tmp__GNJO=get_type_result__PG2G(slot_msg__IKJO);
      } else {
        __tmp__GNJO=get_type_result__ZH2G(slot_msg__IKJO);
      };
      if ((((void *)__tmp__GNJO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__GNJO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__AKJO)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__GNJO != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__GNJO,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__AKJO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
          __tmp__IOJO=((__SLOT_DATA *)slot_msg__IKJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__IOJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IKJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__IOJO);
        put_position__ECH(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__GKJO=read__IC5G(local__EKJO);
      node__JKJO=new_read__slot__receiver__self__YLQC(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__IKJO,rec__GKJO,rec__GKJO);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__JKJO);
      result__DKJO=result_expr__PVDI(node__JKJO);
      __tmp__VOJO=TRUE__;
    } else {
      __tmp__VOJO=FALSE__;
    };
    if ((! __tmp__VOJO)) {
      Self__3PJQ=((__TYPE_FULL *)t__AKJO);
      if (is_cast__to__in__ZD0I(Self__3PJQ,(&__string_87),static_type__5LEO(Self__5JJO),((__PROTOTYPE *)prototype__NQRF(Self__3PJQ))->import_list__0FDC)) {
        local__EKJO=create__name__style__type__25JG(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__5LEO(Self__5JJO)));
        instr__FKJO=write__value__T5FH(local__EKJO,Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5JJO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__FKJO);
        slot_name__HKJO=get__QEC(last_cast_name__L42H);
        slot_msg__IKJO=get_slot__AP5G(t__AKJO,slot_name__HKJO);
        if (((void *)slot_msg__IKJO == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__AKJO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__5LEO(Self__5JJO),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__HKJO);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__AKJO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__BKJO);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__AKJO))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
          __tmp__FQJO=((__SLOT *)((__SLOT_DATA *)slot_msg__IKJO)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__FQJO=((__SLOT *)((__SLOT_CODE *)slot_msg__IKJO)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__FQJO) !=  2)) {
          if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
            __tmp__MQJO=((__SLOT_DATA *)slot_msg__IKJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__MQJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IKJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__MQJO);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
          __tmp__SQJO=get_type_result__PG2G(slot_msg__IKJO);
        } else {
          __tmp__SQJO=get_type_result__ZH2G(slot_msg__IKJO);
        };
        if ((((void *)__tmp__SQJO == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__SQJO)->parent_type__KTL != (void *)((__TYPE_FULL *)t__AKJO)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__SQJO != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__SQJO,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__AKJO,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__IKJO)->__id==__SLOT_DATA__) {
            __tmp__URJO=((__SLOT_DATA *)slot_msg__IKJO)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__URJO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__IKJO)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__URJO);
          put_position__ECH(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__KKJO=create_with_capacity__3THH( 2);
        add_last__XSEI(args__KKJO,create__type__CLQC(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__AKJO));
        add_last__XSEI(args__KKJO,read__IC5G(local__EKJO));
        __tmp__BSJO=Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__CSJO=((void **)((__FAST_ARRAYoEXPRo *)args__KKJO)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__CSJO)->__id) {
        case __LIST__: {
          __tmp__DSJO=my_copy__2HYM(__tmp__CSJO);
        } break;
        case __STRING_CST__: {
          Self__EQJQ=((__STRING_CST *)__tmp__CSJO);
          __tmp__DSJO=create__text__AUMH(Self__EQJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EQJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__DSJO=my_copy__2K2H(__tmp__CSJO);
        } break;
        case __PROTOTYPE_CST__: {
          Self__FQJQ=((__PROTOTYPE_CST *)__tmp__CSJO);
          __tmp__DSJO=create__type__CLQC(Self__FQJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FQJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__GQJQ=((__INTEGER_CST *)__tmp__CSJO);
          __tmp__DSJO=create__value__type__DNQC(Self__GQJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GQJQ->value__PAZD,Self__GQJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__DSJO=my_copy__OAFJ(__tmp__CSJO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__DSJO=my_copy__KM2H(__tmp__CSJO);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__DSJO=my_copy__DN2H(__tmp__CSJO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__DSJO=my_copy__QN2H(__tmp__CSJO);
        } break;
        case __REAL_CST__: {
          Self__IQJQ=((__REAL_CST *)__tmp__CSJO);
          __tmp__DSJO=create__value__type__1SMH(Self__IQJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IQJQ->value__5N2H,Self__IQJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__KQJQ=((__CHARACTER_CST *)__tmp__CSJO);
          __tmp__DSJO=create__char__WTMH(Self__KQJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KQJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__LQJQ=((__IS_EXPANDED *)__tmp__CSJO);
          __tmp__DSJO=create__receiver__WRWH(Self__LQJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__LQJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__DSJO=my_copy__TO2H(__tmp__CSJO);
        } break;
        case __EXPR_SUP__: {
          __tmp__DSJO=my_copy__2O2H(__tmp__CSJO);
        } break;
        case __EXPR_SUB__: {
          __tmp__DSJO=my_copy__HP2H(__tmp__CSJO);
        } break;
        case __EXPR_MUL__: {
          __tmp__DSJO=my_copy__TP2H(__tmp__CSJO);
        } break;
        case __EXPR_DIV__: {
          __tmp__DSJO=my_copy__4P2H(__tmp__CSJO);
        } break;
        case __EXPR_AND__: {
          __tmp__DSJO=my_copy__JQ2H(__tmp__CSJO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__DSJO=my_copy__UQ2H(__tmp__CSJO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__DSJO=my_copy__5Q2H(__tmp__CSJO);
        } break;
        case __PUT_TO__: {
          __tmp__DSJO=my_copy__KR2H(__tmp__CSJO);
        } break;
        case __ITEM__: {
          __tmp__DSJO=my_copy__1R2H(__tmp__CSJO);
        } break;
        case __SIZE_OF__: {
          __tmp__DSJO=my_copy__HS2H(__tmp__CSJO);
        } break;
        case __CAST__: {
          __tmp__DSJO=my_copy__QS2H(__tmp__CSJO);
        } break;
        case __CALL_SLOT__: {
          __tmp__DSJO=my_copy__PIYM(__tmp__CSJO);
        } break;
        case __READ_SLOT__: {
          __tmp__DSJO=my_copy__AVGK(__tmp__CSJO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__DSJO=my_copy__NVGK(__tmp__CSJO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__DSJO=my_copy__RFCN(__tmp__CSJO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__DSJO=my_copy__JMEO(__tmp__CSJO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__DSJO=my_copy__RTJO(__tmp__CSJO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__DSJO=my_copy__WMEO(__tmp__CSJO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__DSJO=my_copy__3TJO(__tmp__CSJO);
        } break;
        case __EXPR_NEG__: {
          __tmp__DSJO=my_copy__YEJM(__tmp__CSJO);
        } break;
        case __EXPR_ADD__: {
          __tmp__DSJO=my_copy__YRLL(__tmp__CSJO);
        } break;
        case __EXPR_NOT__: {
          __tmp__DSJO=my_copy__GLYM(__tmp__CSJO);
        } break;
        case __EXPR_MOD__: {
          __tmp__DSJO=my_copy__BNEO(__tmp__CSJO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__DSJO=my_copy__M3DP(__tmp__CSJO);
        } break;
        case __EXPR_INF__: {
          __tmp__DSJO=my_copy__PBSN(__tmp__CSJO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__DSJO=my_copy__0BSN(__tmp__CSJO);
        } break;
        case __EXPR_OR__: {
          __tmp__DSJO=my_copy__ZOPN(__tmp__CSJO);
        } break;
        case __EXPR_XOR__: {
          __tmp__DSJO=my_copy__CYSO(__tmp__CSJO);
        } break;
        };
        node__JKJO=new_read__slot__receiver__with__YOWH(__tmp__BSJO,slot_msg__IKJO,__tmp__DSJO,args__KKJO);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__JKJO);
        result__DKJO=result_expr__PVDI(node__JKJO);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__AKJO,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__5LEO(Self__5JJO),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__BKJO);
        put_position__ECH(Self__5JJO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__DKJO);
}

static void* check_type__with__SQIP(__EXPR_SUP_EQ *Self__TQIP,void *t__UQIP,__POSITION p__VQIP)
// ({EXPR_SUP_EQ},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__XQIP,*rec__0QIP,*__tmp__WYIP,*__tmp__XYIP;
  void *local__YQIP;
  void *instr__ZQIP;
  void *slot_name__1QIP;
  void *slot_msg__2QIP;
  void *node__3QIP;
  __TYPE_FULL *Self__MQJQ,*Self__WQJQ;
  void *__tmp__NTIP,*__tmp__ZWIP;
  __POSITION __tmp__UTIP,__tmp__2UIP,__tmp__AXIP,__tmp__IYIP;
  __POSITION __tmp__VYIP;
  void *__tmp__0TIP,*__tmp__GXIP;
  __STRING_CST *Self__3QJQ;
  __PROTOTYPE_CST *Self__4QJQ;
  __INTEGER_CST *Self__5QJQ;
  __REAL_CST *Self__BRJQ;
  __CHARACTER_CST *Self__DRJQ;
  __IS_EXPANDED *Self__ERJQ;
  void *args__4QIP;
  __BOOLEAN __tmp__JVIP;
  result__XQIP=NULL;
  local__YQIP=NULL;
  instr__ZQIP=NULL;
  rec__0QIP=NULL;
  slot_name__1QIP=NULL;
  slot_msg__2QIP=NULL;
  node__3QIP=NULL;
  args__4QIP=NULL;
  if (affect_with__ZCHI(t__UQIP,static_type__W2DP())) {
    result__XQIP=Self__TQIP;
  } else {
    Self__MQJQ=((__TYPE_FULL *)static_type__W2DP());
    if (is_cast__to__in__ZD0I(Self__MQJQ,(&__string_86),t__UQIP,((__PROTOTYPE *)prototype__NQRF(Self__MQJQ))->export_list__SFDC)) {
      local__YQIP=create__name__style__type__25JG(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__W2DP()));
      instr__ZQIP=write__value__T5FH(local__YQIP,Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TQIP);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__ZQIP);
      slot_name__1QIP=get__QEC(last_cast_name__L42H);
      slot_msg__2QIP=get_slot__AP5G(static_type__W2DP(),slot_name__1QIP);
      if (((void *)slot_msg__2QIP == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__W2DP(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__UQIP,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__1QIP);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__W2DP(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__VQIP);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__W2DP()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
        __tmp__NTIP=((__SLOT *)((__SLOT_DATA *)slot_msg__2QIP)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__NTIP=((__SLOT *)((__SLOT_CODE *)slot_msg__2QIP)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__NTIP) !=  1)) {
        if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
          __tmp__UTIP=((__SLOT_DATA *)slot_msg__2QIP)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__UTIP=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2QIP)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__UTIP);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
        __tmp__0TIP=get_type_result__PG2G(slot_msg__2QIP);
      } else {
        __tmp__0TIP=get_type_result__ZH2G(slot_msg__2QIP);
      };
      if ((((void *)__tmp__0TIP == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__0TIP)->parent_type__KTL != (void *)((__TYPE_FULL *)t__UQIP)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__0TIP != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__0TIP,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__UQIP,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
          __tmp__2UIP=((__SLOT_DATA *)slot_msg__2QIP)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__2UIP=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2QIP)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__2UIP);
        put_position__ECH(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__0QIP=read__IC5G(local__YQIP);
      node__3QIP=new_read__slot__receiver__self__YLQC(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__2QIP,rec__0QIP,rec__0QIP);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__3QIP);
      result__XQIP=result_expr__PVDI(node__3QIP);
      __tmp__JVIP=TRUE__;
    } else {
      __tmp__JVIP=FALSE__;
    };
    if ((! __tmp__JVIP)) {
      Self__WQJQ=((__TYPE_FULL *)t__UQIP);
      if (is_cast__to__in__ZD0I(Self__WQJQ,(&__string_87),static_type__W2DP(),((__PROTOTYPE *)prototype__NQRF(Self__WQJQ))->import_list__0FDC)) {
        local__YQIP=create__name__style__type__25JG(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__W2DP()));
        instr__ZQIP=write__value__T5FH(local__YQIP,Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TQIP);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__ZQIP);
        slot_name__1QIP=get__QEC(last_cast_name__L42H);
        slot_msg__2QIP=get_slot__AP5G(t__UQIP,slot_name__1QIP);
        if (((void *)slot_msg__2QIP == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__UQIP,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__W2DP(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__1QIP);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__UQIP,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__VQIP);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__UQIP))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
          __tmp__ZWIP=((__SLOT *)((__SLOT_DATA *)slot_msg__2QIP)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__ZWIP=((__SLOT *)((__SLOT_CODE *)slot_msg__2QIP)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__ZWIP) !=  2)) {
          if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
            __tmp__AXIP=((__SLOT_DATA *)slot_msg__2QIP)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__AXIP=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2QIP)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__AXIP);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
          __tmp__GXIP=get_type_result__PG2G(slot_msg__2QIP);
        } else {
          __tmp__GXIP=get_type_result__ZH2G(slot_msg__2QIP);
        };
        if ((((void *)__tmp__GXIP == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__GXIP)->parent_type__KTL != (void *)((__TYPE_FULL *)t__UQIP)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__GXIP != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__GXIP,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__UQIP,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__2QIP)->__id==__SLOT_DATA__) {
            __tmp__IYIP=((__SLOT_DATA *)slot_msg__2QIP)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__IYIP=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__2QIP)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__IYIP);
          put_position__ECH(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__4QIP=create_with_capacity__3THH( 2);
        add_last__XSEI(args__4QIP,create__type__CLQC(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__UQIP));
        add_last__XSEI(args__4QIP,read__IC5G(local__YQIP));
        __tmp__VYIP=Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__WYIP=((void **)((__FAST_ARRAYoEXPRo *)args__4QIP)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__WYIP)->__id) {
        case __LIST__: {
          __tmp__XYIP=my_copy__2HYM(__tmp__WYIP);
        } break;
        case __STRING_CST__: {
          Self__3QJQ=((__STRING_CST *)__tmp__WYIP);
          __tmp__XYIP=create__text__AUMH(Self__3QJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3QJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__XYIP=my_copy__2K2H(__tmp__WYIP);
        } break;
        case __PROTOTYPE_CST__: {
          Self__4QJQ=((__PROTOTYPE_CST *)__tmp__WYIP);
          __tmp__XYIP=create__type__CLQC(Self__4QJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4QJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__5QJQ=((__INTEGER_CST *)__tmp__WYIP);
          __tmp__XYIP=create__value__type__DNQC(Self__5QJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5QJQ->value__PAZD,Self__5QJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__XYIP=my_copy__OAFJ(__tmp__WYIP);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__XYIP=my_copy__KM2H(__tmp__WYIP);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__XYIP=my_copy__DN2H(__tmp__WYIP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__XYIP=my_copy__QN2H(__tmp__WYIP);
        } break;
        case __REAL_CST__: {
          Self__BRJQ=((__REAL_CST *)__tmp__WYIP);
          __tmp__XYIP=create__value__type__1SMH(Self__BRJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BRJQ->value__5N2H,Self__BRJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__DRJQ=((__CHARACTER_CST *)__tmp__WYIP);
          __tmp__XYIP=create__char__WTMH(Self__DRJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DRJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__ERJQ=((__IS_EXPANDED *)__tmp__WYIP);
          __tmp__XYIP=create__receiver__WRWH(Self__ERJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__ERJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__XYIP=my_copy__TO2H(__tmp__WYIP);
        } break;
        case __EXPR_SUP__: {
          __tmp__XYIP=my_copy__2O2H(__tmp__WYIP);
        } break;
        case __EXPR_SUB__: {
          __tmp__XYIP=my_copy__HP2H(__tmp__WYIP);
        } break;
        case __EXPR_MUL__: {
          __tmp__XYIP=my_copy__TP2H(__tmp__WYIP);
        } break;
        case __EXPR_DIV__: {
          __tmp__XYIP=my_copy__4P2H(__tmp__WYIP);
        } break;
        case __EXPR_AND__: {
          __tmp__XYIP=my_copy__JQ2H(__tmp__WYIP);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__XYIP=my_copy__UQ2H(__tmp__WYIP);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__XYIP=my_copy__5Q2H(__tmp__WYIP);
        } break;
        case __PUT_TO__: {
          __tmp__XYIP=my_copy__KR2H(__tmp__WYIP);
        } break;
        case __ITEM__: {
          __tmp__XYIP=my_copy__1R2H(__tmp__WYIP);
        } break;
        case __SIZE_OF__: {
          __tmp__XYIP=my_copy__HS2H(__tmp__WYIP);
        } break;
        case __CAST__: {
          __tmp__XYIP=my_copy__QS2H(__tmp__WYIP);
        } break;
        case __CALL_SLOT__: {
          __tmp__XYIP=my_copy__PIYM(__tmp__WYIP);
        } break;
        case __READ_SLOT__: {
          __tmp__XYIP=my_copy__AVGK(__tmp__WYIP);
        } break;
        case __READ_GLOBAL__: {
          __tmp__XYIP=my_copy__NVGK(__tmp__WYIP);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__XYIP=my_copy__RFCN(__tmp__WYIP);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__XYIP=my_copy__JMEO(__tmp__WYIP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__XYIP=my_copy__RTJO(__tmp__WYIP);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__XYIP=my_copy__WMEO(__tmp__WYIP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__XYIP=my_copy__3TJO(__tmp__WYIP);
        } break;
        case __EXPR_NEG__: {
          __tmp__XYIP=my_copy__YEJM(__tmp__WYIP);
        } break;
        case __EXPR_ADD__: {
          __tmp__XYIP=my_copy__YRLL(__tmp__WYIP);
        } break;
        case __EXPR_NOT__: {
          __tmp__XYIP=my_copy__GLYM(__tmp__WYIP);
        } break;
        case __EXPR_MOD__: {
          __tmp__XYIP=my_copy__BNEO(__tmp__WYIP);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__XYIP=my_copy__M3DP(__tmp__WYIP);
        } break;
        case __EXPR_INF__: {
          __tmp__XYIP=my_copy__PBSN(__tmp__WYIP);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__XYIP=my_copy__0BSN(__tmp__WYIP);
        } break;
        case __EXPR_OR__: {
          __tmp__XYIP=my_copy__ZOPN(__tmp__WYIP);
        } break;
        case __EXPR_XOR__: {
          __tmp__XYIP=my_copy__CYSO(__tmp__WYIP);
        } break;
        };
        node__3QIP=new_read__slot__receiver__with__YOWH(__tmp__VYIP,slot_msg__2QIP,__tmp__XYIP,args__4QIP);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__3QIP);
        result__XQIP=result_expr__PVDI(node__3QIP);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__UQIP,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__W2DP(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__VQIP);
        put_position__ECH(Self__TQIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__XQIP);
}

static void* check_type__with__H52O(__EXPR_INF *Self__I52O,void *t__J52O,__POSITION p__K52O)
// ({EXPR_INF},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__M52O,*rec__P52O,*__tmp__LH3O,*__tmp__MH3O;
  void *local__N52O;
  void *instr__O52O;
  void *slot_name__Q52O;
  void *slot_msg__R52O;
  void *node__S52O;
  __TYPE_FULL *Self__FRJQ,*Self__PRJQ;
  void *__tmp__CC3O,*__tmp__OF3O;
  __POSITION __tmp__JC3O,__tmp__RD3O,__tmp__VF3O,__tmp__3G3O;
  __POSITION __tmp__KH3O;
  void *__tmp__PC3O,*__tmp__1F3O;
  __STRING_CST *Self__WRJQ;
  __PROTOTYPE_CST *Self__XRJQ;
  __INTEGER_CST *Self__YRJQ;
  __REAL_CST *Self__0RJQ;
  __CHARACTER_CST *Self__2RJQ;
  __IS_EXPANDED *Self__3RJQ;
  void *args__T52O;
  __BOOLEAN __tmp__4D3O;
  result__M52O=NULL;
  local__N52O=NULL;
  instr__O52O=NULL;
  rec__P52O=NULL;
  slot_name__Q52O=NULL;
  slot_msg__R52O=NULL;
  node__S52O=NULL;
  args__T52O=NULL;
  if (affect_with__ZCHI(t__J52O,static_type__FQQN())) {
    result__M52O=Self__I52O;
  } else {
    Self__FRJQ=((__TYPE_FULL *)static_type__FQQN());
    if (is_cast__to__in__ZD0I(Self__FRJQ,(&__string_86),t__J52O,((__PROTOTYPE *)prototype__NQRF(Self__FRJQ))->export_list__SFDC)) {
      local__N52O=create__name__style__type__25JG(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__FQQN()));
      instr__O52O=write__value__T5FH(local__N52O,Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__I52O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__O52O);
      slot_name__Q52O=get__QEC(last_cast_name__L42H);
      slot_msg__R52O=get_slot__AP5G(static_type__FQQN(),slot_name__Q52O);
      if (((void *)slot_msg__R52O == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__FQQN(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__J52O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__Q52O);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__FQQN(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__K52O);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__FQQN()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
        __tmp__CC3O=((__SLOT *)((__SLOT_DATA *)slot_msg__R52O)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__CC3O=((__SLOT *)((__SLOT_CODE *)slot_msg__R52O)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__CC3O) !=  1)) {
        if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
          __tmp__JC3O=((__SLOT_DATA *)slot_msg__R52O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__JC3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__R52O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__JC3O);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
        __tmp__PC3O=get_type_result__PG2G(slot_msg__R52O);
      } else {
        __tmp__PC3O=get_type_result__ZH2G(slot_msg__R52O);
      };
      if ((((void *)__tmp__PC3O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__PC3O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__J52O)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__PC3O != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__PC3O,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__J52O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
          __tmp__RD3O=((__SLOT_DATA *)slot_msg__R52O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__RD3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__R52O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__RD3O);
        put_position__ECH(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__P52O=read__IC5G(local__N52O);
      node__S52O=new_read__slot__receiver__self__YLQC(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__R52O,rec__P52O,rec__P52O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__S52O);
      result__M52O=result_expr__PVDI(node__S52O);
      __tmp__4D3O=TRUE__;
    } else {
      __tmp__4D3O=FALSE__;
    };
    if ((! __tmp__4D3O)) {
      Self__PRJQ=((__TYPE_FULL *)t__J52O);
      if (is_cast__to__in__ZD0I(Self__PRJQ,(&__string_87),static_type__FQQN(),((__PROTOTYPE *)prototype__NQRF(Self__PRJQ))->import_list__0FDC)) {
        local__N52O=create__name__style__type__25JG(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__FQQN()));
        instr__O52O=write__value__T5FH(local__N52O,Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__I52O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__O52O);
        slot_name__Q52O=get__QEC(last_cast_name__L42H);
        slot_msg__R52O=get_slot__AP5G(t__J52O,slot_name__Q52O);
        if (((void *)slot_msg__R52O == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__J52O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__FQQN(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__Q52O);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__J52O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__K52O);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__J52O))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
          __tmp__OF3O=((__SLOT *)((__SLOT_DATA *)slot_msg__R52O)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__OF3O=((__SLOT *)((__SLOT_CODE *)slot_msg__R52O)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__OF3O) !=  2)) {
          if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
            __tmp__VF3O=((__SLOT_DATA *)slot_msg__R52O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__VF3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__R52O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__VF3O);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
          __tmp__1F3O=get_type_result__PG2G(slot_msg__R52O);
        } else {
          __tmp__1F3O=get_type_result__ZH2G(slot_msg__R52O);
        };
        if ((((void *)__tmp__1F3O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__1F3O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__J52O)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__1F3O != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__1F3O,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__J52O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__R52O)->__id==__SLOT_DATA__) {
            __tmp__3G3O=((__SLOT_DATA *)slot_msg__R52O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__3G3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__R52O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__3G3O);
          put_position__ECH(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__T52O=create_with_capacity__3THH( 2);
        add_last__XSEI(args__T52O,create__type__CLQC(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__J52O));
        add_last__XSEI(args__T52O,read__IC5G(local__N52O));
        __tmp__KH3O=Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__LH3O=((void **)((__FAST_ARRAYoEXPRo *)args__T52O)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__LH3O)->__id) {
        case __LIST__: {
          __tmp__MH3O=my_copy__2HYM(__tmp__LH3O);
        } break;
        case __STRING_CST__: {
          Self__WRJQ=((__STRING_CST *)__tmp__LH3O);
          __tmp__MH3O=create__text__AUMH(Self__WRJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WRJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__MH3O=my_copy__2K2H(__tmp__LH3O);
        } break;
        case __PROTOTYPE_CST__: {
          Self__XRJQ=((__PROTOTYPE_CST *)__tmp__LH3O);
          __tmp__MH3O=create__type__CLQC(Self__XRJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XRJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__YRJQ=((__INTEGER_CST *)__tmp__LH3O);
          __tmp__MH3O=create__value__type__DNQC(Self__YRJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YRJQ->value__PAZD,Self__YRJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__MH3O=my_copy__OAFJ(__tmp__LH3O);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__MH3O=my_copy__KM2H(__tmp__LH3O);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__MH3O=my_copy__DN2H(__tmp__LH3O);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__MH3O=my_copy__QN2H(__tmp__LH3O);
        } break;
        case __REAL_CST__: {
          Self__0RJQ=((__REAL_CST *)__tmp__LH3O);
          __tmp__MH3O=create__value__type__1SMH(Self__0RJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0RJQ->value__5N2H,Self__0RJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__2RJQ=((__CHARACTER_CST *)__tmp__LH3O);
          __tmp__MH3O=create__char__WTMH(Self__2RJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2RJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__3RJQ=((__IS_EXPANDED *)__tmp__LH3O);
          __tmp__MH3O=create__receiver__WRWH(Self__3RJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__3RJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__MH3O=my_copy__TO2H(__tmp__LH3O);
        } break;
        case __EXPR_SUP__: {
          __tmp__MH3O=my_copy__2O2H(__tmp__LH3O);
        } break;
        case __EXPR_SUB__: {
          __tmp__MH3O=my_copy__HP2H(__tmp__LH3O);
        } break;
        case __EXPR_MUL__: {
          __tmp__MH3O=my_copy__TP2H(__tmp__LH3O);
        } break;
        case __EXPR_DIV__: {
          __tmp__MH3O=my_copy__4P2H(__tmp__LH3O);
        } break;
        case __EXPR_AND__: {
          __tmp__MH3O=my_copy__JQ2H(__tmp__LH3O);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__MH3O=my_copy__UQ2H(__tmp__LH3O);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__MH3O=my_copy__5Q2H(__tmp__LH3O);
        } break;
        case __PUT_TO__: {
          __tmp__MH3O=my_copy__KR2H(__tmp__LH3O);
        } break;
        case __ITEM__: {
          __tmp__MH3O=my_copy__1R2H(__tmp__LH3O);
        } break;
        case __SIZE_OF__: {
          __tmp__MH3O=my_copy__HS2H(__tmp__LH3O);
        } break;
        case __CAST__: {
          __tmp__MH3O=my_copy__QS2H(__tmp__LH3O);
        } break;
        case __CALL_SLOT__: {
          __tmp__MH3O=my_copy__PIYM(__tmp__LH3O);
        } break;
        case __READ_SLOT__: {
          __tmp__MH3O=my_copy__AVGK(__tmp__LH3O);
        } break;
        case __READ_GLOBAL__: {
          __tmp__MH3O=my_copy__NVGK(__tmp__LH3O);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__MH3O=my_copy__RFCN(__tmp__LH3O);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__MH3O=my_copy__JMEO(__tmp__LH3O);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__MH3O=my_copy__RTJO(__tmp__LH3O);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__MH3O=my_copy__WMEO(__tmp__LH3O);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__MH3O=my_copy__3TJO(__tmp__LH3O);
        } break;
        case __EXPR_NEG__: {
          __tmp__MH3O=my_copy__YEJM(__tmp__LH3O);
        } break;
        case __EXPR_ADD__: {
          __tmp__MH3O=my_copy__YRLL(__tmp__LH3O);
        } break;
        case __EXPR_NOT__: {
          __tmp__MH3O=my_copy__GLYM(__tmp__LH3O);
        } break;
        case __EXPR_MOD__: {
          __tmp__MH3O=my_copy__BNEO(__tmp__LH3O);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__MH3O=my_copy__M3DP(__tmp__LH3O);
        } break;
        case __EXPR_INF__: {
          __tmp__MH3O=my_copy__PBSN(__tmp__LH3O);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__MH3O=my_copy__0BSN(__tmp__LH3O);
        } break;
        case __EXPR_OR__: {
          __tmp__MH3O=my_copy__ZOPN(__tmp__LH3O);
        } break;
        case __EXPR_XOR__: {
          __tmp__MH3O=my_copy__CYSO(__tmp__LH3O);
        } break;
        };
        node__S52O=new_read__slot__receiver__with__YOWH(__tmp__KH3O,slot_msg__R52O,__tmp__MH3O,args__T52O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__S52O);
        result__M52O=result_expr__PVDI(node__S52O);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__J52O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__FQQN(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__K52O);
        put_position__ECH(Self__I52O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__M52O);
}

static void* check_type__with__GI3O(__EXPR_INF_EQ *Self__HI3O,void *t__II3O,__POSITION p__JI3O)
// ({EXPR_INF_EQ},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__LI3O,*rec__OI3O,*__tmp__KQ3O,*__tmp__LQ3O;
  void *local__MI3O;
  void *instr__NI3O;
  void *slot_name__PI3O;
  void *slot_msg__QI3O;
  void *node__RI3O;
  __TYPE_FULL *Self__4RJQ,*Self__ISJQ;
  void *__tmp__BL3O,*__tmp__NO3O;
  __POSITION __tmp__IL3O,__tmp__QM3O,__tmp__UO3O,__tmp__2P3O;
  __POSITION __tmp__JQ3O;
  void *__tmp__OL3O,*__tmp__0O3O;
  __STRING_CST *Self__PSJQ;
  __PROTOTYPE_CST *Self__QSJQ;
  __INTEGER_CST *Self__RSJQ;
  __REAL_CST *Self__TSJQ;
  __CHARACTER_CST *Self__VSJQ;
  __IS_EXPANDED *Self__WSJQ;
  void *args__SI3O;
  __BOOLEAN __tmp__3M3O;
  result__LI3O=NULL;
  local__MI3O=NULL;
  instr__NI3O=NULL;
  rec__OI3O=NULL;
  slot_name__PI3O=NULL;
  slot_msg__QI3O=NULL;
  node__RI3O=NULL;
  args__SI3O=NULL;
  if (affect_with__ZCHI(t__II3O,static_type__KQQN())) {
    result__LI3O=Self__HI3O;
  } else {
    Self__4RJQ=((__TYPE_FULL *)static_type__KQQN());
    if (is_cast__to__in__ZD0I(Self__4RJQ,(&__string_86),t__II3O,((__PROTOTYPE *)prototype__NQRF(Self__4RJQ))->export_list__SFDC)) {
      local__MI3O=create__name__style__type__25JG(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__KQQN()));
      instr__NI3O=write__value__T5FH(local__MI3O,Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HI3O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__NI3O);
      slot_name__PI3O=get__QEC(last_cast_name__L42H);
      slot_msg__QI3O=get_slot__AP5G(static_type__KQQN(),slot_name__PI3O);
      if (((void *)slot_msg__QI3O == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__KQQN(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__II3O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__PI3O);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__KQQN(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__JI3O);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__KQQN()))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
        __tmp__BL3O=((__SLOT *)((__SLOT_DATA *)slot_msg__QI3O)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__BL3O=((__SLOT *)((__SLOT_CODE *)slot_msg__QI3O)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__BL3O) !=  1)) {
        if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
          __tmp__IL3O=((__SLOT_DATA *)slot_msg__QI3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__IL3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__QI3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__IL3O);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
        __tmp__OL3O=get_type_result__PG2G(slot_msg__QI3O);
      } else {
        __tmp__OL3O=get_type_result__ZH2G(slot_msg__QI3O);
      };
      if ((((void *)__tmp__OL3O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__OL3O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__II3O)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__OL3O != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__OL3O,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__II3O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
          __tmp__QM3O=((__SLOT_DATA *)slot_msg__QI3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__QM3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__QI3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__QM3O);
        put_position__ECH(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__OI3O=read__IC5G(local__MI3O);
      node__RI3O=new_read__slot__receiver__self__YLQC(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__QI3O,rec__OI3O,rec__OI3O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__RI3O);
      result__LI3O=result_expr__PVDI(node__RI3O);
      __tmp__3M3O=TRUE__;
    } else {
      __tmp__3M3O=FALSE__;
    };
    if ((! __tmp__3M3O)) {
      Self__ISJQ=((__TYPE_FULL *)t__II3O);
      if (is_cast__to__in__ZD0I(Self__ISJQ,(&__string_87),static_type__KQQN(),((__PROTOTYPE *)prototype__NQRF(Self__ISJQ))->import_list__0FDC)) {
        local__MI3O=create__name__style__type__25JG(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__KQQN()));
        instr__NI3O=write__value__T5FH(local__MI3O,Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HI3O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__NI3O);
        slot_name__PI3O=get__QEC(last_cast_name__L42H);
        slot_msg__QI3O=get_slot__AP5G(t__II3O,slot_name__PI3O);
        if (((void *)slot_msg__QI3O == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__II3O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__KQQN(),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__PI3O);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__II3O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__JI3O);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__II3O))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
          __tmp__NO3O=((__SLOT *)((__SLOT_DATA *)slot_msg__QI3O)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__NO3O=((__SLOT *)((__SLOT_CODE *)slot_msg__QI3O)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__NO3O) !=  2)) {
          if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
            __tmp__UO3O=((__SLOT_DATA *)slot_msg__QI3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__UO3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__QI3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__UO3O);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
          __tmp__0O3O=get_type_result__PG2G(slot_msg__QI3O);
        } else {
          __tmp__0O3O=get_type_result__ZH2G(slot_msg__QI3O);
        };
        if ((((void *)__tmp__0O3O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__0O3O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__II3O)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__0O3O != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__0O3O,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__II3O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__QI3O)->__id==__SLOT_DATA__) {
            __tmp__2P3O=((__SLOT_DATA *)slot_msg__QI3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__2P3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__QI3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__2P3O);
          put_position__ECH(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__SI3O=create_with_capacity__3THH( 2);
        add_last__XSEI(args__SI3O,create__type__CLQC(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__II3O));
        add_last__XSEI(args__SI3O,read__IC5G(local__MI3O));
        __tmp__JQ3O=Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__KQ3O=((void **)((__FAST_ARRAYoEXPRo *)args__SI3O)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__KQ3O)->__id) {
        case __LIST__: {
          __tmp__LQ3O=my_copy__2HYM(__tmp__KQ3O);
        } break;
        case __STRING_CST__: {
          Self__PSJQ=((__STRING_CST *)__tmp__KQ3O);
          __tmp__LQ3O=create__text__AUMH(Self__PSJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PSJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__LQ3O=my_copy__2K2H(__tmp__KQ3O);
        } break;
        case __PROTOTYPE_CST__: {
          Self__QSJQ=((__PROTOTYPE_CST *)__tmp__KQ3O);
          __tmp__LQ3O=create__type__CLQC(Self__QSJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QSJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__RSJQ=((__INTEGER_CST *)__tmp__KQ3O);
          __tmp__LQ3O=create__value__type__DNQC(Self__RSJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RSJQ->value__PAZD,Self__RSJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__LQ3O=my_copy__OAFJ(__tmp__KQ3O);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__LQ3O=my_copy__KM2H(__tmp__KQ3O);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__LQ3O=my_copy__DN2H(__tmp__KQ3O);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__LQ3O=my_copy__QN2H(__tmp__KQ3O);
        } break;
        case __REAL_CST__: {
          Self__TSJQ=((__REAL_CST *)__tmp__KQ3O);
          __tmp__LQ3O=create__value__type__1SMH(Self__TSJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TSJQ->value__5N2H,Self__TSJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__VSJQ=((__CHARACTER_CST *)__tmp__KQ3O);
          __tmp__LQ3O=create__char__WTMH(Self__VSJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VSJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__WSJQ=((__IS_EXPANDED *)__tmp__KQ3O);
          __tmp__LQ3O=create__receiver__WRWH(Self__WSJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WSJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__LQ3O=my_copy__TO2H(__tmp__KQ3O);
        } break;
        case __EXPR_SUP__: {
          __tmp__LQ3O=my_copy__2O2H(__tmp__KQ3O);
        } break;
        case __EXPR_SUB__: {
          __tmp__LQ3O=my_copy__HP2H(__tmp__KQ3O);
        } break;
        case __EXPR_MUL__: {
          __tmp__LQ3O=my_copy__TP2H(__tmp__KQ3O);
        } break;
        case __EXPR_DIV__: {
          __tmp__LQ3O=my_copy__4P2H(__tmp__KQ3O);
        } break;
        case __EXPR_AND__: {
          __tmp__LQ3O=my_copy__JQ2H(__tmp__KQ3O);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__LQ3O=my_copy__UQ2H(__tmp__KQ3O);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__LQ3O=my_copy__5Q2H(__tmp__KQ3O);
        } break;
        case __PUT_TO__: {
          __tmp__LQ3O=my_copy__KR2H(__tmp__KQ3O);
        } break;
        case __ITEM__: {
          __tmp__LQ3O=my_copy__1R2H(__tmp__KQ3O);
        } break;
        case __SIZE_OF__: {
          __tmp__LQ3O=my_copy__HS2H(__tmp__KQ3O);
        } break;
        case __CAST__: {
          __tmp__LQ3O=my_copy__QS2H(__tmp__KQ3O);
        } break;
        case __CALL_SLOT__: {
          __tmp__LQ3O=my_copy__PIYM(__tmp__KQ3O);
        } break;
        case __READ_SLOT__: {
          __tmp__LQ3O=my_copy__AVGK(__tmp__KQ3O);
        } break;
        case __READ_GLOBAL__: {
          __tmp__LQ3O=my_copy__NVGK(__tmp__KQ3O);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__LQ3O=my_copy__RFCN(__tmp__KQ3O);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__LQ3O=my_copy__JMEO(__tmp__KQ3O);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__LQ3O=my_copy__RTJO(__tmp__KQ3O);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__LQ3O=my_copy__WMEO(__tmp__KQ3O);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__LQ3O=my_copy__3TJO(__tmp__KQ3O);
        } break;
        case __EXPR_NEG__: {
          __tmp__LQ3O=my_copy__YEJM(__tmp__KQ3O);
        } break;
        case __EXPR_ADD__: {
          __tmp__LQ3O=my_copy__YRLL(__tmp__KQ3O);
        } break;
        case __EXPR_NOT__: {
          __tmp__LQ3O=my_copy__GLYM(__tmp__KQ3O);
        } break;
        case __EXPR_MOD__: {
          __tmp__LQ3O=my_copy__BNEO(__tmp__KQ3O);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__LQ3O=my_copy__M3DP(__tmp__KQ3O);
        } break;
        case __EXPR_INF__: {
          __tmp__LQ3O=my_copy__PBSN(__tmp__KQ3O);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__LQ3O=my_copy__0BSN(__tmp__KQ3O);
        } break;
        case __EXPR_OR__: {
          __tmp__LQ3O=my_copy__ZOPN(__tmp__KQ3O);
        } break;
        case __EXPR_XOR__: {
          __tmp__LQ3O=my_copy__CYSO(__tmp__KQ3O);
        } break;
        };
        node__RI3O=new_read__slot__receiver__with__YOWH(__tmp__JQ3O,slot_msg__QI3O,__tmp__LQ3O,args__SI3O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__RI3O);
        result__LI3O=result_expr__PVDI(node__RI3O);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__II3O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__KQQN(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__JI3O);
        put_position__ECH(Self__HI3O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__LI3O);
}

static void* check_type__with__MZZN(__EXPR_OR *Self__NZZN,void *t__OZZN,__POSITION p__PZZN)
// ({EXPR_OR},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__RZZN,*rec__UZZN,*__tmp__QB0N,*__tmp__RB0N;
  void *local__SZZN;
  void *instr__TZZN;
  void *slot_name__VZZN;
  void *slot_msg__WZZN;
  void *node__XZZN;
  __TYPE_FULL *Self__XSJQ,*Self__BTJQ;
  void *__tmp__H2ZN,*__tmp__T5ZN;
  __POSITION __tmp__O2ZN,__tmp__W3ZN,__tmp__05ZN,__tmp__CB0N;
  __POSITION __tmp__PB0N;
  void *__tmp__U2ZN,*__tmp__AA0N;
  __STRING_CST *Self__ITJQ;
  __PROTOTYPE_CST *Self__JTJQ;
  __INTEGER_CST *Self__KTJQ;
  __REAL_CST *Self__MTJQ;
  __CHARACTER_CST *Self__OTJQ;
  __IS_EXPANDED *Self__PTJQ;
  void *args__YZZN;
  __BOOLEAN __tmp__D4ZN;
  result__RZZN=NULL;
  local__SZZN=NULL;
  instr__TZZN=NULL;
  rec__UZZN=NULL;
  slot_name__VZZN=NULL;
  slot_msg__WZZN=NULL;
  node__XZZN=NULL;
  args__YZZN=NULL;
  if (affect_with__ZCHI(t__OZZN,static_type__NOPN(Self__NZZN))) {
    result__RZZN=Self__NZZN;
  } else {
    Self__XSJQ=((__TYPE_FULL *)static_type__NOPN(Self__NZZN));
    if (is_cast__to__in__ZD0I(Self__XSJQ,(&__string_86),t__OZZN,((__PROTOTYPE *)prototype__NQRF(Self__XSJQ))->export_list__SFDC)) {
      local__SZZN=create__name__style__type__25JG(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__NOPN(Self__NZZN)));
      instr__TZZN=write__value__T5FH(local__SZZN,Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NZZN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__TZZN);
      slot_name__VZZN=get__QEC(last_cast_name__L42H);
      slot_msg__WZZN=get_slot__AP5G(static_type__NOPN(Self__NZZN),slot_name__VZZN);
      if (((void *)slot_msg__WZZN == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__NOPN(Self__NZZN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__OZZN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__VZZN);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__NOPN(Self__NZZN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__PZZN);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__NOPN(Self__NZZN)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
        __tmp__H2ZN=((__SLOT *)((__SLOT_DATA *)slot_msg__WZZN)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__H2ZN=((__SLOT *)((__SLOT_CODE *)slot_msg__WZZN)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__H2ZN) !=  1)) {
        if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
          __tmp__O2ZN=((__SLOT_DATA *)slot_msg__WZZN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__O2ZN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__WZZN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__O2ZN);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
        __tmp__U2ZN=get_type_result__PG2G(slot_msg__WZZN);
      } else {
        __tmp__U2ZN=get_type_result__ZH2G(slot_msg__WZZN);
      };
      if ((((void *)__tmp__U2ZN == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__U2ZN)->parent_type__KTL != (void *)((__TYPE_FULL *)t__OZZN)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__U2ZN != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__U2ZN,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__OZZN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
          __tmp__W3ZN=((__SLOT_DATA *)slot_msg__WZZN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__W3ZN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__WZZN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__W3ZN);
        put_position__ECH(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__UZZN=read__IC5G(local__SZZN);
      node__XZZN=new_read__slot__receiver__self__YLQC(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__WZZN,rec__UZZN,rec__UZZN);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__XZZN);
      result__RZZN=result_expr__PVDI(node__XZZN);
      __tmp__D4ZN=TRUE__;
    } else {
      __tmp__D4ZN=FALSE__;
    };
    if ((! __tmp__D4ZN)) {
      Self__BTJQ=((__TYPE_FULL *)t__OZZN);
      if (is_cast__to__in__ZD0I(Self__BTJQ,(&__string_87),static_type__NOPN(Self__NZZN),((__PROTOTYPE *)prototype__NQRF(Self__BTJQ))->import_list__0FDC)) {
        local__SZZN=create__name__style__type__25JG(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__NOPN(Self__NZZN)));
        instr__TZZN=write__value__T5FH(local__SZZN,Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NZZN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__TZZN);
        slot_name__VZZN=get__QEC(last_cast_name__L42H);
        slot_msg__WZZN=get_slot__AP5G(t__OZZN,slot_name__VZZN);
        if (((void *)slot_msg__WZZN == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__OZZN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__NOPN(Self__NZZN),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__VZZN);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__OZZN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__PZZN);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__OZZN))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
          __tmp__T5ZN=((__SLOT *)((__SLOT_DATA *)slot_msg__WZZN)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__T5ZN=((__SLOT *)((__SLOT_CODE *)slot_msg__WZZN)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__T5ZN) !=  2)) {
          if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
            __tmp__05ZN=((__SLOT_DATA *)slot_msg__WZZN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__05ZN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__WZZN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__05ZN);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
          __tmp__AA0N=get_type_result__PG2G(slot_msg__WZZN);
        } else {
          __tmp__AA0N=get_type_result__ZH2G(slot_msg__WZZN);
        };
        if ((((void *)__tmp__AA0N == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__AA0N)->parent_type__KTL != (void *)((__TYPE_FULL *)t__OZZN)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__AA0N != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__AA0N,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__OZZN,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__WZZN)->__id==__SLOT_DATA__) {
            __tmp__CB0N=((__SLOT_DATA *)slot_msg__WZZN)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__CB0N=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__WZZN)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__CB0N);
          put_position__ECH(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__YZZN=create_with_capacity__3THH( 2);
        add_last__XSEI(args__YZZN,create__type__CLQC(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__OZZN));
        add_last__XSEI(args__YZZN,read__IC5G(local__SZZN));
        __tmp__PB0N=Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__QB0N=((void **)((__FAST_ARRAYoEXPRo *)args__YZZN)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__QB0N)->__id) {
        case __LIST__: {
          __tmp__RB0N=my_copy__2HYM(__tmp__QB0N);
        } break;
        case __STRING_CST__: {
          Self__ITJQ=((__STRING_CST *)__tmp__QB0N);
          __tmp__RB0N=create__text__AUMH(Self__ITJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ITJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__RB0N=my_copy__2K2H(__tmp__QB0N);
        } break;
        case __PROTOTYPE_CST__: {
          Self__JTJQ=((__PROTOTYPE_CST *)__tmp__QB0N);
          __tmp__RB0N=create__type__CLQC(Self__JTJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JTJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__KTJQ=((__INTEGER_CST *)__tmp__QB0N);
          __tmp__RB0N=create__value__type__DNQC(Self__KTJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KTJQ->value__PAZD,Self__KTJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__RB0N=my_copy__OAFJ(__tmp__QB0N);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__RB0N=my_copy__KM2H(__tmp__QB0N);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__RB0N=my_copy__DN2H(__tmp__QB0N);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__RB0N=my_copy__QN2H(__tmp__QB0N);
        } break;
        case __REAL_CST__: {
          Self__MTJQ=((__REAL_CST *)__tmp__QB0N);
          __tmp__RB0N=create__value__type__1SMH(Self__MTJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MTJQ->value__5N2H,Self__MTJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__OTJQ=((__CHARACTER_CST *)__tmp__QB0N);
          __tmp__RB0N=create__char__WTMH(Self__OTJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OTJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__PTJQ=((__IS_EXPANDED *)__tmp__QB0N);
          __tmp__RB0N=create__receiver__WRWH(Self__PTJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__PTJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__RB0N=my_copy__TO2H(__tmp__QB0N);
        } break;
        case __EXPR_SUP__: {
          __tmp__RB0N=my_copy__2O2H(__tmp__QB0N);
        } break;
        case __EXPR_SUB__: {
          __tmp__RB0N=my_copy__HP2H(__tmp__QB0N);
        } break;
        case __EXPR_MUL__: {
          __tmp__RB0N=my_copy__TP2H(__tmp__QB0N);
        } break;
        case __EXPR_DIV__: {
          __tmp__RB0N=my_copy__4P2H(__tmp__QB0N);
        } break;
        case __EXPR_AND__: {
          __tmp__RB0N=my_copy__JQ2H(__tmp__QB0N);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__RB0N=my_copy__UQ2H(__tmp__QB0N);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__RB0N=my_copy__5Q2H(__tmp__QB0N);
        } break;
        case __PUT_TO__: {
          __tmp__RB0N=my_copy__KR2H(__tmp__QB0N);
        } break;
        case __ITEM__: {
          __tmp__RB0N=my_copy__1R2H(__tmp__QB0N);
        } break;
        case __SIZE_OF__: {
          __tmp__RB0N=my_copy__HS2H(__tmp__QB0N);
        } break;
        case __CAST__: {
          __tmp__RB0N=my_copy__QS2H(__tmp__QB0N);
        } break;
        case __CALL_SLOT__: {
          __tmp__RB0N=my_copy__PIYM(__tmp__QB0N);
        } break;
        case __READ_SLOT__: {
          __tmp__RB0N=my_copy__AVGK(__tmp__QB0N);
        } break;
        case __READ_GLOBAL__: {
          __tmp__RB0N=my_copy__NVGK(__tmp__QB0N);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__RB0N=my_copy__RFCN(__tmp__QB0N);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__RB0N=my_copy__JMEO(__tmp__QB0N);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__RB0N=my_copy__RTJO(__tmp__QB0N);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__RB0N=my_copy__WMEO(__tmp__QB0N);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__RB0N=my_copy__3TJO(__tmp__QB0N);
        } break;
        case __EXPR_NEG__: {
          __tmp__RB0N=my_copy__YEJM(__tmp__QB0N);
        } break;
        case __EXPR_ADD__: {
          __tmp__RB0N=my_copy__YRLL(__tmp__QB0N);
        } break;
        case __EXPR_NOT__: {
          __tmp__RB0N=my_copy__GLYM(__tmp__QB0N);
        } break;
        case __EXPR_MOD__: {
          __tmp__RB0N=my_copy__BNEO(__tmp__QB0N);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__RB0N=my_copy__M3DP(__tmp__QB0N);
        } break;
        case __EXPR_INF__: {
          __tmp__RB0N=my_copy__PBSN(__tmp__QB0N);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__RB0N=my_copy__0BSN(__tmp__QB0N);
        } break;
        case __EXPR_OR__: {
          __tmp__RB0N=my_copy__ZOPN(__tmp__QB0N);
        } break;
        case __EXPR_XOR__: {
          __tmp__RB0N=my_copy__CYSO(__tmp__QB0N);
        } break;
        };
        node__XZZN=new_read__slot__receiver__with__YOWH(__tmp__PB0N,slot_msg__WZZN,__tmp__RB0N,args__YZZN);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__XZZN);
        result__RZZN=result_expr__PVDI(node__XZZN);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__OZZN,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__NOPN(Self__NZZN),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__PZZN);
        put_position__ECH(Self__NZZN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__RZZN);
}

static void* check_type__with__FR3O(__EXPR_XOR *Self__GR3O,void *t__HR3O,__POSITION p__IR3O)
// ({EXPR_XOR},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *result__KR3O,*rec__NR3O,*__tmp__JZ3O,*__tmp__KZ3O;
  void *local__LR3O;
  void *instr__MR3O;
  void *slot_name__OR3O;
  void *slot_msg__PR3O;
  void *node__QR3O;
  __TYPE_FULL *Self__PDVI,*Self__QT3I;
  void *__tmp__AU3O,*__tmp__MX3O;
  __POSITION __tmp__HU3O,__tmp__PV3O,__tmp__TX3O,__tmp__1Y3O;
  __POSITION __tmp__IZ3O;
  void *__tmp__NU3O,*__tmp__ZX3O;
  __STRING_CST *Self__YTJQ;
  __PROTOTYPE_CST *Self__ZTJQ;
  __INTEGER_CST *Self__0TJQ;
  __REAL_CST *Self__2TJQ;
  __CHARACTER_CST *Self__4TJQ;
  __IS_EXPANDED *Self__5TJQ;
  void *args__RR3O;
  __BOOLEAN __tmp__2V3O;
  result__KR3O=NULL;
  local__LR3O=NULL;
  instr__MR3O=NULL;
  rec__NR3O=NULL;
  slot_name__OR3O=NULL;
  slot_msg__PR3O=NULL;
  node__QR3O=NULL;
  args__RR3O=NULL;
  if (affect_with__ZCHI(t__HR3O,static_type__XCSO(Self__GR3O))) {
    result__KR3O=Self__GR3O;
  } else {
    Self__PDVI=((__TYPE_FULL *)static_type__XCSO(Self__GR3O));
    if (is_cast__to__in__ZD0I(Self__PDVI,(&__string_86),t__HR3O,((__PROTOTYPE *)prototype__NQRF(Self__PDVI))->export_list__SFDC)) {
      local__LR3O=create__name__style__type__25JG(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__XCSO(Self__GR3O)));
      instr__MR3O=write__value__T5FH(local__LR3O,Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GR3O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__MR3O);
      slot_name__OR3O=get__QEC(last_cast_name__L42H);
      slot_msg__PR3O=get_slot__AP5G(static_type__XCSO(Self__GR3O),slot_name__OR3O);
      if (((void *)slot_msg__PR3O == (void *)NULL)) {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append_name_in__FBYD(static_type__XCSO(Self__GR3O),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_483));
        append_name_in__FBYD(t__HR3O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_484));
        append__MOK(string_tmp__RB,slot_name__OR3O);
        append__MOK(string_tmp__RB,(&__string_464));
        append_name_in__FBYD(static_type__XCSO(Self__GR3O),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__IR3O);
        put_position__ECH(((__PROTOTYPE *)prototype__NQRF(static_type__XCSO(Self__GR3O)))->parent_named__QD.parent_itm_object__PD.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
        __tmp__AU3O=((__SLOT *)((__SLOT_DATA *)slot_msg__PR3O)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__AU3O=((__SLOT *)((__SLOT_CODE *)slot_msg__PR3O)->parent_slot__Y22F)->base_slot__P22F;
      };
      if ((argument_count__P0BG(__tmp__AU3O) !=  1)) {
        if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
          __tmp__HU3O=((__SLOT_DATA *)slot_msg__PR3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__HU3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PR3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_error__text__0AH( 1,(&__string_485));
        put_position__ECH(__tmp__HU3O);
        send_error__2FH();
      };
      if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
        __tmp__NU3O=get_type_result__PG2G(slot_msg__PR3O);
      } else {
        __tmp__NU3O=get_type_result__ZH2G(slot_msg__PR3O);
      };
      if ((((void *)__tmp__NU3O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__NU3O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__HR3O)->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_486));
        if (((void *)__tmp__NU3O != (void *)NULL)) {
          add_last__YPK(string_tmp__RB,'`');
          append_name_in__FBYD(__tmp__NU3O,string_tmp__RB);
          add_last__YPK(string_tmp__RB,'\'');
        };
        append__MOK(string_tmp__RB,(&__string_487));
        append_name_in__FBYD(t__HR3O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_488));
        put_error__text__0AH( 1,string_tmp__RB);
        if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
          __tmp__PV3O=((__SLOT_DATA *)slot_msg__PR3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__PV3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PR3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__PV3O);
        put_position__ECH(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      rec__NR3O=read__IC5G(local__LR3O);
      node__QR3O=new_read__slot__receiver__self__YLQC(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,slot_msg__PR3O,rec__NR3O,rec__NR3O);
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__QR3O);
      result__KR3O=result_expr__PVDI(node__QR3O);
      __tmp__2V3O=TRUE__;
    } else {
      __tmp__2V3O=FALSE__;
    };
    if ((! __tmp__2V3O)) {
      Self__QT3I=((__TYPE_FULL *)t__HR3O);
      if (is_cast__to__in__ZD0I(Self__QT3I,(&__string_87),static_type__XCSO(Self__GR3O),((__PROTOTYPE *)prototype__NQRF(Self__QT3I))->import_list__0FDC)) {
        local__LR3O=create__name__style__type__25JG(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__XCSO(Self__GR3O)));
        instr__MR3O=write__value__T5FH(local__LR3O,Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GR3O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__MR3O);
        slot_name__OR3O=get__QEC(last_cast_name__L42H);
        slot_msg__PR3O=get_slot__AP5G(t__HR3O,slot_name__OR3O);
        if (((void *)slot_msg__PR3O == (void *)NULL)) {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append_name_in__FBYD(t__HR3O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_489));
          append_name_in__FBYD(static_type__XCSO(Self__GR3O),string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_484));
          append__MOK(string_tmp__RB,slot_name__OR3O);
          append__MOK(string_tmp__RB,(&__string_464));
          append_name_in__FBYD(t__HR3O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_465));
          put_error__text__0AH( 1,string_tmp__RB);
          put_position__ECH(p__IR3O);
          put_position__ECH(((__PROTOTYPE *)prototype__NQRF(t__HR3O))->parent_named__QD.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
          __tmp__MX3O=((__SLOT *)((__SLOT_DATA *)slot_msg__PR3O)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__MX3O=((__SLOT *)((__SLOT_CODE *)slot_msg__PR3O)->parent_slot__Y22F)->base_slot__P22F;
        };
        if ((argument_count__P0BG(__tmp__MX3O) !=  2)) {
          if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
            __tmp__TX3O=((__SLOT_DATA *)slot_msg__PR3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__TX3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PR3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_error__text__0AH( 1,(&__string_490));
          put_position__ECH(__tmp__TX3O);
          send_error__2FH();
        };
        if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
          __tmp__ZX3O=get_type_result__PG2G(slot_msg__PR3O);
        } else {
          __tmp__ZX3O=get_type_result__ZH2G(slot_msg__PR3O);
        };
        if ((((void *)__tmp__ZX3O == (void *)NULL) || ((void *)((__TYPE_FULL *)__tmp__ZX3O)->parent_type__KTL != (void *)((__TYPE_FULL *)t__HR3O)->parent_type__KTL))) {
          copy__BNK(string_tmp__RB,(&__string_486));
          if (((void *)__tmp__ZX3O != (void *)NULL)) {
            add_last__YPK(string_tmp__RB,'`');
            append_name_in__FBYD(__tmp__ZX3O,string_tmp__RB);
            add_last__YPK(string_tmp__RB,'\'');
          };
          append__MOK(string_tmp__RB,(&__string_491));
          append_name_in__FBYD(t__HR3O,string_tmp__RB);
          append__MOK(string_tmp__RB,(&__string_488));
          put_error__text__0AH( 1,string_tmp__RB);
          if (((struct ___OBJ *)slot_msg__PR3O)->__id==__SLOT_DATA__) {
            __tmp__1Y3O=((__SLOT_DATA *)slot_msg__PR3O)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          } else {
            __tmp__1Y3O=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot_msg__PR3O)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          };
          put_position__ECH(__tmp__1Y3O);
          put_position__ECH(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        args__RR3O=create_with_capacity__3THH( 2);
        add_last__XSEI(args__RR3O,create__type__CLQC(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,t__HR3O));
        add_last__XSEI(args__RR3O,read__IC5G(local__LR3O));
        __tmp__IZ3O=Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__JZ3O=((void **)((__FAST_ARRAYoEXPRo *)args__RR3O)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
        switch (((struct ___OBJ *)__tmp__JZ3O)->__id) {
        case __LIST__: {
          __tmp__KZ3O=my_copy__2HYM(__tmp__JZ3O);
        } break;
        case __STRING_CST__: {
          Self__YTJQ=((__STRING_CST *)__tmp__JZ3O);
          __tmp__KZ3O=create__text__AUMH(Self__YTJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YTJQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__KZ3O=my_copy__2K2H(__tmp__JZ3O);
        } break;
        case __PROTOTYPE_CST__: {
          Self__ZTJQ=((__PROTOTYPE_CST *)__tmp__JZ3O);
          __tmp__KZ3O=create__type__CLQC(Self__ZTJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZTJQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__0TJQ=((__INTEGER_CST *)__tmp__JZ3O);
          __tmp__KZ3O=create__value__type__DNQC(Self__0TJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0TJQ->value__PAZD,Self__0TJQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__KZ3O=my_copy__OAFJ(__tmp__JZ3O);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__KZ3O=my_copy__KM2H(__tmp__JZ3O);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__KZ3O=my_copy__DN2H(__tmp__JZ3O);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__KZ3O=my_copy__QN2H(__tmp__JZ3O);
        } break;
        case __REAL_CST__: {
          Self__2TJQ=((__REAL_CST *)__tmp__JZ3O);
          __tmp__KZ3O=create__value__type__1SMH(Self__2TJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2TJQ->value__5N2H,Self__2TJQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__4TJQ=((__CHARACTER_CST *)__tmp__JZ3O);
          __tmp__KZ3O=create__char__WTMH(Self__4TJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4TJQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__5TJQ=((__IS_EXPANDED *)__tmp__JZ3O);
          __tmp__KZ3O=create__receiver__WRWH(Self__5TJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__5TJQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__KZ3O=my_copy__TO2H(__tmp__JZ3O);
        } break;
        case __EXPR_SUP__: {
          __tmp__KZ3O=my_copy__2O2H(__tmp__JZ3O);
        } break;
        case __EXPR_SUB__: {
          __tmp__KZ3O=my_copy__HP2H(__tmp__JZ3O);
        } break;
        case __EXPR_MUL__: {
          __tmp__KZ3O=my_copy__TP2H(__tmp__JZ3O);
        } break;
        case __EXPR_DIV__: {
          __tmp__KZ3O=my_copy__4P2H(__tmp__JZ3O);
        } break;
        case __EXPR_AND__: {
          __tmp__KZ3O=my_copy__JQ2H(__tmp__JZ3O);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__KZ3O=my_copy__UQ2H(__tmp__JZ3O);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__KZ3O=my_copy__5Q2H(__tmp__JZ3O);
        } break;
        case __PUT_TO__: {
          __tmp__KZ3O=my_copy__KR2H(__tmp__JZ3O);
        } break;
        case __ITEM__: {
          __tmp__KZ3O=my_copy__1R2H(__tmp__JZ3O);
        } break;
        case __SIZE_OF__: {
          __tmp__KZ3O=my_copy__HS2H(__tmp__JZ3O);
        } break;
        case __CAST__: {
          __tmp__KZ3O=my_copy__QS2H(__tmp__JZ3O);
        } break;
        case __CALL_SLOT__: {
          __tmp__KZ3O=my_copy__PIYM(__tmp__JZ3O);
        } break;
        case __READ_SLOT__: {
          __tmp__KZ3O=my_copy__AVGK(__tmp__JZ3O);
        } break;
        case __READ_GLOBAL__: {
          __tmp__KZ3O=my_copy__NVGK(__tmp__JZ3O);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__KZ3O=my_copy__RFCN(__tmp__JZ3O);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__KZ3O=my_copy__JMEO(__tmp__JZ3O);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__KZ3O=my_copy__RTJO(__tmp__JZ3O);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__KZ3O=my_copy__WMEO(__tmp__JZ3O);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__KZ3O=my_copy__3TJO(__tmp__JZ3O);
        } break;
        case __EXPR_NEG__: {
          __tmp__KZ3O=my_copy__YEJM(__tmp__JZ3O);
        } break;
        case __EXPR_ADD__: {
          __tmp__KZ3O=my_copy__YRLL(__tmp__JZ3O);
        } break;
        case __EXPR_NOT__: {
          __tmp__KZ3O=my_copy__GLYM(__tmp__JZ3O);
        } break;
        case __EXPR_MOD__: {
          __tmp__KZ3O=my_copy__BNEO(__tmp__JZ3O);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__KZ3O=my_copy__M3DP(__tmp__JZ3O);
        } break;
        case __EXPR_INF__: {
          __tmp__KZ3O=my_copy__PBSN(__tmp__JZ3O);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__KZ3O=my_copy__0BSN(__tmp__JZ3O);
        } break;
        case __EXPR_OR__: {
          __tmp__KZ3O=my_copy__ZOPN(__tmp__JZ3O);
        } break;
        case __EXPR_XOR__: {
          __tmp__KZ3O=my_copy__CYSO(__tmp__JZ3O);
        } break;
        };
        node__QR3O=new_read__slot__receiver__with__YOWH(__tmp__IZ3O,slot_msg__PR3O,__tmp__KZ3O,args__RR3O);
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__QR3O);
        result__KR3O=result_expr__PVDI(node__QR3O);
      } else {
        copy__BNK(string_tmp__RB,(&__string_492));
        append_name_in__FBYD(t__HR3O,string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_493));
        append_name_in__FBYD(static_type__XCSO(Self__GR3O),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_465));
        put_error__text__0AH( 1,string_tmp__RB);
        put_position__ECH(p__IR3O);
        put_position__ECH(Self__GR3O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  return(result__KR3O);
}

static void* write_direct__with__value__05DH(__SLOT_DATA *Self__15DH,__POSITION p__25DH,void *r__35DH,void *val__45DH)
// ({SLOT_DATA},{POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *tmp_type__BAEH;
  void *result__DBGH;
  __WRITE_GLOBAL *result__MEPH,*Self__RBEI;
  __POINTER ptr__NEPH,ptr__NHPH;
  __INTEGER typ_id__SEPH,typ_id__SHPH;
  __UINTEGER_32 sz__PEPH,a__PZ0Q,new_size__NZ0Q,t__TZ0Q,a__VZ0Q;
  __UINTEGER_32 sz__PHPH,a__0Z0Q,new_size__YZ0Q,t__4Z0Q,a__A00Q;
  __WRITE_SLOT *result__MHPH,*Self__0BEI;
  void *__tmp__IBEH,*__tmp__ECEH;
  __BOOLEAN __tmp__TBEH;
  tmp_type__BAEH=NULL;
  result__DBGH=NULL;
  if ((Self__15DH->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) {
    result__MEPH=NULL;
    ptr__NEPH=((__POINTER )(NULL));
    typ_id__SEPH= 0;
    sz__PEPH=((__UINTEGER_32 )sizeof(__WRITE_GLOBAL));
    if ((sz__PEPH ==  0)) {
      result__MEPH=WRITE_GLOBAL__;
    } else {
      typ_id__SEPH=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PEPH);
      if ((typ_id__SEPH == (__INTEGER)(-  1))) {
        a__PZ0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__NZ0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__PEPH + a__PZ0Q) & (__UINTEGER_32)(~ a__PZ0Q));
        ptr__NEPH=micro_alloc__table__lab__BOI(new_size__NZ0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NZ0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NZ0Q);
      } else {
        t__TZ0Q=((__UINTEGER_32 )typ_id__SEPH);
        a__VZ0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__NEPH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PEPH + a__VZ0Q) & (__UINTEGER_32)(~ a__VZ0Q)),((__POINTER )(&(table_type[(t__TZ0Q)]))),(__UINTEGER_32)(t__TZ0Q |  1));
      };
      result__MEPH=((__WRITE_GLOBAL *)ptr__NEPH);
      *(result__MEPH) = *(WRITE_GLOBAL__);
    };
    Self__RBEI=((__WRITE_GLOBAL *)result__MEPH);
    Self__RBEI->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM=p__25DH;
    Self__RBEI->parent_write__QBGH.value__HBEH=val__45DH;
    Self__RBEI->global__4U1H=Self__15DH;
    result__DBGH=result__MEPH;
  } else {
    result__MHPH=NULL;
    ptr__NHPH=((__POINTER )(NULL));
    typ_id__SHPH= 0;
    sz__PHPH=((__UINTEGER_32 )sizeof(__WRITE_SLOT));
    if ((sz__PHPH ==  0)) {
      result__MHPH=WRITE_SLOT__;
    } else {
      typ_id__SHPH=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PHPH);
      if ((typ_id__SHPH == (__INTEGER)(-  1))) {
        a__0Z0Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__YZ0Q=(__UINTEGER_32)((__UINTEGER_32)(sz__PHPH + a__0Z0Q) & (__UINTEGER_32)(~ a__0Z0Q));
        ptr__NHPH=micro_alloc__table__lab__BOI(new_size__YZ0Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YZ0Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__YZ0Q);
      } else {
        t__4Z0Q=((__UINTEGER_32 )typ_id__SHPH);
        a__A00Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__NHPH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PHPH + a__A00Q) & (__UINTEGER_32)(~ a__A00Q)),((__POINTER )(&(table_type[(t__4Z0Q)]))),(__UINTEGER_32)(t__4Z0Q |  1));
      };
      result__MHPH=((__WRITE_SLOT *)ptr__NHPH);
      *(result__MHPH) = *(WRITE_SLOT__);
    };
    Self__0BEI=((__WRITE_SLOT *)result__MHPH);
    Self__0BEI->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM=p__25DH;
    Self__0BEI->parent_write__3BGH.value__HBEH=val__45DH;
    Self__0BEI->receiver__HU1H=r__35DH;
    Self__0BEI->slot__5T1H=Self__15DH;
    result__DBGH=result__MHPH;
  };
  if (((void *)Self__15DH->parent_variable__AJZD.require_first__DAEH == (void *)NULL)) {
    Self__15DH->parent_variable__AJZD.require_first__DAEH=result__DBGH;
  } else {
    if (((void *)Self__15DH->parent_variable__AJZD.require_list__UAEH == (void *)NULL)) {
      Self__15DH->parent_variable__AJZD.require_list__UAEH=create_with_capacity__UIPH( 1);
    };
    add_last__JPDI(Self__15DH->parent_variable__AJZD.require_list__UAEH,result__DBGH);
  };
  if ((! ((((__UINTEGER_8)(((__TYPE_FULL *)Self__15DH->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)Self__15DH->parent_variable__AJZD.type__125F)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)Self__15DH->parent_variable__AJZD.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
    if (((struct ___OBJ *)result__DBGH)->__id==__WRITE_GLOBAL__) {
      __tmp__IBEH=((__WRITE_GLOBAL *)result__DBGH)->parent_write__QBGH.value__HBEH;
    } else {
      __tmp__IBEH=((__WRITE_SLOT *)result__DBGH)->parent_write__3BGH.value__HBEH;
    };
    __tmp__TBEH=((void *)__tmp__IBEH != (void *)NULL);
  } else {
    __tmp__TBEH=FALSE__;
  };
  if ((__tmp__TBEH && (! is_executing_pass__Q5LC))) {
    tmp_type__BAEH=new__XWSG();
    if (((void *)Self__15DH->parent_variable__AJZD.type_list__HKZD != (void *)NULL)) {
      union__IKHJ(tmp_type__BAEH,Self__15DH->parent_variable__AJZD.type_list__HKZD);
    };
    if (((struct ___OBJ *)result__DBGH)->__id==__WRITE_GLOBAL__) {
      __tmp__ECEH=((__WRITE_GLOBAL *)result__DBGH)->parent_write__QBGH.value__HBEH;
    } else {
      __tmp__ECEH=((__WRITE_SLOT *)result__DBGH)->parent_write__3BGH.value__HBEH;
    };
    switch (((struct ___OBJ *)__tmp__ECEH)->__id) {
    case __LIST__: {
      get_type__EYMJ(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __STRING_CST__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)((__STRING_CST *)__tmp__ECEH)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
    } break;
    case __EXTERNAL_C__: {
      get_type__ZHDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __PROTOTYPE_CST__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__ECEH)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __INTEGER_CST__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__ECEH)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __READ_LOCAL__: {
      get_type__AOFJ(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_MULTIPLE__: {
      print__1ZE((&__string_253));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __EXPR_EQUAL__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_NOT_EQUAL__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __REAL_CST__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)((__REAL_CST *)__tmp__ECEH)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __CHARACTER_CST__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__ECEH)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __IS_EXPANDED__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __GET_TYPE_ID__: {
      add__R2EJ(tmp_type__BAEH,type_integer__3JB);
    } break;
    case __EXPR_SUP__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_SUB__: {
      get_type__ZJDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_MUL__: {
      get_type__3JDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_DIV__: {
      get_type__BKDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_AND__: {
      get_type__FKDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_SHIFT_R__: {
      get_type__JKDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_SHIFT_L__: {
      get_type__NKDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __PUT_TO__: {
      add__R2EJ(tmp_type__BAEH,TYPE_VOID__);
    } break;
    case __ITEM__: {
      get_type__UKDI(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __SIZE_OF__: {
      add__R2EJ(tmp_type__BAEH,type_integer__3JB);
    } break;
    case __CAST__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)((__CAST *)__tmp__ECEH)->static_type__SO1H)->parent_type__KTL);
    } break;
    case __CALL_SLOT__: {
      get_type__DAML(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __READ_SLOT__: {
      get_type__OD0K(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __READ_GLOBAL__: {
      get_type__ZJOL(((__READ_GLOBAL *)__tmp__ECEH)->global__RHJK,tmp_type__BAEH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_OR_LOGIC__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_AND_LOGIC__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_NEG__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__ECEH)))->parent_type__KTL);
    } break;
    case __EXPR_ADD__: {
      get_type__YEOL(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_NOT__: {
      add__R2EJ(tmp_type__BAEH,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__ECEH)))->parent_type__KTL);
    } break;
    case __EXPR_MOD__: {
      get_type__FSEO(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_SUP_EQ__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_INF__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_INF_EQ__: {
      add__R2EJ(tmp_type__BAEH,type_true__FJB);
      add__R2EJ(tmp_type__BAEH,type_false__NJB);
    } break;
    case __EXPR_OR__: {
      get_type__CVPN(__tmp__ECEH,tmp_type__BAEH);
    } break;
    case __EXPR_XOR__: {
      get_type__FNTO(__tmp__ECEH,tmp_type__BAEH);
    } break;
    };
    Self__15DH->parent_variable__AJZD.type_list__HKZD=update__JYMJ(tmp_type__BAEH,Self__15DH->parent_variable__AJZD.type_list__HKZD);
  };
  if (((struct ___OBJ *)result__DBGH)->__id==__WRITE_GLOBAL__) {
    ((__WRITE_GLOBAL *)result__DBGH)->parent_write__QBGH.is_create__1BDI=TRUE__;
  } else {
    ((__WRITE_SLOT *)result__DBGH)->parent_write__3BGH.is_create__1BDI=TRUE__;
  };
  return(result__DBGH);
}

static __LINKED_LIST_NODEoNODE_TYPEo* create__next__OAQE(void *i__QAQE)
// ({NULLxNODE_TYPE}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__0XWE;
  __INTEGER typ_id__5XWE;
  __UINTEGER_32 sz__2XWE,a__F00Q,new_size__D00Q,t__J00Q,a__L00Q;
  __LINKED_LIST_NODEoNODE_TYPEo *result__ZXWE,*Self__ZQGF;
  result__ZXWE=NULL;
  ptr__0XWE=((__POINTER )(NULL));
  typ_id__5XWE= 0;
  sz__2XWE=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoNODE_TYPEo));
  if ((sz__2XWE ==  0)) {
    result__ZXWE=LINKED_LIST_NODEoNODE_TYPEo__;
  } else {
    typ_id__5XWE=__LINKED_LIST_NODEoNODE_TYPEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__2XWE);
    if ((typ_id__5XWE == (__INTEGER)(-  1))) {
      a__F00Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__D00Q=(__UINTEGER_32)((__UINTEGER_32)(sz__2XWE + a__F00Q) & (__UINTEGER_32)(~ a__F00Q));
      ptr__0XWE=micro_alloc__table__lab__BOI(new_size__D00Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D00Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__D00Q);
    } else {
      t__J00Q=((__UINTEGER_32 )typ_id__5XWE);
      a__L00Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__0XWE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__2XWE + a__L00Q) & (__UINTEGER_32)(~ a__L00Q)),((__POINTER )(&(table_type[(t__J00Q)]))),(__UINTEGER_32)(t__J00Q |  1));
    };
    result__ZXWE=((__LINKED_LIST_NODEoNODE_TYPEo *)ptr__0XWE);
    *(result__ZXWE) = *(LINKED_LIST_NODEoNODE_TYPEo__);
  };
  Self__ZQGF=((__LINKED_LIST_NODEoNODE_TYPEo *)result__ZXWE);
  Self__ZQGF->item__O1SE=i__QAQE;
  Self__ZQGF->next__GX4E=NULL;
  return(result__ZXWE);
}

static void append_in__PZWE(__INTEGER_64 Self__QZWE,void *buffer__RZWE)
// ({INTEGER_64},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER_64 val__YZWE;
  __INTEGER i__1ZWE,j__2ZWE;
  __STRING *Self__EU5Q;
  __CHARACTER tmp__GU5Q;
  val__YZWE= 0;
  i__1ZWE= 0;
  j__2ZWE= 0;
  if ((Self__QZWE ==  0)) {
    add_last__YPK(((__STRING *)buffer__RZWE),'0');
  } else {
    if ((Self__QZWE >  0)) {
      val__YZWE=Self__QZWE;
    } else {
      val__YZWE=(__INTEGER_64)(- Self__QZWE);
      add_last__YPK(((__STRING *)buffer__RZWE),'-');
    };
    i__1ZWE=(__INTEGER)(((__STRING *)buffer__RZWE)->count__VF +  1);
    while ((val__YZWE !=  0)) {
      add_last__YPK(((__STRING *)buffer__RZWE),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_64)(val__YZWE %  10)) + ((__INTEGER_8 )'0'))))));
      val__YZWE=(__INTEGER_64)(val__YZWE /  10);
    };
    j__2ZWE=((__STRING *)buffer__RZWE)->count__VF;
    while ((i__1ZWE < j__2ZWE)) {
      Self__EU5Q=((__STRING *)buffer__RZWE);
      tmp__GU5Q=((__CHARACTER *)Self__EU5Q->storage__XNK)[(__INTEGER)(i__1ZWE -  1)];
      ((__CHARACTER *)Self__EU5Q->storage__XNK)[(__INTEGER)(i__1ZWE -  1)]=((__CHARACTER *)Self__EU5Q->storage__XNK)[(__INTEGER)(j__2ZWE -  1)];
      ((__CHARACTER *)Self__EU5Q->storage__XNK)[(__INTEGER)(j__2ZWE -  1)]=tmp__GU5Q;
      j__2ZWE=(__INTEGER)(j__2ZWE -  1);
      i__1ZWE=(__INTEGER)(i__1ZWE +  1);
    };
  };
}

static void product_error__for__in__with__2L0G(__POSITION p__4L0G,void *res__5L0G,void *lst__AM0G,void *prof__BM0G)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLIST},{NULLxPROFIL_SLOTxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  void *em__DM0G,*__tmp__2N0G;
  void *rd__EM0G,*__tmp__NO0G,*__tmp__WO0G;
  void *code__FM0G;
  void *old_list_current__GM0G;
  void *old_profil_second__HM0G;
  void *ctext__IM0G,*__tmp__1M0G;
  void *__tmp__PN0G;
  __INTEGER Self__00GH,limit_up__10GH;
  void *__tmp__MO0G;
  void *__tmp__OO0G,*__tmp__2O0G;
  __BOOLEAN __tmp__TN0G;
  em__DM0G=NULL;
  rd__EM0G=NULL;
  code__FM0G=NULL;
  old_list_current__GM0G=NULL;
  old_profil_second__HM0G=NULL;
  ctext__IM0G=NULL;
  if ((debug_level_option__3C !=  0)) {
    if (((void *)prof__BM0G == (void *)NULL)) {
      ctext__IM0G=context_main__D2LC;
    } else {
      if (((struct ___OBJ *)prof__BM0G)->__id==__PROFIL_SLOT__) {
        __tmp__1M0G=((__PROFIL_SLOT *)prof__BM0G)->parent_profil__51LC.context__0M0G;
      } else {
        __tmp__1M0G=((__PROFIL_BLOCK *)prof__BM0G)->parent_profil__GHAG.context__0M0G;
      };
      ctext__IM0G=__tmp__1M0G;
    };
    add_last__AL4G(((__LIST *)lst__AM0G)->expr_list__JUOG,create__context__first__20EG(PUSH__,p__4L0G,ctext__IM0G,FALSE__));
    code__FM0G=(&__string_494);
  } else {
    code__FM0G=(&__string_495);
  };
  add_last__AL4G(((__LIST *)lst__AM0G)->expr_list__JUOG,create__text__access__persistant__type__2U0C(((__LIST *)lst__AM0G)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,code__FM0G,NULL,TRUE__,TYPE_VOID__->parent_type__UIB.default__AKC));
  if (((void *)res__5L0G != (void *)NULL)) {
    switch (((struct ___OBJ *)res__5L0G)->__id) {
    case __LIST__: {
      __tmp__PN0G=static_type__GIQG(res__5L0G);
    } break;
    case __STRING_CST__: {
      __tmp__PN0G=((__STRING_CST *)res__5L0G)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__PN0G=((__EXTERNAL_C *)res__5L0G)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__PN0G=((__PROTOTYPE_CST *)res__5L0G)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__PN0G=((__INTEGER_CST *)res__5L0G)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__PN0G=((__LOCAL *)((__READ_LOCAL *)res__5L0G)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__PN0G=static_type__0N1H(res__5L0G);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__PN0G=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__PN0G=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__PN0G=((__REAL_CST *)res__5L0G)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__PN0G=((__CHARACTER_CST *)res__5L0G)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__PN0G=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__PN0G=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__PN0G=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__PN0G=static_type__MP1H(res__5L0G);
    } break;
    case __EXPR_MUL__: {
      __tmp__PN0G=static_type__SP1H(res__5L0G);
    } break;
    case __EXPR_DIV__: {
      __tmp__PN0G=static_type__XP1H(res__5L0G);
    } break;
    case __EXPR_AND__: {
      __tmp__PN0G=static_type__2P1H(res__5L0G);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__PN0G=static_type__BQ1H(res__5L0G);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__PN0G=static_type__GQ1H(res__5L0G);
    } break;
    case __PUT_TO__: {
      __tmp__PN0G=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__PN0G=static_type__PQ1H(res__5L0G);
    } break;
    case __SIZE_OF__: {
      __tmp__PN0G=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__PN0G=((__CAST *)res__5L0G)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__PN0G=static_type__GIKL(res__5L0G);
    } break;
    case __READ_SLOT__: {
      __tmp__PN0G=((__SLOT_DATA *)((__READ_SLOT *)res__5L0G)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__PN0G=((__SLOT_DATA *)((__READ_GLOBAL *)res__5L0G)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__PN0G=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__PN0G=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__PN0G=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__PN0G=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__PN0G=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__PN0G=static_type__Z2IM(res__5L0G);
    } break;
    case __EXPR_ADD__: {
      __tmp__PN0G=static_type__IXML(res__5L0G);
    } break;
    case __EXPR_NOT__: {
      __tmp__PN0G=static_type__BTXM(res__5L0G);
    } break;
    case __EXPR_MOD__: {
      __tmp__PN0G=static_type__5LEO(res__5L0G);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__PN0G=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__PN0G=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__PN0G=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__PN0G=static_type__NOPN(res__5L0G);
    } break;
    case __EXPR_XOR__: {
      __tmp__PN0G=static_type__XCSO(res__5L0G);
    } break;
    };
    __tmp__TN0G=((void *)((__TYPE_FULL *)__tmp__PN0G)->parent_type__KTL != (void *)TYPE_VOID__);
  } else {
    __tmp__TN0G=FALSE__;
  };
  if (__tmp__TN0G) {
    old_list_current__GM0G=list_current__IF1;
    old_profil_second__HM0G=profil_second__3PQC;
    list_current__IF1=lst__AM0G;
    profil_second__3PQC=prof__BM0G;
    if (res__5L0G==NULL) {
      __tmp__2N0G=NULL;
    } else {
      switch (((struct ___OBJ *)res__5L0G)->__id) {
      case __LIST__: {
        __tmp__2N0G=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__2N0G=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__2N0G=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__2N0G=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__2N0G=((void *)res__5L0G);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__2N0G=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__2N0G=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__2N0G=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__2N0G=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__2N0G=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__2N0G=NULL;
      } break;
      case __ITEM__: {
        __tmp__2N0G=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__2N0G=NULL;
      } break;
      case __CAST__: {
        __tmp__2N0G=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__2N0G=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__2N0G=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__2N0G=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__2N0G=NULL;
      } break;
      }
    };
    em__DM0G=__tmp__2N0G;
    if (((void *)__tmp__2N0G != (void *)NULL)) {
      Self__00GH= 0;
      limit_up__10GH=((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__2N0G)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH;
      while ((Self__00GH <= limit_up__10GH)) {
        __tmp__MO0G=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)em__DM0G)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__00GH];
        if (__tmp__MO0G==NULL) {
          __tmp__NO0G=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__MO0G)->__id) {
          case __LIST__: {
            __tmp__NO0G=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__NO0G=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__NO0G=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__NO0G=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__NO0G=((void *)__tmp__MO0G);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__NO0G=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__NO0G=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__NO0G=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__NO0G=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__NO0G=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__NO0G=NULL;
          } break;
          case __ITEM__: {
            __tmp__NO0G=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__NO0G=NULL;
          } break;
          case __CAST__: {
            __tmp__NO0G=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__NO0G=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__NO0G=((void *)__tmp__MO0G);
          } break;
          case __READ_GLOBAL__: {
            __tmp__NO0G=((void *)__tmp__MO0G);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__NO0G=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__NO0G=NULL;
          } break;
          }
        };
        rd__EM0G=__tmp__NO0G;
        switch (((struct ___OBJ *)__tmp__NO0G)->__id) {
        case __READ_LOCAL__: {
          __tmp__OO0G=((__READ_LOCAL *)__tmp__NO0G)->local__ALZD;
        } break;
        case __READ_SLOT__: {
          __tmp__OO0G=((__READ_SLOT *)__tmp__NO0G)->slot__EVGK;
        } break;
        case __READ_GLOBAL__: {
          __tmp__OO0G=((__READ_GLOBAL *)__tmp__NO0G)->global__RHJK;
        } break;
        };
        if (((struct ___OBJ *)__tmp__OO0G)->__id==__LOCAL__) {
          init__SRFI(__tmp__OO0G);
        } else {
          init__C4OG(__tmp__OO0G);
        };
        Self__00GH=(__INTEGER)(Self__00GH +  1);
      };
    } else {
      if (res__5L0G==NULL) {
        __tmp__WO0G=NULL;
      } else {
        switch (((struct ___OBJ *)res__5L0G)->__id) {
        case __LIST__: {
          __tmp__WO0G=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__WO0G=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__WO0G=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__WO0G=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__WO0G=((void *)res__5L0G);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__WO0G=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__WO0G=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__WO0G=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__WO0G=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__WO0G=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__WO0G=NULL;
        } break;
        case __ITEM__: {
          __tmp__WO0G=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__WO0G=NULL;
        } break;
        case __CAST__: {
          __tmp__WO0G=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__WO0G=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__WO0G=((void *)res__5L0G);
        } break;
        case __READ_GLOBAL__: {
          __tmp__WO0G=((void *)res__5L0G);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__WO0G=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__WO0G=NULL;
        } break;
        }
      };
      rd__EM0G=__tmp__WO0G;
      if (((void *)__tmp__WO0G != (void *)NULL)) {
        switch (((struct ___OBJ *)__tmp__WO0G)->__id) {
        case __READ_LOCAL__: {
          __tmp__2O0G=((__READ_LOCAL *)__tmp__WO0G)->local__ALZD;
        } break;
        case __READ_SLOT__: {
          __tmp__2O0G=((__READ_SLOT *)__tmp__WO0G)->slot__EVGK;
        } break;
        case __READ_GLOBAL__: {
          __tmp__2O0G=((__READ_GLOBAL *)__tmp__WO0G)->global__RHJK;
        } break;
        };
        if (((struct ___OBJ *)__tmp__2O0G)->__id==__LOCAL__) {
          init__SRFI(__tmp__2O0G);
        } else {
          init__C4OG(__tmp__2O0G);
        };
      };
    };
    list_current__IF1=old_list_current__GM0G;
    profil_second__3PQC=old_profil_second__HM0G;
  };
  add_last__AL4G(((__LIST *)lst__AM0G)->expr_list__JUOG,create__type__CLQC(p__4L0G,TYPE_VOID__->parent_type__UIB.default__AKC));
}

static void* get_local_slot__05EJ(void *n__25EJ)
// ({NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *__tmp__45EJ;
  void *__tmp__55EJ;
  __tmp__45EJ=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__45EJ)->__id) {
  case __TYPE__: {
    __tmp__55EJ=get_local_slot__H4EG(__tmp__45EJ,n__25EJ);
  } break;
  case __TYPE_NULL__: {
    __tmp__55EJ=NULL;
  } break;
  case __TYPE_VOID__: {
    __tmp__55EJ=get_local_slot__1AFG(__tmp__45EJ,n__25EJ);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__55EJ=get_local_slot__DDFG(__tmp__45EJ,n__25EJ);
  } break;
  case __TYPE_ID__: {
    __tmp__55EJ=get_local_slot__LFFG(__tmp__45EJ,n__25EJ);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__55EJ=get_local_slot__THFG(__tmp__45EJ,n__25EJ);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__55EJ=get_local_slot__05EJ(n__25EJ);
  } break;
  };
  return(__tmp__55EJ);
}

static void* get_path_slot__JK1G(__TYPE *Self__KK1G,void *n__LK1G)
// ({TYPE},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__NK1G,*__tmp__PL1G;
  __INTEGER j__OK1G;
  void *__tmp__QL1G;
  result__NK1G=NULL;
  j__OK1G= 0;
  while (((void *)result__NK1G == (void *)NULL)) {
    __tmp__PL1G=((void **)((__FAST_ARRAYoSLOTo *)Self__KK1G->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__OK1G];
    if (((struct ___OBJ *)__tmp__PL1G)->__id==__SLOT_DATA__) {
      __tmp__QL1G=get_type_result__PG2G(__tmp__PL1G);
    } else {
      __tmp__QL1G=get_type_result__ZH2G(__tmp__PL1G);
    };
    result__NK1G=get_slot__AP5G(__tmp__QL1G,n__LK1G);
    j__OK1G=(__INTEGER)(j__OK1G +  1);
  };
  return(((void **)((__FAST_ARRAYoSLOTo *)Self__KK1G->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(j__OK1G -  1)]);
}

static void* get_path_slot__CM1G(__TYPE_VOID *Self__DM1G,void *n__EM1G)
// ({TYPE_VOID},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__GM1G,*__tmp__IN1G;
  __INTEGER j__HM1G;
  void *__tmp__JN1G;
  result__GM1G=NULL;
  j__HM1G= 0;
  while (((void *)result__GM1G == (void *)NULL)) {
    __tmp__IN1G=((void **)((__FAST_ARRAYoSLOTo *)Self__DM1G->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__HM1G];
    if (((struct ___OBJ *)__tmp__IN1G)->__id==__SLOT_DATA__) {
      __tmp__JN1G=get_type_result__PG2G(__tmp__IN1G);
    } else {
      __tmp__JN1G=get_type_result__ZH2G(__tmp__IN1G);
    };
    result__GM1G=get_slot__AP5G(__tmp__JN1G,n__EM1G);
    j__HM1G=(__INTEGER)(j__HM1G +  1);
  };
  return(((void **)((__FAST_ARRAYoSLOTo *)Self__DM1G->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(j__HM1G -  1)]);
}

static void* get_path_slot__XN1G(__TYPE_CONTEXT *Self__YN1G,void *n__ZN1G)
// ({TYPE_CONTEXT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__1N1G,*__tmp__3O1G;
  __INTEGER j__2N1G;
  void *__tmp__4O1G;
  result__1N1G=NULL;
  j__2N1G= 0;
  while (((void *)result__1N1G == (void *)NULL)) {
    __tmp__3O1G=((void **)((__FAST_ARRAYoSLOTo *)Self__YN1G->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__2N1G];
    if (((struct ___OBJ *)__tmp__3O1G)->__id==__SLOT_DATA__) {
      __tmp__4O1G=get_type_result__PG2G(__tmp__3O1G);
    } else {
      __tmp__4O1G=get_type_result__ZH2G(__tmp__3O1G);
    };
    result__1N1G=get_slot__AP5G(__tmp__4O1G,n__ZN1G);
    j__2N1G=(__INTEGER)(j__2N1G +  1);
  };
  return(((void **)((__FAST_ARRAYoSLOTo *)Self__YN1G->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(j__2N1G -  1)]);
}

static void* get_path_slot__MP1G(__TYPE_ID *Self__NP1G,void *n__OP1G)
// ({TYPE_ID},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__QP1G,*__tmp__SQ1G;
  __INTEGER j__RP1G;
  void *__tmp__TQ1G;
  result__QP1G=NULL;
  j__RP1G= 0;
  while (((void *)result__QP1G == (void *)NULL)) {
    __tmp__SQ1G=((void **)((__FAST_ARRAYoSLOTo *)Self__NP1G->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__RP1G];
    if (((struct ___OBJ *)__tmp__SQ1G)->__id==__SLOT_DATA__) {
      __tmp__TQ1G=get_type_result__PG2G(__tmp__SQ1G);
    } else {
      __tmp__TQ1G=get_type_result__ZH2G(__tmp__SQ1G);
    };
    result__QP1G=get_slot__AP5G(__tmp__TQ1G,n__OP1G);
    j__RP1G=(__INTEGER)(j__RP1G +  1);
  };
  return(((void **)((__FAST_ARRAYoSLOTo *)Self__NP1G->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(j__RP1G -  1)]);
}

static void* get_path_slot__BR1G(__TYPE_GENERIC *Self__CR1G,void *n__DR1G)
// ({TYPE_GENERIC},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__FR1G,*__tmp__HS1G;
  __INTEGER j__GR1G;
  void *__tmp__IS1G;
  result__FR1G=NULL;
  j__GR1G= 0;
  while (((void *)result__FR1G == (void *)NULL)) {
    __tmp__HS1G=((void **)((__FAST_ARRAYoSLOTo *)Self__CR1G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__GR1G];
    if (((struct ___OBJ *)__tmp__HS1G)->__id==__SLOT_DATA__) {
      __tmp__IS1G=get_type_result__PG2G(__tmp__HS1G);
    } else {
      __tmp__IS1G=get_type_result__ZH2G(__tmp__HS1G);
    };
    result__FR1G=get_slot__AP5G(__tmp__IS1G,n__DR1G);
    j__GR1G=(__INTEGER)(j__GR1G +  1);
  };
  return(((void **)((__FAST_ARRAYoSLOTo *)Self__CR1G->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[(__INTEGER)(j__GR1G -  1)]);
}

static void* get_path_slot__HAFJ(void *n__JAFJ)
// ({NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *__tmp__LAFJ;
  void *__tmp__MAFJ;
  __tmp__LAFJ=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__LAFJ)->__id) {
  case __TYPE__: {
    __tmp__MAFJ=get_path_slot__JK1G(__tmp__LAFJ,n__JAFJ);
  } break;
  case __TYPE_NULL__: {
    __tmp__MAFJ=NULL;
  } break;
  case __TYPE_VOID__: {
    __tmp__MAFJ=get_path_slot__CM1G(__tmp__LAFJ,n__JAFJ);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__MAFJ=get_path_slot__XN1G(__tmp__LAFJ,n__JAFJ);
  } break;
  case __TYPE_ID__: {
    __tmp__MAFJ=get_path_slot__MP1G(__tmp__LAFJ,n__JAFJ);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__MAFJ=get_path_slot__BR1G(__tmp__LAFJ,n__JAFJ);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__MAFJ=get_path_slot__HAFJ(n__JAFJ);
  } break;
  };
  return(__tmp__MAFJ);
}

static __LIST* my_copy__2HYM(__LIST *Self__3HYM)
// ({LIST}) With resultRecursive, No inlinable.
{
  __LIST *result__5HYM;
  __INTEGER __tmp__FIYM,Self__FJ1M,__tmp__MKBN,Self__QECN,__tmp__MNBN;
  __INTEGER Self__5ICN;
  void *__tmp__LIYM,*__tmp__MIYM,*__tmp__FNBN,*__tmp__AOBN;
  __STRING_CST *Self__OUJQ,*Self__SUJQ,*Self__WK2H;
  __PUSH *Self__FJBN,*result__HJBN;
  void *new_context__IJBN;
  __PROTOTYPE_CST *Self__PUJQ,*Self__TUJQ,*Self__0UJQ;
  __INTEGER_CST *Self__QUJQ,*Self__UUJQ,*Self__1UJQ;
  __SWITCH *Self__5JBN,*result__BKBN,*Self__CMGN;
  __CASE *Self__CZCN;
  void *__tmp__YKBN,*__tmp__ZKBN,*__tmp__5KBN,*__tmp__ALBN;
  __REAL_CST *Self__WUJQ,*Self__3UJQ,*Self__BVJQ;
  __CHARACTER_CST *Self__YUJQ,*Self__5UJQ,*Self__DVJQ;
  __IS_EXPANDED *Self__ZUJQ,*Self__AVJQ,*Self__EVJQ;
  __NODE_TYPE *Self__2KBN,*result__4KBN;
  __LOOP *Self__TMBN,*result__VMBN;
  void *case__YMBN,*new_body__WMBN;
  void *loop_end__ZMBN,*__tmp__BOBN;
  void *__tmp__GNBN,*switch__XMBN;
  __POSITION pos__IVJQ,pos__3DAN;
  void *new_list__CKBN;
  result__5HYM=create__QCAG(Self__3HYM->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
  __tmp__FIYM=(__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__3HYM->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1);
  Self__FJ1M= 1;
  while ((Self__FJ1M <= __tmp__FIYM)) {
    __tmp__LIYM=((void **)((__FAST_ARRAYoINSTRo *)Self__3HYM->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__FJ1M -  1)];
    switch (((struct ___OBJ *)__tmp__LIYM)->__id) {
    case __LIST__: {
      __tmp__MIYM=my_copy__2HYM(__tmp__LIYM);
    } break;
    case __STRING_CST__: {
      Self__OUJQ=((__STRING_CST *)__tmp__LIYM);
      __tmp__MIYM=create__text__AUMH(Self__OUJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OUJQ->string__ZK2H);
    } break;
    case __PUSH__: {
      Self__FJBN=((__PUSH *)__tmp__LIYM);
      result__HJBN=NULL;
      new_context__IJBN=NULL;
      if (is_alias__4WAH) {
        new_context__IJBN=get_alias__IX4N(Self__FJBN->context__ZYPG);
        ((__LOCAL *)new_context__IJBN)->parent_variable__B2LC.ensure_count__QEAG= 1;
        result__HJBN=create__context__first__20EG(Self__FJBN,Self__FJBN->parent_instr__YRB.parent_itm_object__TE.position__BJM,new_context__IJBN,Self__FJBN->is_first__0YPG);
      } else {
        result__HJBN=create__context__first__20EG(Self__FJBN,Self__FJBN->parent_instr__YRB.parent_itm_object__TE.position__BJM,Self__FJBN->context__ZYPG,Self__FJBN->is_first__0YPG);
      };
      __tmp__MIYM=result__HJBN;
    } break;
    case __EXTERNAL_C__: {
      __tmp__MIYM=my_copy__2K2H(__tmp__LIYM);
    } break;
    case __PROTOTYPE_CST__: {
      Self__PUJQ=((__PROTOTYPE_CST *)__tmp__LIYM);
      __tmp__MIYM=create__type__CLQC(Self__PUJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PUJQ->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__QUJQ=((__INTEGER_CST *)__tmp__LIYM);
      __tmp__MIYM=create__value__type__DNQC(Self__QUJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QUJQ->value__PAZD,Self__QUJQ->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __SWITCH__: {
      Self__5JBN=((__SWITCH *)__tmp__LIYM);
      new_list__CKBN=create_with_capacity__RZNI((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__5JBN->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1));
      __tmp__MKBN=((__FAST_ARRAYoCASEo *)Self__5JBN->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
      Self__QECN= 0;
      while ((Self__QECN <= __tmp__MKBN)) {
        Self__CZCN=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__5JBN->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__QECN]);
        add_last__VPHJ(new_list__CKBN,create__with__NC1H(Self__CZCN->id__QMAG,my_copy__2HYM(Self__CZCN->code__BQAG)));
        Self__QECN=(__INTEGER)(Self__QECN +  1);
      };
      result__BKBN=clone__CBXH(Self__5JBN);
      __tmp__YKBN=Self__5JBN->expr__MMFI;
      switch (((struct ___OBJ *)__tmp__YKBN)->__id) {
      case __LIST__: {
        __tmp__ZKBN=my_copy__2HYM(__tmp__YKBN);
      } break;
      case __STRING_CST__: {
        Self__SUJQ=((__STRING_CST *)__tmp__YKBN);
        __tmp__ZKBN=create__text__AUMH(Self__SUJQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SUJQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__ZKBN=my_copy__2K2H(__tmp__YKBN);
      } break;
      case __PROTOTYPE_CST__: {
        Self__TUJQ=((__PROTOTYPE_CST *)__tmp__YKBN);
        __tmp__ZKBN=create__type__CLQC(Self__TUJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TUJQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__UUJQ=((__INTEGER_CST *)__tmp__YKBN);
        __tmp__ZKBN=create__value__type__DNQC(Self__UUJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UUJQ->value__PAZD,Self__UUJQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__ZKBN=my_copy__OAFJ(__tmp__YKBN);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ZKBN=my_copy__KM2H(__tmp__YKBN);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ZKBN=my_copy__DN2H(__tmp__YKBN);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ZKBN=my_copy__QN2H(__tmp__YKBN);
      } break;
      case __REAL_CST__: {
        Self__WUJQ=((__REAL_CST *)__tmp__YKBN);
        __tmp__ZKBN=create__value__type__1SMH(Self__WUJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WUJQ->value__5N2H,Self__WUJQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__YUJQ=((__CHARACTER_CST *)__tmp__YKBN);
        __tmp__ZKBN=create__char__WTMH(Self__YUJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YUJQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__ZUJQ=((__IS_EXPANDED *)__tmp__YKBN);
        __tmp__ZKBN=create__receiver__WRWH(Self__ZUJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__ZUJQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ZKBN=my_copy__TO2H(__tmp__YKBN);
      } break;
      case __EXPR_SUP__: {
        __tmp__ZKBN=my_copy__2O2H(__tmp__YKBN);
      } break;
      case __EXPR_SUB__: {
        __tmp__ZKBN=my_copy__HP2H(__tmp__YKBN);
      } break;
      case __EXPR_MUL__: {
        __tmp__ZKBN=my_copy__TP2H(__tmp__YKBN);
      } break;
      case __EXPR_DIV__: {
        __tmp__ZKBN=my_copy__4P2H(__tmp__YKBN);
      } break;
      case __EXPR_AND__: {
        __tmp__ZKBN=my_copy__JQ2H(__tmp__YKBN);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ZKBN=my_copy__UQ2H(__tmp__YKBN);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ZKBN=my_copy__5Q2H(__tmp__YKBN);
      } break;
      case __PUT_TO__: {
        __tmp__ZKBN=my_copy__KR2H(__tmp__YKBN);
      } break;
      case __ITEM__: {
        __tmp__ZKBN=my_copy__1R2H(__tmp__YKBN);
      } break;
      case __SIZE_OF__: {
        __tmp__ZKBN=my_copy__HS2H(__tmp__YKBN);
      } break;
      case __CAST__: {
        __tmp__ZKBN=my_copy__QS2H(__tmp__YKBN);
      } break;
      case __CALL_SLOT__: {
        __tmp__ZKBN=my_copy__PIYM(__tmp__YKBN);
      } break;
      case __READ_SLOT__: {
        __tmp__ZKBN=my_copy__AVGK(__tmp__YKBN);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ZKBN=my_copy__NVGK(__tmp__YKBN);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ZKBN=my_copy__RFCN(__tmp__YKBN);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ZKBN=my_copy__JMEO(__tmp__YKBN);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ZKBN=my_copy__RTJO(__tmp__YKBN);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ZKBN=my_copy__WMEO(__tmp__YKBN);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ZKBN=my_copy__3TJO(__tmp__YKBN);
      } break;
      case __EXPR_NEG__: {
        __tmp__ZKBN=my_copy__YEJM(__tmp__YKBN);
      } break;
      case __EXPR_ADD__: {
        __tmp__ZKBN=my_copy__YRLL(__tmp__YKBN);
      } break;
      case __EXPR_NOT__: {
        __tmp__ZKBN=my_copy__GLYM(__tmp__YKBN);
      } break;
      case __EXPR_MOD__: {
        __tmp__ZKBN=my_copy__BNEO(__tmp__YKBN);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ZKBN=my_copy__M3DP(__tmp__YKBN);
      } break;
      case __EXPR_INF__: {
        __tmp__ZKBN=my_copy__PBSN(__tmp__YKBN);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ZKBN=my_copy__0BSN(__tmp__YKBN);
      } break;
      case __EXPR_OR__: {
        __tmp__ZKBN=my_copy__ZOPN(__tmp__YKBN);
      } break;
      case __EXPR_XOR__: {
        __tmp__ZKBN=my_copy__CYSO(__tmp__YKBN);
      } break;
      };
      Self__CMGN=((__SWITCH *)result__BKBN);
      Self__CMGN->expr__MMFI=__tmp__ZKBN;
      Self__CMGN->list__SLAG=new_list__CKBN;
      __tmp__MIYM=result__BKBN;
    } break;
    case __NODE_TYPE__: {
      Self__2KBN=((__NODE_TYPE *)__tmp__LIYM);
      __tmp__5KBN=Self__2KBN->parent_node__DMQC.expr__KLZD;
      switch (((struct ___OBJ *)__tmp__5KBN)->__id) {
      case __LIST__: {
        __tmp__ALBN=my_copy__2HYM(__tmp__5KBN);
      } break;
      case __STRING_CST__: {
        Self__WK2H=((__STRING_CST *)__tmp__5KBN);
        __tmp__ALBN=create__text__AUMH(Self__WK2H->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WK2H->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__ALBN=my_copy__2K2H(__tmp__5KBN);
      } break;
      case __PROTOTYPE_CST__: {
        Self__0UJQ=((__PROTOTYPE_CST *)__tmp__5KBN);
        __tmp__ALBN=create__type__CLQC(Self__0UJQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0UJQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__1UJQ=((__INTEGER_CST *)__tmp__5KBN);
        __tmp__ALBN=create__value__type__DNQC(Self__1UJQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1UJQ->value__PAZD,Self__1UJQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__ALBN=my_copy__OAFJ(__tmp__5KBN);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ALBN=my_copy__KM2H(__tmp__5KBN);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ALBN=my_copy__DN2H(__tmp__5KBN);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ALBN=my_copy__QN2H(__tmp__5KBN);
      } break;
      case __REAL_CST__: {
        Self__3UJQ=((__REAL_CST *)__tmp__5KBN);
        __tmp__ALBN=create__value__type__1SMH(Self__3UJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3UJQ->value__5N2H,Self__3UJQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__5UJQ=((__CHARACTER_CST *)__tmp__5KBN);
        __tmp__ALBN=create__char__WTMH(Self__5UJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5UJQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__AVJQ=((__IS_EXPANDED *)__tmp__5KBN);
        __tmp__ALBN=create__receiver__WRWH(Self__AVJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__AVJQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ALBN=my_copy__TO2H(__tmp__5KBN);
      } break;
      case __EXPR_SUP__: {
        __tmp__ALBN=my_copy__2O2H(__tmp__5KBN);
      } break;
      case __EXPR_SUB__: {
        __tmp__ALBN=my_copy__HP2H(__tmp__5KBN);
      } break;
      case __EXPR_MUL__: {
        __tmp__ALBN=my_copy__TP2H(__tmp__5KBN);
      } break;
      case __EXPR_DIV__: {
        __tmp__ALBN=my_copy__4P2H(__tmp__5KBN);
      } break;
      case __EXPR_AND__: {
        __tmp__ALBN=my_copy__JQ2H(__tmp__5KBN);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ALBN=my_copy__UQ2H(__tmp__5KBN);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ALBN=my_copy__5Q2H(__tmp__5KBN);
      } break;
      case __PUT_TO__: {
        __tmp__ALBN=my_copy__KR2H(__tmp__5KBN);
      } break;
      case __ITEM__: {
        __tmp__ALBN=my_copy__1R2H(__tmp__5KBN);
      } break;
      case __SIZE_OF__: {
        __tmp__ALBN=my_copy__HS2H(__tmp__5KBN);
      } break;
      case __CAST__: {
        __tmp__ALBN=my_copy__QS2H(__tmp__5KBN);
      } break;
      case __CALL_SLOT__: {
        __tmp__ALBN=my_copy__PIYM(__tmp__5KBN);
      } break;
      case __READ_SLOT__: {
        __tmp__ALBN=my_copy__AVGK(__tmp__5KBN);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ALBN=my_copy__NVGK(__tmp__5KBN);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ALBN=my_copy__RFCN(__tmp__5KBN);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ALBN=my_copy__JMEO(__tmp__5KBN);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ALBN=my_copy__RTJO(__tmp__5KBN);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ALBN=my_copy__WMEO(__tmp__5KBN);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ALBN=my_copy__3TJO(__tmp__5KBN);
      } break;
      case __EXPR_NEG__: {
        __tmp__ALBN=my_copy__YEJM(__tmp__5KBN);
      } break;
      case __EXPR_ADD__: {
        __tmp__ALBN=my_copy__YRLL(__tmp__5KBN);
      } break;
      case __EXPR_NOT__: {
        __tmp__ALBN=my_copy__GLYM(__tmp__5KBN);
      } break;
      case __EXPR_MOD__: {
        __tmp__ALBN=my_copy__BNEO(__tmp__5KBN);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ALBN=my_copy__M3DP(__tmp__5KBN);
      } break;
      case __EXPR_INF__: {
        __tmp__ALBN=my_copy__PBSN(__tmp__5KBN);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ALBN=my_copy__0BSN(__tmp__5KBN);
      } break;
      case __EXPR_OR__: {
        __tmp__ALBN=my_copy__ZOPN(__tmp__5KBN);
      } break;
      case __EXPR_XOR__: {
        __tmp__ALBN=my_copy__CYSO(__tmp__5KBN);
      } break;
      };
      result__4KBN=create__with__GWUC(__tmp__ALBN,Self__2KBN->parent_node__DMQC.data__LLZD);
      add_last__I4YD(node_list__PMQC,result__4KBN);
      __tmp__MIYM=result__4KBN;
    } break;
    case __READ_LOCAL__: {
      __tmp__MIYM=my_copy__OAFJ(__tmp__LIYM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__MIYM=my_copy__KM2H(__tmp__LIYM);
    } break;
    case __NODE_STYLE__: {
      print__1ZE((&__string_496));
      fputc((int)('\n'),stdout);
      exit(( 1));
      __tmp__MIYM=NULL;
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__MIYM=my_copy__ILBN(__tmp__LIYM);
    } break;
    case __WRITE_SLOT__: {
      __tmp__MIYM=my_copy__ULBN(__tmp__LIYM);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__MIYM=my_copy__DN2H(__tmp__LIYM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__MIYM=my_copy__QN2H(__tmp__LIYM);
    } break;
    case __REAL_CST__: {
      Self__BVJQ=((__REAL_CST *)__tmp__LIYM);
      __tmp__MIYM=create__value__type__1SMH(Self__BVJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BVJQ->value__5N2H,Self__BVJQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__DVJQ=((__CHARACTER_CST *)__tmp__LIYM);
      __tmp__MIYM=create__char__WTMH(Self__DVJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DVJQ->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__EVJQ=((__IS_EXPANDED *)__tmp__LIYM);
      __tmp__MIYM=create__receiver__WRWH(Self__EVJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__EVJQ->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__MIYM=my_copy__TO2H(__tmp__LIYM);
    } break;
    case __EXPR_SUP__: {
      __tmp__MIYM=my_copy__2O2H(__tmp__LIYM);
    } break;
    case __EXPR_SUB__: {
      __tmp__MIYM=my_copy__HP2H(__tmp__LIYM);
    } break;
    case __EXPR_MUL__: {
      __tmp__MIYM=my_copy__TP2H(__tmp__LIYM);
    } break;
    case __EXPR_DIV__: {
      __tmp__MIYM=my_copy__4P2H(__tmp__LIYM);
    } break;
    case __EXPR_AND__: {
      __tmp__MIYM=my_copy__JQ2H(__tmp__LIYM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__MIYM=my_copy__UQ2H(__tmp__LIYM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__MIYM=my_copy__5Q2H(__tmp__LIYM);
    } break;
    case __PUT_TO__: {
      __tmp__MIYM=my_copy__KR2H(__tmp__LIYM);
    } break;
    case __ITEM__: {
      __tmp__MIYM=my_copy__1R2H(__tmp__LIYM);
    } break;
    case __SIZE_OF__: {
      __tmp__MIYM=my_copy__HS2H(__tmp__LIYM);
    } break;
    case __CAST__: {
      __tmp__MIYM=my_copy__QS2H(__tmp__LIYM);
    } break;
    case __CALL_SLOT__: {
      __tmp__MIYM=my_copy__PIYM(__tmp__LIYM);
    } break;
    case __NOP__: {
      __tmp__MIYM=((__NOP *)__tmp__LIYM);
    } break;
    case __READ_SLOT__: {
      __tmp__MIYM=my_copy__AVGK(__tmp__LIYM);
    } break;
    case __WRITE_LOCAL__: {
      __tmp__MIYM=my_copy__GMBN(__tmp__LIYM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__MIYM=my_copy__NVGK(__tmp__LIYM);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__MIYM=my_copy__RFCN(__tmp__LIYM);
    } break;
    case __LOOP__: {
      Self__TMBN=((__LOOP *)__tmp__LIYM);
      case__YMBN=NULL;
      loop_end__ZMBN=NULL;
      new_body__WMBN=my_copy__2HYM(Self__TMBN->body__5ALM);
      result__VMBN=create__name__body__UHAM(Self__TMBN->parent_instr__QKAL.parent_itm_object__TE.position__BJM,get_intern__3MBG(Self__TMBN->name__DILM),new_body__WMBN);
      __tmp__FNBN=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)new_body__WMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)new_body__WMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
      if (__tmp__FNBN==NULL) {
        __tmp__GNBN=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__FNBN)->__id) {
        case __LIST__: {
          __tmp__GNBN=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__GNBN=NULL;
        } break;
        case __PUSH__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__GNBN=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__GNBN=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__GNBN=NULL;
        } break;
        case __SWITCH__: {
          __tmp__GNBN=((void *)__tmp__FNBN);
        } break;
        case __NODE_TYPE__: {
          __tmp__GNBN=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__GNBN=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__GNBN=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__GNBN=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__GNBN=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__GNBN=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__GNBN=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__GNBN=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__GNBN=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__GNBN=NULL;
        } break;
        case __ITEM__: {
          __tmp__GNBN=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__GNBN=NULL;
        } break;
        case __CAST__: {
          __tmp__GNBN=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__GNBN=NULL;
        } break;
        case __NOP__: {
          __tmp__GNBN=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__GNBN=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__GNBN=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__GNBN=NULL;
        } break;
        case __LOOP__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__GNBN=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__GNBN=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__GNBN=NULL;
        } break;
        }
      };
      switch__XMBN=__tmp__GNBN;
      __tmp__MNBN=((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__GNBN)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
      Self__5ICN= 0;
      while ((Self__5ICN <= __tmp__MNBN)) {
        case__YMBN=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)((__SWITCH *)switch__XMBN)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__5ICN])->code__BQAG;
        if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)case__YMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) >  1)) {
          __tmp__AOBN=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)case__YMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)case__YMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
          if (__tmp__AOBN==NULL) {
            __tmp__BOBN=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__AOBN)->__id) {
            case __LIST__: {
              __tmp__BOBN=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__BOBN=NULL;
            } break;
            case __PUSH__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__BOBN=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__BOBN=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__BOBN=NULL;
            } break;
            case __SWITCH__: {
              __tmp__BOBN=NULL;
            } break;
            case __NODE_TYPE__: {
              __tmp__BOBN=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__BOBN=NULL;
            } break;
            case __NODE_STYLE__: {
              __tmp__BOBN=NULL;
            } break;
            case __WRITE_GLOBAL__: {
              __tmp__BOBN=NULL;
            } break;
            case __WRITE_SLOT__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__BOBN=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__BOBN=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__BOBN=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__BOBN=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__BOBN=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__BOBN=NULL;
            } break;
            case __ITEM__: {
              __tmp__BOBN=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__BOBN=NULL;
            } break;
            case __CAST__: {
              __tmp__BOBN=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__BOBN=NULL;
            } break;
            case __NOP__: {
              __tmp__BOBN=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__BOBN=NULL;
            } break;
            case __WRITE_LOCAL__: {
              __tmp__BOBN=NULL;
            } break;
            case __READ_GLOBAL__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__BOBN=NULL;
            } break;
            case __LOOP__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__BOBN=NULL;
            } break;
            case __LOOP_END__: {
              __tmp__BOBN=((void *)__tmp__AOBN);
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__BOBN=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__BOBN=NULL;
            } break;
            }
          };
          loop_end__ZMBN=__tmp__BOBN;
          if (((void *)__tmp__BOBN != (void *)NULL)) {
            if (((void *)((__LOOP_END *)__tmp__BOBN)->loop__5WLM != (void *)Self__TMBN)) {
              pos__IVJQ=Self__TMBN->parent_instr__QKAL.parent_itm_object__TE.position__BJM;
              put_error__text__0AH( 1,(&__string_497));
              put_position__ECH(pos__IVJQ);
              send_error__2FH();
            };
            loop_end__ZMBN=create__loop__CJHM(((__LOOP_END *)__tmp__BOBN)->parent_instr__G12L.parent_itm_object__TE.position__BJM,result__VMBN);
            ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)case__YMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)case__YMBN)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)]=loop_end__ZMBN;
          };
        };
        Self__5ICN=(__INTEGER)(Self__5ICN +  1);
      };
      if ((result__VMBN->link_count__YALM != Self__TMBN->link_count__YALM)) {
        print__1ZE(Self__TMBN->name__DILM);
        print__1ZE((&__string_498));
        print__Y0CD(Self__TMBN->link_count__YALM);
        print__1ZE((&__string_499));
        print__Y0CD(result__VMBN->link_count__YALM);
        fputc((int)('\n'),stdout);
        pos__3DAN=Self__TMBN->parent_instr__QKAL.parent_itm_object__TE.position__BJM;
        put_error__text__0AH( 1,(&__string_500));
        put_position__ECH(pos__3DAN);
        send_error__2FH();
      };
      __tmp__MIYM=result__VMBN;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__MIYM=my_copy__JMEO(__tmp__LIYM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__MIYM=my_copy__RTJO(__tmp__LIYM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__MIYM=my_copy__WMEO(__tmp__LIYM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__MIYM=my_copy__3TJO(__tmp__LIYM);
    } break;
    case __EXPR_NEG__: {
      __tmp__MIYM=my_copy__YEJM(__tmp__LIYM);
    } break;
    case __EXPR_ADD__: {
      __tmp__MIYM=my_copy__YRLL(__tmp__LIYM);
    } break;
    case __EXPR_NOT__: {
      __tmp__MIYM=my_copy__GLYM(__tmp__LIYM);
    } break;
    case __EXPR_MOD__: {
      __tmp__MIYM=my_copy__BNEO(__tmp__LIYM);
    } break;
    case __LOOP_END__: {
      __tmp__MIYM=((__LOOP_END *)__tmp__LIYM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__MIYM=my_copy__M3DP(__tmp__LIYM);
    } break;
    case __EXPR_INF__: {
      __tmp__MIYM=my_copy__PBSN(__tmp__LIYM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__MIYM=my_copy__0BSN(__tmp__LIYM);
    } break;
    case __EXPR_OR__: {
      __tmp__MIYM=my_copy__ZOPN(__tmp__LIYM);
    } break;
    case __EXPR_XOR__: {
      __tmp__MIYM=my_copy__CYSO(__tmp__LIYM);
    } break;
    };
    add_last__AL4G(((__LIST *)result__5HYM)->expr_list__JUOG,__tmp__MIYM);
    Self__FJ1M=(__INTEGER)(Self__FJ1M +  1);
  };
  return(result__5HYM);
}

static __EXTERNAL_C* my_copy__2K2H(__EXTERNAL_C *Self__3K2H)
// ({EXTERNAL_C}) With resultRecursive, No inlinable.
{
  __INTEGER __tmp__RL2H,Self__KLUI;
  void *__tmp__YL2H,*__tmp__ZL2H;
  __STRING_CST *Self__YX2P;
  __PROTOTYPE_CST *Self__XS1G;
  __INTEGER_CST *Self__EM2H;
  __REAL_CST *Self__OVJQ;
  __CHARACTER_CST *Self__QVJQ;
  __IS_EXPANDED *Self__RVJQ;
  __EXTERNAL_C *result__5K2H;
  void *new_access__AL2H;
  new_access__AL2H=NULL;
  if (((void *)Self__3K2H->access_list__XXZD != (void *)NULL)) {
    new_access__AL2H=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__3K2H->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH +  1));
    __tmp__RL2H=((__FAST_ARRAYoEXPRo *)Self__3K2H->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH;
    Self__KLUI= 0;
    while ((Self__KLUI <= __tmp__RL2H)) {
      __tmp__YL2H=((void **)((__FAST_ARRAYoEXPRo *)Self__3K2H->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__KLUI];
      switch (((struct ___OBJ *)__tmp__YL2H)->__id) {
      case __LIST__: {
        __tmp__ZL2H=my_copy__2HYM(__tmp__YL2H);
      } break;
      case __STRING_CST__: {
        Self__YX2P=((__STRING_CST *)__tmp__YL2H);
        __tmp__ZL2H=create__text__AUMH(Self__YX2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YX2P->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__ZL2H=my_copy__2K2H(__tmp__YL2H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__XS1G=((__PROTOTYPE_CST *)__tmp__YL2H);
        __tmp__ZL2H=create__type__CLQC(Self__XS1G->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XS1G->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__EM2H=((__INTEGER_CST *)__tmp__YL2H);
        __tmp__ZL2H=create__value__type__DNQC(Self__EM2H->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EM2H->value__PAZD,Self__EM2H->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__ZL2H=my_copy__OAFJ(__tmp__YL2H);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ZL2H=my_copy__KM2H(__tmp__YL2H);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ZL2H=my_copy__DN2H(__tmp__YL2H);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ZL2H=my_copy__QN2H(__tmp__YL2H);
      } break;
      case __REAL_CST__: {
        Self__OVJQ=((__REAL_CST *)__tmp__YL2H);
        __tmp__ZL2H=create__value__type__1SMH(Self__OVJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OVJQ->value__5N2H,Self__OVJQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__QVJQ=((__CHARACTER_CST *)__tmp__YL2H);
        __tmp__ZL2H=create__char__WTMH(Self__QVJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QVJQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__RVJQ=((__IS_EXPANDED *)__tmp__YL2H);
        __tmp__ZL2H=create__receiver__WRWH(Self__RVJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__RVJQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ZL2H=my_copy__TO2H(__tmp__YL2H);
      } break;
      case __EXPR_SUP__: {
        __tmp__ZL2H=my_copy__2O2H(__tmp__YL2H);
      } break;
      case __EXPR_SUB__: {
        __tmp__ZL2H=my_copy__HP2H(__tmp__YL2H);
      } break;
      case __EXPR_MUL__: {
        __tmp__ZL2H=my_copy__TP2H(__tmp__YL2H);
      } break;
      case __EXPR_DIV__: {
        __tmp__ZL2H=my_copy__4P2H(__tmp__YL2H);
      } break;
      case __EXPR_AND__: {
        __tmp__ZL2H=my_copy__JQ2H(__tmp__YL2H);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ZL2H=my_copy__UQ2H(__tmp__YL2H);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ZL2H=my_copy__5Q2H(__tmp__YL2H);
      } break;
      case __PUT_TO__: {
        __tmp__ZL2H=my_copy__KR2H(__tmp__YL2H);
      } break;
      case __ITEM__: {
        __tmp__ZL2H=my_copy__1R2H(__tmp__YL2H);
      } break;
      case __SIZE_OF__: {
        __tmp__ZL2H=my_copy__HS2H(__tmp__YL2H);
      } break;
      case __CAST__: {
        __tmp__ZL2H=my_copy__QS2H(__tmp__YL2H);
      } break;
      case __CALL_SLOT__: {
        __tmp__ZL2H=my_copy__PIYM(__tmp__YL2H);
      } break;
      case __READ_SLOT__: {
        __tmp__ZL2H=my_copy__AVGK(__tmp__YL2H);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ZL2H=my_copy__NVGK(__tmp__YL2H);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ZL2H=my_copy__RFCN(__tmp__YL2H);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ZL2H=my_copy__JMEO(__tmp__YL2H);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ZL2H=my_copy__RTJO(__tmp__YL2H);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ZL2H=my_copy__WMEO(__tmp__YL2H);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ZL2H=my_copy__3TJO(__tmp__YL2H);
      } break;
      case __EXPR_NEG__: {
        __tmp__ZL2H=my_copy__YEJM(__tmp__YL2H);
      } break;
      case __EXPR_ADD__: {
        __tmp__ZL2H=my_copy__YRLL(__tmp__YL2H);
      } break;
      case __EXPR_NOT__: {
        __tmp__ZL2H=my_copy__GLYM(__tmp__YL2H);
      } break;
      case __EXPR_MOD__: {
        __tmp__ZL2H=my_copy__BNEO(__tmp__YL2H);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ZL2H=my_copy__M3DP(__tmp__YL2H);
      } break;
      case __EXPR_INF__: {
        __tmp__ZL2H=my_copy__PBSN(__tmp__YL2H);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ZL2H=my_copy__0BSN(__tmp__YL2H);
      } break;
      case __EXPR_OR__: {
        __tmp__ZL2H=my_copy__ZOPN(__tmp__YL2H);
      } break;
      case __EXPR_XOR__: {
        __tmp__ZL2H=my_copy__CYSO(__tmp__YL2H);
      } break;
      };
      add_last__XSEI(new_access__AL2H,__tmp__ZL2H);
      Self__KLUI=(__INTEGER)(Self__KLUI +  1);
    };
  };
  result__5K2H=create__text__access__persistant__type__2U0C(Self__3K2H->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3K2H->code__WXZD,new_access__AL2H,Self__3K2H->is_persistant__VXZD,Self__3K2H->static_type__UXZD);
  ((__EXTERNAL_C *)result__5K2H)->living_type__R4QH=Self__3K2H->living_type__R4QH;
  return(result__5K2H);
}

static __READ_LOCAL* my_copy__OAFJ(__READ_LOCAL *Self__PAFJ)
// ({READ_LOCAL}) With resultNo recursive, No inlinable.
{
  void *__tmp__VAFJ;
  __READ_LOCAL *__tmp__WAFJ,*result__RAFJ;
  __tmp__VAFJ=read__IC5G(Self__PAFJ->local__ALZD);
  if (__tmp__VAFJ==NULL) {
    __tmp__WAFJ=NULL;
  } else {
    __tmp__WAFJ=((__READ_LOCAL *)__tmp__VAFJ);
  };
  result__RAFJ=__tmp__WAFJ;
  return(__tmp__WAFJ);
}

static __EXPR_MULTIPLE* my_copy__KM2H(__EXPR_MULTIPLE *Self__LM2H)
// ({EXPR_MULTIPLE}) With resultRecursive, No inlinable.
{
  __INTEGER __tmp__XM2H,Self__0UGI;
  void *__tmp__4M2H,*__tmp__5M2H;
  __STRING_CST *Self__4X2P;
  __PROTOTYPE_CST *Self__5X2P;
  __INTEGER_CST *Self__AY2P;
  __REAL_CST *Self__SVJQ;
  __CHARACTER_CST *Self__UVJQ;
  __IS_EXPANDED *Self__VVJQ;
  void *new_lst__NM2H;
  new_lst__NM2H=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__LM2H->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH +  1));
  __tmp__XM2H=((__FAST_ARRAYoEXPRo *)Self__LM2H->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH;
  Self__0UGI= 0;
  while ((Self__0UGI <= __tmp__XM2H)) {
    __tmp__4M2H=((void **)((__FAST_ARRAYoEXPRo *)Self__LM2H->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__0UGI];
    switch (((struct ___OBJ *)__tmp__4M2H)->__id) {
    case __LIST__: {
      __tmp__5M2H=my_copy__2HYM(__tmp__4M2H);
    } break;
    case __STRING_CST__: {
      Self__4X2P=((__STRING_CST *)__tmp__4M2H);
      __tmp__5M2H=create__text__AUMH(Self__4X2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4X2P->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__5M2H=my_copy__2K2H(__tmp__4M2H);
    } break;
    case __PROTOTYPE_CST__: {
      Self__5X2P=((__PROTOTYPE_CST *)__tmp__4M2H);
      __tmp__5M2H=create__type__CLQC(Self__5X2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5X2P->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__AY2P=((__INTEGER_CST *)__tmp__4M2H);
      __tmp__5M2H=create__value__type__DNQC(Self__AY2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AY2P->value__PAZD,Self__AY2P->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__5M2H=my_copy__OAFJ(__tmp__4M2H);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__5M2H=my_copy__KM2H(__tmp__4M2H);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__5M2H=my_copy__DN2H(__tmp__4M2H);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__5M2H=my_copy__QN2H(__tmp__4M2H);
    } break;
    case __REAL_CST__: {
      Self__SVJQ=((__REAL_CST *)__tmp__4M2H);
      __tmp__5M2H=create__value__type__1SMH(Self__SVJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SVJQ->value__5N2H,Self__SVJQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__UVJQ=((__CHARACTER_CST *)__tmp__4M2H);
      __tmp__5M2H=create__char__WTMH(Self__UVJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UVJQ->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__VVJQ=((__IS_EXPANDED *)__tmp__4M2H);
      __tmp__5M2H=create__receiver__WRWH(Self__VVJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__VVJQ->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__5M2H=my_copy__TO2H(__tmp__4M2H);
    } break;
    case __EXPR_SUP__: {
      __tmp__5M2H=my_copy__2O2H(__tmp__4M2H);
    } break;
    case __EXPR_SUB__: {
      __tmp__5M2H=my_copy__HP2H(__tmp__4M2H);
    } break;
    case __EXPR_MUL__: {
      __tmp__5M2H=my_copy__TP2H(__tmp__4M2H);
    } break;
    case __EXPR_DIV__: {
      __tmp__5M2H=my_copy__4P2H(__tmp__4M2H);
    } break;
    case __EXPR_AND__: {
      __tmp__5M2H=my_copy__JQ2H(__tmp__4M2H);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__5M2H=my_copy__UQ2H(__tmp__4M2H);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__5M2H=my_copy__5Q2H(__tmp__4M2H);
    } break;
    case __PUT_TO__: {
      __tmp__5M2H=my_copy__KR2H(__tmp__4M2H);
    } break;
    case __ITEM__: {
      __tmp__5M2H=my_copy__1R2H(__tmp__4M2H);
    } break;
    case __SIZE_OF__: {
      __tmp__5M2H=my_copy__HS2H(__tmp__4M2H);
    } break;
    case __CAST__: {
      __tmp__5M2H=my_copy__QS2H(__tmp__4M2H);
    } break;
    case __CALL_SLOT__: {
      __tmp__5M2H=my_copy__PIYM(__tmp__4M2H);
    } break;
    case __READ_SLOT__: {
      __tmp__5M2H=my_copy__AVGK(__tmp__4M2H);
    } break;
    case __READ_GLOBAL__: {
      __tmp__5M2H=my_copy__NVGK(__tmp__4M2H);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__5M2H=my_copy__RFCN(__tmp__4M2H);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__5M2H=my_copy__JMEO(__tmp__4M2H);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__5M2H=my_copy__RTJO(__tmp__4M2H);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__5M2H=my_copy__WMEO(__tmp__4M2H);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__5M2H=my_copy__3TJO(__tmp__4M2H);
    } break;
    case __EXPR_NEG__: {
      __tmp__5M2H=my_copy__YEJM(__tmp__4M2H);
    } break;
    case __EXPR_ADD__: {
      __tmp__5M2H=my_copy__YRLL(__tmp__4M2H);
    } break;
    case __EXPR_NOT__: {
      __tmp__5M2H=my_copy__GLYM(__tmp__4M2H);
    } break;
    case __EXPR_MOD__: {
      __tmp__5M2H=my_copy__BNEO(__tmp__4M2H);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__5M2H=my_copy__M3DP(__tmp__4M2H);
    } break;
    case __EXPR_INF__: {
      __tmp__5M2H=my_copy__PBSN(__tmp__4M2H);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__5M2H=my_copy__0BSN(__tmp__4M2H);
    } break;
    case __EXPR_OR__: {
      __tmp__5M2H=my_copy__ZOPN(__tmp__4M2H);
    } break;
    case __EXPR_XOR__: {
      __tmp__5M2H=my_copy__CYSO(__tmp__4M2H);
    } break;
    };
    add_last__XSEI(new_lst__NM2H,__tmp__5M2H);
    Self__0UGI=(__INTEGER)(Self__0UGI +  1);
  };
  return(create__SUHH(new_lst__NM2H));
}

static __EXPR_EQUAL* my_copy__DN2H(__EXPR_EQUAL *Self__EN2H)
// ({EXPR_EQUAL}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__GN2H;
  void *__tmp__IN2H,*__tmp__JN2H,*__tmp__MN2H,*__tmp__NN2H;
  __STRING_CST *Self__FY2P,*Self__JY2P;
  __PROTOTYPE_CST *Self__GY2P,*Self__KY2P;
  __INTEGER_CST *Self__HY2P,*Self__LY2P;
  __REAL_CST *Self__WVJQ,*Self__0VJQ;
  __CHARACTER_CST *Self__YVJQ,*Self__2VJQ;
  __IS_EXPANDED *Self__ZVJQ,*Self__3VJQ;
  __tmp__GN2H=Self__EN2H->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__IN2H=Self__EN2H->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__IN2H)->__id) {
  case __LIST__: {
    __tmp__JN2H=my_copy__2HYM(__tmp__IN2H);
  } break;
  case __STRING_CST__: {
    Self__FY2P=((__STRING_CST *)__tmp__IN2H);
    __tmp__JN2H=create__text__AUMH(Self__FY2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FY2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__JN2H=my_copy__2K2H(__tmp__IN2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__GY2P=((__PROTOTYPE_CST *)__tmp__IN2H);
    __tmp__JN2H=create__type__CLQC(Self__GY2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GY2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__HY2P=((__INTEGER_CST *)__tmp__IN2H);
    __tmp__JN2H=create__value__type__DNQC(Self__HY2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HY2P->value__PAZD,Self__HY2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__JN2H=my_copy__OAFJ(__tmp__IN2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__JN2H=my_copy__KM2H(__tmp__IN2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__JN2H=my_copy__DN2H(__tmp__IN2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__JN2H=my_copy__QN2H(__tmp__IN2H);
  } break;
  case __REAL_CST__: {
    Self__WVJQ=((__REAL_CST *)__tmp__IN2H);
    __tmp__JN2H=create__value__type__1SMH(Self__WVJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WVJQ->value__5N2H,Self__WVJQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__YVJQ=((__CHARACTER_CST *)__tmp__IN2H);
    __tmp__JN2H=create__char__WTMH(Self__YVJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YVJQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__ZVJQ=((__IS_EXPANDED *)__tmp__IN2H);
    __tmp__JN2H=create__receiver__WRWH(Self__ZVJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__ZVJQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__JN2H=my_copy__TO2H(__tmp__IN2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__JN2H=my_copy__2O2H(__tmp__IN2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__JN2H=my_copy__HP2H(__tmp__IN2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__JN2H=my_copy__TP2H(__tmp__IN2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__JN2H=my_copy__4P2H(__tmp__IN2H);
  } break;
  case __EXPR_AND__: {
    __tmp__JN2H=my_copy__JQ2H(__tmp__IN2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__JN2H=my_copy__UQ2H(__tmp__IN2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__JN2H=my_copy__5Q2H(__tmp__IN2H);
  } break;
  case __PUT_TO__: {
    __tmp__JN2H=my_copy__KR2H(__tmp__IN2H);
  } break;
  case __ITEM__: {
    __tmp__JN2H=my_copy__1R2H(__tmp__IN2H);
  } break;
  case __SIZE_OF__: {
    __tmp__JN2H=my_copy__HS2H(__tmp__IN2H);
  } break;
  case __CAST__: {
    __tmp__JN2H=my_copy__QS2H(__tmp__IN2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__JN2H=my_copy__PIYM(__tmp__IN2H);
  } break;
  case __READ_SLOT__: {
    __tmp__JN2H=my_copy__AVGK(__tmp__IN2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__JN2H=my_copy__NVGK(__tmp__IN2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__JN2H=my_copy__RFCN(__tmp__IN2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__JN2H=my_copy__JMEO(__tmp__IN2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__JN2H=my_copy__RTJO(__tmp__IN2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__JN2H=my_copy__WMEO(__tmp__IN2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__JN2H=my_copy__3TJO(__tmp__IN2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__JN2H=my_copy__YEJM(__tmp__IN2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__JN2H=my_copy__YRLL(__tmp__IN2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__JN2H=my_copy__GLYM(__tmp__IN2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__JN2H=my_copy__BNEO(__tmp__IN2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__JN2H=my_copy__M3DP(__tmp__IN2H);
  } break;
  case __EXPR_INF__: {
    __tmp__JN2H=my_copy__PBSN(__tmp__IN2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__JN2H=my_copy__0BSN(__tmp__IN2H);
  } break;
  case __EXPR_OR__: {
    __tmp__JN2H=my_copy__ZOPN(__tmp__IN2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__JN2H=my_copy__CYSO(__tmp__IN2H);
  } break;
  };
  __tmp__MN2H=Self__EN2H->parent_expr_binary_cmp__1LJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__MN2H)->__id) {
  case __LIST__: {
    __tmp__NN2H=my_copy__2HYM(__tmp__MN2H);
  } break;
  case __STRING_CST__: {
    Self__JY2P=((__STRING_CST *)__tmp__MN2H);
    __tmp__NN2H=create__text__AUMH(Self__JY2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JY2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__NN2H=my_copy__2K2H(__tmp__MN2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__KY2P=((__PROTOTYPE_CST *)__tmp__MN2H);
    __tmp__NN2H=create__type__CLQC(Self__KY2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KY2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__LY2P=((__INTEGER_CST *)__tmp__MN2H);
    __tmp__NN2H=create__value__type__DNQC(Self__LY2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LY2P->value__PAZD,Self__LY2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__NN2H=my_copy__OAFJ(__tmp__MN2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NN2H=my_copy__KM2H(__tmp__MN2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NN2H=my_copy__DN2H(__tmp__MN2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NN2H=my_copy__QN2H(__tmp__MN2H);
  } break;
  case __REAL_CST__: {
    Self__0VJQ=((__REAL_CST *)__tmp__MN2H);
    __tmp__NN2H=create__value__type__1SMH(Self__0VJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0VJQ->value__5N2H,Self__0VJQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__2VJQ=((__CHARACTER_CST *)__tmp__MN2H);
    __tmp__NN2H=create__char__WTMH(Self__2VJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2VJQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__3VJQ=((__IS_EXPANDED *)__tmp__MN2H);
    __tmp__NN2H=create__receiver__WRWH(Self__3VJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__3VJQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__NN2H=my_copy__TO2H(__tmp__MN2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__NN2H=my_copy__2O2H(__tmp__MN2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__NN2H=my_copy__HP2H(__tmp__MN2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__NN2H=my_copy__TP2H(__tmp__MN2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__NN2H=my_copy__4P2H(__tmp__MN2H);
  } break;
  case __EXPR_AND__: {
    __tmp__NN2H=my_copy__JQ2H(__tmp__MN2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NN2H=my_copy__UQ2H(__tmp__MN2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NN2H=my_copy__5Q2H(__tmp__MN2H);
  } break;
  case __PUT_TO__: {
    __tmp__NN2H=my_copy__KR2H(__tmp__MN2H);
  } break;
  case __ITEM__: {
    __tmp__NN2H=my_copy__1R2H(__tmp__MN2H);
  } break;
  case __SIZE_OF__: {
    __tmp__NN2H=my_copy__HS2H(__tmp__MN2H);
  } break;
  case __CAST__: {
    __tmp__NN2H=my_copy__QS2H(__tmp__MN2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__NN2H=my_copy__PIYM(__tmp__MN2H);
  } break;
  case __READ_SLOT__: {
    __tmp__NN2H=my_copy__AVGK(__tmp__MN2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__NN2H=my_copy__NVGK(__tmp__MN2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NN2H=my_copy__RFCN(__tmp__MN2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NN2H=my_copy__JMEO(__tmp__MN2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NN2H=my_copy__RTJO(__tmp__MN2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NN2H=my_copy__WMEO(__tmp__MN2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NN2H=my_copy__3TJO(__tmp__MN2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__NN2H=my_copy__YEJM(__tmp__MN2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__NN2H=my_copy__YRLL(__tmp__MN2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__NN2H=my_copy__GLYM(__tmp__MN2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__NN2H=my_copy__BNEO(__tmp__MN2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NN2H=my_copy__M3DP(__tmp__MN2H);
  } break;
  case __EXPR_INF__: {
    __tmp__NN2H=my_copy__PBSN(__tmp__MN2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NN2H=my_copy__0BSN(__tmp__MN2H);
  } break;
  case __EXPR_OR__: {
    __tmp__NN2H=my_copy__ZOPN(__tmp__MN2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__NN2H=my_copy__CYSO(__tmp__MN2H);
  } break;
  };
  return(create__with__and__TWUH(__tmp__GN2H,__tmp__JN2H,__tmp__NN2H));
}

static __EXPR_NOT_EQUAL* my_copy__QN2H(__EXPR_NOT_EQUAL *Self__RN2H)
// ({EXPR_NOT_EQUAL}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__TN2H;
  void *__tmp__UN2H,*__tmp__VN2H,*__tmp__XN2H,*__tmp__YN2H;
  __STRING_CST *Self__NY2P,*Self__RY2P;
  __PROTOTYPE_CST *Self__OY2P,*Self__SY2P;
  __INTEGER_CST *Self__PY2P,*Self__TY2P;
  __REAL_CST *Self__4VJQ,*Self__2N2H;
  __CHARACTER_CST *Self__AWJQ,*Self__EO2H;
  __IS_EXPANDED *Self__BWJQ,*Self__LO2H;
  __tmp__TN2H=Self__RN2H->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__UN2H=Self__RN2H->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__UN2H)->__id) {
  case __LIST__: {
    __tmp__VN2H=my_copy__2HYM(__tmp__UN2H);
  } break;
  case __STRING_CST__: {
    Self__NY2P=((__STRING_CST *)__tmp__UN2H);
    __tmp__VN2H=create__text__AUMH(Self__NY2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NY2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__VN2H=my_copy__2K2H(__tmp__UN2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__OY2P=((__PROTOTYPE_CST *)__tmp__UN2H);
    __tmp__VN2H=create__type__CLQC(Self__OY2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OY2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__PY2P=((__INTEGER_CST *)__tmp__UN2H);
    __tmp__VN2H=create__value__type__DNQC(Self__PY2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PY2P->value__PAZD,Self__PY2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__VN2H=my_copy__OAFJ(__tmp__UN2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__VN2H=my_copy__KM2H(__tmp__UN2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__VN2H=my_copy__DN2H(__tmp__UN2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__VN2H=my_copy__QN2H(__tmp__UN2H);
  } break;
  case __REAL_CST__: {
    Self__4VJQ=((__REAL_CST *)__tmp__UN2H);
    __tmp__VN2H=create__value__type__1SMH(Self__4VJQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4VJQ->value__5N2H,Self__4VJQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__AWJQ=((__CHARACTER_CST *)__tmp__UN2H);
    __tmp__VN2H=create__char__WTMH(Self__AWJQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AWJQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__BWJQ=((__IS_EXPANDED *)__tmp__UN2H);
    __tmp__VN2H=create__receiver__WRWH(Self__BWJQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__BWJQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__VN2H=my_copy__TO2H(__tmp__UN2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__VN2H=my_copy__2O2H(__tmp__UN2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__VN2H=my_copy__HP2H(__tmp__UN2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__VN2H=my_copy__TP2H(__tmp__UN2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__VN2H=my_copy__4P2H(__tmp__UN2H);
  } break;
  case __EXPR_AND__: {
    __tmp__VN2H=my_copy__JQ2H(__tmp__UN2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__VN2H=my_copy__UQ2H(__tmp__UN2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__VN2H=my_copy__5Q2H(__tmp__UN2H);
  } break;
  case __PUT_TO__: {
    __tmp__VN2H=my_copy__KR2H(__tmp__UN2H);
  } break;
  case __ITEM__: {
    __tmp__VN2H=my_copy__1R2H(__tmp__UN2H);
  } break;
  case __SIZE_OF__: {
    __tmp__VN2H=my_copy__HS2H(__tmp__UN2H);
  } break;
  case __CAST__: {
    __tmp__VN2H=my_copy__QS2H(__tmp__UN2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__VN2H=my_copy__PIYM(__tmp__UN2H);
  } break;
  case __READ_SLOT__: {
    __tmp__VN2H=my_copy__AVGK(__tmp__UN2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__VN2H=my_copy__NVGK(__tmp__UN2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__VN2H=my_copy__RFCN(__tmp__UN2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__VN2H=my_copy__JMEO(__tmp__UN2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__VN2H=my_copy__RTJO(__tmp__UN2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__VN2H=my_copy__WMEO(__tmp__UN2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__VN2H=my_copy__3TJO(__tmp__UN2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__VN2H=my_copy__YEJM(__tmp__UN2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__VN2H=my_copy__YRLL(__tmp__UN2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__VN2H=my_copy__GLYM(__tmp__UN2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__VN2H=my_copy__BNEO(__tmp__UN2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__VN2H=my_copy__M3DP(__tmp__UN2H);
  } break;
  case __EXPR_INF__: {
    __tmp__VN2H=my_copy__PBSN(__tmp__UN2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__VN2H=my_copy__0BSN(__tmp__UN2H);
  } break;
  case __EXPR_OR__: {
    __tmp__VN2H=my_copy__ZOPN(__tmp__UN2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__VN2H=my_copy__CYSO(__tmp__UN2H);
  } break;
  };
  __tmp__XN2H=Self__RN2H->parent_expr_binary_cmp__DMJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__XN2H)->__id) {
  case __LIST__: {
    __tmp__YN2H=my_copy__2HYM(__tmp__XN2H);
  } break;
  case __STRING_CST__: {
    Self__RY2P=((__STRING_CST *)__tmp__XN2H);
    __tmp__YN2H=create__text__AUMH(Self__RY2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RY2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__YN2H=my_copy__2K2H(__tmp__XN2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__SY2P=((__PROTOTYPE_CST *)__tmp__XN2H);
    __tmp__YN2H=create__type__CLQC(Self__SY2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SY2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__TY2P=((__INTEGER_CST *)__tmp__XN2H);
    __tmp__YN2H=create__value__type__DNQC(Self__TY2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TY2P->value__PAZD,Self__TY2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__YN2H=my_copy__OAFJ(__tmp__XN2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__YN2H=my_copy__KM2H(__tmp__XN2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__YN2H=my_copy__DN2H(__tmp__XN2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__YN2H=my_copy__QN2H(__tmp__XN2H);
  } break;
  case __REAL_CST__: {
    Self__2N2H=((__REAL_CST *)__tmp__XN2H);
    __tmp__YN2H=create__value__type__1SMH(Self__2N2H->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2N2H->value__5N2H,Self__2N2H->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__EO2H=((__CHARACTER_CST *)__tmp__XN2H);
    __tmp__YN2H=create__char__WTMH(Self__EO2H->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EO2H->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__LO2H=((__IS_EXPANDED *)__tmp__XN2H);
    __tmp__YN2H=create__receiver__WRWH(Self__LO2H->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__LO2H->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__YN2H=my_copy__TO2H(__tmp__XN2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__YN2H=my_copy__2O2H(__tmp__XN2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__YN2H=my_copy__HP2H(__tmp__XN2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__YN2H=my_copy__TP2H(__tmp__XN2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__YN2H=my_copy__4P2H(__tmp__XN2H);
  } break;
  case __EXPR_AND__: {
    __tmp__YN2H=my_copy__JQ2H(__tmp__XN2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__YN2H=my_copy__UQ2H(__tmp__XN2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__YN2H=my_copy__5Q2H(__tmp__XN2H);
  } break;
  case __PUT_TO__: {
    __tmp__YN2H=my_copy__KR2H(__tmp__XN2H);
  } break;
  case __ITEM__: {
    __tmp__YN2H=my_copy__1R2H(__tmp__XN2H);
  } break;
  case __SIZE_OF__: {
    __tmp__YN2H=my_copy__HS2H(__tmp__XN2H);
  } break;
  case __CAST__: {
    __tmp__YN2H=my_copy__QS2H(__tmp__XN2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__YN2H=my_copy__PIYM(__tmp__XN2H);
  } break;
  case __READ_SLOT__: {
    __tmp__YN2H=my_copy__AVGK(__tmp__XN2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__YN2H=my_copy__NVGK(__tmp__XN2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__YN2H=my_copy__RFCN(__tmp__XN2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__YN2H=my_copy__JMEO(__tmp__XN2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__YN2H=my_copy__RTJO(__tmp__XN2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__YN2H=my_copy__WMEO(__tmp__XN2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__YN2H=my_copy__3TJO(__tmp__XN2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__YN2H=my_copy__YEJM(__tmp__XN2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__YN2H=my_copy__YRLL(__tmp__XN2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__YN2H=my_copy__GLYM(__tmp__XN2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__YN2H=my_copy__BNEO(__tmp__XN2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__YN2H=my_copy__M3DP(__tmp__XN2H);
  } break;
  case __EXPR_INF__: {
    __tmp__YN2H=my_copy__PBSN(__tmp__XN2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__YN2H=my_copy__0BSN(__tmp__XN2H);
  } break;
  case __EXPR_OR__: {
    __tmp__YN2H=my_copy__ZOPN(__tmp__XN2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__YN2H=my_copy__CYSO(__tmp__XN2H);
  } break;
  };
  return(create__with__and__AXUH(__tmp__TN2H,__tmp__VN2H,__tmp__YN2H));
}

static __REAL_CST* create__value__type__1SMH(__POSITION p__3SMH,void *v__4SMH,void *t__5SMH)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  __REAL_CST *result__EXOH,*Self__AAEI;
  __POINTER ptr__FXOH;
  __INTEGER typ_id__KXOH;
  __UINTEGER_32 sz__HXOH,a__E20Q,new_size__C20Q,t__I20Q,a__K20Q;
  result__EXOH=NULL;
  ptr__FXOH=((__POINTER )(NULL));
  typ_id__KXOH= 0;
  sz__HXOH=((__UINTEGER_32 )sizeof(__REAL_CST));
  if ((sz__HXOH ==  0)) {
    result__EXOH=REAL_CST__;
  } else {
    typ_id__KXOH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__HXOH);
    if ((typ_id__KXOH == (__INTEGER)(-  1))) {
      a__E20Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__C20Q=(__UINTEGER_32)((__UINTEGER_32)(sz__HXOH + a__E20Q) & (__UINTEGER_32)(~ a__E20Q));
      ptr__FXOH=micro_alloc__table__lab__BOI(new_size__C20Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C20Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__C20Q);
    } else {
      t__I20Q=((__UINTEGER_32 )typ_id__KXOH);
      a__K20Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__FXOH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__HXOH + a__K20Q) & (__UINTEGER_32)(~ a__K20Q)),((__POINTER )(&(table_type[(t__I20Q)]))),(__UINTEGER_32)(t__I20Q |  1));
    };
    result__EXOH=((__REAL_CST *)ptr__FXOH);
    *(result__EXOH) = *(REAL_CST__);
  };
  Self__AAEI=((__REAL_CST *)result__EXOH);
  Self__AAEI->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=p__3SMH;
  Self__AAEI->value__5N2H=v__4SMH;
  Self__AAEI->parent_constant__M3JH.static_type__F4YD=t__5SMH;
  return(result__EXOH);
}

static __IS_EXPANDED* create__receiver__WRWH(__POSITION p__YRWH,void *e__ZRWH)
// ({POSITION},{NULLxREAD_LOCAL}) With resultNo recursive, No inlinable.
{
  __IS_EXPANDED *result__Z0XH,*Self__1NFI;
  __POINTER ptr__00XH;
  __INTEGER typ_id__50XH;
  __UINTEGER_32 sz__20XH,a__P20Q,new_size__N20Q,t__T20Q,a__V20Q;
  result__Z0XH=NULL;
  ptr__00XH=((__POINTER )(NULL));
  typ_id__50XH= 0;
  sz__20XH=((__UINTEGER_32 )sizeof(__IS_EXPANDED));
  if ((sz__20XH ==  0)) {
    result__Z0XH=IS_EXPANDED__;
  } else {
    typ_id__50XH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__20XH);
    if ((typ_id__50XH == (__INTEGER)(-  1))) {
      a__P20Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__N20Q=(__UINTEGER_32)((__UINTEGER_32)(sz__20XH + a__P20Q) & (__UINTEGER_32)(~ a__P20Q));
      ptr__00XH=micro_alloc__table__lab__BOI(new_size__N20Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N20Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__N20Q);
    } else {
      t__T20Q=((__UINTEGER_32 )typ_id__50XH);
      a__V20Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__00XH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__20XH + a__V20Q) & (__UINTEGER_32)(~ a__V20Q)),((__POINTER )(&(table_type[(t__T20Q)]))),(__UINTEGER_32)(t__T20Q |  1));
    };
    result__Z0XH=((__IS_EXPANDED *)ptr__00XH);
    *(result__Z0XH) = *(IS_EXPANDED__);
  };
  Self__1NFI=((__IS_EXPANDED *)result__Z0XH);
  Self__1NFI->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__YRWH;
  Self__1NFI->receiver__OO2H=e__ZRWH;
  return(result__Z0XH);
}

static __GET_TYPE_ID* my_copy__TO2H(__GET_TYPE_ID *Self__UO2H)
// ({GET_TYPE_ID}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__WO2H;
  void *__tmp__YO2H,*__tmp__ZO2H;
  __STRING_CST *Self__VY2P;
  __PROTOTYPE_CST *Self__WY2P;
  __INTEGER_CST *Self__XY2P;
  __REAL_CST *Self__ZY2P;
  __CHARACTER_CST *Self__1Y2P;
  __IS_EXPANDED *Self__2Y2P;
  __tmp__WO2H=Self__UO2H->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__YO2H=Self__UO2H->receiver__XO2H;
  switch (((struct ___OBJ *)__tmp__YO2H)->__id) {
  case __LIST__: {
    __tmp__ZO2H=my_copy__2HYM(__tmp__YO2H);
  } break;
  case __STRING_CST__: {
    Self__VY2P=((__STRING_CST *)__tmp__YO2H);
    __tmp__ZO2H=create__text__AUMH(Self__VY2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VY2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZO2H=my_copy__2K2H(__tmp__YO2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__WY2P=((__PROTOTYPE_CST *)__tmp__YO2H);
    __tmp__ZO2H=create__type__CLQC(Self__WY2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WY2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__XY2P=((__INTEGER_CST *)__tmp__YO2H);
    __tmp__ZO2H=create__value__type__DNQC(Self__XY2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XY2P->value__PAZD,Self__XY2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__ZO2H=my_copy__OAFJ(__tmp__YO2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZO2H=my_copy__KM2H(__tmp__YO2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZO2H=my_copy__DN2H(__tmp__YO2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZO2H=my_copy__QN2H(__tmp__YO2H);
  } break;
  case __REAL_CST__: {
    Self__ZY2P=((__REAL_CST *)__tmp__YO2H);
    __tmp__ZO2H=create__value__type__1SMH(Self__ZY2P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZY2P->value__5N2H,Self__ZY2P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__1Y2P=((__CHARACTER_CST *)__tmp__YO2H);
    __tmp__ZO2H=create__char__WTMH(Self__1Y2P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1Y2P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__2Y2P=((__IS_EXPANDED *)__tmp__YO2H);
    __tmp__ZO2H=create__receiver__WRWH(Self__2Y2P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__2Y2P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ZO2H=my_copy__TO2H(__tmp__YO2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__ZO2H=my_copy__2O2H(__tmp__YO2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__ZO2H=my_copy__HP2H(__tmp__YO2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZO2H=my_copy__TP2H(__tmp__YO2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZO2H=my_copy__4P2H(__tmp__YO2H);
  } break;
  case __EXPR_AND__: {
    __tmp__ZO2H=my_copy__JQ2H(__tmp__YO2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZO2H=my_copy__UQ2H(__tmp__YO2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZO2H=my_copy__5Q2H(__tmp__YO2H);
  } break;
  case __PUT_TO__: {
    __tmp__ZO2H=my_copy__KR2H(__tmp__YO2H);
  } break;
  case __ITEM__: {
    __tmp__ZO2H=my_copy__1R2H(__tmp__YO2H);
  } break;
  case __SIZE_OF__: {
    __tmp__ZO2H=my_copy__HS2H(__tmp__YO2H);
  } break;
  case __CAST__: {
    __tmp__ZO2H=my_copy__QS2H(__tmp__YO2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__ZO2H=my_copy__PIYM(__tmp__YO2H);
  } break;
  case __READ_SLOT__: {
    __tmp__ZO2H=my_copy__AVGK(__tmp__YO2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ZO2H=my_copy__NVGK(__tmp__YO2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZO2H=my_copy__RFCN(__tmp__YO2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZO2H=my_copy__JMEO(__tmp__YO2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZO2H=my_copy__RTJO(__tmp__YO2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZO2H=my_copy__WMEO(__tmp__YO2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZO2H=my_copy__3TJO(__tmp__YO2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__ZO2H=my_copy__YEJM(__tmp__YO2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZO2H=my_copy__YRLL(__tmp__YO2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZO2H=my_copy__GLYM(__tmp__YO2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZO2H=my_copy__BNEO(__tmp__YO2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZO2H=my_copy__M3DP(__tmp__YO2H);
  } break;
  case __EXPR_INF__: {
    __tmp__ZO2H=my_copy__PBSN(__tmp__YO2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZO2H=my_copy__0BSN(__tmp__YO2H);
  } break;
  case __EXPR_OR__: {
    __tmp__ZO2H=my_copy__ZOPN(__tmp__YO2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZO2H=my_copy__CYSO(__tmp__YO2H);
  } break;
  };
  return(create__receiver__HSWH(__tmp__WO2H,__tmp__ZO2H));
}

static __EXPR_SUP* my_copy__2O2H(__EXPR_SUP *Self__3O2H)
// ({EXPR_SUP}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__5O2H;
  void *__tmp__AP2H,*__tmp__BP2H,*__tmp__DP2H,*__tmp__EP2H;
  __STRING_CST *Self__3Y2P,*Self__FZ2P;
  __PROTOTYPE_CST *Self__4Y2P,*Self__GZ2P;
  __INTEGER_CST *Self__5Y2P,*Self__HZ2P;
  __REAL_CST *Self__BZ2P,*Self__JZ2P;
  __CHARACTER_CST *Self__DZ2P,*Self__LZ2P;
  __IS_EXPANDED *Self__EZ2P,*Self__MZ2P;
  __tmp__5O2H=Self__3O2H->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__AP2H=Self__3O2H->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__AP2H)->__id) {
  case __LIST__: {
    __tmp__BP2H=my_copy__2HYM(__tmp__AP2H);
  } break;
  case __STRING_CST__: {
    Self__3Y2P=((__STRING_CST *)__tmp__AP2H);
    __tmp__BP2H=create__text__AUMH(Self__3Y2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3Y2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__BP2H=my_copy__2K2H(__tmp__AP2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__4Y2P=((__PROTOTYPE_CST *)__tmp__AP2H);
    __tmp__BP2H=create__type__CLQC(Self__4Y2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4Y2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__5Y2P=((__INTEGER_CST *)__tmp__AP2H);
    __tmp__BP2H=create__value__type__DNQC(Self__5Y2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5Y2P->value__PAZD,Self__5Y2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__BP2H=my_copy__OAFJ(__tmp__AP2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BP2H=my_copy__KM2H(__tmp__AP2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BP2H=my_copy__DN2H(__tmp__AP2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BP2H=my_copy__QN2H(__tmp__AP2H);
  } break;
  case __REAL_CST__: {
    Self__BZ2P=((__REAL_CST *)__tmp__AP2H);
    __tmp__BP2H=create__value__type__1SMH(Self__BZ2P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BZ2P->value__5N2H,Self__BZ2P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__DZ2P=((__CHARACTER_CST *)__tmp__AP2H);
    __tmp__BP2H=create__char__WTMH(Self__DZ2P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DZ2P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__EZ2P=((__IS_EXPANDED *)__tmp__AP2H);
    __tmp__BP2H=create__receiver__WRWH(Self__EZ2P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__EZ2P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BP2H=my_copy__TO2H(__tmp__AP2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__BP2H=my_copy__2O2H(__tmp__AP2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__BP2H=my_copy__HP2H(__tmp__AP2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__BP2H=my_copy__TP2H(__tmp__AP2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__BP2H=my_copy__4P2H(__tmp__AP2H);
  } break;
  case __EXPR_AND__: {
    __tmp__BP2H=my_copy__JQ2H(__tmp__AP2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BP2H=my_copy__UQ2H(__tmp__AP2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BP2H=my_copy__5Q2H(__tmp__AP2H);
  } break;
  case __PUT_TO__: {
    __tmp__BP2H=my_copy__KR2H(__tmp__AP2H);
  } break;
  case __ITEM__: {
    __tmp__BP2H=my_copy__1R2H(__tmp__AP2H);
  } break;
  case __SIZE_OF__: {
    __tmp__BP2H=my_copy__HS2H(__tmp__AP2H);
  } break;
  case __CAST__: {
    __tmp__BP2H=my_copy__QS2H(__tmp__AP2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__BP2H=my_copy__PIYM(__tmp__AP2H);
  } break;
  case __READ_SLOT__: {
    __tmp__BP2H=my_copy__AVGK(__tmp__AP2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__BP2H=my_copy__NVGK(__tmp__AP2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BP2H=my_copy__RFCN(__tmp__AP2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BP2H=my_copy__JMEO(__tmp__AP2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BP2H=my_copy__RTJO(__tmp__AP2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BP2H=my_copy__WMEO(__tmp__AP2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BP2H=my_copy__3TJO(__tmp__AP2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__BP2H=my_copy__YEJM(__tmp__AP2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__BP2H=my_copy__YRLL(__tmp__AP2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__BP2H=my_copy__GLYM(__tmp__AP2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__BP2H=my_copy__BNEO(__tmp__AP2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BP2H=my_copy__M3DP(__tmp__AP2H);
  } break;
  case __EXPR_INF__: {
    __tmp__BP2H=my_copy__PBSN(__tmp__AP2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BP2H=my_copy__0BSN(__tmp__AP2H);
  } break;
  case __EXPR_OR__: {
    __tmp__BP2H=my_copy__ZOPN(__tmp__AP2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__BP2H=my_copy__CYSO(__tmp__AP2H);
  } break;
  };
  __tmp__DP2H=Self__3O2H->parent_expr_binary_cmp__TAKH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__DP2H)->__id) {
  case __LIST__: {
    __tmp__EP2H=my_copy__2HYM(__tmp__DP2H);
  } break;
  case __STRING_CST__: {
    Self__FZ2P=((__STRING_CST *)__tmp__DP2H);
    __tmp__EP2H=create__text__AUMH(Self__FZ2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FZ2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__EP2H=my_copy__2K2H(__tmp__DP2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__GZ2P=((__PROTOTYPE_CST *)__tmp__DP2H);
    __tmp__EP2H=create__type__CLQC(Self__GZ2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GZ2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__HZ2P=((__INTEGER_CST *)__tmp__DP2H);
    __tmp__EP2H=create__value__type__DNQC(Self__HZ2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HZ2P->value__PAZD,Self__HZ2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__EP2H=my_copy__OAFJ(__tmp__DP2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__EP2H=my_copy__KM2H(__tmp__DP2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__EP2H=my_copy__DN2H(__tmp__DP2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__EP2H=my_copy__QN2H(__tmp__DP2H);
  } break;
  case __REAL_CST__: {
    Self__JZ2P=((__REAL_CST *)__tmp__DP2H);
    __tmp__EP2H=create__value__type__1SMH(Self__JZ2P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JZ2P->value__5N2H,Self__JZ2P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__LZ2P=((__CHARACTER_CST *)__tmp__DP2H);
    __tmp__EP2H=create__char__WTMH(Self__LZ2P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LZ2P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__MZ2P=((__IS_EXPANDED *)__tmp__DP2H);
    __tmp__EP2H=create__receiver__WRWH(Self__MZ2P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__MZ2P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__EP2H=my_copy__TO2H(__tmp__DP2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__EP2H=my_copy__2O2H(__tmp__DP2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__EP2H=my_copy__HP2H(__tmp__DP2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__EP2H=my_copy__TP2H(__tmp__DP2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__EP2H=my_copy__4P2H(__tmp__DP2H);
  } break;
  case __EXPR_AND__: {
    __tmp__EP2H=my_copy__JQ2H(__tmp__DP2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__EP2H=my_copy__UQ2H(__tmp__DP2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__EP2H=my_copy__5Q2H(__tmp__DP2H);
  } break;
  case __PUT_TO__: {
    __tmp__EP2H=my_copy__KR2H(__tmp__DP2H);
  } break;
  case __ITEM__: {
    __tmp__EP2H=my_copy__1R2H(__tmp__DP2H);
  } break;
  case __SIZE_OF__: {
    __tmp__EP2H=my_copy__HS2H(__tmp__DP2H);
  } break;
  case __CAST__: {
    __tmp__EP2H=my_copy__QS2H(__tmp__DP2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__EP2H=my_copy__PIYM(__tmp__DP2H);
  } break;
  case __READ_SLOT__: {
    __tmp__EP2H=my_copy__AVGK(__tmp__DP2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__EP2H=my_copy__NVGK(__tmp__DP2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__EP2H=my_copy__RFCN(__tmp__DP2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__EP2H=my_copy__JMEO(__tmp__DP2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__EP2H=my_copy__RTJO(__tmp__DP2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__EP2H=my_copy__WMEO(__tmp__DP2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__EP2H=my_copy__3TJO(__tmp__DP2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__EP2H=my_copy__YEJM(__tmp__DP2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__EP2H=my_copy__YRLL(__tmp__DP2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__EP2H=my_copy__GLYM(__tmp__DP2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__EP2H=my_copy__BNEO(__tmp__DP2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__EP2H=my_copy__M3DP(__tmp__DP2H);
  } break;
  case __EXPR_INF__: {
    __tmp__EP2H=my_copy__PBSN(__tmp__DP2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__EP2H=my_copy__0BSN(__tmp__DP2H);
  } break;
  case __EXPR_OR__: {
    __tmp__EP2H=my_copy__ZOPN(__tmp__DP2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__EP2H=my_copy__CYSO(__tmp__DP2H);
  } break;
  };
  return(create__with__and__BTWH(__tmp__5O2H,__tmp__BP2H,__tmp__EP2H));
}

static __EXPR_SUB* my_copy__HP2H(__EXPR_SUB *Self__IP2H)
// ({EXPR_SUB}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__KP2H;
  void *__tmp__LP2H,*__tmp__MP2H,*__tmp__PP2H,*__tmp__QP2H;
  __STRING_CST *Self__NZ2P,*Self__VZ2P;
  __PROTOTYPE_CST *Self__OZ2P,*Self__WZ2P;
  __INTEGER_CST *Self__PZ2P,*Self__XZ2P;
  __REAL_CST *Self__RZ2P,*Self__ZZ2P;
  __CHARACTER_CST *Self__TZ2P,*Self__1Z2P;
  __IS_EXPANDED *Self__UZ2P,*Self__2Z2P;
  __tmp__KP2H=Self__IP2H->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__LP2H=Self__IP2H->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__LP2H)->__id) {
  case __LIST__: {
    __tmp__MP2H=my_copy__2HYM(__tmp__LP2H);
  } break;
  case __STRING_CST__: {
    Self__NZ2P=((__STRING_CST *)__tmp__LP2H);
    __tmp__MP2H=create__text__AUMH(Self__NZ2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NZ2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__MP2H=my_copy__2K2H(__tmp__LP2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__OZ2P=((__PROTOTYPE_CST *)__tmp__LP2H);
    __tmp__MP2H=create__type__CLQC(Self__OZ2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OZ2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__PZ2P=((__INTEGER_CST *)__tmp__LP2H);
    __tmp__MP2H=create__value__type__DNQC(Self__PZ2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PZ2P->value__PAZD,Self__PZ2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__MP2H=my_copy__OAFJ(__tmp__LP2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MP2H=my_copy__KM2H(__tmp__LP2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MP2H=my_copy__DN2H(__tmp__LP2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MP2H=my_copy__QN2H(__tmp__LP2H);
  } break;
  case __REAL_CST__: {
    Self__RZ2P=((__REAL_CST *)__tmp__LP2H);
    __tmp__MP2H=create__value__type__1SMH(Self__RZ2P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RZ2P->value__5N2H,Self__RZ2P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__TZ2P=((__CHARACTER_CST *)__tmp__LP2H);
    __tmp__MP2H=create__char__WTMH(Self__TZ2P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TZ2P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__UZ2P=((__IS_EXPANDED *)__tmp__LP2H);
    __tmp__MP2H=create__receiver__WRWH(Self__UZ2P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__UZ2P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__MP2H=my_copy__TO2H(__tmp__LP2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__MP2H=my_copy__2O2H(__tmp__LP2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__MP2H=my_copy__HP2H(__tmp__LP2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__MP2H=my_copy__TP2H(__tmp__LP2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__MP2H=my_copy__4P2H(__tmp__LP2H);
  } break;
  case __EXPR_AND__: {
    __tmp__MP2H=my_copy__JQ2H(__tmp__LP2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MP2H=my_copy__UQ2H(__tmp__LP2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MP2H=my_copy__5Q2H(__tmp__LP2H);
  } break;
  case __PUT_TO__: {
    __tmp__MP2H=my_copy__KR2H(__tmp__LP2H);
  } break;
  case __ITEM__: {
    __tmp__MP2H=my_copy__1R2H(__tmp__LP2H);
  } break;
  case __SIZE_OF__: {
    __tmp__MP2H=my_copy__HS2H(__tmp__LP2H);
  } break;
  case __CAST__: {
    __tmp__MP2H=my_copy__QS2H(__tmp__LP2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__MP2H=my_copy__PIYM(__tmp__LP2H);
  } break;
  case __READ_SLOT__: {
    __tmp__MP2H=my_copy__AVGK(__tmp__LP2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__MP2H=my_copy__NVGK(__tmp__LP2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MP2H=my_copy__RFCN(__tmp__LP2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MP2H=my_copy__JMEO(__tmp__LP2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MP2H=my_copy__RTJO(__tmp__LP2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MP2H=my_copy__WMEO(__tmp__LP2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MP2H=my_copy__3TJO(__tmp__LP2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__MP2H=my_copy__YEJM(__tmp__LP2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__MP2H=my_copy__YRLL(__tmp__LP2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__MP2H=my_copy__GLYM(__tmp__LP2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__MP2H=my_copy__BNEO(__tmp__LP2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MP2H=my_copy__M3DP(__tmp__LP2H);
  } break;
  case __EXPR_INF__: {
    __tmp__MP2H=my_copy__PBSN(__tmp__LP2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MP2H=my_copy__0BSN(__tmp__LP2H);
  } break;
  case __EXPR_OR__: {
    __tmp__MP2H=my_copy__ZOPN(__tmp__LP2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__MP2H=my_copy__CYSO(__tmp__LP2H);
  } break;
  };
  __tmp__PP2H=Self__IP2H->parent_expr_binary__HBKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__PP2H)->__id) {
  case __LIST__: {
    __tmp__QP2H=my_copy__2HYM(__tmp__PP2H);
  } break;
  case __STRING_CST__: {
    Self__VZ2P=((__STRING_CST *)__tmp__PP2H);
    __tmp__QP2H=create__text__AUMH(Self__VZ2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VZ2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__QP2H=my_copy__2K2H(__tmp__PP2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__WZ2P=((__PROTOTYPE_CST *)__tmp__PP2H);
    __tmp__QP2H=create__type__CLQC(Self__WZ2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WZ2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__XZ2P=((__INTEGER_CST *)__tmp__PP2H);
    __tmp__QP2H=create__value__type__DNQC(Self__XZ2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XZ2P->value__PAZD,Self__XZ2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__QP2H=my_copy__OAFJ(__tmp__PP2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__QP2H=my_copy__KM2H(__tmp__PP2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__QP2H=my_copy__DN2H(__tmp__PP2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__QP2H=my_copy__QN2H(__tmp__PP2H);
  } break;
  case __REAL_CST__: {
    Self__ZZ2P=((__REAL_CST *)__tmp__PP2H);
    __tmp__QP2H=create__value__type__1SMH(Self__ZZ2P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZZ2P->value__5N2H,Self__ZZ2P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__1Z2P=((__CHARACTER_CST *)__tmp__PP2H);
    __tmp__QP2H=create__char__WTMH(Self__1Z2P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1Z2P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__2Z2P=((__IS_EXPANDED *)__tmp__PP2H);
    __tmp__QP2H=create__receiver__WRWH(Self__2Z2P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__2Z2P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__QP2H=my_copy__TO2H(__tmp__PP2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__QP2H=my_copy__2O2H(__tmp__PP2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__QP2H=my_copy__HP2H(__tmp__PP2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__QP2H=my_copy__TP2H(__tmp__PP2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__QP2H=my_copy__4P2H(__tmp__PP2H);
  } break;
  case __EXPR_AND__: {
    __tmp__QP2H=my_copy__JQ2H(__tmp__PP2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__QP2H=my_copy__UQ2H(__tmp__PP2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__QP2H=my_copy__5Q2H(__tmp__PP2H);
  } break;
  case __PUT_TO__: {
    __tmp__QP2H=my_copy__KR2H(__tmp__PP2H);
  } break;
  case __ITEM__: {
    __tmp__QP2H=my_copy__1R2H(__tmp__PP2H);
  } break;
  case __SIZE_OF__: {
    __tmp__QP2H=my_copy__HS2H(__tmp__PP2H);
  } break;
  case __CAST__: {
    __tmp__QP2H=my_copy__QS2H(__tmp__PP2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__QP2H=my_copy__PIYM(__tmp__PP2H);
  } break;
  case __READ_SLOT__: {
    __tmp__QP2H=my_copy__AVGK(__tmp__PP2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__QP2H=my_copy__NVGK(__tmp__PP2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__QP2H=my_copy__RFCN(__tmp__PP2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__QP2H=my_copy__JMEO(__tmp__PP2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__QP2H=my_copy__RTJO(__tmp__PP2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__QP2H=my_copy__WMEO(__tmp__PP2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__QP2H=my_copy__3TJO(__tmp__PP2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__QP2H=my_copy__YEJM(__tmp__PP2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__QP2H=my_copy__YRLL(__tmp__PP2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__QP2H=my_copy__GLYM(__tmp__PP2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__QP2H=my_copy__BNEO(__tmp__PP2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__QP2H=my_copy__M3DP(__tmp__PP2H);
  } break;
  case __EXPR_INF__: {
    __tmp__QP2H=my_copy__PBSN(__tmp__PP2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__QP2H=my_copy__0BSN(__tmp__PP2H);
  } break;
  case __EXPR_OR__: {
    __tmp__QP2H=my_copy__ZOPN(__tmp__PP2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__QP2H=my_copy__CYSO(__tmp__PP2H);
  } break;
  };
  return(create__with__and__2TWH(__tmp__KP2H,__tmp__MP2H,__tmp__QP2H));
}

static __EXPR_MUL* my_copy__TP2H(__EXPR_MUL *Self__UP2H)
// ({EXPR_MUL}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__WP2H;
  void *__tmp__XP2H,*__tmp__YP2H,*__tmp__0P2H,*__tmp__1P2H;
  __STRING_CST *Self__3Z2P,*Self__F02P;
  __PROTOTYPE_CST *Self__4Z2P,*Self__G02P;
  __INTEGER_CST *Self__5Z2P,*Self__H02P;
  __REAL_CST *Self__B02P,*Self__J02P;
  __CHARACTER_CST *Self__D02P,*Self__L02P;
  __IS_EXPANDED *Self__E02P,*Self__M02P;
  __tmp__WP2H=Self__UP2H->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__XP2H=Self__UP2H->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__XP2H)->__id) {
  case __LIST__: {
    __tmp__YP2H=my_copy__2HYM(__tmp__XP2H);
  } break;
  case __STRING_CST__: {
    Self__3Z2P=((__STRING_CST *)__tmp__XP2H);
    __tmp__YP2H=create__text__AUMH(Self__3Z2P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3Z2P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__YP2H=my_copy__2K2H(__tmp__XP2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__4Z2P=((__PROTOTYPE_CST *)__tmp__XP2H);
    __tmp__YP2H=create__type__CLQC(Self__4Z2P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4Z2P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__5Z2P=((__INTEGER_CST *)__tmp__XP2H);
    __tmp__YP2H=create__value__type__DNQC(Self__5Z2P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5Z2P->value__PAZD,Self__5Z2P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__YP2H=my_copy__OAFJ(__tmp__XP2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__YP2H=my_copy__KM2H(__tmp__XP2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__YP2H=my_copy__DN2H(__tmp__XP2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__YP2H=my_copy__QN2H(__tmp__XP2H);
  } break;
  case __REAL_CST__: {
    Self__B02P=((__REAL_CST *)__tmp__XP2H);
    __tmp__YP2H=create__value__type__1SMH(Self__B02P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B02P->value__5N2H,Self__B02P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__D02P=((__CHARACTER_CST *)__tmp__XP2H);
    __tmp__YP2H=create__char__WTMH(Self__D02P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D02P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__E02P=((__IS_EXPANDED *)__tmp__XP2H);
    __tmp__YP2H=create__receiver__WRWH(Self__E02P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__E02P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__YP2H=my_copy__TO2H(__tmp__XP2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__YP2H=my_copy__2O2H(__tmp__XP2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__YP2H=my_copy__HP2H(__tmp__XP2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__YP2H=my_copy__TP2H(__tmp__XP2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__YP2H=my_copy__4P2H(__tmp__XP2H);
  } break;
  case __EXPR_AND__: {
    __tmp__YP2H=my_copy__JQ2H(__tmp__XP2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__YP2H=my_copy__UQ2H(__tmp__XP2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__YP2H=my_copy__5Q2H(__tmp__XP2H);
  } break;
  case __PUT_TO__: {
    __tmp__YP2H=my_copy__KR2H(__tmp__XP2H);
  } break;
  case __ITEM__: {
    __tmp__YP2H=my_copy__1R2H(__tmp__XP2H);
  } break;
  case __SIZE_OF__: {
    __tmp__YP2H=my_copy__HS2H(__tmp__XP2H);
  } break;
  case __CAST__: {
    __tmp__YP2H=my_copy__QS2H(__tmp__XP2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__YP2H=my_copy__PIYM(__tmp__XP2H);
  } break;
  case __READ_SLOT__: {
    __tmp__YP2H=my_copy__AVGK(__tmp__XP2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__YP2H=my_copy__NVGK(__tmp__XP2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__YP2H=my_copy__RFCN(__tmp__XP2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__YP2H=my_copy__JMEO(__tmp__XP2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__YP2H=my_copy__RTJO(__tmp__XP2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__YP2H=my_copy__WMEO(__tmp__XP2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__YP2H=my_copy__3TJO(__tmp__XP2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__YP2H=my_copy__YEJM(__tmp__XP2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__YP2H=my_copy__YRLL(__tmp__XP2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__YP2H=my_copy__GLYM(__tmp__XP2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__YP2H=my_copy__BNEO(__tmp__XP2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__YP2H=my_copy__M3DP(__tmp__XP2H);
  } break;
  case __EXPR_INF__: {
    __tmp__YP2H=my_copy__PBSN(__tmp__XP2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__YP2H=my_copy__0BSN(__tmp__XP2H);
  } break;
  case __EXPR_OR__: {
    __tmp__YP2H=my_copy__ZOPN(__tmp__XP2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__YP2H=my_copy__CYSO(__tmp__XP2H);
  } break;
  };
  __tmp__0P2H=Self__UP2H->parent_expr_binary__0BKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__0P2H)->__id) {
  case __LIST__: {
    __tmp__1P2H=my_copy__2HYM(__tmp__0P2H);
  } break;
  case __STRING_CST__: {
    Self__F02P=((__STRING_CST *)__tmp__0P2H);
    __tmp__1P2H=create__text__AUMH(Self__F02P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F02P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__1P2H=my_copy__2K2H(__tmp__0P2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__G02P=((__PROTOTYPE_CST *)__tmp__0P2H);
    __tmp__1P2H=create__type__CLQC(Self__G02P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__G02P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__H02P=((__INTEGER_CST *)__tmp__0P2H);
    __tmp__1P2H=create__value__type__DNQC(Self__H02P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H02P->value__PAZD,Self__H02P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__1P2H=my_copy__OAFJ(__tmp__0P2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1P2H=my_copy__KM2H(__tmp__0P2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1P2H=my_copy__DN2H(__tmp__0P2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1P2H=my_copy__QN2H(__tmp__0P2H);
  } break;
  case __REAL_CST__: {
    Self__J02P=((__REAL_CST *)__tmp__0P2H);
    __tmp__1P2H=create__value__type__1SMH(Self__J02P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J02P->value__5N2H,Self__J02P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__L02P=((__CHARACTER_CST *)__tmp__0P2H);
    __tmp__1P2H=create__char__WTMH(Self__L02P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L02P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__M02P=((__IS_EXPANDED *)__tmp__0P2H);
    __tmp__1P2H=create__receiver__WRWH(Self__M02P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__M02P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1P2H=my_copy__TO2H(__tmp__0P2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__1P2H=my_copy__2O2H(__tmp__0P2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__1P2H=my_copy__HP2H(__tmp__0P2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__1P2H=my_copy__TP2H(__tmp__0P2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__1P2H=my_copy__4P2H(__tmp__0P2H);
  } break;
  case __EXPR_AND__: {
    __tmp__1P2H=my_copy__JQ2H(__tmp__0P2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1P2H=my_copy__UQ2H(__tmp__0P2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1P2H=my_copy__5Q2H(__tmp__0P2H);
  } break;
  case __PUT_TO__: {
    __tmp__1P2H=my_copy__KR2H(__tmp__0P2H);
  } break;
  case __ITEM__: {
    __tmp__1P2H=my_copy__1R2H(__tmp__0P2H);
  } break;
  case __SIZE_OF__: {
    __tmp__1P2H=my_copy__HS2H(__tmp__0P2H);
  } break;
  case __CAST__: {
    __tmp__1P2H=my_copy__QS2H(__tmp__0P2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__1P2H=my_copy__PIYM(__tmp__0P2H);
  } break;
  case __READ_SLOT__: {
    __tmp__1P2H=my_copy__AVGK(__tmp__0P2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__1P2H=my_copy__NVGK(__tmp__0P2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1P2H=my_copy__RFCN(__tmp__0P2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1P2H=my_copy__JMEO(__tmp__0P2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1P2H=my_copy__RTJO(__tmp__0P2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1P2H=my_copy__WMEO(__tmp__0P2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1P2H=my_copy__3TJO(__tmp__0P2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__1P2H=my_copy__YEJM(__tmp__0P2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__1P2H=my_copy__YRLL(__tmp__0P2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__1P2H=my_copy__GLYM(__tmp__0P2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__1P2H=my_copy__BNEO(__tmp__0P2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1P2H=my_copy__M3DP(__tmp__0P2H);
  } break;
  case __EXPR_INF__: {
    __tmp__1P2H=my_copy__PBSN(__tmp__0P2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1P2H=my_copy__0BSN(__tmp__0P2H);
  } break;
  case __EXPR_OR__: {
    __tmp__1P2H=my_copy__ZOPN(__tmp__0P2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__1P2H=my_copy__CYSO(__tmp__0P2H);
  } break;
  };
  return(create__with__and__XUWH(__tmp__WP2H,__tmp__YP2H,__tmp__1P2H));
}

static __EXPR_DIV* my_copy__4P2H(__EXPR_DIV *Self__5P2H)
// ({EXPR_DIV}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__BQ2H;
  void *__tmp__CQ2H,*__tmp__DQ2H,*__tmp__FQ2H,*__tmp__GQ2H;
  __STRING_CST *Self__N02P,*Self__V02P;
  __PROTOTYPE_CST *Self__O02P,*Self__W02P;
  __INTEGER_CST *Self__P02P,*Self__X02P;
  __REAL_CST *Self__R02P,*Self__Z02P;
  __CHARACTER_CST *Self__T02P,*Self__102P;
  __IS_EXPANDED *Self__U02P,*Self__202P;
  __tmp__BQ2H=Self__5P2H->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__CQ2H=Self__5P2H->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__CQ2H)->__id) {
  case __LIST__: {
    __tmp__DQ2H=my_copy__2HYM(__tmp__CQ2H);
  } break;
  case __STRING_CST__: {
    Self__N02P=((__STRING_CST *)__tmp__CQ2H);
    __tmp__DQ2H=create__text__AUMH(Self__N02P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N02P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__DQ2H=my_copy__2K2H(__tmp__CQ2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__O02P=((__PROTOTYPE_CST *)__tmp__CQ2H);
    __tmp__DQ2H=create__type__CLQC(Self__O02P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O02P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__P02P=((__INTEGER_CST *)__tmp__CQ2H);
    __tmp__DQ2H=create__value__type__DNQC(Self__P02P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__P02P->value__PAZD,Self__P02P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__DQ2H=my_copy__OAFJ(__tmp__CQ2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__DQ2H=my_copy__KM2H(__tmp__CQ2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__DQ2H=my_copy__DN2H(__tmp__CQ2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__DQ2H=my_copy__QN2H(__tmp__CQ2H);
  } break;
  case __REAL_CST__: {
    Self__R02P=((__REAL_CST *)__tmp__CQ2H);
    __tmp__DQ2H=create__value__type__1SMH(Self__R02P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R02P->value__5N2H,Self__R02P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__T02P=((__CHARACTER_CST *)__tmp__CQ2H);
    __tmp__DQ2H=create__char__WTMH(Self__T02P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T02P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__U02P=((__IS_EXPANDED *)__tmp__CQ2H);
    __tmp__DQ2H=create__receiver__WRWH(Self__U02P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__U02P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__DQ2H=my_copy__TO2H(__tmp__CQ2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__DQ2H=my_copy__2O2H(__tmp__CQ2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__DQ2H=my_copy__HP2H(__tmp__CQ2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__DQ2H=my_copy__TP2H(__tmp__CQ2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__DQ2H=my_copy__4P2H(__tmp__CQ2H);
  } break;
  case __EXPR_AND__: {
    __tmp__DQ2H=my_copy__JQ2H(__tmp__CQ2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__DQ2H=my_copy__UQ2H(__tmp__CQ2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__DQ2H=my_copy__5Q2H(__tmp__CQ2H);
  } break;
  case __PUT_TO__: {
    __tmp__DQ2H=my_copy__KR2H(__tmp__CQ2H);
  } break;
  case __ITEM__: {
    __tmp__DQ2H=my_copy__1R2H(__tmp__CQ2H);
  } break;
  case __SIZE_OF__: {
    __tmp__DQ2H=my_copy__HS2H(__tmp__CQ2H);
  } break;
  case __CAST__: {
    __tmp__DQ2H=my_copy__QS2H(__tmp__CQ2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__DQ2H=my_copy__PIYM(__tmp__CQ2H);
  } break;
  case __READ_SLOT__: {
    __tmp__DQ2H=my_copy__AVGK(__tmp__CQ2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__DQ2H=my_copy__NVGK(__tmp__CQ2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__DQ2H=my_copy__RFCN(__tmp__CQ2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__DQ2H=my_copy__JMEO(__tmp__CQ2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__DQ2H=my_copy__RTJO(__tmp__CQ2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__DQ2H=my_copy__WMEO(__tmp__CQ2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__DQ2H=my_copy__3TJO(__tmp__CQ2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__DQ2H=my_copy__YEJM(__tmp__CQ2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__DQ2H=my_copy__YRLL(__tmp__CQ2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__DQ2H=my_copy__GLYM(__tmp__CQ2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__DQ2H=my_copy__BNEO(__tmp__CQ2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__DQ2H=my_copy__M3DP(__tmp__CQ2H);
  } break;
  case __EXPR_INF__: {
    __tmp__DQ2H=my_copy__PBSN(__tmp__CQ2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__DQ2H=my_copy__0BSN(__tmp__CQ2H);
  } break;
  case __EXPR_OR__: {
    __tmp__DQ2H=my_copy__ZOPN(__tmp__CQ2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__DQ2H=my_copy__CYSO(__tmp__CQ2H);
  } break;
  };
  __tmp__FQ2H=Self__5P2H->parent_expr_binary__NCKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__FQ2H)->__id) {
  case __LIST__: {
    __tmp__GQ2H=my_copy__2HYM(__tmp__FQ2H);
  } break;
  case __STRING_CST__: {
    Self__V02P=((__STRING_CST *)__tmp__FQ2H);
    __tmp__GQ2H=create__text__AUMH(Self__V02P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__V02P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__GQ2H=my_copy__2K2H(__tmp__FQ2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__W02P=((__PROTOTYPE_CST *)__tmp__FQ2H);
    __tmp__GQ2H=create__type__CLQC(Self__W02P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__W02P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__X02P=((__INTEGER_CST *)__tmp__FQ2H);
    __tmp__GQ2H=create__value__type__DNQC(Self__X02P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X02P->value__PAZD,Self__X02P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__GQ2H=my_copy__OAFJ(__tmp__FQ2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__GQ2H=my_copy__KM2H(__tmp__FQ2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__GQ2H=my_copy__DN2H(__tmp__FQ2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__GQ2H=my_copy__QN2H(__tmp__FQ2H);
  } break;
  case __REAL_CST__: {
    Self__Z02P=((__REAL_CST *)__tmp__FQ2H);
    __tmp__GQ2H=create__value__type__1SMH(Self__Z02P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z02P->value__5N2H,Self__Z02P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__102P=((__CHARACTER_CST *)__tmp__FQ2H);
    __tmp__GQ2H=create__char__WTMH(Self__102P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__102P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__202P=((__IS_EXPANDED *)__tmp__FQ2H);
    __tmp__GQ2H=create__receiver__WRWH(Self__202P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__202P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__GQ2H=my_copy__TO2H(__tmp__FQ2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__GQ2H=my_copy__2O2H(__tmp__FQ2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__GQ2H=my_copy__HP2H(__tmp__FQ2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__GQ2H=my_copy__TP2H(__tmp__FQ2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__GQ2H=my_copy__4P2H(__tmp__FQ2H);
  } break;
  case __EXPR_AND__: {
    __tmp__GQ2H=my_copy__JQ2H(__tmp__FQ2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__GQ2H=my_copy__UQ2H(__tmp__FQ2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__GQ2H=my_copy__5Q2H(__tmp__FQ2H);
  } break;
  case __PUT_TO__: {
    __tmp__GQ2H=my_copy__KR2H(__tmp__FQ2H);
  } break;
  case __ITEM__: {
    __tmp__GQ2H=my_copy__1R2H(__tmp__FQ2H);
  } break;
  case __SIZE_OF__: {
    __tmp__GQ2H=my_copy__HS2H(__tmp__FQ2H);
  } break;
  case __CAST__: {
    __tmp__GQ2H=my_copy__QS2H(__tmp__FQ2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__GQ2H=my_copy__PIYM(__tmp__FQ2H);
  } break;
  case __READ_SLOT__: {
    __tmp__GQ2H=my_copy__AVGK(__tmp__FQ2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__GQ2H=my_copy__NVGK(__tmp__FQ2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__GQ2H=my_copy__RFCN(__tmp__FQ2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__GQ2H=my_copy__JMEO(__tmp__FQ2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__GQ2H=my_copy__RTJO(__tmp__FQ2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__GQ2H=my_copy__WMEO(__tmp__FQ2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__GQ2H=my_copy__3TJO(__tmp__FQ2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__GQ2H=my_copy__YEJM(__tmp__FQ2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__GQ2H=my_copy__YRLL(__tmp__FQ2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__GQ2H=my_copy__GLYM(__tmp__FQ2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__GQ2H=my_copy__BNEO(__tmp__FQ2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__GQ2H=my_copy__M3DP(__tmp__FQ2H);
  } break;
  case __EXPR_INF__: {
    __tmp__GQ2H=my_copy__PBSN(__tmp__FQ2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__GQ2H=my_copy__0BSN(__tmp__FQ2H);
  } break;
  case __EXPR_OR__: {
    __tmp__GQ2H=my_copy__ZOPN(__tmp__FQ2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__GQ2H=my_copy__CYSO(__tmp__FQ2H);
  } break;
  };
  return(create__with__and__SVWH(__tmp__BQ2H,__tmp__DQ2H,__tmp__GQ2H));
}

static __EXPR_AND* my_copy__JQ2H(__EXPR_AND *Self__KQ2H)
// ({EXPR_AND}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__MQ2H;
  void *__tmp__NQ2H,*__tmp__OQ2H,*__tmp__QQ2H,*__tmp__RQ2H;
  __STRING_CST *Self__302P,*Self__F12P;
  __PROTOTYPE_CST *Self__402P,*Self__G12P;
  __INTEGER_CST *Self__502P,*Self__H12P;
  __REAL_CST *Self__B12P,*Self__J12P;
  __CHARACTER_CST *Self__D12P,*Self__L12P;
  __IS_EXPANDED *Self__E12P,*Self__M12P;
  __tmp__MQ2H=Self__KQ2H->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__NQ2H=Self__KQ2H->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__NQ2H)->__id) {
  case __LIST__: {
    __tmp__OQ2H=my_copy__2HYM(__tmp__NQ2H);
  } break;
  case __STRING_CST__: {
    Self__302P=((__STRING_CST *)__tmp__NQ2H);
    __tmp__OQ2H=create__text__AUMH(Self__302P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__302P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__OQ2H=my_copy__2K2H(__tmp__NQ2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__402P=((__PROTOTYPE_CST *)__tmp__NQ2H);
    __tmp__OQ2H=create__type__CLQC(Self__402P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__402P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__502P=((__INTEGER_CST *)__tmp__NQ2H);
    __tmp__OQ2H=create__value__type__DNQC(Self__502P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__502P->value__PAZD,Self__502P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__OQ2H=my_copy__OAFJ(__tmp__NQ2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__OQ2H=my_copy__KM2H(__tmp__NQ2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__OQ2H=my_copy__DN2H(__tmp__NQ2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__OQ2H=my_copy__QN2H(__tmp__NQ2H);
  } break;
  case __REAL_CST__: {
    Self__B12P=((__REAL_CST *)__tmp__NQ2H);
    __tmp__OQ2H=create__value__type__1SMH(Self__B12P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B12P->value__5N2H,Self__B12P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__D12P=((__CHARACTER_CST *)__tmp__NQ2H);
    __tmp__OQ2H=create__char__WTMH(Self__D12P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D12P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__E12P=((__IS_EXPANDED *)__tmp__NQ2H);
    __tmp__OQ2H=create__receiver__WRWH(Self__E12P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__E12P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__OQ2H=my_copy__TO2H(__tmp__NQ2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__OQ2H=my_copy__2O2H(__tmp__NQ2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__OQ2H=my_copy__HP2H(__tmp__NQ2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__OQ2H=my_copy__TP2H(__tmp__NQ2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__OQ2H=my_copy__4P2H(__tmp__NQ2H);
  } break;
  case __EXPR_AND__: {
    __tmp__OQ2H=my_copy__JQ2H(__tmp__NQ2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__OQ2H=my_copy__UQ2H(__tmp__NQ2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__OQ2H=my_copy__5Q2H(__tmp__NQ2H);
  } break;
  case __PUT_TO__: {
    __tmp__OQ2H=my_copy__KR2H(__tmp__NQ2H);
  } break;
  case __ITEM__: {
    __tmp__OQ2H=my_copy__1R2H(__tmp__NQ2H);
  } break;
  case __SIZE_OF__: {
    __tmp__OQ2H=my_copy__HS2H(__tmp__NQ2H);
  } break;
  case __CAST__: {
    __tmp__OQ2H=my_copy__QS2H(__tmp__NQ2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__OQ2H=my_copy__PIYM(__tmp__NQ2H);
  } break;
  case __READ_SLOT__: {
    __tmp__OQ2H=my_copy__AVGK(__tmp__NQ2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__OQ2H=my_copy__NVGK(__tmp__NQ2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__OQ2H=my_copy__RFCN(__tmp__NQ2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__OQ2H=my_copy__JMEO(__tmp__NQ2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__OQ2H=my_copy__RTJO(__tmp__NQ2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__OQ2H=my_copy__WMEO(__tmp__NQ2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__OQ2H=my_copy__3TJO(__tmp__NQ2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__OQ2H=my_copy__YEJM(__tmp__NQ2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__OQ2H=my_copy__YRLL(__tmp__NQ2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__OQ2H=my_copy__GLYM(__tmp__NQ2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__OQ2H=my_copy__BNEO(__tmp__NQ2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__OQ2H=my_copy__M3DP(__tmp__NQ2H);
  } break;
  case __EXPR_INF__: {
    __tmp__OQ2H=my_copy__PBSN(__tmp__NQ2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__OQ2H=my_copy__0BSN(__tmp__NQ2H);
  } break;
  case __EXPR_OR__: {
    __tmp__OQ2H=my_copy__ZOPN(__tmp__NQ2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__OQ2H=my_copy__CYSO(__tmp__NQ2H);
  } break;
  };
  __tmp__QQ2H=Self__KQ2H->parent_expr_binary__ADKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__QQ2H)->__id) {
  case __LIST__: {
    __tmp__RQ2H=my_copy__2HYM(__tmp__QQ2H);
  } break;
  case __STRING_CST__: {
    Self__F12P=((__STRING_CST *)__tmp__QQ2H);
    __tmp__RQ2H=create__text__AUMH(Self__F12P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F12P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__RQ2H=my_copy__2K2H(__tmp__QQ2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__G12P=((__PROTOTYPE_CST *)__tmp__QQ2H);
    __tmp__RQ2H=create__type__CLQC(Self__G12P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__G12P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__H12P=((__INTEGER_CST *)__tmp__QQ2H);
    __tmp__RQ2H=create__value__type__DNQC(Self__H12P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H12P->value__PAZD,Self__H12P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__RQ2H=my_copy__OAFJ(__tmp__QQ2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RQ2H=my_copy__KM2H(__tmp__QQ2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RQ2H=my_copy__DN2H(__tmp__QQ2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RQ2H=my_copy__QN2H(__tmp__QQ2H);
  } break;
  case __REAL_CST__: {
    Self__J12P=((__REAL_CST *)__tmp__QQ2H);
    __tmp__RQ2H=create__value__type__1SMH(Self__J12P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J12P->value__5N2H,Self__J12P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__L12P=((__CHARACTER_CST *)__tmp__QQ2H);
    __tmp__RQ2H=create__char__WTMH(Self__L12P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L12P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__M12P=((__IS_EXPANDED *)__tmp__QQ2H);
    __tmp__RQ2H=create__receiver__WRWH(Self__M12P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__M12P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__RQ2H=my_copy__TO2H(__tmp__QQ2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__RQ2H=my_copy__2O2H(__tmp__QQ2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__RQ2H=my_copy__HP2H(__tmp__QQ2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__RQ2H=my_copy__TP2H(__tmp__QQ2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__RQ2H=my_copy__4P2H(__tmp__QQ2H);
  } break;
  case __EXPR_AND__: {
    __tmp__RQ2H=my_copy__JQ2H(__tmp__QQ2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RQ2H=my_copy__UQ2H(__tmp__QQ2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RQ2H=my_copy__5Q2H(__tmp__QQ2H);
  } break;
  case __PUT_TO__: {
    __tmp__RQ2H=my_copy__KR2H(__tmp__QQ2H);
  } break;
  case __ITEM__: {
    __tmp__RQ2H=my_copy__1R2H(__tmp__QQ2H);
  } break;
  case __SIZE_OF__: {
    __tmp__RQ2H=my_copy__HS2H(__tmp__QQ2H);
  } break;
  case __CAST__: {
    __tmp__RQ2H=my_copy__QS2H(__tmp__QQ2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__RQ2H=my_copy__PIYM(__tmp__QQ2H);
  } break;
  case __READ_SLOT__: {
    __tmp__RQ2H=my_copy__AVGK(__tmp__QQ2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__RQ2H=my_copy__NVGK(__tmp__QQ2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RQ2H=my_copy__RFCN(__tmp__QQ2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RQ2H=my_copy__JMEO(__tmp__QQ2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RQ2H=my_copy__RTJO(__tmp__QQ2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RQ2H=my_copy__WMEO(__tmp__QQ2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RQ2H=my_copy__3TJO(__tmp__QQ2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__RQ2H=my_copy__YEJM(__tmp__QQ2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__RQ2H=my_copy__YRLL(__tmp__QQ2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__RQ2H=my_copy__GLYM(__tmp__QQ2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__RQ2H=my_copy__BNEO(__tmp__QQ2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RQ2H=my_copy__M3DP(__tmp__QQ2H);
  } break;
  case __EXPR_INF__: {
    __tmp__RQ2H=my_copy__PBSN(__tmp__QQ2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RQ2H=my_copy__0BSN(__tmp__QQ2H);
  } break;
  case __EXPR_OR__: {
    __tmp__RQ2H=my_copy__ZOPN(__tmp__QQ2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__RQ2H=my_copy__CYSO(__tmp__QQ2H);
  } break;
  };
  return(create__with__and__NWWH(__tmp__MQ2H,__tmp__OQ2H,__tmp__RQ2H));
}

static __EXPR_SHIFT_R* my_copy__UQ2H(__EXPR_SHIFT_R *Self__VQ2H)
// ({EXPR_SHIFT_R}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__XQ2H;
  void *__tmp__YQ2H,*__tmp__ZQ2H,*__tmp__1Q2H,*__tmp__2Q2H;
  __STRING_CST *Self__N12P,*Self__V12P;
  __PROTOTYPE_CST *Self__O12P,*Self__W12P;
  __INTEGER_CST *Self__P12P,*Self__X12P;
  __REAL_CST *Self__R12P,*Self__Z12P;
  __CHARACTER_CST *Self__T12P,*Self__112P;
  __IS_EXPANDED *Self__U12P,*Self__212P;
  __tmp__XQ2H=Self__VQ2H->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__YQ2H=Self__VQ2H->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__YQ2H)->__id) {
  case __LIST__: {
    __tmp__ZQ2H=my_copy__2HYM(__tmp__YQ2H);
  } break;
  case __STRING_CST__: {
    Self__N12P=((__STRING_CST *)__tmp__YQ2H);
    __tmp__ZQ2H=create__text__AUMH(Self__N12P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N12P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZQ2H=my_copy__2K2H(__tmp__YQ2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__O12P=((__PROTOTYPE_CST *)__tmp__YQ2H);
    __tmp__ZQ2H=create__type__CLQC(Self__O12P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O12P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__P12P=((__INTEGER_CST *)__tmp__YQ2H);
    __tmp__ZQ2H=create__value__type__DNQC(Self__P12P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__P12P->value__PAZD,Self__P12P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__ZQ2H=my_copy__OAFJ(__tmp__YQ2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZQ2H=my_copy__KM2H(__tmp__YQ2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZQ2H=my_copy__DN2H(__tmp__YQ2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZQ2H=my_copy__QN2H(__tmp__YQ2H);
  } break;
  case __REAL_CST__: {
    Self__R12P=((__REAL_CST *)__tmp__YQ2H);
    __tmp__ZQ2H=create__value__type__1SMH(Self__R12P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R12P->value__5N2H,Self__R12P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__T12P=((__CHARACTER_CST *)__tmp__YQ2H);
    __tmp__ZQ2H=create__char__WTMH(Self__T12P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T12P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__U12P=((__IS_EXPANDED *)__tmp__YQ2H);
    __tmp__ZQ2H=create__receiver__WRWH(Self__U12P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__U12P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ZQ2H=my_copy__TO2H(__tmp__YQ2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__ZQ2H=my_copy__2O2H(__tmp__YQ2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__ZQ2H=my_copy__HP2H(__tmp__YQ2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZQ2H=my_copy__TP2H(__tmp__YQ2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZQ2H=my_copy__4P2H(__tmp__YQ2H);
  } break;
  case __EXPR_AND__: {
    __tmp__ZQ2H=my_copy__JQ2H(__tmp__YQ2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZQ2H=my_copy__UQ2H(__tmp__YQ2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZQ2H=my_copy__5Q2H(__tmp__YQ2H);
  } break;
  case __PUT_TO__: {
    __tmp__ZQ2H=my_copy__KR2H(__tmp__YQ2H);
  } break;
  case __ITEM__: {
    __tmp__ZQ2H=my_copy__1R2H(__tmp__YQ2H);
  } break;
  case __SIZE_OF__: {
    __tmp__ZQ2H=my_copy__HS2H(__tmp__YQ2H);
  } break;
  case __CAST__: {
    __tmp__ZQ2H=my_copy__QS2H(__tmp__YQ2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__ZQ2H=my_copy__PIYM(__tmp__YQ2H);
  } break;
  case __READ_SLOT__: {
    __tmp__ZQ2H=my_copy__AVGK(__tmp__YQ2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ZQ2H=my_copy__NVGK(__tmp__YQ2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZQ2H=my_copy__RFCN(__tmp__YQ2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZQ2H=my_copy__JMEO(__tmp__YQ2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZQ2H=my_copy__RTJO(__tmp__YQ2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZQ2H=my_copy__WMEO(__tmp__YQ2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZQ2H=my_copy__3TJO(__tmp__YQ2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__ZQ2H=my_copy__YEJM(__tmp__YQ2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZQ2H=my_copy__YRLL(__tmp__YQ2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZQ2H=my_copy__GLYM(__tmp__YQ2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZQ2H=my_copy__BNEO(__tmp__YQ2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZQ2H=my_copy__M3DP(__tmp__YQ2H);
  } break;
  case __EXPR_INF__: {
    __tmp__ZQ2H=my_copy__PBSN(__tmp__YQ2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZQ2H=my_copy__0BSN(__tmp__YQ2H);
  } break;
  case __EXPR_OR__: {
    __tmp__ZQ2H=my_copy__ZOPN(__tmp__YQ2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZQ2H=my_copy__CYSO(__tmp__YQ2H);
  } break;
  };
  __tmp__1Q2H=Self__VQ2H->parent_expr_binary__TDKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__1Q2H)->__id) {
  case __LIST__: {
    __tmp__2Q2H=my_copy__2HYM(__tmp__1Q2H);
  } break;
  case __STRING_CST__: {
    Self__V12P=((__STRING_CST *)__tmp__1Q2H);
    __tmp__2Q2H=create__text__AUMH(Self__V12P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__V12P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__2Q2H=my_copy__2K2H(__tmp__1Q2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__W12P=((__PROTOTYPE_CST *)__tmp__1Q2H);
    __tmp__2Q2H=create__type__CLQC(Self__W12P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__W12P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__X12P=((__INTEGER_CST *)__tmp__1Q2H);
    __tmp__2Q2H=create__value__type__DNQC(Self__X12P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X12P->value__PAZD,Self__X12P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__2Q2H=my_copy__OAFJ(__tmp__1Q2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2Q2H=my_copy__KM2H(__tmp__1Q2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2Q2H=my_copy__DN2H(__tmp__1Q2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2Q2H=my_copy__QN2H(__tmp__1Q2H);
  } break;
  case __REAL_CST__: {
    Self__Z12P=((__REAL_CST *)__tmp__1Q2H);
    __tmp__2Q2H=create__value__type__1SMH(Self__Z12P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z12P->value__5N2H,Self__Z12P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__112P=((__CHARACTER_CST *)__tmp__1Q2H);
    __tmp__2Q2H=create__char__WTMH(Self__112P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__112P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__212P=((__IS_EXPANDED *)__tmp__1Q2H);
    __tmp__2Q2H=create__receiver__WRWH(Self__212P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__212P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2Q2H=my_copy__TO2H(__tmp__1Q2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__2Q2H=my_copy__2O2H(__tmp__1Q2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__2Q2H=my_copy__HP2H(__tmp__1Q2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__2Q2H=my_copy__TP2H(__tmp__1Q2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__2Q2H=my_copy__4P2H(__tmp__1Q2H);
  } break;
  case __EXPR_AND__: {
    __tmp__2Q2H=my_copy__JQ2H(__tmp__1Q2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2Q2H=my_copy__UQ2H(__tmp__1Q2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2Q2H=my_copy__5Q2H(__tmp__1Q2H);
  } break;
  case __PUT_TO__: {
    __tmp__2Q2H=my_copy__KR2H(__tmp__1Q2H);
  } break;
  case __ITEM__: {
    __tmp__2Q2H=my_copy__1R2H(__tmp__1Q2H);
  } break;
  case __SIZE_OF__: {
    __tmp__2Q2H=my_copy__HS2H(__tmp__1Q2H);
  } break;
  case __CAST__: {
    __tmp__2Q2H=my_copy__QS2H(__tmp__1Q2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__2Q2H=my_copy__PIYM(__tmp__1Q2H);
  } break;
  case __READ_SLOT__: {
    __tmp__2Q2H=my_copy__AVGK(__tmp__1Q2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__2Q2H=my_copy__NVGK(__tmp__1Q2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2Q2H=my_copy__RFCN(__tmp__1Q2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2Q2H=my_copy__JMEO(__tmp__1Q2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2Q2H=my_copy__RTJO(__tmp__1Q2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2Q2H=my_copy__WMEO(__tmp__1Q2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2Q2H=my_copy__3TJO(__tmp__1Q2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__2Q2H=my_copy__YEJM(__tmp__1Q2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__2Q2H=my_copy__YRLL(__tmp__1Q2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__2Q2H=my_copy__GLYM(__tmp__1Q2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__2Q2H=my_copy__BNEO(__tmp__1Q2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2Q2H=my_copy__M3DP(__tmp__1Q2H);
  } break;
  case __EXPR_INF__: {
    __tmp__2Q2H=my_copy__PBSN(__tmp__1Q2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2Q2H=my_copy__0BSN(__tmp__1Q2H);
  } break;
  case __EXPR_OR__: {
    __tmp__2Q2H=my_copy__ZOPN(__tmp__1Q2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__2Q2H=my_copy__CYSO(__tmp__1Q2H);
  } break;
  };
  return(create__with__and__IXWH(__tmp__XQ2H,__tmp__ZQ2H,__tmp__2Q2H));
}

static __EXPR_SHIFT_L* my_copy__5Q2H(__EXPR_SHIFT_L *Self__AR2H)
// ({EXPR_SHIFT_L}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__CR2H;
  void *__tmp__DR2H,*__tmp__ER2H,*__tmp__GR2H,*__tmp__HR2H;
  __STRING_CST *Self__312P,*Self__F22P;
  __PROTOTYPE_CST *Self__412P,*Self__G22P;
  __INTEGER_CST *Self__512P,*Self__H22P;
  __REAL_CST *Self__B22P,*Self__J22P;
  __CHARACTER_CST *Self__D22P,*Self__L22P;
  __IS_EXPANDED *Self__E22P,*Self__M22P;
  __tmp__CR2H=Self__AR2H->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__DR2H=Self__AR2H->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__DR2H)->__id) {
  case __LIST__: {
    __tmp__ER2H=my_copy__2HYM(__tmp__DR2H);
  } break;
  case __STRING_CST__: {
    Self__312P=((__STRING_CST *)__tmp__DR2H);
    __tmp__ER2H=create__text__AUMH(Self__312P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__312P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ER2H=my_copy__2K2H(__tmp__DR2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__412P=((__PROTOTYPE_CST *)__tmp__DR2H);
    __tmp__ER2H=create__type__CLQC(Self__412P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__412P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__512P=((__INTEGER_CST *)__tmp__DR2H);
    __tmp__ER2H=create__value__type__DNQC(Self__512P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__512P->value__PAZD,Self__512P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__ER2H=my_copy__OAFJ(__tmp__DR2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ER2H=my_copy__KM2H(__tmp__DR2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ER2H=my_copy__DN2H(__tmp__DR2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ER2H=my_copy__QN2H(__tmp__DR2H);
  } break;
  case __REAL_CST__: {
    Self__B22P=((__REAL_CST *)__tmp__DR2H);
    __tmp__ER2H=create__value__type__1SMH(Self__B22P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B22P->value__5N2H,Self__B22P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__D22P=((__CHARACTER_CST *)__tmp__DR2H);
    __tmp__ER2H=create__char__WTMH(Self__D22P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D22P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__E22P=((__IS_EXPANDED *)__tmp__DR2H);
    __tmp__ER2H=create__receiver__WRWH(Self__E22P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__E22P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ER2H=my_copy__TO2H(__tmp__DR2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__ER2H=my_copy__2O2H(__tmp__DR2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__ER2H=my_copy__HP2H(__tmp__DR2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__ER2H=my_copy__TP2H(__tmp__DR2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__ER2H=my_copy__4P2H(__tmp__DR2H);
  } break;
  case __EXPR_AND__: {
    __tmp__ER2H=my_copy__JQ2H(__tmp__DR2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ER2H=my_copy__UQ2H(__tmp__DR2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ER2H=my_copy__5Q2H(__tmp__DR2H);
  } break;
  case __PUT_TO__: {
    __tmp__ER2H=my_copy__KR2H(__tmp__DR2H);
  } break;
  case __ITEM__: {
    __tmp__ER2H=my_copy__1R2H(__tmp__DR2H);
  } break;
  case __SIZE_OF__: {
    __tmp__ER2H=my_copy__HS2H(__tmp__DR2H);
  } break;
  case __CAST__: {
    __tmp__ER2H=my_copy__QS2H(__tmp__DR2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__ER2H=my_copy__PIYM(__tmp__DR2H);
  } break;
  case __READ_SLOT__: {
    __tmp__ER2H=my_copy__AVGK(__tmp__DR2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ER2H=my_copy__NVGK(__tmp__DR2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ER2H=my_copy__RFCN(__tmp__DR2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ER2H=my_copy__JMEO(__tmp__DR2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ER2H=my_copy__RTJO(__tmp__DR2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ER2H=my_copy__WMEO(__tmp__DR2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ER2H=my_copy__3TJO(__tmp__DR2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__ER2H=my_copy__YEJM(__tmp__DR2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__ER2H=my_copy__YRLL(__tmp__DR2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__ER2H=my_copy__GLYM(__tmp__DR2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__ER2H=my_copy__BNEO(__tmp__DR2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ER2H=my_copy__M3DP(__tmp__DR2H);
  } break;
  case __EXPR_INF__: {
    __tmp__ER2H=my_copy__PBSN(__tmp__DR2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ER2H=my_copy__0BSN(__tmp__DR2H);
  } break;
  case __EXPR_OR__: {
    __tmp__ER2H=my_copy__ZOPN(__tmp__DR2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__ER2H=my_copy__CYSO(__tmp__DR2H);
  } break;
  };
  __tmp__GR2H=Self__AR2H->parent_expr_binary__GEKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__GR2H)->__id) {
  case __LIST__: {
    __tmp__HR2H=my_copy__2HYM(__tmp__GR2H);
  } break;
  case __STRING_CST__: {
    Self__F22P=((__STRING_CST *)__tmp__GR2H);
    __tmp__HR2H=create__text__AUMH(Self__F22P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F22P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__HR2H=my_copy__2K2H(__tmp__GR2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__G22P=((__PROTOTYPE_CST *)__tmp__GR2H);
    __tmp__HR2H=create__type__CLQC(Self__G22P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__G22P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__H22P=((__INTEGER_CST *)__tmp__GR2H);
    __tmp__HR2H=create__value__type__DNQC(Self__H22P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H22P->value__PAZD,Self__H22P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__HR2H=my_copy__OAFJ(__tmp__GR2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HR2H=my_copy__KM2H(__tmp__GR2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HR2H=my_copy__DN2H(__tmp__GR2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HR2H=my_copy__QN2H(__tmp__GR2H);
  } break;
  case __REAL_CST__: {
    Self__J22P=((__REAL_CST *)__tmp__GR2H);
    __tmp__HR2H=create__value__type__1SMH(Self__J22P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J22P->value__5N2H,Self__J22P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__L22P=((__CHARACTER_CST *)__tmp__GR2H);
    __tmp__HR2H=create__char__WTMH(Self__L22P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L22P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__M22P=((__IS_EXPANDED *)__tmp__GR2H);
    __tmp__HR2H=create__receiver__WRWH(Self__M22P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__M22P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__HR2H=my_copy__TO2H(__tmp__GR2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__HR2H=my_copy__2O2H(__tmp__GR2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__HR2H=my_copy__HP2H(__tmp__GR2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__HR2H=my_copy__TP2H(__tmp__GR2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__HR2H=my_copy__4P2H(__tmp__GR2H);
  } break;
  case __EXPR_AND__: {
    __tmp__HR2H=my_copy__JQ2H(__tmp__GR2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HR2H=my_copy__UQ2H(__tmp__GR2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HR2H=my_copy__5Q2H(__tmp__GR2H);
  } break;
  case __PUT_TO__: {
    __tmp__HR2H=my_copy__KR2H(__tmp__GR2H);
  } break;
  case __ITEM__: {
    __tmp__HR2H=my_copy__1R2H(__tmp__GR2H);
  } break;
  case __SIZE_OF__: {
    __tmp__HR2H=my_copy__HS2H(__tmp__GR2H);
  } break;
  case __CAST__: {
    __tmp__HR2H=my_copy__QS2H(__tmp__GR2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__HR2H=my_copy__PIYM(__tmp__GR2H);
  } break;
  case __READ_SLOT__: {
    __tmp__HR2H=my_copy__AVGK(__tmp__GR2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__HR2H=my_copy__NVGK(__tmp__GR2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HR2H=my_copy__RFCN(__tmp__GR2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HR2H=my_copy__JMEO(__tmp__GR2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HR2H=my_copy__RTJO(__tmp__GR2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HR2H=my_copy__WMEO(__tmp__GR2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HR2H=my_copy__3TJO(__tmp__GR2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__HR2H=my_copy__YEJM(__tmp__GR2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__HR2H=my_copy__YRLL(__tmp__GR2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__HR2H=my_copy__GLYM(__tmp__GR2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__HR2H=my_copy__BNEO(__tmp__GR2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HR2H=my_copy__M3DP(__tmp__GR2H);
  } break;
  case __EXPR_INF__: {
    __tmp__HR2H=my_copy__PBSN(__tmp__GR2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HR2H=my_copy__0BSN(__tmp__GR2H);
  } break;
  case __EXPR_OR__: {
    __tmp__HR2H=my_copy__ZOPN(__tmp__GR2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__HR2H=my_copy__CYSO(__tmp__GR2H);
  } break;
  };
  return(create__with__and__DYWH(__tmp__CR2H,__tmp__ER2H,__tmp__HR2H));
}

static __PUT_TO* my_copy__KR2H(__PUT_TO *Self__LR2H)
// ({PUT_TO}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__NR2H;
  void *__tmp__PR2H,*__tmp__QR2H,*__tmp__TR2H,*__tmp__UR2H,*__tmp__XR2H;
  void *__tmp__YR2H;
  __STRING_CST *Self__N22P,*Self__V22P,*Self__322P;
  __PROTOTYPE_CST *Self__O22P,*Self__W22P,*Self__422P;
  __INTEGER_CST *Self__P22P,*Self__X22P,*Self__522P;
  __REAL_CST *Self__R22P,*Self__Z22P,*Self__B32P;
  __CHARACTER_CST *Self__T22P,*Self__122P,*Self__D32P;
  __IS_EXPANDED *Self__U22P,*Self__222P,*Self__E32P;
  __tmp__NR2H=Self__LR2H->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__PR2H=Self__LR2H->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__PR2H)->__id) {
  case __LIST__: {
    __tmp__QR2H=my_copy__2HYM(__tmp__PR2H);
  } break;
  case __STRING_CST__: {
    Self__N22P=((__STRING_CST *)__tmp__PR2H);
    __tmp__QR2H=create__text__AUMH(Self__N22P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N22P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__QR2H=my_copy__2K2H(__tmp__PR2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__O22P=((__PROTOTYPE_CST *)__tmp__PR2H);
    __tmp__QR2H=create__type__CLQC(Self__O22P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O22P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__P22P=((__INTEGER_CST *)__tmp__PR2H);
    __tmp__QR2H=create__value__type__DNQC(Self__P22P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__P22P->value__PAZD,Self__P22P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__QR2H=my_copy__OAFJ(__tmp__PR2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__QR2H=my_copy__KM2H(__tmp__PR2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__QR2H=my_copy__DN2H(__tmp__PR2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__QR2H=my_copy__QN2H(__tmp__PR2H);
  } break;
  case __REAL_CST__: {
    Self__R22P=((__REAL_CST *)__tmp__PR2H);
    __tmp__QR2H=create__value__type__1SMH(Self__R22P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R22P->value__5N2H,Self__R22P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__T22P=((__CHARACTER_CST *)__tmp__PR2H);
    __tmp__QR2H=create__char__WTMH(Self__T22P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T22P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__U22P=((__IS_EXPANDED *)__tmp__PR2H);
    __tmp__QR2H=create__receiver__WRWH(Self__U22P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__U22P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__QR2H=my_copy__TO2H(__tmp__PR2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__QR2H=my_copy__2O2H(__tmp__PR2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__QR2H=my_copy__HP2H(__tmp__PR2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__QR2H=my_copy__TP2H(__tmp__PR2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__QR2H=my_copy__4P2H(__tmp__PR2H);
  } break;
  case __EXPR_AND__: {
    __tmp__QR2H=my_copy__JQ2H(__tmp__PR2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__QR2H=my_copy__UQ2H(__tmp__PR2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__QR2H=my_copy__5Q2H(__tmp__PR2H);
  } break;
  case __PUT_TO__: {
    __tmp__QR2H=my_copy__KR2H(__tmp__PR2H);
  } break;
  case __ITEM__: {
    __tmp__QR2H=my_copy__1R2H(__tmp__PR2H);
  } break;
  case __SIZE_OF__: {
    __tmp__QR2H=my_copy__HS2H(__tmp__PR2H);
  } break;
  case __CAST__: {
    __tmp__QR2H=my_copy__QS2H(__tmp__PR2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__QR2H=my_copy__PIYM(__tmp__PR2H);
  } break;
  case __READ_SLOT__: {
    __tmp__QR2H=my_copy__AVGK(__tmp__PR2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__QR2H=my_copy__NVGK(__tmp__PR2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__QR2H=my_copy__RFCN(__tmp__PR2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__QR2H=my_copy__JMEO(__tmp__PR2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__QR2H=my_copy__RTJO(__tmp__PR2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__QR2H=my_copy__WMEO(__tmp__PR2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__QR2H=my_copy__3TJO(__tmp__PR2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__QR2H=my_copy__YEJM(__tmp__PR2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__QR2H=my_copy__YRLL(__tmp__PR2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__QR2H=my_copy__GLYM(__tmp__PR2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__QR2H=my_copy__BNEO(__tmp__PR2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__QR2H=my_copy__M3DP(__tmp__PR2H);
  } break;
  case __EXPR_INF__: {
    __tmp__QR2H=my_copy__PBSN(__tmp__PR2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__QR2H=my_copy__0BSN(__tmp__PR2H);
  } break;
  case __EXPR_OR__: {
    __tmp__QR2H=my_copy__ZOPN(__tmp__PR2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__QR2H=my_copy__CYSO(__tmp__PR2H);
  } break;
  };
  __tmp__TR2H=Self__LR2H->index__SR2H;
  switch (((struct ___OBJ *)__tmp__TR2H)->__id) {
  case __LIST__: {
    __tmp__UR2H=my_copy__2HYM(__tmp__TR2H);
  } break;
  case __STRING_CST__: {
    Self__V22P=((__STRING_CST *)__tmp__TR2H);
    __tmp__UR2H=create__text__AUMH(Self__V22P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__V22P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__UR2H=my_copy__2K2H(__tmp__TR2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__W22P=((__PROTOTYPE_CST *)__tmp__TR2H);
    __tmp__UR2H=create__type__CLQC(Self__W22P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__W22P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__X22P=((__INTEGER_CST *)__tmp__TR2H);
    __tmp__UR2H=create__value__type__DNQC(Self__X22P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X22P->value__PAZD,Self__X22P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__UR2H=my_copy__OAFJ(__tmp__TR2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UR2H=my_copy__KM2H(__tmp__TR2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UR2H=my_copy__DN2H(__tmp__TR2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UR2H=my_copy__QN2H(__tmp__TR2H);
  } break;
  case __REAL_CST__: {
    Self__Z22P=((__REAL_CST *)__tmp__TR2H);
    __tmp__UR2H=create__value__type__1SMH(Self__Z22P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z22P->value__5N2H,Self__Z22P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__122P=((__CHARACTER_CST *)__tmp__TR2H);
    __tmp__UR2H=create__char__WTMH(Self__122P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__122P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__222P=((__IS_EXPANDED *)__tmp__TR2H);
    __tmp__UR2H=create__receiver__WRWH(Self__222P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__222P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UR2H=my_copy__TO2H(__tmp__TR2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__UR2H=my_copy__2O2H(__tmp__TR2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__UR2H=my_copy__HP2H(__tmp__TR2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__UR2H=my_copy__TP2H(__tmp__TR2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__UR2H=my_copy__4P2H(__tmp__TR2H);
  } break;
  case __EXPR_AND__: {
    __tmp__UR2H=my_copy__JQ2H(__tmp__TR2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UR2H=my_copy__UQ2H(__tmp__TR2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UR2H=my_copy__5Q2H(__tmp__TR2H);
  } break;
  case __PUT_TO__: {
    __tmp__UR2H=my_copy__KR2H(__tmp__TR2H);
  } break;
  case __ITEM__: {
    __tmp__UR2H=my_copy__1R2H(__tmp__TR2H);
  } break;
  case __SIZE_OF__: {
    __tmp__UR2H=my_copy__HS2H(__tmp__TR2H);
  } break;
  case __CAST__: {
    __tmp__UR2H=my_copy__QS2H(__tmp__TR2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__UR2H=my_copy__PIYM(__tmp__TR2H);
  } break;
  case __READ_SLOT__: {
    __tmp__UR2H=my_copy__AVGK(__tmp__TR2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__UR2H=my_copy__NVGK(__tmp__TR2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UR2H=my_copy__RFCN(__tmp__TR2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UR2H=my_copy__JMEO(__tmp__TR2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UR2H=my_copy__RTJO(__tmp__TR2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UR2H=my_copy__WMEO(__tmp__TR2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UR2H=my_copy__3TJO(__tmp__TR2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__UR2H=my_copy__YEJM(__tmp__TR2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__UR2H=my_copy__YRLL(__tmp__TR2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__UR2H=my_copy__GLYM(__tmp__TR2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__UR2H=my_copy__BNEO(__tmp__TR2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UR2H=my_copy__M3DP(__tmp__TR2H);
  } break;
  case __EXPR_INF__: {
    __tmp__UR2H=my_copy__PBSN(__tmp__TR2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UR2H=my_copy__0BSN(__tmp__TR2H);
  } break;
  case __EXPR_OR__: {
    __tmp__UR2H=my_copy__ZOPN(__tmp__TR2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__UR2H=my_copy__CYSO(__tmp__TR2H);
  } break;
  };
  __tmp__XR2H=Self__LR2H->value__WR2H;
  switch (((struct ___OBJ *)__tmp__XR2H)->__id) {
  case __LIST__: {
    __tmp__YR2H=my_copy__2HYM(__tmp__XR2H);
  } break;
  case __STRING_CST__: {
    Self__322P=((__STRING_CST *)__tmp__XR2H);
    __tmp__YR2H=create__text__AUMH(Self__322P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__322P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__YR2H=my_copy__2K2H(__tmp__XR2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__422P=((__PROTOTYPE_CST *)__tmp__XR2H);
    __tmp__YR2H=create__type__CLQC(Self__422P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__422P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__522P=((__INTEGER_CST *)__tmp__XR2H);
    __tmp__YR2H=create__value__type__DNQC(Self__522P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__522P->value__PAZD,Self__522P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__YR2H=my_copy__OAFJ(__tmp__XR2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__YR2H=my_copy__KM2H(__tmp__XR2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__YR2H=my_copy__DN2H(__tmp__XR2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__YR2H=my_copy__QN2H(__tmp__XR2H);
  } break;
  case __REAL_CST__: {
    Self__B32P=((__REAL_CST *)__tmp__XR2H);
    __tmp__YR2H=create__value__type__1SMH(Self__B32P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B32P->value__5N2H,Self__B32P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__D32P=((__CHARACTER_CST *)__tmp__XR2H);
    __tmp__YR2H=create__char__WTMH(Self__D32P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D32P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__E32P=((__IS_EXPANDED *)__tmp__XR2H);
    __tmp__YR2H=create__receiver__WRWH(Self__E32P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__E32P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__YR2H=my_copy__TO2H(__tmp__XR2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__YR2H=my_copy__2O2H(__tmp__XR2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__YR2H=my_copy__HP2H(__tmp__XR2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__YR2H=my_copy__TP2H(__tmp__XR2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__YR2H=my_copy__4P2H(__tmp__XR2H);
  } break;
  case __EXPR_AND__: {
    __tmp__YR2H=my_copy__JQ2H(__tmp__XR2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__YR2H=my_copy__UQ2H(__tmp__XR2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__YR2H=my_copy__5Q2H(__tmp__XR2H);
  } break;
  case __PUT_TO__: {
    __tmp__YR2H=my_copy__KR2H(__tmp__XR2H);
  } break;
  case __ITEM__: {
    __tmp__YR2H=my_copy__1R2H(__tmp__XR2H);
  } break;
  case __SIZE_OF__: {
    __tmp__YR2H=my_copy__HS2H(__tmp__XR2H);
  } break;
  case __CAST__: {
    __tmp__YR2H=my_copy__QS2H(__tmp__XR2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__YR2H=my_copy__PIYM(__tmp__XR2H);
  } break;
  case __READ_SLOT__: {
    __tmp__YR2H=my_copy__AVGK(__tmp__XR2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__YR2H=my_copy__NVGK(__tmp__XR2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__YR2H=my_copy__RFCN(__tmp__XR2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__YR2H=my_copy__JMEO(__tmp__XR2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__YR2H=my_copy__RTJO(__tmp__XR2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__YR2H=my_copy__WMEO(__tmp__XR2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__YR2H=my_copy__3TJO(__tmp__XR2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__YR2H=my_copy__YEJM(__tmp__XR2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__YR2H=my_copy__YRLL(__tmp__XR2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__YR2H=my_copy__GLYM(__tmp__XR2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__YR2H=my_copy__BNEO(__tmp__XR2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__YR2H=my_copy__M3DP(__tmp__XR2H);
  } break;
  case __EXPR_INF__: {
    __tmp__YR2H=my_copy__PBSN(__tmp__XR2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__YR2H=my_copy__0BSN(__tmp__XR2H);
  } break;
  case __EXPR_OR__: {
    __tmp__YR2H=my_copy__ZOPN(__tmp__XR2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__YR2H=my_copy__CYSO(__tmp__XR2H);
  } break;
  };
  return(create__base__index__value__DZWH(__tmp__NR2H,__tmp__QR2H,__tmp__UR2H,__tmp__YR2H));
}

static __ITEM* my_copy__1R2H(__ITEM *Self__2R2H)
// ({ITEM}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__4R2H;
  void *__tmp__5R2H,*__tmp__AS2H,*__tmp__DS2H,*__tmp__ES2H;
  __STRING_CST *Self__F32P,*Self__N32P;
  __PROTOTYPE_CST *Self__G32P,*Self__O32P;
  __INTEGER_CST *Self__H32P,*Self__P32P;
  __REAL_CST *Self__J32P,*Self__R32P;
  __CHARACTER_CST *Self__L32P,*Self__T32P;
  __IS_EXPANDED *Self__M32P,*Self__U32P;
  __tmp__4R2H=Self__2R2H->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__5R2H=Self__2R2H->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__5R2H)->__id) {
  case __LIST__: {
    __tmp__AS2H=my_copy__2HYM(__tmp__5R2H);
  } break;
  case __STRING_CST__: {
    Self__F32P=((__STRING_CST *)__tmp__5R2H);
    __tmp__AS2H=create__text__AUMH(Self__F32P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F32P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__AS2H=my_copy__2K2H(__tmp__5R2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__G32P=((__PROTOTYPE_CST *)__tmp__5R2H);
    __tmp__AS2H=create__type__CLQC(Self__G32P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__G32P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__H32P=((__INTEGER_CST *)__tmp__5R2H);
    __tmp__AS2H=create__value__type__DNQC(Self__H32P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H32P->value__PAZD,Self__H32P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__AS2H=my_copy__OAFJ(__tmp__5R2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__AS2H=my_copy__KM2H(__tmp__5R2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__AS2H=my_copy__DN2H(__tmp__5R2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__AS2H=my_copy__QN2H(__tmp__5R2H);
  } break;
  case __REAL_CST__: {
    Self__J32P=((__REAL_CST *)__tmp__5R2H);
    __tmp__AS2H=create__value__type__1SMH(Self__J32P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J32P->value__5N2H,Self__J32P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__L32P=((__CHARACTER_CST *)__tmp__5R2H);
    __tmp__AS2H=create__char__WTMH(Self__L32P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L32P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__M32P=((__IS_EXPANDED *)__tmp__5R2H);
    __tmp__AS2H=create__receiver__WRWH(Self__M32P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__M32P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__AS2H=my_copy__TO2H(__tmp__5R2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__AS2H=my_copy__2O2H(__tmp__5R2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__AS2H=my_copy__HP2H(__tmp__5R2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__AS2H=my_copy__TP2H(__tmp__5R2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__AS2H=my_copy__4P2H(__tmp__5R2H);
  } break;
  case __EXPR_AND__: {
    __tmp__AS2H=my_copy__JQ2H(__tmp__5R2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__AS2H=my_copy__UQ2H(__tmp__5R2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__AS2H=my_copy__5Q2H(__tmp__5R2H);
  } break;
  case __PUT_TO__: {
    __tmp__AS2H=my_copy__KR2H(__tmp__5R2H);
  } break;
  case __ITEM__: {
    __tmp__AS2H=my_copy__1R2H(__tmp__5R2H);
  } break;
  case __SIZE_OF__: {
    __tmp__AS2H=my_copy__HS2H(__tmp__5R2H);
  } break;
  case __CAST__: {
    __tmp__AS2H=my_copy__QS2H(__tmp__5R2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__AS2H=my_copy__PIYM(__tmp__5R2H);
  } break;
  case __READ_SLOT__: {
    __tmp__AS2H=my_copy__AVGK(__tmp__5R2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__AS2H=my_copy__NVGK(__tmp__5R2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__AS2H=my_copy__RFCN(__tmp__5R2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__AS2H=my_copy__JMEO(__tmp__5R2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__AS2H=my_copy__RTJO(__tmp__5R2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__AS2H=my_copy__WMEO(__tmp__5R2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__AS2H=my_copy__3TJO(__tmp__5R2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__AS2H=my_copy__YEJM(__tmp__5R2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__AS2H=my_copy__YRLL(__tmp__5R2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__AS2H=my_copy__GLYM(__tmp__5R2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__AS2H=my_copy__BNEO(__tmp__5R2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__AS2H=my_copy__M3DP(__tmp__5R2H);
  } break;
  case __EXPR_INF__: {
    __tmp__AS2H=my_copy__PBSN(__tmp__5R2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__AS2H=my_copy__0BSN(__tmp__5R2H);
  } break;
  case __EXPR_OR__: {
    __tmp__AS2H=my_copy__ZOPN(__tmp__5R2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__AS2H=my_copy__CYSO(__tmp__5R2H);
  } break;
  };
  __tmp__DS2H=Self__2R2H->index__CS2H;
  switch (((struct ___OBJ *)__tmp__DS2H)->__id) {
  case __LIST__: {
    __tmp__ES2H=my_copy__2HYM(__tmp__DS2H);
  } break;
  case __STRING_CST__: {
    Self__N32P=((__STRING_CST *)__tmp__DS2H);
    __tmp__ES2H=create__text__AUMH(Self__N32P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N32P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ES2H=my_copy__2K2H(__tmp__DS2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__O32P=((__PROTOTYPE_CST *)__tmp__DS2H);
    __tmp__ES2H=create__type__CLQC(Self__O32P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O32P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__P32P=((__INTEGER_CST *)__tmp__DS2H);
    __tmp__ES2H=create__value__type__DNQC(Self__P32P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__P32P->value__PAZD,Self__P32P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__ES2H=my_copy__OAFJ(__tmp__DS2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ES2H=my_copy__KM2H(__tmp__DS2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ES2H=my_copy__DN2H(__tmp__DS2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ES2H=my_copy__QN2H(__tmp__DS2H);
  } break;
  case __REAL_CST__: {
    Self__R32P=((__REAL_CST *)__tmp__DS2H);
    __tmp__ES2H=create__value__type__1SMH(Self__R32P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R32P->value__5N2H,Self__R32P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__T32P=((__CHARACTER_CST *)__tmp__DS2H);
    __tmp__ES2H=create__char__WTMH(Self__T32P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T32P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__U32P=((__IS_EXPANDED *)__tmp__DS2H);
    __tmp__ES2H=create__receiver__WRWH(Self__U32P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__U32P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ES2H=my_copy__TO2H(__tmp__DS2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__ES2H=my_copy__2O2H(__tmp__DS2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__ES2H=my_copy__HP2H(__tmp__DS2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__ES2H=my_copy__TP2H(__tmp__DS2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__ES2H=my_copy__4P2H(__tmp__DS2H);
  } break;
  case __EXPR_AND__: {
    __tmp__ES2H=my_copy__JQ2H(__tmp__DS2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ES2H=my_copy__UQ2H(__tmp__DS2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ES2H=my_copy__5Q2H(__tmp__DS2H);
  } break;
  case __PUT_TO__: {
    __tmp__ES2H=my_copy__KR2H(__tmp__DS2H);
  } break;
  case __ITEM__: {
    __tmp__ES2H=my_copy__1R2H(__tmp__DS2H);
  } break;
  case __SIZE_OF__: {
    __tmp__ES2H=my_copy__HS2H(__tmp__DS2H);
  } break;
  case __CAST__: {
    __tmp__ES2H=my_copy__QS2H(__tmp__DS2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__ES2H=my_copy__PIYM(__tmp__DS2H);
  } break;
  case __READ_SLOT__: {
    __tmp__ES2H=my_copy__AVGK(__tmp__DS2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ES2H=my_copy__NVGK(__tmp__DS2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ES2H=my_copy__RFCN(__tmp__DS2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ES2H=my_copy__JMEO(__tmp__DS2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ES2H=my_copy__RTJO(__tmp__DS2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ES2H=my_copy__WMEO(__tmp__DS2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ES2H=my_copy__3TJO(__tmp__DS2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__ES2H=my_copy__YEJM(__tmp__DS2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__ES2H=my_copy__YRLL(__tmp__DS2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__ES2H=my_copy__GLYM(__tmp__DS2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__ES2H=my_copy__BNEO(__tmp__DS2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ES2H=my_copy__M3DP(__tmp__DS2H);
  } break;
  case __EXPR_INF__: {
    __tmp__ES2H=my_copy__PBSN(__tmp__DS2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ES2H=my_copy__0BSN(__tmp__DS2H);
  } break;
  case __EXPR_OR__: {
    __tmp__ES2H=my_copy__ZOPN(__tmp__DS2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__ES2H=my_copy__CYSO(__tmp__DS2H);
  } break;
  };
  return(create__base__index__3ZWH(__tmp__4R2H,__tmp__AS2H,__tmp__ES2H));
}

static __SIZE_OF* my_copy__HS2H(__SIZE_OF *Self__IS2H)
// ({SIZE_OF}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__KS2H;
  void *__tmp__MS2H,*__tmp__NS2H;
  __STRING_CST *Self__V32P;
  __PROTOTYPE_CST *Self__W32P;
  __INTEGER_CST *Self__X32P;
  __REAL_CST *Self__Z32P;
  __CHARACTER_CST *Self__132P;
  __IS_EXPANDED *Self__232P;
  __tmp__KS2H=Self__IS2H->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__MS2H=Self__IS2H->receiver__LS2H;
  switch (((struct ___OBJ *)__tmp__MS2H)->__id) {
  case __LIST__: {
    __tmp__NS2H=my_copy__2HYM(__tmp__MS2H);
  } break;
  case __STRING_CST__: {
    Self__V32P=((__STRING_CST *)__tmp__MS2H);
    __tmp__NS2H=create__text__AUMH(Self__V32P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__V32P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__NS2H=my_copy__2K2H(__tmp__MS2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__W32P=((__PROTOTYPE_CST *)__tmp__MS2H);
    __tmp__NS2H=create__type__CLQC(Self__W32P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__W32P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__X32P=((__INTEGER_CST *)__tmp__MS2H);
    __tmp__NS2H=create__value__type__DNQC(Self__X32P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X32P->value__PAZD,Self__X32P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__NS2H=my_copy__OAFJ(__tmp__MS2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NS2H=my_copy__KM2H(__tmp__MS2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NS2H=my_copy__DN2H(__tmp__MS2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NS2H=my_copy__QN2H(__tmp__MS2H);
  } break;
  case __REAL_CST__: {
    Self__Z32P=((__REAL_CST *)__tmp__MS2H);
    __tmp__NS2H=create__value__type__1SMH(Self__Z32P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z32P->value__5N2H,Self__Z32P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__132P=((__CHARACTER_CST *)__tmp__MS2H);
    __tmp__NS2H=create__char__WTMH(Self__132P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__132P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__232P=((__IS_EXPANDED *)__tmp__MS2H);
    __tmp__NS2H=create__receiver__WRWH(Self__232P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__232P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__NS2H=my_copy__TO2H(__tmp__MS2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__NS2H=my_copy__2O2H(__tmp__MS2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__NS2H=my_copy__HP2H(__tmp__MS2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__NS2H=my_copy__TP2H(__tmp__MS2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__NS2H=my_copy__4P2H(__tmp__MS2H);
  } break;
  case __EXPR_AND__: {
    __tmp__NS2H=my_copy__JQ2H(__tmp__MS2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NS2H=my_copy__UQ2H(__tmp__MS2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NS2H=my_copy__5Q2H(__tmp__MS2H);
  } break;
  case __PUT_TO__: {
    __tmp__NS2H=my_copy__KR2H(__tmp__MS2H);
  } break;
  case __ITEM__: {
    __tmp__NS2H=my_copy__1R2H(__tmp__MS2H);
  } break;
  case __SIZE_OF__: {
    __tmp__NS2H=my_copy__HS2H(__tmp__MS2H);
  } break;
  case __CAST__: {
    __tmp__NS2H=my_copy__QS2H(__tmp__MS2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__NS2H=my_copy__PIYM(__tmp__MS2H);
  } break;
  case __READ_SLOT__: {
    __tmp__NS2H=my_copy__AVGK(__tmp__MS2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__NS2H=my_copy__NVGK(__tmp__MS2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NS2H=my_copy__RFCN(__tmp__MS2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NS2H=my_copy__JMEO(__tmp__MS2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NS2H=my_copy__RTJO(__tmp__MS2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NS2H=my_copy__WMEO(__tmp__MS2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NS2H=my_copy__3TJO(__tmp__MS2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__NS2H=my_copy__YEJM(__tmp__MS2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__NS2H=my_copy__YRLL(__tmp__MS2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__NS2H=my_copy__GLYM(__tmp__MS2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__NS2H=my_copy__BNEO(__tmp__MS2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NS2H=my_copy__M3DP(__tmp__MS2H);
  } break;
  case __EXPR_INF__: {
    __tmp__NS2H=my_copy__PBSN(__tmp__MS2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NS2H=my_copy__0BSN(__tmp__MS2H);
  } break;
  case __EXPR_OR__: {
    __tmp__NS2H=my_copy__ZOPN(__tmp__MS2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__NS2H=my_copy__CYSO(__tmp__MS2H);
  } break;
  };
  return(create__receiver__A1WH(__tmp__KS2H,__tmp__NS2H));
}

static __CAST* my_copy__QS2H(__CAST *Self__RS2H)
// ({CAST}) With resultRecursive, No inlinable.
{
  void *__tmp__TS2H;
  void *__tmp__VS2H,*__tmp__WS2H;
  __STRING_CST *Self__332P;
  __PROTOTYPE_CST *Self__432P;
  __INTEGER_CST *Self__532P;
  __REAL_CST *Self__B42P;
  __CHARACTER_CST *Self__D42P;
  __IS_EXPANDED *Self__E42P;
  __tmp__TS2H=Self__RS2H->static_type__SO1H;
  __tmp__VS2H=Self__RS2H->value__US2H;
  switch (((struct ___OBJ *)__tmp__VS2H)->__id) {
  case __LIST__: {
    __tmp__WS2H=my_copy__2HYM(__tmp__VS2H);
  } break;
  case __STRING_CST__: {
    Self__332P=((__STRING_CST *)__tmp__VS2H);
    __tmp__WS2H=create__text__AUMH(Self__332P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__332P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__WS2H=my_copy__2K2H(__tmp__VS2H);
  } break;
  case __PROTOTYPE_CST__: {
    Self__432P=((__PROTOTYPE_CST *)__tmp__VS2H);
    __tmp__WS2H=create__type__CLQC(Self__432P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__432P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__532P=((__INTEGER_CST *)__tmp__VS2H);
    __tmp__WS2H=create__value__type__DNQC(Self__532P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__532P->value__PAZD,Self__532P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__WS2H=my_copy__OAFJ(__tmp__VS2H);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WS2H=my_copy__KM2H(__tmp__VS2H);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WS2H=my_copy__DN2H(__tmp__VS2H);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WS2H=my_copy__QN2H(__tmp__VS2H);
  } break;
  case __REAL_CST__: {
    Self__B42P=((__REAL_CST *)__tmp__VS2H);
    __tmp__WS2H=create__value__type__1SMH(Self__B42P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B42P->value__5N2H,Self__B42P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__D42P=((__CHARACTER_CST *)__tmp__VS2H);
    __tmp__WS2H=create__char__WTMH(Self__D42P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D42P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__E42P=((__IS_EXPANDED *)__tmp__VS2H);
    __tmp__WS2H=create__receiver__WRWH(Self__E42P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__E42P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WS2H=my_copy__TO2H(__tmp__VS2H);
  } break;
  case __EXPR_SUP__: {
    __tmp__WS2H=my_copy__2O2H(__tmp__VS2H);
  } break;
  case __EXPR_SUB__: {
    __tmp__WS2H=my_copy__HP2H(__tmp__VS2H);
  } break;
  case __EXPR_MUL__: {
    __tmp__WS2H=my_copy__TP2H(__tmp__VS2H);
  } break;
  case __EXPR_DIV__: {
    __tmp__WS2H=my_copy__4P2H(__tmp__VS2H);
  } break;
  case __EXPR_AND__: {
    __tmp__WS2H=my_copy__JQ2H(__tmp__VS2H);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WS2H=my_copy__UQ2H(__tmp__VS2H);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WS2H=my_copy__5Q2H(__tmp__VS2H);
  } break;
  case __PUT_TO__: {
    __tmp__WS2H=my_copy__KR2H(__tmp__VS2H);
  } break;
  case __ITEM__: {
    __tmp__WS2H=my_copy__1R2H(__tmp__VS2H);
  } break;
  case __SIZE_OF__: {
    __tmp__WS2H=my_copy__HS2H(__tmp__VS2H);
  } break;
  case __CAST__: {
    __tmp__WS2H=my_copy__QS2H(__tmp__VS2H);
  } break;
  case __CALL_SLOT__: {
    __tmp__WS2H=my_copy__PIYM(__tmp__VS2H);
  } break;
  case __READ_SLOT__: {
    __tmp__WS2H=my_copy__AVGK(__tmp__VS2H);
  } break;
  case __READ_GLOBAL__: {
    __tmp__WS2H=my_copy__NVGK(__tmp__VS2H);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WS2H=my_copy__RFCN(__tmp__VS2H);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WS2H=my_copy__JMEO(__tmp__VS2H);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WS2H=my_copy__RTJO(__tmp__VS2H);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WS2H=my_copy__WMEO(__tmp__VS2H);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WS2H=my_copy__3TJO(__tmp__VS2H);
  } break;
  case __EXPR_NEG__: {
    __tmp__WS2H=my_copy__YEJM(__tmp__VS2H);
  } break;
  case __EXPR_ADD__: {
    __tmp__WS2H=my_copy__YRLL(__tmp__VS2H);
  } break;
  case __EXPR_NOT__: {
    __tmp__WS2H=my_copy__GLYM(__tmp__VS2H);
  } break;
  case __EXPR_MOD__: {
    __tmp__WS2H=my_copy__BNEO(__tmp__VS2H);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WS2H=my_copy__M3DP(__tmp__VS2H);
  } break;
  case __EXPR_INF__: {
    __tmp__WS2H=my_copy__PBSN(__tmp__VS2H);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WS2H=my_copy__0BSN(__tmp__VS2H);
  } break;
  case __EXPR_OR__: {
    __tmp__WS2H=my_copy__ZOPN(__tmp__VS2H);
  } break;
  case __EXPR_XOR__: {
    __tmp__WS2H=my_copy__CYSO(__tmp__VS2H);
  } break;
  };
  return(create__value__S1WH(Self__RS2H,__tmp__TS2H,__tmp__WS2H));
}

static __CALL_SLOT* my_copy__PIYM(__CALL_SLOT *Self__QIYM)
// ({CALL_SLOT}) With resultRecursive, No inlinable.
{
  void *wrt__TIYM,*__tmp__0JYM,*__tmp__5KYM,*__tmp__ALYM;
  __CALL_SLOT *result__SIYM,*Self__DSFN;
  __INTEGER __tmp__AJYM,Self__1J1M,__tmp__MKYM,Self__HL3M;
  void *__tmp__UJYM;
  __POSITION __tmp__VJYM;
  void *__tmp__XJYM,*__tmp__YJYM;
  __STRING_CST *Self__H42P;
  __PROTOTYPE_CST *Self__I42P;
  __INTEGER_CST *Self__J42P;
  __REAL_CST *Self__L42P;
  __CHARACTER_CST *Self__N42P;
  __IS_EXPANDED *Self__O42P;
  void *__tmp__FLYM;
  __PROFIL_SLOT *Self__VLTQ;
  void *new_res__VIYM,*new_arg__UIYM;
  wrt__TIYM=NULL;
  new_res__VIYM=NULL;
  result__SIYM=clone__EBZI(Self__QIYM);
  new_arg__UIYM=create_with_capacity__UIPH((__INTEGER)(((__FAST_ARRAYoWRITEo *)Self__QIYM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI +  1));
  __tmp__AJYM=((__FAST_ARRAYoWRITEo *)Self__QIYM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
  Self__1J1M= 0;
  while ((Self__1J1M <= __tmp__AJYM)) {
    if (((void *)((void **)((__FAST_ARRAYoWRITEo *)Self__QIYM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__1J1M] == (void *)NULL)) {
      wrt__TIYM=NULL;
    } else {
      wrt__TIYM=((void **)((__FAST_ARRAYoWRITEo *)Self__QIYM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__1J1M];
      switch (((struct ___OBJ *)wrt__TIYM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__UJYM=((__WRITE_GLOBAL *)wrt__TIYM)->global__4U1H;
      } break;
      case __WRITE_SLOT__: {
        __tmp__UJYM=((__WRITE_SLOT *)wrt__TIYM)->slot__5T1H;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__UJYM=((__WRITE_LOCAL *)wrt__TIYM)->local__2RIJ;
      } break;
      };
      switch (((struct ___OBJ *)wrt__TIYM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__VJYM=((__WRITE_GLOBAL *)wrt__TIYM)->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
      } break;
      case __WRITE_SLOT__: {
        __tmp__VJYM=((__WRITE_SLOT *)wrt__TIYM)->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__VJYM=((__WRITE_LOCAL *)wrt__TIYM)->parent_write__X50I.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
      } break;
      };
      switch (((struct ___OBJ *)wrt__TIYM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__XJYM=((__WRITE_GLOBAL *)wrt__TIYM)->parent_write__QBGH.value__HBEH;
      } break;
      case __WRITE_SLOT__: {
        __tmp__XJYM=((__WRITE_SLOT *)wrt__TIYM)->parent_write__3BGH.value__HBEH;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__XJYM=((__WRITE_LOCAL *)wrt__TIYM)->parent_write__X50I.value__HBEH;
      } break;
      };
      switch (((struct ___OBJ *)__tmp__XJYM)->__id) {
      case __LIST__: {
        __tmp__YJYM=my_copy__2HYM(__tmp__XJYM);
      } break;
      case __STRING_CST__: {
        Self__H42P=((__STRING_CST *)__tmp__XJYM);
        __tmp__YJYM=create__text__AUMH(Self__H42P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H42P->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__YJYM=my_copy__2K2H(__tmp__XJYM);
      } break;
      case __PROTOTYPE_CST__: {
        Self__I42P=((__PROTOTYPE_CST *)__tmp__XJYM);
        __tmp__YJYM=create__type__CLQC(Self__I42P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__I42P->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__J42P=((__INTEGER_CST *)__tmp__XJYM);
        __tmp__YJYM=create__value__type__DNQC(Self__J42P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J42P->value__PAZD,Self__J42P->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__YJYM=my_copy__OAFJ(__tmp__XJYM);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__YJYM=my_copy__KM2H(__tmp__XJYM);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__YJYM=my_copy__DN2H(__tmp__XJYM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__YJYM=my_copy__QN2H(__tmp__XJYM);
      } break;
      case __REAL_CST__: {
        Self__L42P=((__REAL_CST *)__tmp__XJYM);
        __tmp__YJYM=create__value__type__1SMH(Self__L42P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L42P->value__5N2H,Self__L42P->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__N42P=((__CHARACTER_CST *)__tmp__XJYM);
        __tmp__YJYM=create__char__WTMH(Self__N42P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N42P->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__O42P=((__IS_EXPANDED *)__tmp__XJYM);
        __tmp__YJYM=create__receiver__WRWH(Self__O42P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__O42P->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__YJYM=my_copy__TO2H(__tmp__XJYM);
      } break;
      case __EXPR_SUP__: {
        __tmp__YJYM=my_copy__2O2H(__tmp__XJYM);
      } break;
      case __EXPR_SUB__: {
        __tmp__YJYM=my_copy__HP2H(__tmp__XJYM);
      } break;
      case __EXPR_MUL__: {
        __tmp__YJYM=my_copy__TP2H(__tmp__XJYM);
      } break;
      case __EXPR_DIV__: {
        __tmp__YJYM=my_copy__4P2H(__tmp__XJYM);
      } break;
      case __EXPR_AND__: {
        __tmp__YJYM=my_copy__JQ2H(__tmp__XJYM);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__YJYM=my_copy__UQ2H(__tmp__XJYM);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__YJYM=my_copy__5Q2H(__tmp__XJYM);
      } break;
      case __PUT_TO__: {
        __tmp__YJYM=my_copy__KR2H(__tmp__XJYM);
      } break;
      case __ITEM__: {
        __tmp__YJYM=my_copy__1R2H(__tmp__XJYM);
      } break;
      case __SIZE_OF__: {
        __tmp__YJYM=my_copy__HS2H(__tmp__XJYM);
      } break;
      case __CAST__: {
        __tmp__YJYM=my_copy__QS2H(__tmp__XJYM);
      } break;
      case __CALL_SLOT__: {
        __tmp__YJYM=my_copy__PIYM(__tmp__XJYM);
      } break;
      case __READ_SLOT__: {
        __tmp__YJYM=my_copy__AVGK(__tmp__XJYM);
      } break;
      case __READ_GLOBAL__: {
        __tmp__YJYM=my_copy__NVGK(__tmp__XJYM);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__YJYM=my_copy__RFCN(__tmp__XJYM);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__YJYM=my_copy__JMEO(__tmp__XJYM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__YJYM=my_copy__RTJO(__tmp__XJYM);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__YJYM=my_copy__WMEO(__tmp__XJYM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__YJYM=my_copy__3TJO(__tmp__XJYM);
      } break;
      case __EXPR_NEG__: {
        __tmp__YJYM=my_copy__YEJM(__tmp__XJYM);
      } break;
      case __EXPR_ADD__: {
        __tmp__YJYM=my_copy__YRLL(__tmp__XJYM);
      } break;
      case __EXPR_NOT__: {
        __tmp__YJYM=my_copy__GLYM(__tmp__XJYM);
      } break;
      case __EXPR_MOD__: {
        __tmp__YJYM=my_copy__BNEO(__tmp__XJYM);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__YJYM=my_copy__M3DP(__tmp__XJYM);
      } break;
      case __EXPR_INF__: {
        __tmp__YJYM=my_copy__PBSN(__tmp__XJYM);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__YJYM=my_copy__0BSN(__tmp__XJYM);
      } break;
      case __EXPR_OR__: {
        __tmp__YJYM=my_copy__ZOPN(__tmp__XJYM);
      } break;
      case __EXPR_XOR__: {
        __tmp__YJYM=my_copy__CYSO(__tmp__XJYM);
      } break;
      };
      if (((struct ___OBJ *)__tmp__UJYM)->__id==__LOCAL__) {
        __tmp__0JYM=write_direct__with__value__AIWI(__tmp__UJYM,__tmp__VJYM,__tmp__YJYM);
      } else {
        __tmp__0JYM=write_direct__with__value__05DH(__tmp__UJYM,__tmp__VJYM,NULL,__tmp__YJYM);
      };
      wrt__TIYM=__tmp__0JYM;
    };
    add_last__JPDI(new_arg__UIYM,wrt__TIYM);
    Self__1J1M=(__INTEGER)(Self__1J1M +  1);
  };
  if (((void *)Self__QIYM->result_list__1A2H != (void *)NULL)) {
    new_res__VIYM=create_with_capacity__UIPH((__INTEGER)(((__FAST_ARRAYoWRITEo *)Self__QIYM->result_list__1A2H)->parent_arrayed_collection__TAEH.upper__NPDI +  1));
    __tmp__MKYM=((__FAST_ARRAYoWRITEo *)Self__QIYM->result_list__1A2H)->parent_arrayed_collection__TAEH.upper__NPDI;
    Self__HL3M= 0;
    while ((Self__HL3M <= __tmp__MKYM)) {
      if (((void *)((void **)((__FAST_ARRAYoWRITEo *)Self__QIYM->result_list__1A2H)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__HL3M] == (void *)NULL)) {
        wrt__TIYM=NULL;
      } else {
        __tmp__5KYM=((void **)((__FAST_ARRAYoWRITEo *)Self__QIYM->result_list__1A2H)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__HL3M];
        switch (((struct ___OBJ *)__tmp__5KYM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__ALYM=my_copy__ILBN(__tmp__5KYM);
        } break;
        case __WRITE_SLOT__: {
          __tmp__ALYM=my_copy__ULBN(__tmp__5KYM);
        } break;
        case __WRITE_LOCAL__: {
          __tmp__ALYM=my_copy__GMBN(__tmp__5KYM);
        } break;
        };
        wrt__TIYM=__tmp__ALYM;
      };
      add_last__JPDI(new_res__VIYM,wrt__TIYM);
      Self__HL3M=(__INTEGER)(Self__HL3M +  1);
    };
  };
  Self__DSFN=((__CALL_SLOT *)result__SIYM);
  Self__DSFN->argument_list__OTHJ=new_arg__UIYM;
  Self__DSFN->result_list__1A2H=new_res__VIYM;
  __tmp__FLYM=result__SIYM->profil__QA2H;
  if (((struct ___OBJ *)__tmp__FLYM)->__id==__PROFIL_SLOT__) {
    Self__VLTQ=((__PROFIL_SLOT *)__tmp__FLYM);
    Self__VLTQ->parent_profil__51LC.link_count__FALJ=(__INTEGER)(Self__VLTQ->parent_profil__51LC.link_count__FALJ +  1);
  } else {
    link__DALJ(__tmp__FLYM);
  };
  return(result__SIYM);
}

static __READ_SLOT* my_copy__AVGK(__READ_SLOT *Self__BVGK)
// ({READ_SLOT}) With resultRecursive, No inlinable.
{
  void *__tmp__FVGK;
  void *__tmp__HVGK,*__tmp__IVGK;
  __STRING_CST *Self__X42P;
  __PROTOTYPE_CST *Self__Y42P;
  __INTEGER_CST *Self__Z42P;
  __REAL_CST *Self__142P;
  __CHARACTER_CST *Self__342P;
  __IS_EXPANDED *Self__442P;
  void *__tmp__LVGK;
  __READ_SLOT *__tmp__MVGK,*result__DVGK;
  __tmp__FVGK=Self__BVGK->slot__EVGK;
  __tmp__HVGK=Self__BVGK->receiver__I1TI;
  switch (((struct ___OBJ *)__tmp__HVGK)->__id) {
  case __LIST__: {
    __tmp__IVGK=my_copy__2HYM(__tmp__HVGK);
  } break;
  case __STRING_CST__: {
    Self__X42P=((__STRING_CST *)__tmp__HVGK);
    __tmp__IVGK=create__text__AUMH(Self__X42P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X42P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__IVGK=my_copy__2K2H(__tmp__HVGK);
  } break;
  case __PROTOTYPE_CST__: {
    Self__Y42P=((__PROTOTYPE_CST *)__tmp__HVGK);
    __tmp__IVGK=create__type__CLQC(Self__Y42P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Y42P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__Z42P=((__INTEGER_CST *)__tmp__HVGK);
    __tmp__IVGK=create__value__type__DNQC(Self__Z42P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z42P->value__PAZD,Self__Z42P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__IVGK=my_copy__OAFJ(__tmp__HVGK);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IVGK=my_copy__KM2H(__tmp__HVGK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IVGK=my_copy__DN2H(__tmp__HVGK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IVGK=my_copy__QN2H(__tmp__HVGK);
  } break;
  case __REAL_CST__: {
    Self__142P=((__REAL_CST *)__tmp__HVGK);
    __tmp__IVGK=create__value__type__1SMH(Self__142P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__142P->value__5N2H,Self__142P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__342P=((__CHARACTER_CST *)__tmp__HVGK);
    __tmp__IVGK=create__char__WTMH(Self__342P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__342P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__442P=((__IS_EXPANDED *)__tmp__HVGK);
    __tmp__IVGK=create__receiver__WRWH(Self__442P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__442P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IVGK=my_copy__TO2H(__tmp__HVGK);
  } break;
  case __EXPR_SUP__: {
    __tmp__IVGK=my_copy__2O2H(__tmp__HVGK);
  } break;
  case __EXPR_SUB__: {
    __tmp__IVGK=my_copy__HP2H(__tmp__HVGK);
  } break;
  case __EXPR_MUL__: {
    __tmp__IVGK=my_copy__TP2H(__tmp__HVGK);
  } break;
  case __EXPR_DIV__: {
    __tmp__IVGK=my_copy__4P2H(__tmp__HVGK);
  } break;
  case __EXPR_AND__: {
    __tmp__IVGK=my_copy__JQ2H(__tmp__HVGK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IVGK=my_copy__UQ2H(__tmp__HVGK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IVGK=my_copy__5Q2H(__tmp__HVGK);
  } break;
  case __PUT_TO__: {
    __tmp__IVGK=my_copy__KR2H(__tmp__HVGK);
  } break;
  case __ITEM__: {
    __tmp__IVGK=my_copy__1R2H(__tmp__HVGK);
  } break;
  case __SIZE_OF__: {
    __tmp__IVGK=my_copy__HS2H(__tmp__HVGK);
  } break;
  case __CAST__: {
    __tmp__IVGK=my_copy__QS2H(__tmp__HVGK);
  } break;
  case __CALL_SLOT__: {
    __tmp__IVGK=my_copy__PIYM(__tmp__HVGK);
  } break;
  case __READ_SLOT__: {
    __tmp__IVGK=my_copy__AVGK(__tmp__HVGK);
  } break;
  case __READ_GLOBAL__: {
    __tmp__IVGK=my_copy__NVGK(__tmp__HVGK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IVGK=my_copy__RFCN(__tmp__HVGK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IVGK=my_copy__JMEO(__tmp__HVGK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IVGK=my_copy__RTJO(__tmp__HVGK);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IVGK=my_copy__WMEO(__tmp__HVGK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IVGK=my_copy__3TJO(__tmp__HVGK);
  } break;
  case __EXPR_NEG__: {
    __tmp__IVGK=my_copy__YEJM(__tmp__HVGK);
  } break;
  case __EXPR_ADD__: {
    __tmp__IVGK=my_copy__YRLL(__tmp__HVGK);
  } break;
  case __EXPR_NOT__: {
    __tmp__IVGK=my_copy__GLYM(__tmp__HVGK);
  } break;
  case __EXPR_MOD__: {
    __tmp__IVGK=my_copy__BNEO(__tmp__HVGK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IVGK=my_copy__M3DP(__tmp__HVGK);
  } break;
  case __EXPR_INF__: {
    __tmp__IVGK=my_copy__PBSN(__tmp__HVGK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IVGK=my_copy__0BSN(__tmp__HVGK);
  } break;
  case __EXPR_OR__: {
    __tmp__IVGK=my_copy__ZOPN(__tmp__HVGK);
  } break;
  case __EXPR_XOR__: {
    __tmp__IVGK=my_copy__CYSO(__tmp__HVGK);
  } break;
  };
  __tmp__LVGK=read__with__FYKJ(__tmp__FVGK,__tmp__IVGK);
  if (__tmp__LVGK==NULL) {
    __tmp__MVGK=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__LVGK)->__id) {
    case __READ_SLOT__: {
      __tmp__MVGK=((__READ_SLOT *)__tmp__LVGK);
    } break;
    case __READ_GLOBAL__: {
      __tmp__MVGK=NULL;
    } break;
    }
  };
  result__DVGK=__tmp__MVGK;
  return(__tmp__MVGK);
}

static __READ_GLOBAL* my_copy__NVGK(__READ_GLOBAL *Self__OVGK)
// ({READ_GLOBAL}) With resultNo recursive, No inlinable.
{
  void *__tmp__UVGK;
  __READ_GLOBAL *__tmp__VVGK,*result__QVGK;
  __tmp__UVGK=read__with__FYKJ(((__SLOT_DATA *)Self__OVGK->global__RHJK),NULL);
  if (__tmp__UVGK==NULL) {
    __tmp__VVGK=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__UVGK)->__id) {
    case __READ_SLOT__: {
      __tmp__VVGK=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VVGK=((__READ_GLOBAL *)__tmp__UVGK);
    } break;
    }
  };
  result__QVGK=__tmp__VVGK;
  return(__tmp__VVGK);
}

static __EXPR_NOT_LOGIC* my_copy__RFCN(__EXPR_NOT_LOGIC *Self__SFCN)
// ({EXPR_NOT_LOGIC}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__UFCN;
  void *__tmp__VFCN,*__tmp__WFCN;
  __STRING_CST *Self__542P;
  __PROTOTYPE_CST *Self__A52P;
  __INTEGER_CST *Self__B52P;
  __REAL_CST *Self__D52P;
  __CHARACTER_CST *Self__F52P;
  __IS_EXPANDED *Self__G52P;
  __tmp__UFCN=Self__SFCN->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__VFCN=Self__SFCN->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__VFCN)->__id) {
  case __LIST__: {
    __tmp__WFCN=my_copy__2HYM(__tmp__VFCN);
  } break;
  case __STRING_CST__: {
    Self__542P=((__STRING_CST *)__tmp__VFCN);
    __tmp__WFCN=create__text__AUMH(Self__542P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__542P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__WFCN=my_copy__2K2H(__tmp__VFCN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__A52P=((__PROTOTYPE_CST *)__tmp__VFCN);
    __tmp__WFCN=create__type__CLQC(Self__A52P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__A52P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__B52P=((__INTEGER_CST *)__tmp__VFCN);
    __tmp__WFCN=create__value__type__DNQC(Self__B52P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__B52P->value__PAZD,Self__B52P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__WFCN=my_copy__OAFJ(__tmp__VFCN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WFCN=my_copy__KM2H(__tmp__VFCN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WFCN=my_copy__DN2H(__tmp__VFCN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WFCN=my_copy__QN2H(__tmp__VFCN);
  } break;
  case __REAL_CST__: {
    Self__D52P=((__REAL_CST *)__tmp__VFCN);
    __tmp__WFCN=create__value__type__1SMH(Self__D52P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__D52P->value__5N2H,Self__D52P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__F52P=((__CHARACTER_CST *)__tmp__VFCN);
    __tmp__WFCN=create__char__WTMH(Self__F52P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__F52P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__G52P=((__IS_EXPANDED *)__tmp__VFCN);
    __tmp__WFCN=create__receiver__WRWH(Self__G52P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__G52P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WFCN=my_copy__TO2H(__tmp__VFCN);
  } break;
  case __EXPR_SUP__: {
    __tmp__WFCN=my_copy__2O2H(__tmp__VFCN);
  } break;
  case __EXPR_SUB__: {
    __tmp__WFCN=my_copy__HP2H(__tmp__VFCN);
  } break;
  case __EXPR_MUL__: {
    __tmp__WFCN=my_copy__TP2H(__tmp__VFCN);
  } break;
  case __EXPR_DIV__: {
    __tmp__WFCN=my_copy__4P2H(__tmp__VFCN);
  } break;
  case __EXPR_AND__: {
    __tmp__WFCN=my_copy__JQ2H(__tmp__VFCN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WFCN=my_copy__UQ2H(__tmp__VFCN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WFCN=my_copy__5Q2H(__tmp__VFCN);
  } break;
  case __PUT_TO__: {
    __tmp__WFCN=my_copy__KR2H(__tmp__VFCN);
  } break;
  case __ITEM__: {
    __tmp__WFCN=my_copy__1R2H(__tmp__VFCN);
  } break;
  case __SIZE_OF__: {
    __tmp__WFCN=my_copy__HS2H(__tmp__VFCN);
  } break;
  case __CAST__: {
    __tmp__WFCN=my_copy__QS2H(__tmp__VFCN);
  } break;
  case __CALL_SLOT__: {
    __tmp__WFCN=my_copy__PIYM(__tmp__VFCN);
  } break;
  case __READ_SLOT__: {
    __tmp__WFCN=my_copy__AVGK(__tmp__VFCN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__WFCN=my_copy__NVGK(__tmp__VFCN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WFCN=my_copy__RFCN(__tmp__VFCN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WFCN=my_copy__JMEO(__tmp__VFCN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WFCN=my_copy__RTJO(__tmp__VFCN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WFCN=my_copy__WMEO(__tmp__VFCN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WFCN=my_copy__3TJO(__tmp__VFCN);
  } break;
  case __EXPR_NEG__: {
    __tmp__WFCN=my_copy__YEJM(__tmp__VFCN);
  } break;
  case __EXPR_ADD__: {
    __tmp__WFCN=my_copy__YRLL(__tmp__VFCN);
  } break;
  case __EXPR_NOT__: {
    __tmp__WFCN=my_copy__GLYM(__tmp__VFCN);
  } break;
  case __EXPR_MOD__: {
    __tmp__WFCN=my_copy__BNEO(__tmp__VFCN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WFCN=my_copy__M3DP(__tmp__VFCN);
  } break;
  case __EXPR_INF__: {
    __tmp__WFCN=my_copy__PBSN(__tmp__VFCN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WFCN=my_copy__0BSN(__tmp__VFCN);
  } break;
  case __EXPR_OR__: {
    __tmp__WFCN=my_copy__ZOPN(__tmp__VFCN);
  } break;
  case __EXPR_XOR__: {
    __tmp__WFCN=my_copy__CYSO(__tmp__VFCN);
  } break;
  };
  return(create__with__BQNM(__tmp__UFCN,__tmp__WFCN));
}

static __EXPR_OR_LOGIC* my_copy__JMEO(__EXPR_OR_LOGIC *Self__KMEO)
// ({EXPR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__MMEO;
  void *__tmp__OMEO,*__tmp__PMEO,*__tmp__SMEO,*__tmp__TMEO;
  __STRING_CST *Self__H52P,*Self__P52P;
  __PROTOTYPE_CST *Self__I52P,*Self__Q52P;
  __INTEGER_CST *Self__J52P,*Self__R52P;
  __REAL_CST *Self__L52P,*Self__T52P;
  __CHARACTER_CST *Self__N52P,*Self__V52P;
  __IS_EXPANDED *Self__O52P,*Self__W52P;
  __tmp__MMEO=Self__KMEO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__OMEO=Self__KMEO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__OMEO)->__id) {
  case __LIST__: {
    __tmp__PMEO=my_copy__2HYM(__tmp__OMEO);
  } break;
  case __STRING_CST__: {
    Self__H52P=((__STRING_CST *)__tmp__OMEO);
    __tmp__PMEO=create__text__AUMH(Self__H52P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__H52P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__PMEO=my_copy__2K2H(__tmp__OMEO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__I52P=((__PROTOTYPE_CST *)__tmp__OMEO);
    __tmp__PMEO=create__type__CLQC(Self__I52P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__I52P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__J52P=((__INTEGER_CST *)__tmp__OMEO);
    __tmp__PMEO=create__value__type__DNQC(Self__J52P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__J52P->value__PAZD,Self__J52P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__PMEO=my_copy__OAFJ(__tmp__OMEO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PMEO=my_copy__KM2H(__tmp__OMEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PMEO=my_copy__DN2H(__tmp__OMEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PMEO=my_copy__QN2H(__tmp__OMEO);
  } break;
  case __REAL_CST__: {
    Self__L52P=((__REAL_CST *)__tmp__OMEO);
    __tmp__PMEO=create__value__type__1SMH(Self__L52P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__L52P->value__5N2H,Self__L52P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__N52P=((__CHARACTER_CST *)__tmp__OMEO);
    __tmp__PMEO=create__char__WTMH(Self__N52P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N52P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__O52P=((__IS_EXPANDED *)__tmp__OMEO);
    __tmp__PMEO=create__receiver__WRWH(Self__O52P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__O52P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__PMEO=my_copy__TO2H(__tmp__OMEO);
  } break;
  case __EXPR_SUP__: {
    __tmp__PMEO=my_copy__2O2H(__tmp__OMEO);
  } break;
  case __EXPR_SUB__: {
    __tmp__PMEO=my_copy__HP2H(__tmp__OMEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__PMEO=my_copy__TP2H(__tmp__OMEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__PMEO=my_copy__4P2H(__tmp__OMEO);
  } break;
  case __EXPR_AND__: {
    __tmp__PMEO=my_copy__JQ2H(__tmp__OMEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PMEO=my_copy__UQ2H(__tmp__OMEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PMEO=my_copy__5Q2H(__tmp__OMEO);
  } break;
  case __PUT_TO__: {
    __tmp__PMEO=my_copy__KR2H(__tmp__OMEO);
  } break;
  case __ITEM__: {
    __tmp__PMEO=my_copy__1R2H(__tmp__OMEO);
  } break;
  case __SIZE_OF__: {
    __tmp__PMEO=my_copy__HS2H(__tmp__OMEO);
  } break;
  case __CAST__: {
    __tmp__PMEO=my_copy__QS2H(__tmp__OMEO);
  } break;
  case __CALL_SLOT__: {
    __tmp__PMEO=my_copy__PIYM(__tmp__OMEO);
  } break;
  case __READ_SLOT__: {
    __tmp__PMEO=my_copy__AVGK(__tmp__OMEO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__PMEO=my_copy__NVGK(__tmp__OMEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PMEO=my_copy__RFCN(__tmp__OMEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PMEO=my_copy__JMEO(__tmp__OMEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PMEO=my_copy__RTJO(__tmp__OMEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PMEO=my_copy__WMEO(__tmp__OMEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PMEO=my_copy__3TJO(__tmp__OMEO);
  } break;
  case __EXPR_NEG__: {
    __tmp__PMEO=my_copy__YEJM(__tmp__OMEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__PMEO=my_copy__YRLL(__tmp__OMEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__PMEO=my_copy__GLYM(__tmp__OMEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__PMEO=my_copy__BNEO(__tmp__OMEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PMEO=my_copy__M3DP(__tmp__OMEO);
  } break;
  case __EXPR_INF__: {
    __tmp__PMEO=my_copy__PBSN(__tmp__OMEO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PMEO=my_copy__0BSN(__tmp__OMEO);
  } break;
  case __EXPR_OR__: {
    __tmp__PMEO=my_copy__ZOPN(__tmp__OMEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__PMEO=my_copy__CYSO(__tmp__OMEO);
  } break;
  };
  __tmp__SMEO=Self__KMEO->parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__SMEO)->__id) {
  case __LIST__: {
    __tmp__TMEO=my_copy__2HYM(__tmp__SMEO);
  } break;
  case __STRING_CST__: {
    Self__P52P=((__STRING_CST *)__tmp__SMEO);
    __tmp__TMEO=create__text__AUMH(Self__P52P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__P52P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__TMEO=my_copy__2K2H(__tmp__SMEO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__Q52P=((__PROTOTYPE_CST *)__tmp__SMEO);
    __tmp__TMEO=create__type__CLQC(Self__Q52P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Q52P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__R52P=((__INTEGER_CST *)__tmp__SMEO);
    __tmp__TMEO=create__value__type__DNQC(Self__R52P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R52P->value__PAZD,Self__R52P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__TMEO=my_copy__OAFJ(__tmp__SMEO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TMEO=my_copy__KM2H(__tmp__SMEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TMEO=my_copy__DN2H(__tmp__SMEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TMEO=my_copy__QN2H(__tmp__SMEO);
  } break;
  case __REAL_CST__: {
    Self__T52P=((__REAL_CST *)__tmp__SMEO);
    __tmp__TMEO=create__value__type__1SMH(Self__T52P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T52P->value__5N2H,Self__T52P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__V52P=((__CHARACTER_CST *)__tmp__SMEO);
    __tmp__TMEO=create__char__WTMH(Self__V52P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__V52P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__W52P=((__IS_EXPANDED *)__tmp__SMEO);
    __tmp__TMEO=create__receiver__WRWH(Self__W52P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__W52P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TMEO=my_copy__TO2H(__tmp__SMEO);
  } break;
  case __EXPR_SUP__: {
    __tmp__TMEO=my_copy__2O2H(__tmp__SMEO);
  } break;
  case __EXPR_SUB__: {
    __tmp__TMEO=my_copy__HP2H(__tmp__SMEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__TMEO=my_copy__TP2H(__tmp__SMEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__TMEO=my_copy__4P2H(__tmp__SMEO);
  } break;
  case __EXPR_AND__: {
    __tmp__TMEO=my_copy__JQ2H(__tmp__SMEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TMEO=my_copy__UQ2H(__tmp__SMEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TMEO=my_copy__5Q2H(__tmp__SMEO);
  } break;
  case __PUT_TO__: {
    __tmp__TMEO=my_copy__KR2H(__tmp__SMEO);
  } break;
  case __ITEM__: {
    __tmp__TMEO=my_copy__1R2H(__tmp__SMEO);
  } break;
  case __SIZE_OF__: {
    __tmp__TMEO=my_copy__HS2H(__tmp__SMEO);
  } break;
  case __CAST__: {
    __tmp__TMEO=my_copy__QS2H(__tmp__SMEO);
  } break;
  case __CALL_SLOT__: {
    __tmp__TMEO=my_copy__PIYM(__tmp__SMEO);
  } break;
  case __READ_SLOT__: {
    __tmp__TMEO=my_copy__AVGK(__tmp__SMEO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__TMEO=my_copy__NVGK(__tmp__SMEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TMEO=my_copy__RFCN(__tmp__SMEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TMEO=my_copy__JMEO(__tmp__SMEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TMEO=my_copy__RTJO(__tmp__SMEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TMEO=my_copy__WMEO(__tmp__SMEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TMEO=my_copy__3TJO(__tmp__SMEO);
  } break;
  case __EXPR_NEG__: {
    __tmp__TMEO=my_copy__YEJM(__tmp__SMEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__TMEO=my_copy__YRLL(__tmp__SMEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__TMEO=my_copy__GLYM(__tmp__SMEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__TMEO=my_copy__BNEO(__tmp__SMEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TMEO=my_copy__M3DP(__tmp__SMEO);
  } break;
  case __EXPR_INF__: {
    __tmp__TMEO=my_copy__PBSN(__tmp__SMEO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TMEO=my_copy__0BSN(__tmp__SMEO);
  } break;
  case __EXPR_OR__: {
    __tmp__TMEO=my_copy__ZOPN(__tmp__SMEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__TMEO=my_copy__CYSO(__tmp__SMEO);
  } break;
  };
  return(create__with__and__2TDO(__tmp__MMEO,__tmp__PMEO,__tmp__TMEO));
}

static __EXPR_OR_OR_LOGIC* my_copy__RTJO(__EXPR_OR_OR_LOGIC *Self__STJO)
// ({EXPR_OR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__UTJO;
  void *__tmp__VTJO,*__tmp__WTJO,*__tmp__YTJO,*__tmp__ZTJO;
  __STRING_CST *Self__X52P,*Self__552P;
  __PROTOTYPE_CST *Self__Y52P,*Self__AA3P;
  __INTEGER_CST *Self__Z52P,*Self__BA3P;
  __REAL_CST *Self__152P,*Self__DA3P;
  __CHARACTER_CST *Self__352P,*Self__FA3P;
  __IS_EXPANDED *Self__452P,*Self__GA3P;
  __tmp__UTJO=Self__STJO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__VTJO=Self__STJO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__VTJO)->__id) {
  case __LIST__: {
    __tmp__WTJO=my_copy__2HYM(__tmp__VTJO);
  } break;
  case __STRING_CST__: {
    Self__X52P=((__STRING_CST *)__tmp__VTJO);
    __tmp__WTJO=create__text__AUMH(Self__X52P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__X52P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__WTJO=my_copy__2K2H(__tmp__VTJO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__Y52P=((__PROTOTYPE_CST *)__tmp__VTJO);
    __tmp__WTJO=create__type__CLQC(Self__Y52P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Y52P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__Z52P=((__INTEGER_CST *)__tmp__VTJO);
    __tmp__WTJO=create__value__type__DNQC(Self__Z52P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__Z52P->value__PAZD,Self__Z52P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__WTJO=my_copy__OAFJ(__tmp__VTJO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WTJO=my_copy__KM2H(__tmp__VTJO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WTJO=my_copy__DN2H(__tmp__VTJO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WTJO=my_copy__QN2H(__tmp__VTJO);
  } break;
  case __REAL_CST__: {
    Self__152P=((__REAL_CST *)__tmp__VTJO);
    __tmp__WTJO=create__value__type__1SMH(Self__152P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__152P->value__5N2H,Self__152P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__352P=((__CHARACTER_CST *)__tmp__VTJO);
    __tmp__WTJO=create__char__WTMH(Self__352P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__352P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__452P=((__IS_EXPANDED *)__tmp__VTJO);
    __tmp__WTJO=create__receiver__WRWH(Self__452P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__452P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WTJO=my_copy__TO2H(__tmp__VTJO);
  } break;
  case __EXPR_SUP__: {
    __tmp__WTJO=my_copy__2O2H(__tmp__VTJO);
  } break;
  case __EXPR_SUB__: {
    __tmp__WTJO=my_copy__HP2H(__tmp__VTJO);
  } break;
  case __EXPR_MUL__: {
    __tmp__WTJO=my_copy__TP2H(__tmp__VTJO);
  } break;
  case __EXPR_DIV__: {
    __tmp__WTJO=my_copy__4P2H(__tmp__VTJO);
  } break;
  case __EXPR_AND__: {
    __tmp__WTJO=my_copy__JQ2H(__tmp__VTJO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WTJO=my_copy__UQ2H(__tmp__VTJO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WTJO=my_copy__5Q2H(__tmp__VTJO);
  } break;
  case __PUT_TO__: {
    __tmp__WTJO=my_copy__KR2H(__tmp__VTJO);
  } break;
  case __ITEM__: {
    __tmp__WTJO=my_copy__1R2H(__tmp__VTJO);
  } break;
  case __SIZE_OF__: {
    __tmp__WTJO=my_copy__HS2H(__tmp__VTJO);
  } break;
  case __CAST__: {
    __tmp__WTJO=my_copy__QS2H(__tmp__VTJO);
  } break;
  case __CALL_SLOT__: {
    __tmp__WTJO=my_copy__PIYM(__tmp__VTJO);
  } break;
  case __READ_SLOT__: {
    __tmp__WTJO=my_copy__AVGK(__tmp__VTJO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__WTJO=my_copy__NVGK(__tmp__VTJO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WTJO=my_copy__RFCN(__tmp__VTJO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WTJO=my_copy__JMEO(__tmp__VTJO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WTJO=my_copy__RTJO(__tmp__VTJO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WTJO=my_copy__WMEO(__tmp__VTJO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WTJO=my_copy__3TJO(__tmp__VTJO);
  } break;
  case __EXPR_NEG__: {
    __tmp__WTJO=my_copy__YEJM(__tmp__VTJO);
  } break;
  case __EXPR_ADD__: {
    __tmp__WTJO=my_copy__YRLL(__tmp__VTJO);
  } break;
  case __EXPR_NOT__: {
    __tmp__WTJO=my_copy__GLYM(__tmp__VTJO);
  } break;
  case __EXPR_MOD__: {
    __tmp__WTJO=my_copy__BNEO(__tmp__VTJO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WTJO=my_copy__M3DP(__tmp__VTJO);
  } break;
  case __EXPR_INF__: {
    __tmp__WTJO=my_copy__PBSN(__tmp__VTJO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WTJO=my_copy__0BSN(__tmp__VTJO);
  } break;
  case __EXPR_OR__: {
    __tmp__WTJO=my_copy__ZOPN(__tmp__VTJO);
  } break;
  case __EXPR_XOR__: {
    __tmp__WTJO=my_copy__CYSO(__tmp__VTJO);
  } break;
  };
  __tmp__YTJO=Self__STJO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__YTJO)->__id) {
  case __LIST__: {
    __tmp__ZTJO=my_copy__2HYM(__tmp__YTJO);
  } break;
  case __STRING_CST__: {
    Self__552P=((__STRING_CST *)__tmp__YTJO);
    __tmp__ZTJO=create__text__AUMH(Self__552P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__552P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZTJO=my_copy__2K2H(__tmp__YTJO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__AA3P=((__PROTOTYPE_CST *)__tmp__YTJO);
    __tmp__ZTJO=create__type__CLQC(Self__AA3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AA3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__BA3P=((__INTEGER_CST *)__tmp__YTJO);
    __tmp__ZTJO=create__value__type__DNQC(Self__BA3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BA3P->value__PAZD,Self__BA3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__ZTJO=my_copy__OAFJ(__tmp__YTJO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZTJO=my_copy__KM2H(__tmp__YTJO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZTJO=my_copy__DN2H(__tmp__YTJO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZTJO=my_copy__QN2H(__tmp__YTJO);
  } break;
  case __REAL_CST__: {
    Self__DA3P=((__REAL_CST *)__tmp__YTJO);
    __tmp__ZTJO=create__value__type__1SMH(Self__DA3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DA3P->value__5N2H,Self__DA3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__FA3P=((__CHARACTER_CST *)__tmp__YTJO);
    __tmp__ZTJO=create__char__WTMH(Self__FA3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FA3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__GA3P=((__IS_EXPANDED *)__tmp__YTJO);
    __tmp__ZTJO=create__receiver__WRWH(Self__GA3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GA3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ZTJO=my_copy__TO2H(__tmp__YTJO);
  } break;
  case __EXPR_SUP__: {
    __tmp__ZTJO=my_copy__2O2H(__tmp__YTJO);
  } break;
  case __EXPR_SUB__: {
    __tmp__ZTJO=my_copy__HP2H(__tmp__YTJO);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZTJO=my_copy__TP2H(__tmp__YTJO);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZTJO=my_copy__4P2H(__tmp__YTJO);
  } break;
  case __EXPR_AND__: {
    __tmp__ZTJO=my_copy__JQ2H(__tmp__YTJO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZTJO=my_copy__UQ2H(__tmp__YTJO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZTJO=my_copy__5Q2H(__tmp__YTJO);
  } break;
  case __PUT_TO__: {
    __tmp__ZTJO=my_copy__KR2H(__tmp__YTJO);
  } break;
  case __ITEM__: {
    __tmp__ZTJO=my_copy__1R2H(__tmp__YTJO);
  } break;
  case __SIZE_OF__: {
    __tmp__ZTJO=my_copy__HS2H(__tmp__YTJO);
  } break;
  case __CAST__: {
    __tmp__ZTJO=my_copy__QS2H(__tmp__YTJO);
  } break;
  case __CALL_SLOT__: {
    __tmp__ZTJO=my_copy__PIYM(__tmp__YTJO);
  } break;
  case __READ_SLOT__: {
    __tmp__ZTJO=my_copy__AVGK(__tmp__YTJO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ZTJO=my_copy__NVGK(__tmp__YTJO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZTJO=my_copy__RFCN(__tmp__YTJO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZTJO=my_copy__JMEO(__tmp__YTJO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZTJO=my_copy__RTJO(__tmp__YTJO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZTJO=my_copy__WMEO(__tmp__YTJO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZTJO=my_copy__3TJO(__tmp__YTJO);
  } break;
  case __EXPR_NEG__: {
    __tmp__ZTJO=my_copy__YEJM(__tmp__YTJO);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZTJO=my_copy__YRLL(__tmp__YTJO);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZTJO=my_copy__GLYM(__tmp__YTJO);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZTJO=my_copy__BNEO(__tmp__YTJO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZTJO=my_copy__M3DP(__tmp__YTJO);
  } break;
  case __EXPR_INF__: {
    __tmp__ZTJO=my_copy__PBSN(__tmp__YTJO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZTJO=my_copy__0BSN(__tmp__YTJO);
  } break;
  case __EXPR_OR__: {
    __tmp__ZTJO=my_copy__ZOPN(__tmp__YTJO);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZTJO=my_copy__CYSO(__tmp__YTJO);
  } break;
  };
  return(create__with__and__0BIO(__tmp__UTJO,__tmp__WTJO,__tmp__ZTJO));
}

static __EXPR_AND_LOGIC* my_copy__WMEO(__EXPR_AND_LOGIC *Self__XMEO)
// ({EXPR_AND_LOGIC}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__ZMEO;
  void *__tmp__0MEO,*__tmp__1MEO,*__tmp__3MEO,*__tmp__4MEO;
  __STRING_CST *Self__HA3P,*Self__PA3P;
  __PROTOTYPE_CST *Self__IA3P,*Self__QA3P;
  __INTEGER_CST *Self__JA3P,*Self__RA3P;
  __REAL_CST *Self__LA3P,*Self__TA3P;
  __CHARACTER_CST *Self__NA3P,*Self__VA3P;
  __IS_EXPANDED *Self__OA3P,*Self__WA3P;
  __tmp__ZMEO=Self__XMEO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__0MEO=Self__XMEO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__0MEO)->__id) {
  case __LIST__: {
    __tmp__1MEO=my_copy__2HYM(__tmp__0MEO);
  } break;
  case __STRING_CST__: {
    Self__HA3P=((__STRING_CST *)__tmp__0MEO);
    __tmp__1MEO=create__text__AUMH(Self__HA3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HA3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__1MEO=my_copy__2K2H(__tmp__0MEO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__IA3P=((__PROTOTYPE_CST *)__tmp__0MEO);
    __tmp__1MEO=create__type__CLQC(Self__IA3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IA3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__JA3P=((__INTEGER_CST *)__tmp__0MEO);
    __tmp__1MEO=create__value__type__DNQC(Self__JA3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JA3P->value__PAZD,Self__JA3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__1MEO=my_copy__OAFJ(__tmp__0MEO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1MEO=my_copy__KM2H(__tmp__0MEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1MEO=my_copy__DN2H(__tmp__0MEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1MEO=my_copy__QN2H(__tmp__0MEO);
  } break;
  case __REAL_CST__: {
    Self__LA3P=((__REAL_CST *)__tmp__0MEO);
    __tmp__1MEO=create__value__type__1SMH(Self__LA3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LA3P->value__5N2H,Self__LA3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__NA3P=((__CHARACTER_CST *)__tmp__0MEO);
    __tmp__1MEO=create__char__WTMH(Self__NA3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NA3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__OA3P=((__IS_EXPANDED *)__tmp__0MEO);
    __tmp__1MEO=create__receiver__WRWH(Self__OA3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__OA3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1MEO=my_copy__TO2H(__tmp__0MEO);
  } break;
  case __EXPR_SUP__: {
    __tmp__1MEO=my_copy__2O2H(__tmp__0MEO);
  } break;
  case __EXPR_SUB__: {
    __tmp__1MEO=my_copy__HP2H(__tmp__0MEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__1MEO=my_copy__TP2H(__tmp__0MEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__1MEO=my_copy__4P2H(__tmp__0MEO);
  } break;
  case __EXPR_AND__: {
    __tmp__1MEO=my_copy__JQ2H(__tmp__0MEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1MEO=my_copy__UQ2H(__tmp__0MEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1MEO=my_copy__5Q2H(__tmp__0MEO);
  } break;
  case __PUT_TO__: {
    __tmp__1MEO=my_copy__KR2H(__tmp__0MEO);
  } break;
  case __ITEM__: {
    __tmp__1MEO=my_copy__1R2H(__tmp__0MEO);
  } break;
  case __SIZE_OF__: {
    __tmp__1MEO=my_copy__HS2H(__tmp__0MEO);
  } break;
  case __CAST__: {
    __tmp__1MEO=my_copy__QS2H(__tmp__0MEO);
  } break;
  case __CALL_SLOT__: {
    __tmp__1MEO=my_copy__PIYM(__tmp__0MEO);
  } break;
  case __READ_SLOT__: {
    __tmp__1MEO=my_copy__AVGK(__tmp__0MEO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__1MEO=my_copy__NVGK(__tmp__0MEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1MEO=my_copy__RFCN(__tmp__0MEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1MEO=my_copy__JMEO(__tmp__0MEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1MEO=my_copy__RTJO(__tmp__0MEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1MEO=my_copy__WMEO(__tmp__0MEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1MEO=my_copy__3TJO(__tmp__0MEO);
  } break;
  case __EXPR_NEG__: {
    __tmp__1MEO=my_copy__YEJM(__tmp__0MEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__1MEO=my_copy__YRLL(__tmp__0MEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__1MEO=my_copy__GLYM(__tmp__0MEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__1MEO=my_copy__BNEO(__tmp__0MEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1MEO=my_copy__M3DP(__tmp__0MEO);
  } break;
  case __EXPR_INF__: {
    __tmp__1MEO=my_copy__PBSN(__tmp__0MEO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1MEO=my_copy__0BSN(__tmp__0MEO);
  } break;
  case __EXPR_OR__: {
    __tmp__1MEO=my_copy__ZOPN(__tmp__0MEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__1MEO=my_copy__CYSO(__tmp__0MEO);
  } break;
  };
  __tmp__3MEO=Self__XMEO->parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__3MEO)->__id) {
  case __LIST__: {
    __tmp__4MEO=my_copy__2HYM(__tmp__3MEO);
  } break;
  case __STRING_CST__: {
    Self__PA3P=((__STRING_CST *)__tmp__3MEO);
    __tmp__4MEO=create__text__AUMH(Self__PA3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PA3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__4MEO=my_copy__2K2H(__tmp__3MEO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__QA3P=((__PROTOTYPE_CST *)__tmp__3MEO);
    __tmp__4MEO=create__type__CLQC(Self__QA3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QA3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__RA3P=((__INTEGER_CST *)__tmp__3MEO);
    __tmp__4MEO=create__value__type__DNQC(Self__RA3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RA3P->value__PAZD,Self__RA3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__4MEO=my_copy__OAFJ(__tmp__3MEO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4MEO=my_copy__KM2H(__tmp__3MEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4MEO=my_copy__DN2H(__tmp__3MEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4MEO=my_copy__QN2H(__tmp__3MEO);
  } break;
  case __REAL_CST__: {
    Self__TA3P=((__REAL_CST *)__tmp__3MEO);
    __tmp__4MEO=create__value__type__1SMH(Self__TA3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TA3P->value__5N2H,Self__TA3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__VA3P=((__CHARACTER_CST *)__tmp__3MEO);
    __tmp__4MEO=create__char__WTMH(Self__VA3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VA3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__WA3P=((__IS_EXPANDED *)__tmp__3MEO);
    __tmp__4MEO=create__receiver__WRWH(Self__WA3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WA3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__4MEO=my_copy__TO2H(__tmp__3MEO);
  } break;
  case __EXPR_SUP__: {
    __tmp__4MEO=my_copy__2O2H(__tmp__3MEO);
  } break;
  case __EXPR_SUB__: {
    __tmp__4MEO=my_copy__HP2H(__tmp__3MEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__4MEO=my_copy__TP2H(__tmp__3MEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__4MEO=my_copy__4P2H(__tmp__3MEO);
  } break;
  case __EXPR_AND__: {
    __tmp__4MEO=my_copy__JQ2H(__tmp__3MEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4MEO=my_copy__UQ2H(__tmp__3MEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4MEO=my_copy__5Q2H(__tmp__3MEO);
  } break;
  case __PUT_TO__: {
    __tmp__4MEO=my_copy__KR2H(__tmp__3MEO);
  } break;
  case __ITEM__: {
    __tmp__4MEO=my_copy__1R2H(__tmp__3MEO);
  } break;
  case __SIZE_OF__: {
    __tmp__4MEO=my_copy__HS2H(__tmp__3MEO);
  } break;
  case __CAST__: {
    __tmp__4MEO=my_copy__QS2H(__tmp__3MEO);
  } break;
  case __CALL_SLOT__: {
    __tmp__4MEO=my_copy__PIYM(__tmp__3MEO);
  } break;
  case __READ_SLOT__: {
    __tmp__4MEO=my_copy__AVGK(__tmp__3MEO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__4MEO=my_copy__NVGK(__tmp__3MEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4MEO=my_copy__RFCN(__tmp__3MEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4MEO=my_copy__JMEO(__tmp__3MEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4MEO=my_copy__RTJO(__tmp__3MEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4MEO=my_copy__WMEO(__tmp__3MEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4MEO=my_copy__3TJO(__tmp__3MEO);
  } break;
  case __EXPR_NEG__: {
    __tmp__4MEO=my_copy__YEJM(__tmp__3MEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__4MEO=my_copy__YRLL(__tmp__3MEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__4MEO=my_copy__GLYM(__tmp__3MEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__4MEO=my_copy__BNEO(__tmp__3MEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4MEO=my_copy__M3DP(__tmp__3MEO);
  } break;
  case __EXPR_INF__: {
    __tmp__4MEO=my_copy__PBSN(__tmp__3MEO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4MEO=my_copy__0BSN(__tmp__3MEO);
  } break;
  case __EXPR_OR__: {
    __tmp__4MEO=my_copy__ZOPN(__tmp__3MEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__4MEO=my_copy__CYSO(__tmp__3MEO);
  } break;
  };
  return(create__with__and__B3DO(__tmp__ZMEO,__tmp__1MEO,__tmp__4MEO));
}

static __EXPR_AND_AND_LOGIC* my_copy__3TJO(__EXPR_AND_AND_LOGIC *Self__4TJO)
// ({EXPR_AND_AND_LOGIC}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__AUJO;
  void *__tmp__BUJO,*__tmp__CUJO,*__tmp__EUJO,*__tmp__FUJO;
  __STRING_CST *Self__XA3P,*Self__5A3P;
  __PROTOTYPE_CST *Self__YA3P,*Self__AB3P;
  __INTEGER_CST *Self__ZA3P,*Self__BB3P;
  __REAL_CST *Self__1A3P,*Self__DB3P;
  __CHARACTER_CST *Self__3A3P,*Self__FB3P;
  __IS_EXPANDED *Self__4A3P,*Self__GB3P;
  __tmp__AUJO=Self__4TJO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__BUJO=Self__4TJO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__BUJO)->__id) {
  case __LIST__: {
    __tmp__CUJO=my_copy__2HYM(__tmp__BUJO);
  } break;
  case __STRING_CST__: {
    Self__XA3P=((__STRING_CST *)__tmp__BUJO);
    __tmp__CUJO=create__text__AUMH(Self__XA3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XA3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__CUJO=my_copy__2K2H(__tmp__BUJO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__YA3P=((__PROTOTYPE_CST *)__tmp__BUJO);
    __tmp__CUJO=create__type__CLQC(Self__YA3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YA3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__ZA3P=((__INTEGER_CST *)__tmp__BUJO);
    __tmp__CUJO=create__value__type__DNQC(Self__ZA3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZA3P->value__PAZD,Self__ZA3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__CUJO=my_copy__OAFJ(__tmp__BUJO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__CUJO=my_copy__KM2H(__tmp__BUJO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__CUJO=my_copy__DN2H(__tmp__BUJO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__CUJO=my_copy__QN2H(__tmp__BUJO);
  } break;
  case __REAL_CST__: {
    Self__1A3P=((__REAL_CST *)__tmp__BUJO);
    __tmp__CUJO=create__value__type__1SMH(Self__1A3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1A3P->value__5N2H,Self__1A3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__3A3P=((__CHARACTER_CST *)__tmp__BUJO);
    __tmp__CUJO=create__char__WTMH(Self__3A3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3A3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__4A3P=((__IS_EXPANDED *)__tmp__BUJO);
    __tmp__CUJO=create__receiver__WRWH(Self__4A3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4A3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__CUJO=my_copy__TO2H(__tmp__BUJO);
  } break;
  case __EXPR_SUP__: {
    __tmp__CUJO=my_copy__2O2H(__tmp__BUJO);
  } break;
  case __EXPR_SUB__: {
    __tmp__CUJO=my_copy__HP2H(__tmp__BUJO);
  } break;
  case __EXPR_MUL__: {
    __tmp__CUJO=my_copy__TP2H(__tmp__BUJO);
  } break;
  case __EXPR_DIV__: {
    __tmp__CUJO=my_copy__4P2H(__tmp__BUJO);
  } break;
  case __EXPR_AND__: {
    __tmp__CUJO=my_copy__JQ2H(__tmp__BUJO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__CUJO=my_copy__UQ2H(__tmp__BUJO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__CUJO=my_copy__5Q2H(__tmp__BUJO);
  } break;
  case __PUT_TO__: {
    __tmp__CUJO=my_copy__KR2H(__tmp__BUJO);
  } break;
  case __ITEM__: {
    __tmp__CUJO=my_copy__1R2H(__tmp__BUJO);
  } break;
  case __SIZE_OF__: {
    __tmp__CUJO=my_copy__HS2H(__tmp__BUJO);
  } break;
  case __CAST__: {
    __tmp__CUJO=my_copy__QS2H(__tmp__BUJO);
  } break;
  case __CALL_SLOT__: {
    __tmp__CUJO=my_copy__PIYM(__tmp__BUJO);
  } break;
  case __READ_SLOT__: {
    __tmp__CUJO=my_copy__AVGK(__tmp__BUJO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__CUJO=my_copy__NVGK(__tmp__BUJO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__CUJO=my_copy__RFCN(__tmp__BUJO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__CUJO=my_copy__JMEO(__tmp__BUJO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__CUJO=my_copy__RTJO(__tmp__BUJO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__CUJO=my_copy__WMEO(__tmp__BUJO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__CUJO=my_copy__3TJO(__tmp__BUJO);
  } break;
  case __EXPR_NEG__: {
    __tmp__CUJO=my_copy__YEJM(__tmp__BUJO);
  } break;
  case __EXPR_ADD__: {
    __tmp__CUJO=my_copy__YRLL(__tmp__BUJO);
  } break;
  case __EXPR_NOT__: {
    __tmp__CUJO=my_copy__GLYM(__tmp__BUJO);
  } break;
  case __EXPR_MOD__: {
    __tmp__CUJO=my_copy__BNEO(__tmp__BUJO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__CUJO=my_copy__M3DP(__tmp__BUJO);
  } break;
  case __EXPR_INF__: {
    __tmp__CUJO=my_copy__PBSN(__tmp__BUJO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__CUJO=my_copy__0BSN(__tmp__BUJO);
  } break;
  case __EXPR_OR__: {
    __tmp__CUJO=my_copy__ZOPN(__tmp__BUJO);
  } break;
  case __EXPR_XOR__: {
    __tmp__CUJO=my_copy__CYSO(__tmp__BUJO);
  } break;
  };
  __tmp__EUJO=Self__4TJO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__EUJO)->__id) {
  case __LIST__: {
    __tmp__FUJO=my_copy__2HYM(__tmp__EUJO);
  } break;
  case __STRING_CST__: {
    Self__5A3P=((__STRING_CST *)__tmp__EUJO);
    __tmp__FUJO=create__text__AUMH(Self__5A3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5A3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__FUJO=my_copy__2K2H(__tmp__EUJO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__AB3P=((__PROTOTYPE_CST *)__tmp__EUJO);
    __tmp__FUJO=create__type__CLQC(Self__AB3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AB3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__BB3P=((__INTEGER_CST *)__tmp__EUJO);
    __tmp__FUJO=create__value__type__DNQC(Self__BB3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BB3P->value__PAZD,Self__BB3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__FUJO=my_copy__OAFJ(__tmp__EUJO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FUJO=my_copy__KM2H(__tmp__EUJO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FUJO=my_copy__DN2H(__tmp__EUJO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FUJO=my_copy__QN2H(__tmp__EUJO);
  } break;
  case __REAL_CST__: {
    Self__DB3P=((__REAL_CST *)__tmp__EUJO);
    __tmp__FUJO=create__value__type__1SMH(Self__DB3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DB3P->value__5N2H,Self__DB3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__FB3P=((__CHARACTER_CST *)__tmp__EUJO);
    __tmp__FUJO=create__char__WTMH(Self__FB3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FB3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__GB3P=((__IS_EXPANDED *)__tmp__EUJO);
    __tmp__FUJO=create__receiver__WRWH(Self__GB3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GB3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FUJO=my_copy__TO2H(__tmp__EUJO);
  } break;
  case __EXPR_SUP__: {
    __tmp__FUJO=my_copy__2O2H(__tmp__EUJO);
  } break;
  case __EXPR_SUB__: {
    __tmp__FUJO=my_copy__HP2H(__tmp__EUJO);
  } break;
  case __EXPR_MUL__: {
    __tmp__FUJO=my_copy__TP2H(__tmp__EUJO);
  } break;
  case __EXPR_DIV__: {
    __tmp__FUJO=my_copy__4P2H(__tmp__EUJO);
  } break;
  case __EXPR_AND__: {
    __tmp__FUJO=my_copy__JQ2H(__tmp__EUJO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FUJO=my_copy__UQ2H(__tmp__EUJO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FUJO=my_copy__5Q2H(__tmp__EUJO);
  } break;
  case __PUT_TO__: {
    __tmp__FUJO=my_copy__KR2H(__tmp__EUJO);
  } break;
  case __ITEM__: {
    __tmp__FUJO=my_copy__1R2H(__tmp__EUJO);
  } break;
  case __SIZE_OF__: {
    __tmp__FUJO=my_copy__HS2H(__tmp__EUJO);
  } break;
  case __CAST__: {
    __tmp__FUJO=my_copy__QS2H(__tmp__EUJO);
  } break;
  case __CALL_SLOT__: {
    __tmp__FUJO=my_copy__PIYM(__tmp__EUJO);
  } break;
  case __READ_SLOT__: {
    __tmp__FUJO=my_copy__AVGK(__tmp__EUJO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__FUJO=my_copy__NVGK(__tmp__EUJO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FUJO=my_copy__RFCN(__tmp__EUJO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FUJO=my_copy__JMEO(__tmp__EUJO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FUJO=my_copy__RTJO(__tmp__EUJO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FUJO=my_copy__WMEO(__tmp__EUJO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FUJO=my_copy__3TJO(__tmp__EUJO);
  } break;
  case __EXPR_NEG__: {
    __tmp__FUJO=my_copy__YEJM(__tmp__EUJO);
  } break;
  case __EXPR_ADD__: {
    __tmp__FUJO=my_copy__YRLL(__tmp__EUJO);
  } break;
  case __EXPR_NOT__: {
    __tmp__FUJO=my_copy__GLYM(__tmp__EUJO);
  } break;
  case __EXPR_MOD__: {
    __tmp__FUJO=my_copy__BNEO(__tmp__EUJO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FUJO=my_copy__M3DP(__tmp__EUJO);
  } break;
  case __EXPR_INF__: {
    __tmp__FUJO=my_copy__PBSN(__tmp__EUJO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FUJO=my_copy__0BSN(__tmp__EUJO);
  } break;
  case __EXPR_OR__: {
    __tmp__FUJO=my_copy__ZOPN(__tmp__EUJO);
  } break;
  case __EXPR_XOR__: {
    __tmp__FUJO=my_copy__CYSO(__tmp__EUJO);
  } break;
  };
  return(create__with__and__MCIO(__tmp__AUJO,__tmp__CUJO,__tmp__FUJO));
}

static __EXPR_NEG* my_copy__YEJM(__EXPR_NEG *Self__ZEJM)
// ({EXPR_NEG}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__1EJM;
  void *__tmp__2EJM,*__tmp__3EJM;
  __STRING_CST *Self__HB3P;
  __PROTOTYPE_CST *Self__IB3P;
  __INTEGER_CST *Self__JB3P;
  __REAL_CST *Self__LB3P;
  __CHARACTER_CST *Self__NB3P;
  __IS_EXPANDED *Self__OB3P;
  __tmp__1EJM=Self__ZEJM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__2EJM=Self__ZEJM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__2EJM)->__id) {
  case __LIST__: {
    __tmp__3EJM=my_copy__2HYM(__tmp__2EJM);
  } break;
  case __STRING_CST__: {
    Self__HB3P=((__STRING_CST *)__tmp__2EJM);
    __tmp__3EJM=create__text__AUMH(Self__HB3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HB3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__3EJM=my_copy__2K2H(__tmp__2EJM);
  } break;
  case __PROTOTYPE_CST__: {
    Self__IB3P=((__PROTOTYPE_CST *)__tmp__2EJM);
    __tmp__3EJM=create__type__CLQC(Self__IB3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IB3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__JB3P=((__INTEGER_CST *)__tmp__2EJM);
    __tmp__3EJM=create__value__type__DNQC(Self__JB3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JB3P->value__PAZD,Self__JB3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__3EJM=my_copy__OAFJ(__tmp__2EJM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3EJM=my_copy__KM2H(__tmp__2EJM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3EJM=my_copy__DN2H(__tmp__2EJM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3EJM=my_copy__QN2H(__tmp__2EJM);
  } break;
  case __REAL_CST__: {
    Self__LB3P=((__REAL_CST *)__tmp__2EJM);
    __tmp__3EJM=create__value__type__1SMH(Self__LB3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LB3P->value__5N2H,Self__LB3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__NB3P=((__CHARACTER_CST *)__tmp__2EJM);
    __tmp__3EJM=create__char__WTMH(Self__NB3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NB3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__OB3P=((__IS_EXPANDED *)__tmp__2EJM);
    __tmp__3EJM=create__receiver__WRWH(Self__OB3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__OB3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3EJM=my_copy__TO2H(__tmp__2EJM);
  } break;
  case __EXPR_SUP__: {
    __tmp__3EJM=my_copy__2O2H(__tmp__2EJM);
  } break;
  case __EXPR_SUB__: {
    __tmp__3EJM=my_copy__HP2H(__tmp__2EJM);
  } break;
  case __EXPR_MUL__: {
    __tmp__3EJM=my_copy__TP2H(__tmp__2EJM);
  } break;
  case __EXPR_DIV__: {
    __tmp__3EJM=my_copy__4P2H(__tmp__2EJM);
  } break;
  case __EXPR_AND__: {
    __tmp__3EJM=my_copy__JQ2H(__tmp__2EJM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3EJM=my_copy__UQ2H(__tmp__2EJM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3EJM=my_copy__5Q2H(__tmp__2EJM);
  } break;
  case __PUT_TO__: {
    __tmp__3EJM=my_copy__KR2H(__tmp__2EJM);
  } break;
  case __ITEM__: {
    __tmp__3EJM=my_copy__1R2H(__tmp__2EJM);
  } break;
  case __SIZE_OF__: {
    __tmp__3EJM=my_copy__HS2H(__tmp__2EJM);
  } break;
  case __CAST__: {
    __tmp__3EJM=my_copy__QS2H(__tmp__2EJM);
  } break;
  case __CALL_SLOT__: {
    __tmp__3EJM=my_copy__PIYM(__tmp__2EJM);
  } break;
  case __READ_SLOT__: {
    __tmp__3EJM=my_copy__AVGK(__tmp__2EJM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__3EJM=my_copy__NVGK(__tmp__2EJM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3EJM=my_copy__RFCN(__tmp__2EJM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3EJM=my_copy__JMEO(__tmp__2EJM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3EJM=my_copy__RTJO(__tmp__2EJM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3EJM=my_copy__WMEO(__tmp__2EJM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3EJM=my_copy__3TJO(__tmp__2EJM);
  } break;
  case __EXPR_NEG__: {
    __tmp__3EJM=my_copy__YEJM(__tmp__2EJM);
  } break;
  case __EXPR_ADD__: {
    __tmp__3EJM=my_copy__YRLL(__tmp__2EJM);
  } break;
  case __EXPR_NOT__: {
    __tmp__3EJM=my_copy__GLYM(__tmp__2EJM);
  } break;
  case __EXPR_MOD__: {
    __tmp__3EJM=my_copy__BNEO(__tmp__2EJM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3EJM=my_copy__M3DP(__tmp__2EJM);
  } break;
  case __EXPR_INF__: {
    __tmp__3EJM=my_copy__PBSN(__tmp__2EJM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3EJM=my_copy__0BSN(__tmp__2EJM);
  } break;
  case __EXPR_OR__: {
    __tmp__3EJM=my_copy__ZOPN(__tmp__2EJM);
  } break;
  case __EXPR_XOR__: {
    __tmp__3EJM=my_copy__CYSO(__tmp__2EJM);
  } break;
  };
  return(create__with__2RBM(__tmp__1EJM,__tmp__3EJM));
}

static __EXPR_ADD* my_copy__YRLL(__EXPR_ADD *Self__ZRLL)
// ({EXPR_ADD}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__1RLL;
  void *__tmp__2RLL,*__tmp__3RLL,*__tmp__5RLL,*__tmp__ASLL;
  __STRING_CST *Self__PB3P,*Self__XB3P;
  __PROTOTYPE_CST *Self__QB3P,*Self__YB3P;
  __INTEGER_CST *Self__RB3P,*Self__ZB3P;
  __REAL_CST *Self__TB3P,*Self__1B3P;
  __CHARACTER_CST *Self__VB3P,*Self__3B3P;
  __IS_EXPANDED *Self__WB3P,*Self__4B3P;
  __tmp__1RLL=Self__ZRLL->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__2RLL=Self__ZRLL->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__2RLL)->__id) {
  case __LIST__: {
    __tmp__3RLL=my_copy__2HYM(__tmp__2RLL);
  } break;
  case __STRING_CST__: {
    Self__PB3P=((__STRING_CST *)__tmp__2RLL);
    __tmp__3RLL=create__text__AUMH(Self__PB3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PB3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__3RLL=my_copy__2K2H(__tmp__2RLL);
  } break;
  case __PROTOTYPE_CST__: {
    Self__QB3P=((__PROTOTYPE_CST *)__tmp__2RLL);
    __tmp__3RLL=create__type__CLQC(Self__QB3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QB3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__RB3P=((__INTEGER_CST *)__tmp__2RLL);
    __tmp__3RLL=create__value__type__DNQC(Self__RB3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RB3P->value__PAZD,Self__RB3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__3RLL=my_copy__OAFJ(__tmp__2RLL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3RLL=my_copy__KM2H(__tmp__2RLL);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3RLL=my_copy__DN2H(__tmp__2RLL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3RLL=my_copy__QN2H(__tmp__2RLL);
  } break;
  case __REAL_CST__: {
    Self__TB3P=((__REAL_CST *)__tmp__2RLL);
    __tmp__3RLL=create__value__type__1SMH(Self__TB3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TB3P->value__5N2H,Self__TB3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__VB3P=((__CHARACTER_CST *)__tmp__2RLL);
    __tmp__3RLL=create__char__WTMH(Self__VB3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VB3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__WB3P=((__IS_EXPANDED *)__tmp__2RLL);
    __tmp__3RLL=create__receiver__WRWH(Self__WB3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WB3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3RLL=my_copy__TO2H(__tmp__2RLL);
  } break;
  case __EXPR_SUP__: {
    __tmp__3RLL=my_copy__2O2H(__tmp__2RLL);
  } break;
  case __EXPR_SUB__: {
    __tmp__3RLL=my_copy__HP2H(__tmp__2RLL);
  } break;
  case __EXPR_MUL__: {
    __tmp__3RLL=my_copy__TP2H(__tmp__2RLL);
  } break;
  case __EXPR_DIV__: {
    __tmp__3RLL=my_copy__4P2H(__tmp__2RLL);
  } break;
  case __EXPR_AND__: {
    __tmp__3RLL=my_copy__JQ2H(__tmp__2RLL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3RLL=my_copy__UQ2H(__tmp__2RLL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3RLL=my_copy__5Q2H(__tmp__2RLL);
  } break;
  case __PUT_TO__: {
    __tmp__3RLL=my_copy__KR2H(__tmp__2RLL);
  } break;
  case __ITEM__: {
    __tmp__3RLL=my_copy__1R2H(__tmp__2RLL);
  } break;
  case __SIZE_OF__: {
    __tmp__3RLL=my_copy__HS2H(__tmp__2RLL);
  } break;
  case __CAST__: {
    __tmp__3RLL=my_copy__QS2H(__tmp__2RLL);
  } break;
  case __CALL_SLOT__: {
    __tmp__3RLL=my_copy__PIYM(__tmp__2RLL);
  } break;
  case __READ_SLOT__: {
    __tmp__3RLL=my_copy__AVGK(__tmp__2RLL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__3RLL=my_copy__NVGK(__tmp__2RLL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3RLL=my_copy__RFCN(__tmp__2RLL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3RLL=my_copy__JMEO(__tmp__2RLL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3RLL=my_copy__RTJO(__tmp__2RLL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3RLL=my_copy__WMEO(__tmp__2RLL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3RLL=my_copy__3TJO(__tmp__2RLL);
  } break;
  case __EXPR_NEG__: {
    __tmp__3RLL=my_copy__YEJM(__tmp__2RLL);
  } break;
  case __EXPR_ADD__: {
    __tmp__3RLL=my_copy__YRLL(__tmp__2RLL);
  } break;
  case __EXPR_NOT__: {
    __tmp__3RLL=my_copy__GLYM(__tmp__2RLL);
  } break;
  case __EXPR_MOD__: {
    __tmp__3RLL=my_copy__BNEO(__tmp__2RLL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3RLL=my_copy__M3DP(__tmp__2RLL);
  } break;
  case __EXPR_INF__: {
    __tmp__3RLL=my_copy__PBSN(__tmp__2RLL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3RLL=my_copy__0BSN(__tmp__2RLL);
  } break;
  case __EXPR_OR__: {
    __tmp__3RLL=my_copy__ZOPN(__tmp__2RLL);
  } break;
  case __EXPR_XOR__: {
    __tmp__3RLL=my_copy__CYSO(__tmp__2RLL);
  } break;
  };
  __tmp__5RLL=Self__ZRLL->parent_expr_binary__UZDL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__5RLL)->__id) {
  case __LIST__: {
    __tmp__ASLL=my_copy__2HYM(__tmp__5RLL);
  } break;
  case __STRING_CST__: {
    Self__XB3P=((__STRING_CST *)__tmp__5RLL);
    __tmp__ASLL=create__text__AUMH(Self__XB3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XB3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ASLL=my_copy__2K2H(__tmp__5RLL);
  } break;
  case __PROTOTYPE_CST__: {
    Self__YB3P=((__PROTOTYPE_CST *)__tmp__5RLL);
    __tmp__ASLL=create__type__CLQC(Self__YB3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YB3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__ZB3P=((__INTEGER_CST *)__tmp__5RLL);
    __tmp__ASLL=create__value__type__DNQC(Self__ZB3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZB3P->value__PAZD,Self__ZB3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__ASLL=my_copy__OAFJ(__tmp__5RLL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ASLL=my_copy__KM2H(__tmp__5RLL);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ASLL=my_copy__DN2H(__tmp__5RLL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ASLL=my_copy__QN2H(__tmp__5RLL);
  } break;
  case __REAL_CST__: {
    Self__1B3P=((__REAL_CST *)__tmp__5RLL);
    __tmp__ASLL=create__value__type__1SMH(Self__1B3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1B3P->value__5N2H,Self__1B3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__3B3P=((__CHARACTER_CST *)__tmp__5RLL);
    __tmp__ASLL=create__char__WTMH(Self__3B3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3B3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__4B3P=((__IS_EXPANDED *)__tmp__5RLL);
    __tmp__ASLL=create__receiver__WRWH(Self__4B3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4B3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ASLL=my_copy__TO2H(__tmp__5RLL);
  } break;
  case __EXPR_SUP__: {
    __tmp__ASLL=my_copy__2O2H(__tmp__5RLL);
  } break;
  case __EXPR_SUB__: {
    __tmp__ASLL=my_copy__HP2H(__tmp__5RLL);
  } break;
  case __EXPR_MUL__: {
    __tmp__ASLL=my_copy__TP2H(__tmp__5RLL);
  } break;
  case __EXPR_DIV__: {
    __tmp__ASLL=my_copy__4P2H(__tmp__5RLL);
  } break;
  case __EXPR_AND__: {
    __tmp__ASLL=my_copy__JQ2H(__tmp__5RLL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ASLL=my_copy__UQ2H(__tmp__5RLL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ASLL=my_copy__5Q2H(__tmp__5RLL);
  } break;
  case __PUT_TO__: {
    __tmp__ASLL=my_copy__KR2H(__tmp__5RLL);
  } break;
  case __ITEM__: {
    __tmp__ASLL=my_copy__1R2H(__tmp__5RLL);
  } break;
  case __SIZE_OF__: {
    __tmp__ASLL=my_copy__HS2H(__tmp__5RLL);
  } break;
  case __CAST__: {
    __tmp__ASLL=my_copy__QS2H(__tmp__5RLL);
  } break;
  case __CALL_SLOT__: {
    __tmp__ASLL=my_copy__PIYM(__tmp__5RLL);
  } break;
  case __READ_SLOT__: {
    __tmp__ASLL=my_copy__AVGK(__tmp__5RLL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ASLL=my_copy__NVGK(__tmp__5RLL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ASLL=my_copy__RFCN(__tmp__5RLL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ASLL=my_copy__JMEO(__tmp__5RLL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ASLL=my_copy__RTJO(__tmp__5RLL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ASLL=my_copy__WMEO(__tmp__5RLL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ASLL=my_copy__3TJO(__tmp__5RLL);
  } break;
  case __EXPR_NEG__: {
    __tmp__ASLL=my_copy__YEJM(__tmp__5RLL);
  } break;
  case __EXPR_ADD__: {
    __tmp__ASLL=my_copy__YRLL(__tmp__5RLL);
  } break;
  case __EXPR_NOT__: {
    __tmp__ASLL=my_copy__GLYM(__tmp__5RLL);
  } break;
  case __EXPR_MOD__: {
    __tmp__ASLL=my_copy__BNEO(__tmp__5RLL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ASLL=my_copy__M3DP(__tmp__5RLL);
  } break;
  case __EXPR_INF__: {
    __tmp__ASLL=my_copy__PBSN(__tmp__5RLL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ASLL=my_copy__0BSN(__tmp__5RLL);
  } break;
  case __EXPR_OR__: {
    __tmp__ASLL=my_copy__ZOPN(__tmp__5RLL);
  } break;
  case __EXPR_XOR__: {
    __tmp__ASLL=my_copy__CYSO(__tmp__5RLL);
  } break;
  };
  return(create__with__and__TUHL(__tmp__1RLL,__tmp__3RLL,__tmp__ASLL));
}

static __EXPR_NOT* my_copy__GLYM(__EXPR_NOT *Self__HLYM)
// ({EXPR_NOT}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__JLYM;
  void *__tmp__KLYM,*__tmp__LLYM;
  __STRING_CST *Self__5B3P;
  __PROTOTYPE_CST *Self__AC3P;
  __INTEGER_CST *Self__BC3P;
  __REAL_CST *Self__DC3P;
  __CHARACTER_CST *Self__FC3P;
  __IS_EXPANDED *Self__GC3P;
  __tmp__JLYM=Self__HLYM->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__KLYM=Self__HLYM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__KLYM)->__id) {
  case __LIST__: {
    __tmp__LLYM=my_copy__2HYM(__tmp__KLYM);
  } break;
  case __STRING_CST__: {
    Self__5B3P=((__STRING_CST *)__tmp__KLYM);
    __tmp__LLYM=create__text__AUMH(Self__5B3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5B3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__LLYM=my_copy__2K2H(__tmp__KLYM);
  } break;
  case __PROTOTYPE_CST__: {
    Self__AC3P=((__PROTOTYPE_CST *)__tmp__KLYM);
    __tmp__LLYM=create__type__CLQC(Self__AC3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AC3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__BC3P=((__INTEGER_CST *)__tmp__KLYM);
    __tmp__LLYM=create__value__type__DNQC(Self__BC3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BC3P->value__PAZD,Self__BC3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__LLYM=my_copy__OAFJ(__tmp__KLYM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__LLYM=my_copy__KM2H(__tmp__KLYM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__LLYM=my_copy__DN2H(__tmp__KLYM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__LLYM=my_copy__QN2H(__tmp__KLYM);
  } break;
  case __REAL_CST__: {
    Self__DC3P=((__REAL_CST *)__tmp__KLYM);
    __tmp__LLYM=create__value__type__1SMH(Self__DC3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DC3P->value__5N2H,Self__DC3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__FC3P=((__CHARACTER_CST *)__tmp__KLYM);
    __tmp__LLYM=create__char__WTMH(Self__FC3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FC3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__GC3P=((__IS_EXPANDED *)__tmp__KLYM);
    __tmp__LLYM=create__receiver__WRWH(Self__GC3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GC3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__LLYM=my_copy__TO2H(__tmp__KLYM);
  } break;
  case __EXPR_SUP__: {
    __tmp__LLYM=my_copy__2O2H(__tmp__KLYM);
  } break;
  case __EXPR_SUB__: {
    __tmp__LLYM=my_copy__HP2H(__tmp__KLYM);
  } break;
  case __EXPR_MUL__: {
    __tmp__LLYM=my_copy__TP2H(__tmp__KLYM);
  } break;
  case __EXPR_DIV__: {
    __tmp__LLYM=my_copy__4P2H(__tmp__KLYM);
  } break;
  case __EXPR_AND__: {
    __tmp__LLYM=my_copy__JQ2H(__tmp__KLYM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__LLYM=my_copy__UQ2H(__tmp__KLYM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__LLYM=my_copy__5Q2H(__tmp__KLYM);
  } break;
  case __PUT_TO__: {
    __tmp__LLYM=my_copy__KR2H(__tmp__KLYM);
  } break;
  case __ITEM__: {
    __tmp__LLYM=my_copy__1R2H(__tmp__KLYM);
  } break;
  case __SIZE_OF__: {
    __tmp__LLYM=my_copy__HS2H(__tmp__KLYM);
  } break;
  case __CAST__: {
    __tmp__LLYM=my_copy__QS2H(__tmp__KLYM);
  } break;
  case __CALL_SLOT__: {
    __tmp__LLYM=my_copy__PIYM(__tmp__KLYM);
  } break;
  case __READ_SLOT__: {
    __tmp__LLYM=my_copy__AVGK(__tmp__KLYM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__LLYM=my_copy__NVGK(__tmp__KLYM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__LLYM=my_copy__RFCN(__tmp__KLYM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__LLYM=my_copy__JMEO(__tmp__KLYM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__LLYM=my_copy__RTJO(__tmp__KLYM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__LLYM=my_copy__WMEO(__tmp__KLYM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__LLYM=my_copy__3TJO(__tmp__KLYM);
  } break;
  case __EXPR_NEG__: {
    __tmp__LLYM=my_copy__YEJM(__tmp__KLYM);
  } break;
  case __EXPR_ADD__: {
    __tmp__LLYM=my_copy__YRLL(__tmp__KLYM);
  } break;
  case __EXPR_NOT__: {
    __tmp__LLYM=my_copy__GLYM(__tmp__KLYM);
  } break;
  case __EXPR_MOD__: {
    __tmp__LLYM=my_copy__BNEO(__tmp__KLYM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__LLYM=my_copy__M3DP(__tmp__KLYM);
  } break;
  case __EXPR_INF__: {
    __tmp__LLYM=my_copy__PBSN(__tmp__KLYM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__LLYM=my_copy__0BSN(__tmp__KLYM);
  } break;
  case __EXPR_OR__: {
    __tmp__LLYM=my_copy__ZOPN(__tmp__KLYM);
  } break;
  case __EXPR_XOR__: {
    __tmp__LLYM=my_copy__CYSO(__tmp__KLYM);
  } break;
  };
  return(create__with__0YVM(__tmp__JLYM,__tmp__LLYM));
}

static __EXPR_MOD* my_copy__BNEO(__EXPR_MOD *Self__CNEO)
// ({EXPR_MOD}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__ENEO;
  void *__tmp__FNEO,*__tmp__GNEO,*__tmp__INEO,*__tmp__JNEO;
  __STRING_CST *Self__HC3P,*Self__PC3P;
  __PROTOTYPE_CST *Self__IC3P,*Self__QC3P;
  __INTEGER_CST *Self__JC3P,*Self__RC3P;
  __REAL_CST *Self__LC3P,*Self__TC3P;
  __CHARACTER_CST *Self__NC3P,*Self__VC3P;
  __IS_EXPANDED *Self__OC3P,*Self__WC3P;
  __tmp__ENEO=Self__CNEO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__FNEO=Self__CNEO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__FNEO)->__id) {
  case __LIST__: {
    __tmp__GNEO=my_copy__2HYM(__tmp__FNEO);
  } break;
  case __STRING_CST__: {
    Self__HC3P=((__STRING_CST *)__tmp__FNEO);
    __tmp__GNEO=create__text__AUMH(Self__HC3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HC3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__GNEO=my_copy__2K2H(__tmp__FNEO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__IC3P=((__PROTOTYPE_CST *)__tmp__FNEO);
    __tmp__GNEO=create__type__CLQC(Self__IC3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IC3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__JC3P=((__INTEGER_CST *)__tmp__FNEO);
    __tmp__GNEO=create__value__type__DNQC(Self__JC3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JC3P->value__PAZD,Self__JC3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__GNEO=my_copy__OAFJ(__tmp__FNEO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__GNEO=my_copy__KM2H(__tmp__FNEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__GNEO=my_copy__DN2H(__tmp__FNEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__GNEO=my_copy__QN2H(__tmp__FNEO);
  } break;
  case __REAL_CST__: {
    Self__LC3P=((__REAL_CST *)__tmp__FNEO);
    __tmp__GNEO=create__value__type__1SMH(Self__LC3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LC3P->value__5N2H,Self__LC3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__NC3P=((__CHARACTER_CST *)__tmp__FNEO);
    __tmp__GNEO=create__char__WTMH(Self__NC3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NC3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__OC3P=((__IS_EXPANDED *)__tmp__FNEO);
    __tmp__GNEO=create__receiver__WRWH(Self__OC3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__OC3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__GNEO=my_copy__TO2H(__tmp__FNEO);
  } break;
  case __EXPR_SUP__: {
    __tmp__GNEO=my_copy__2O2H(__tmp__FNEO);
  } break;
  case __EXPR_SUB__: {
    __tmp__GNEO=my_copy__HP2H(__tmp__FNEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__GNEO=my_copy__TP2H(__tmp__FNEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__GNEO=my_copy__4P2H(__tmp__FNEO);
  } break;
  case __EXPR_AND__: {
    __tmp__GNEO=my_copy__JQ2H(__tmp__FNEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__GNEO=my_copy__UQ2H(__tmp__FNEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__GNEO=my_copy__5Q2H(__tmp__FNEO);
  } break;
  case __PUT_TO__: {
    __tmp__GNEO=my_copy__KR2H(__tmp__FNEO);
  } break;
  case __ITEM__: {
    __tmp__GNEO=my_copy__1R2H(__tmp__FNEO);
  } break;
  case __SIZE_OF__: {
    __tmp__GNEO=my_copy__HS2H(__tmp__FNEO);
  } break;
  case __CAST__: {
    __tmp__GNEO=my_copy__QS2H(__tmp__FNEO);
  } break;
  case __CALL_SLOT__: {
    __tmp__GNEO=my_copy__PIYM(__tmp__FNEO);
  } break;
  case __READ_SLOT__: {
    __tmp__GNEO=my_copy__AVGK(__tmp__FNEO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__GNEO=my_copy__NVGK(__tmp__FNEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__GNEO=my_copy__RFCN(__tmp__FNEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__GNEO=my_copy__JMEO(__tmp__FNEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__GNEO=my_copy__RTJO(__tmp__FNEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__GNEO=my_copy__WMEO(__tmp__FNEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__GNEO=my_copy__3TJO(__tmp__FNEO);
  } break;
  case __EXPR_NEG__: {
    __tmp__GNEO=my_copy__YEJM(__tmp__FNEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__GNEO=my_copy__YRLL(__tmp__FNEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__GNEO=my_copy__GLYM(__tmp__FNEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__GNEO=my_copy__BNEO(__tmp__FNEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__GNEO=my_copy__M3DP(__tmp__FNEO);
  } break;
  case __EXPR_INF__: {
    __tmp__GNEO=my_copy__PBSN(__tmp__FNEO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__GNEO=my_copy__0BSN(__tmp__FNEO);
  } break;
  case __EXPR_OR__: {
    __tmp__GNEO=my_copy__ZOPN(__tmp__FNEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__GNEO=my_copy__CYSO(__tmp__FNEO);
  } break;
  };
  __tmp__INEO=Self__CNEO->parent_expr_binary__PDWL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__INEO)->__id) {
  case __LIST__: {
    __tmp__JNEO=my_copy__2HYM(__tmp__INEO);
  } break;
  case __STRING_CST__: {
    Self__PC3P=((__STRING_CST *)__tmp__INEO);
    __tmp__JNEO=create__text__AUMH(Self__PC3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PC3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__JNEO=my_copy__2K2H(__tmp__INEO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__QC3P=((__PROTOTYPE_CST *)__tmp__INEO);
    __tmp__JNEO=create__type__CLQC(Self__QC3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QC3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__RC3P=((__INTEGER_CST *)__tmp__INEO);
    __tmp__JNEO=create__value__type__DNQC(Self__RC3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RC3P->value__PAZD,Self__RC3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__JNEO=my_copy__OAFJ(__tmp__INEO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__JNEO=my_copy__KM2H(__tmp__INEO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__JNEO=my_copy__DN2H(__tmp__INEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__JNEO=my_copy__QN2H(__tmp__INEO);
  } break;
  case __REAL_CST__: {
    Self__TC3P=((__REAL_CST *)__tmp__INEO);
    __tmp__JNEO=create__value__type__1SMH(Self__TC3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TC3P->value__5N2H,Self__TC3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__VC3P=((__CHARACTER_CST *)__tmp__INEO);
    __tmp__JNEO=create__char__WTMH(Self__VC3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VC3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__WC3P=((__IS_EXPANDED *)__tmp__INEO);
    __tmp__JNEO=create__receiver__WRWH(Self__WC3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WC3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__JNEO=my_copy__TO2H(__tmp__INEO);
  } break;
  case __EXPR_SUP__: {
    __tmp__JNEO=my_copy__2O2H(__tmp__INEO);
  } break;
  case __EXPR_SUB__: {
    __tmp__JNEO=my_copy__HP2H(__tmp__INEO);
  } break;
  case __EXPR_MUL__: {
    __tmp__JNEO=my_copy__TP2H(__tmp__INEO);
  } break;
  case __EXPR_DIV__: {
    __tmp__JNEO=my_copy__4P2H(__tmp__INEO);
  } break;
  case __EXPR_AND__: {
    __tmp__JNEO=my_copy__JQ2H(__tmp__INEO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__JNEO=my_copy__UQ2H(__tmp__INEO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__JNEO=my_copy__5Q2H(__tmp__INEO);
  } break;
  case __PUT_TO__: {
    __tmp__JNEO=my_copy__KR2H(__tmp__INEO);
  } break;
  case __ITEM__: {
    __tmp__JNEO=my_copy__1R2H(__tmp__INEO);
  } break;
  case __SIZE_OF__: {
    __tmp__JNEO=my_copy__HS2H(__tmp__INEO);
  } break;
  case __CAST__: {
    __tmp__JNEO=my_copy__QS2H(__tmp__INEO);
  } break;
  case __CALL_SLOT__: {
    __tmp__JNEO=my_copy__PIYM(__tmp__INEO);
  } break;
  case __READ_SLOT__: {
    __tmp__JNEO=my_copy__AVGK(__tmp__INEO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__JNEO=my_copy__NVGK(__tmp__INEO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__JNEO=my_copy__RFCN(__tmp__INEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__JNEO=my_copy__JMEO(__tmp__INEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__JNEO=my_copy__RTJO(__tmp__INEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__JNEO=my_copy__WMEO(__tmp__INEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__JNEO=my_copy__3TJO(__tmp__INEO);
  } break;
  case __EXPR_NEG__: {
    __tmp__JNEO=my_copy__YEJM(__tmp__INEO);
  } break;
  case __EXPR_ADD__: {
    __tmp__JNEO=my_copy__YRLL(__tmp__INEO);
  } break;
  case __EXPR_NOT__: {
    __tmp__JNEO=my_copy__GLYM(__tmp__INEO);
  } break;
  case __EXPR_MOD__: {
    __tmp__JNEO=my_copy__BNEO(__tmp__INEO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__JNEO=my_copy__M3DP(__tmp__INEO);
  } break;
  case __EXPR_INF__: {
    __tmp__JNEO=my_copy__PBSN(__tmp__INEO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__JNEO=my_copy__0BSN(__tmp__INEO);
  } break;
  case __EXPR_OR__: {
    __tmp__JNEO=my_copy__ZOPN(__tmp__INEO);
  } break;
  case __EXPR_XOR__: {
    __tmp__JNEO=my_copy__CYSO(__tmp__INEO);
  } break;
  };
  return(create__with__and__ZCCO(__tmp__ENEO,__tmp__GNEO,__tmp__JNEO));
}

static __EXPR_SUP_EQ* my_copy__M3DP(__EXPR_SUP_EQ *Self__N3DP)
// ({EXPR_SUP_EQ}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__P3DP;
  void *__tmp__Q3DP,*__tmp__R3DP,*__tmp__T3DP,*__tmp__U3DP;
  __STRING_CST *Self__XC3P,*Self__5C3P;
  __PROTOTYPE_CST *Self__YC3P,*Self__AD3P;
  __INTEGER_CST *Self__ZC3P,*Self__BD3P;
  __REAL_CST *Self__1C3P,*Self__DD3P;
  __CHARACTER_CST *Self__3C3P,*Self__FD3P;
  __IS_EXPANDED *Self__4C3P,*Self__GD3P;
  __tmp__P3DP=Self__N3DP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__Q3DP=Self__N3DP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__Q3DP)->__id) {
  case __LIST__: {
    __tmp__R3DP=my_copy__2HYM(__tmp__Q3DP);
  } break;
  case __STRING_CST__: {
    Self__XC3P=((__STRING_CST *)__tmp__Q3DP);
    __tmp__R3DP=create__text__AUMH(Self__XC3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XC3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__R3DP=my_copy__2K2H(__tmp__Q3DP);
  } break;
  case __PROTOTYPE_CST__: {
    Self__YC3P=((__PROTOTYPE_CST *)__tmp__Q3DP);
    __tmp__R3DP=create__type__CLQC(Self__YC3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YC3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__ZC3P=((__INTEGER_CST *)__tmp__Q3DP);
    __tmp__R3DP=create__value__type__DNQC(Self__ZC3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZC3P->value__PAZD,Self__ZC3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__R3DP=my_copy__OAFJ(__tmp__Q3DP);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__R3DP=my_copy__KM2H(__tmp__Q3DP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__R3DP=my_copy__DN2H(__tmp__Q3DP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__R3DP=my_copy__QN2H(__tmp__Q3DP);
  } break;
  case __REAL_CST__: {
    Self__1C3P=((__REAL_CST *)__tmp__Q3DP);
    __tmp__R3DP=create__value__type__1SMH(Self__1C3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1C3P->value__5N2H,Self__1C3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__3C3P=((__CHARACTER_CST *)__tmp__Q3DP);
    __tmp__R3DP=create__char__WTMH(Self__3C3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3C3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__4C3P=((__IS_EXPANDED *)__tmp__Q3DP);
    __tmp__R3DP=create__receiver__WRWH(Self__4C3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4C3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__R3DP=my_copy__TO2H(__tmp__Q3DP);
  } break;
  case __EXPR_SUP__: {
    __tmp__R3DP=my_copy__2O2H(__tmp__Q3DP);
  } break;
  case __EXPR_SUB__: {
    __tmp__R3DP=my_copy__HP2H(__tmp__Q3DP);
  } break;
  case __EXPR_MUL__: {
    __tmp__R3DP=my_copy__TP2H(__tmp__Q3DP);
  } break;
  case __EXPR_DIV__: {
    __tmp__R3DP=my_copy__4P2H(__tmp__Q3DP);
  } break;
  case __EXPR_AND__: {
    __tmp__R3DP=my_copy__JQ2H(__tmp__Q3DP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__R3DP=my_copy__UQ2H(__tmp__Q3DP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__R3DP=my_copy__5Q2H(__tmp__Q3DP);
  } break;
  case __PUT_TO__: {
    __tmp__R3DP=my_copy__KR2H(__tmp__Q3DP);
  } break;
  case __ITEM__: {
    __tmp__R3DP=my_copy__1R2H(__tmp__Q3DP);
  } break;
  case __SIZE_OF__: {
    __tmp__R3DP=my_copy__HS2H(__tmp__Q3DP);
  } break;
  case __CAST__: {
    __tmp__R3DP=my_copy__QS2H(__tmp__Q3DP);
  } break;
  case __CALL_SLOT__: {
    __tmp__R3DP=my_copy__PIYM(__tmp__Q3DP);
  } break;
  case __READ_SLOT__: {
    __tmp__R3DP=my_copy__AVGK(__tmp__Q3DP);
  } break;
  case __READ_GLOBAL__: {
    __tmp__R3DP=my_copy__NVGK(__tmp__Q3DP);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__R3DP=my_copy__RFCN(__tmp__Q3DP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__R3DP=my_copy__JMEO(__tmp__Q3DP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__R3DP=my_copy__RTJO(__tmp__Q3DP);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__R3DP=my_copy__WMEO(__tmp__Q3DP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__R3DP=my_copy__3TJO(__tmp__Q3DP);
  } break;
  case __EXPR_NEG__: {
    __tmp__R3DP=my_copy__YEJM(__tmp__Q3DP);
  } break;
  case __EXPR_ADD__: {
    __tmp__R3DP=my_copy__YRLL(__tmp__Q3DP);
  } break;
  case __EXPR_NOT__: {
    __tmp__R3DP=my_copy__GLYM(__tmp__Q3DP);
  } break;
  case __EXPR_MOD__: {
    __tmp__R3DP=my_copy__BNEO(__tmp__Q3DP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__R3DP=my_copy__M3DP(__tmp__Q3DP);
  } break;
  case __EXPR_INF__: {
    __tmp__R3DP=my_copy__PBSN(__tmp__Q3DP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__R3DP=my_copy__0BSN(__tmp__Q3DP);
  } break;
  case __EXPR_OR__: {
    __tmp__R3DP=my_copy__ZOPN(__tmp__Q3DP);
  } break;
  case __EXPR_XOR__: {
    __tmp__R3DP=my_copy__CYSO(__tmp__Q3DP);
  } break;
  };
  __tmp__T3DP=Self__N3DP->parent_expr_binary_cmp__EP1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__T3DP)->__id) {
  case __LIST__: {
    __tmp__U3DP=my_copy__2HYM(__tmp__T3DP);
  } break;
  case __STRING_CST__: {
    Self__5C3P=((__STRING_CST *)__tmp__T3DP);
    __tmp__U3DP=create__text__AUMH(Self__5C3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5C3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__U3DP=my_copy__2K2H(__tmp__T3DP);
  } break;
  case __PROTOTYPE_CST__: {
    Self__AD3P=((__PROTOTYPE_CST *)__tmp__T3DP);
    __tmp__U3DP=create__type__CLQC(Self__AD3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AD3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__BD3P=((__INTEGER_CST *)__tmp__T3DP);
    __tmp__U3DP=create__value__type__DNQC(Self__BD3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BD3P->value__PAZD,Self__BD3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__U3DP=my_copy__OAFJ(__tmp__T3DP);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__U3DP=my_copy__KM2H(__tmp__T3DP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__U3DP=my_copy__DN2H(__tmp__T3DP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__U3DP=my_copy__QN2H(__tmp__T3DP);
  } break;
  case __REAL_CST__: {
    Self__DD3P=((__REAL_CST *)__tmp__T3DP);
    __tmp__U3DP=create__value__type__1SMH(Self__DD3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DD3P->value__5N2H,Self__DD3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__FD3P=((__CHARACTER_CST *)__tmp__T3DP);
    __tmp__U3DP=create__char__WTMH(Self__FD3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FD3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__GD3P=((__IS_EXPANDED *)__tmp__T3DP);
    __tmp__U3DP=create__receiver__WRWH(Self__GD3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GD3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__U3DP=my_copy__TO2H(__tmp__T3DP);
  } break;
  case __EXPR_SUP__: {
    __tmp__U3DP=my_copy__2O2H(__tmp__T3DP);
  } break;
  case __EXPR_SUB__: {
    __tmp__U3DP=my_copy__HP2H(__tmp__T3DP);
  } break;
  case __EXPR_MUL__: {
    __tmp__U3DP=my_copy__TP2H(__tmp__T3DP);
  } break;
  case __EXPR_DIV__: {
    __tmp__U3DP=my_copy__4P2H(__tmp__T3DP);
  } break;
  case __EXPR_AND__: {
    __tmp__U3DP=my_copy__JQ2H(__tmp__T3DP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__U3DP=my_copy__UQ2H(__tmp__T3DP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__U3DP=my_copy__5Q2H(__tmp__T3DP);
  } break;
  case __PUT_TO__: {
    __tmp__U3DP=my_copy__KR2H(__tmp__T3DP);
  } break;
  case __ITEM__: {
    __tmp__U3DP=my_copy__1R2H(__tmp__T3DP);
  } break;
  case __SIZE_OF__: {
    __tmp__U3DP=my_copy__HS2H(__tmp__T3DP);
  } break;
  case __CAST__: {
    __tmp__U3DP=my_copy__QS2H(__tmp__T3DP);
  } break;
  case __CALL_SLOT__: {
    __tmp__U3DP=my_copy__PIYM(__tmp__T3DP);
  } break;
  case __READ_SLOT__: {
    __tmp__U3DP=my_copy__AVGK(__tmp__T3DP);
  } break;
  case __READ_GLOBAL__: {
    __tmp__U3DP=my_copy__NVGK(__tmp__T3DP);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__U3DP=my_copy__RFCN(__tmp__T3DP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__U3DP=my_copy__JMEO(__tmp__T3DP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__U3DP=my_copy__RTJO(__tmp__T3DP);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__U3DP=my_copy__WMEO(__tmp__T3DP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__U3DP=my_copy__3TJO(__tmp__T3DP);
  } break;
  case __EXPR_NEG__: {
    __tmp__U3DP=my_copy__YEJM(__tmp__T3DP);
  } break;
  case __EXPR_ADD__: {
    __tmp__U3DP=my_copy__YRLL(__tmp__T3DP);
  } break;
  case __EXPR_NOT__: {
    __tmp__U3DP=my_copy__GLYM(__tmp__T3DP);
  } break;
  case __EXPR_MOD__: {
    __tmp__U3DP=my_copy__BNEO(__tmp__T3DP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__U3DP=my_copy__M3DP(__tmp__T3DP);
  } break;
  case __EXPR_INF__: {
    __tmp__U3DP=my_copy__PBSN(__tmp__T3DP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__U3DP=my_copy__0BSN(__tmp__T3DP);
  } break;
  case __EXPR_OR__: {
    __tmp__U3DP=my_copy__ZOPN(__tmp__T3DP);
  } break;
  case __EXPR_XOR__: {
    __tmp__U3DP=my_copy__CYSO(__tmp__T3DP);
  } break;
  };
  return(create__with__and__4LAP(__tmp__P3DP,__tmp__R3DP,__tmp__U3DP));
}

static __EXPR_INF* my_copy__PBSN(__EXPR_INF *Self__QBSN)
// ({EXPR_INF}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__SBSN;
  void *__tmp__TBSN,*__tmp__UBSN,*__tmp__WBSN,*__tmp__XBSN;
  __STRING_CST *Self__HD3P,*Self__PD3P;
  __PROTOTYPE_CST *Self__ID3P,*Self__QD3P;
  __INTEGER_CST *Self__JD3P,*Self__RD3P;
  __REAL_CST *Self__LD3P,*Self__TD3P;
  __CHARACTER_CST *Self__ND3P,*Self__VD3P;
  __IS_EXPANDED *Self__OD3P,*Self__WD3P;
  __tmp__SBSN=Self__QBSN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__TBSN=Self__QBSN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__TBSN)->__id) {
  case __LIST__: {
    __tmp__UBSN=my_copy__2HYM(__tmp__TBSN);
  } break;
  case __STRING_CST__: {
    Self__HD3P=((__STRING_CST *)__tmp__TBSN);
    __tmp__UBSN=create__text__AUMH(Self__HD3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HD3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__UBSN=my_copy__2K2H(__tmp__TBSN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__ID3P=((__PROTOTYPE_CST *)__tmp__TBSN);
    __tmp__UBSN=create__type__CLQC(Self__ID3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ID3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__JD3P=((__INTEGER_CST *)__tmp__TBSN);
    __tmp__UBSN=create__value__type__DNQC(Self__JD3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JD3P->value__PAZD,Self__JD3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__UBSN=my_copy__OAFJ(__tmp__TBSN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UBSN=my_copy__KM2H(__tmp__TBSN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UBSN=my_copy__DN2H(__tmp__TBSN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UBSN=my_copy__QN2H(__tmp__TBSN);
  } break;
  case __REAL_CST__: {
    Self__LD3P=((__REAL_CST *)__tmp__TBSN);
    __tmp__UBSN=create__value__type__1SMH(Self__LD3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LD3P->value__5N2H,Self__LD3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__ND3P=((__CHARACTER_CST *)__tmp__TBSN);
    __tmp__UBSN=create__char__WTMH(Self__ND3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ND3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__OD3P=((__IS_EXPANDED *)__tmp__TBSN);
    __tmp__UBSN=create__receiver__WRWH(Self__OD3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__OD3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UBSN=my_copy__TO2H(__tmp__TBSN);
  } break;
  case __EXPR_SUP__: {
    __tmp__UBSN=my_copy__2O2H(__tmp__TBSN);
  } break;
  case __EXPR_SUB__: {
    __tmp__UBSN=my_copy__HP2H(__tmp__TBSN);
  } break;
  case __EXPR_MUL__: {
    __tmp__UBSN=my_copy__TP2H(__tmp__TBSN);
  } break;
  case __EXPR_DIV__: {
    __tmp__UBSN=my_copy__4P2H(__tmp__TBSN);
  } break;
  case __EXPR_AND__: {
    __tmp__UBSN=my_copy__JQ2H(__tmp__TBSN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UBSN=my_copy__UQ2H(__tmp__TBSN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UBSN=my_copy__5Q2H(__tmp__TBSN);
  } break;
  case __PUT_TO__: {
    __tmp__UBSN=my_copy__KR2H(__tmp__TBSN);
  } break;
  case __ITEM__: {
    __tmp__UBSN=my_copy__1R2H(__tmp__TBSN);
  } break;
  case __SIZE_OF__: {
    __tmp__UBSN=my_copy__HS2H(__tmp__TBSN);
  } break;
  case __CAST__: {
    __tmp__UBSN=my_copy__QS2H(__tmp__TBSN);
  } break;
  case __CALL_SLOT__: {
    __tmp__UBSN=my_copy__PIYM(__tmp__TBSN);
  } break;
  case __READ_SLOT__: {
    __tmp__UBSN=my_copy__AVGK(__tmp__TBSN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__UBSN=my_copy__NVGK(__tmp__TBSN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UBSN=my_copy__RFCN(__tmp__TBSN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UBSN=my_copy__JMEO(__tmp__TBSN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UBSN=my_copy__RTJO(__tmp__TBSN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UBSN=my_copy__WMEO(__tmp__TBSN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UBSN=my_copy__3TJO(__tmp__TBSN);
  } break;
  case __EXPR_NEG__: {
    __tmp__UBSN=my_copy__YEJM(__tmp__TBSN);
  } break;
  case __EXPR_ADD__: {
    __tmp__UBSN=my_copy__YRLL(__tmp__TBSN);
  } break;
  case __EXPR_NOT__: {
    __tmp__UBSN=my_copy__GLYM(__tmp__TBSN);
  } break;
  case __EXPR_MOD__: {
    __tmp__UBSN=my_copy__BNEO(__tmp__TBSN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UBSN=my_copy__M3DP(__tmp__TBSN);
  } break;
  case __EXPR_INF__: {
    __tmp__UBSN=my_copy__PBSN(__tmp__TBSN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UBSN=my_copy__0BSN(__tmp__TBSN);
  } break;
  case __EXPR_OR__: {
    __tmp__UBSN=my_copy__ZOPN(__tmp__TBSN);
  } break;
  case __EXPR_XOR__: {
    __tmp__UBSN=my_copy__CYSO(__tmp__TBSN);
  } break;
  };
  __tmp__WBSN=Self__QBSN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__WBSN)->__id) {
  case __LIST__: {
    __tmp__XBSN=my_copy__2HYM(__tmp__WBSN);
  } break;
  case __STRING_CST__: {
    Self__PD3P=((__STRING_CST *)__tmp__WBSN);
    __tmp__XBSN=create__text__AUMH(Self__PD3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PD3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__XBSN=my_copy__2K2H(__tmp__WBSN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__QD3P=((__PROTOTYPE_CST *)__tmp__WBSN);
    __tmp__XBSN=create__type__CLQC(Self__QD3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QD3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__RD3P=((__INTEGER_CST *)__tmp__WBSN);
    __tmp__XBSN=create__value__type__DNQC(Self__RD3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RD3P->value__PAZD,Self__RD3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__XBSN=my_copy__OAFJ(__tmp__WBSN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__XBSN=my_copy__KM2H(__tmp__WBSN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__XBSN=my_copy__DN2H(__tmp__WBSN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__XBSN=my_copy__QN2H(__tmp__WBSN);
  } break;
  case __REAL_CST__: {
    Self__TD3P=((__REAL_CST *)__tmp__WBSN);
    __tmp__XBSN=create__value__type__1SMH(Self__TD3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TD3P->value__5N2H,Self__TD3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__VD3P=((__CHARACTER_CST *)__tmp__WBSN);
    __tmp__XBSN=create__char__WTMH(Self__VD3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VD3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__WD3P=((__IS_EXPANDED *)__tmp__WBSN);
    __tmp__XBSN=create__receiver__WRWH(Self__WD3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WD3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__XBSN=my_copy__TO2H(__tmp__WBSN);
  } break;
  case __EXPR_SUP__: {
    __tmp__XBSN=my_copy__2O2H(__tmp__WBSN);
  } break;
  case __EXPR_SUB__: {
    __tmp__XBSN=my_copy__HP2H(__tmp__WBSN);
  } break;
  case __EXPR_MUL__: {
    __tmp__XBSN=my_copy__TP2H(__tmp__WBSN);
  } break;
  case __EXPR_DIV__: {
    __tmp__XBSN=my_copy__4P2H(__tmp__WBSN);
  } break;
  case __EXPR_AND__: {
    __tmp__XBSN=my_copy__JQ2H(__tmp__WBSN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__XBSN=my_copy__UQ2H(__tmp__WBSN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__XBSN=my_copy__5Q2H(__tmp__WBSN);
  } break;
  case __PUT_TO__: {
    __tmp__XBSN=my_copy__KR2H(__tmp__WBSN);
  } break;
  case __ITEM__: {
    __tmp__XBSN=my_copy__1R2H(__tmp__WBSN);
  } break;
  case __SIZE_OF__: {
    __tmp__XBSN=my_copy__HS2H(__tmp__WBSN);
  } break;
  case __CAST__: {
    __tmp__XBSN=my_copy__QS2H(__tmp__WBSN);
  } break;
  case __CALL_SLOT__: {
    __tmp__XBSN=my_copy__PIYM(__tmp__WBSN);
  } break;
  case __READ_SLOT__: {
    __tmp__XBSN=my_copy__AVGK(__tmp__WBSN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__XBSN=my_copy__NVGK(__tmp__WBSN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__XBSN=my_copy__RFCN(__tmp__WBSN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__XBSN=my_copy__JMEO(__tmp__WBSN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__XBSN=my_copy__RTJO(__tmp__WBSN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__XBSN=my_copy__WMEO(__tmp__WBSN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__XBSN=my_copy__3TJO(__tmp__WBSN);
  } break;
  case __EXPR_NEG__: {
    __tmp__XBSN=my_copy__YEJM(__tmp__WBSN);
  } break;
  case __EXPR_ADD__: {
    __tmp__XBSN=my_copy__YRLL(__tmp__WBSN);
  } break;
  case __EXPR_NOT__: {
    __tmp__XBSN=my_copy__GLYM(__tmp__WBSN);
  } break;
  case __EXPR_MOD__: {
    __tmp__XBSN=my_copy__BNEO(__tmp__WBSN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__XBSN=my_copy__M3DP(__tmp__WBSN);
  } break;
  case __EXPR_INF__: {
    __tmp__XBSN=my_copy__PBSN(__tmp__WBSN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__XBSN=my_copy__0BSN(__tmp__WBSN);
  } break;
  case __EXPR_OR__: {
    __tmp__XBSN=my_copy__ZOPN(__tmp__WBSN);
  } break;
  case __EXPR_XOR__: {
    __tmp__XBSN=my_copy__CYSO(__tmp__WBSN);
  } break;
  };
  return(create__with__and__LOKN(__tmp__SBSN,__tmp__UBSN,__tmp__XBSN));
}

static __EXPR_INF_EQ* my_copy__0BSN(__EXPR_INF_EQ *Self__1BSN)
// ({EXPR_INF_EQ}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__3BSN;
  void *__tmp__4BSN,*__tmp__5BSN,*__tmp__BCSN,*__tmp__CCSN;
  __STRING_CST *Self__XD3P,*Self__5D3P;
  __PROTOTYPE_CST *Self__YD3P,*Self__AE3P;
  __INTEGER_CST *Self__ZD3P,*Self__BE3P;
  __REAL_CST *Self__1D3P,*Self__DE3P;
  __CHARACTER_CST *Self__3D3P,*Self__FE3P;
  __IS_EXPANDED *Self__4D3P,*Self__GE3P;
  __tmp__3BSN=Self__1BSN->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__4BSN=Self__1BSN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__4BSN)->__id) {
  case __LIST__: {
    __tmp__5BSN=my_copy__2HYM(__tmp__4BSN);
  } break;
  case __STRING_CST__: {
    Self__XD3P=((__STRING_CST *)__tmp__4BSN);
    __tmp__5BSN=create__text__AUMH(Self__XD3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XD3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__5BSN=my_copy__2K2H(__tmp__4BSN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__YD3P=((__PROTOTYPE_CST *)__tmp__4BSN);
    __tmp__5BSN=create__type__CLQC(Self__YD3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YD3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__ZD3P=((__INTEGER_CST *)__tmp__4BSN);
    __tmp__5BSN=create__value__type__DNQC(Self__ZD3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZD3P->value__PAZD,Self__ZD3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__5BSN=my_copy__OAFJ(__tmp__4BSN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__5BSN=my_copy__KM2H(__tmp__4BSN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__5BSN=my_copy__DN2H(__tmp__4BSN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__5BSN=my_copy__QN2H(__tmp__4BSN);
  } break;
  case __REAL_CST__: {
    Self__1D3P=((__REAL_CST *)__tmp__4BSN);
    __tmp__5BSN=create__value__type__1SMH(Self__1D3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1D3P->value__5N2H,Self__1D3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__3D3P=((__CHARACTER_CST *)__tmp__4BSN);
    __tmp__5BSN=create__char__WTMH(Self__3D3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3D3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__4D3P=((__IS_EXPANDED *)__tmp__4BSN);
    __tmp__5BSN=create__receiver__WRWH(Self__4D3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4D3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__5BSN=my_copy__TO2H(__tmp__4BSN);
  } break;
  case __EXPR_SUP__: {
    __tmp__5BSN=my_copy__2O2H(__tmp__4BSN);
  } break;
  case __EXPR_SUB__: {
    __tmp__5BSN=my_copy__HP2H(__tmp__4BSN);
  } break;
  case __EXPR_MUL__: {
    __tmp__5BSN=my_copy__TP2H(__tmp__4BSN);
  } break;
  case __EXPR_DIV__: {
    __tmp__5BSN=my_copy__4P2H(__tmp__4BSN);
  } break;
  case __EXPR_AND__: {
    __tmp__5BSN=my_copy__JQ2H(__tmp__4BSN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__5BSN=my_copy__UQ2H(__tmp__4BSN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__5BSN=my_copy__5Q2H(__tmp__4BSN);
  } break;
  case __PUT_TO__: {
    __tmp__5BSN=my_copy__KR2H(__tmp__4BSN);
  } break;
  case __ITEM__: {
    __tmp__5BSN=my_copy__1R2H(__tmp__4BSN);
  } break;
  case __SIZE_OF__: {
    __tmp__5BSN=my_copy__HS2H(__tmp__4BSN);
  } break;
  case __CAST__: {
    __tmp__5BSN=my_copy__QS2H(__tmp__4BSN);
  } break;
  case __CALL_SLOT__: {
    __tmp__5BSN=my_copy__PIYM(__tmp__4BSN);
  } break;
  case __READ_SLOT__: {
    __tmp__5BSN=my_copy__AVGK(__tmp__4BSN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__5BSN=my_copy__NVGK(__tmp__4BSN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__5BSN=my_copy__RFCN(__tmp__4BSN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__5BSN=my_copy__JMEO(__tmp__4BSN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__5BSN=my_copy__RTJO(__tmp__4BSN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__5BSN=my_copy__WMEO(__tmp__4BSN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__5BSN=my_copy__3TJO(__tmp__4BSN);
  } break;
  case __EXPR_NEG__: {
    __tmp__5BSN=my_copy__YEJM(__tmp__4BSN);
  } break;
  case __EXPR_ADD__: {
    __tmp__5BSN=my_copy__YRLL(__tmp__4BSN);
  } break;
  case __EXPR_NOT__: {
    __tmp__5BSN=my_copy__GLYM(__tmp__4BSN);
  } break;
  case __EXPR_MOD__: {
    __tmp__5BSN=my_copy__BNEO(__tmp__4BSN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__5BSN=my_copy__M3DP(__tmp__4BSN);
  } break;
  case __EXPR_INF__: {
    __tmp__5BSN=my_copy__PBSN(__tmp__4BSN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__5BSN=my_copy__0BSN(__tmp__4BSN);
  } break;
  case __EXPR_OR__: {
    __tmp__5BSN=my_copy__ZOPN(__tmp__4BSN);
  } break;
  case __EXPR_XOR__: {
    __tmp__5BSN=my_copy__CYSO(__tmp__4BSN);
  } break;
  };
  __tmp__BCSN=Self__1BSN->parent_expr_binary_cmp__MR1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__BCSN)->__id) {
  case __LIST__: {
    __tmp__CCSN=my_copy__2HYM(__tmp__BCSN);
  } break;
  case __STRING_CST__: {
    Self__5D3P=((__STRING_CST *)__tmp__BCSN);
    __tmp__CCSN=create__text__AUMH(Self__5D3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5D3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__CCSN=my_copy__2K2H(__tmp__BCSN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__AE3P=((__PROTOTYPE_CST *)__tmp__BCSN);
    __tmp__CCSN=create__type__CLQC(Self__AE3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AE3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__BE3P=((__INTEGER_CST *)__tmp__BCSN);
    __tmp__CCSN=create__value__type__DNQC(Self__BE3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BE3P->value__PAZD,Self__BE3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__CCSN=my_copy__OAFJ(__tmp__BCSN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__CCSN=my_copy__KM2H(__tmp__BCSN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__CCSN=my_copy__DN2H(__tmp__BCSN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__CCSN=my_copy__QN2H(__tmp__BCSN);
  } break;
  case __REAL_CST__: {
    Self__DE3P=((__REAL_CST *)__tmp__BCSN);
    __tmp__CCSN=create__value__type__1SMH(Self__DE3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DE3P->value__5N2H,Self__DE3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__FE3P=((__CHARACTER_CST *)__tmp__BCSN);
    __tmp__CCSN=create__char__WTMH(Self__FE3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FE3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__GE3P=((__IS_EXPANDED *)__tmp__BCSN);
    __tmp__CCSN=create__receiver__WRWH(Self__GE3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GE3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__CCSN=my_copy__TO2H(__tmp__BCSN);
  } break;
  case __EXPR_SUP__: {
    __tmp__CCSN=my_copy__2O2H(__tmp__BCSN);
  } break;
  case __EXPR_SUB__: {
    __tmp__CCSN=my_copy__HP2H(__tmp__BCSN);
  } break;
  case __EXPR_MUL__: {
    __tmp__CCSN=my_copy__TP2H(__tmp__BCSN);
  } break;
  case __EXPR_DIV__: {
    __tmp__CCSN=my_copy__4P2H(__tmp__BCSN);
  } break;
  case __EXPR_AND__: {
    __tmp__CCSN=my_copy__JQ2H(__tmp__BCSN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__CCSN=my_copy__UQ2H(__tmp__BCSN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__CCSN=my_copy__5Q2H(__tmp__BCSN);
  } break;
  case __PUT_TO__: {
    __tmp__CCSN=my_copy__KR2H(__tmp__BCSN);
  } break;
  case __ITEM__: {
    __tmp__CCSN=my_copy__1R2H(__tmp__BCSN);
  } break;
  case __SIZE_OF__: {
    __tmp__CCSN=my_copy__HS2H(__tmp__BCSN);
  } break;
  case __CAST__: {
    __tmp__CCSN=my_copy__QS2H(__tmp__BCSN);
  } break;
  case __CALL_SLOT__: {
    __tmp__CCSN=my_copy__PIYM(__tmp__BCSN);
  } break;
  case __READ_SLOT__: {
    __tmp__CCSN=my_copy__AVGK(__tmp__BCSN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__CCSN=my_copy__NVGK(__tmp__BCSN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__CCSN=my_copy__RFCN(__tmp__BCSN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__CCSN=my_copy__JMEO(__tmp__BCSN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__CCSN=my_copy__RTJO(__tmp__BCSN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__CCSN=my_copy__WMEO(__tmp__BCSN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__CCSN=my_copy__3TJO(__tmp__BCSN);
  } break;
  case __EXPR_NEG__: {
    __tmp__CCSN=my_copy__YEJM(__tmp__BCSN);
  } break;
  case __EXPR_ADD__: {
    __tmp__CCSN=my_copy__YRLL(__tmp__BCSN);
  } break;
  case __EXPR_NOT__: {
    __tmp__CCSN=my_copy__GLYM(__tmp__BCSN);
  } break;
  case __EXPR_MOD__: {
    __tmp__CCSN=my_copy__BNEO(__tmp__BCSN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__CCSN=my_copy__M3DP(__tmp__BCSN);
  } break;
  case __EXPR_INF__: {
    __tmp__CCSN=my_copy__PBSN(__tmp__BCSN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__CCSN=my_copy__0BSN(__tmp__BCSN);
  } break;
  case __EXPR_OR__: {
    __tmp__CCSN=my_copy__ZOPN(__tmp__BCSN);
  } break;
  case __EXPR_XOR__: {
    __tmp__CCSN=my_copy__CYSO(__tmp__BCSN);
  } break;
  };
  return(create__with__and__1OKN(__tmp__3BSN,__tmp__5BSN,__tmp__CCSN));
}

static __EXPR_OR* my_copy__ZOPN(__EXPR_OR *Self__0OPN)
// ({EXPR_OR}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__2OPN;
  void *__tmp__3OPN,*__tmp__4OPN,*__tmp__APPN,*__tmp__BPPN;
  __STRING_CST *Self__HE3P,*Self__PE3P;
  __PROTOTYPE_CST *Self__IE3P,*Self__QE3P;
  __INTEGER_CST *Self__JE3P,*Self__RE3P;
  __REAL_CST *Self__LE3P,*Self__TE3P;
  __CHARACTER_CST *Self__NE3P,*Self__VE3P;
  __IS_EXPANDED *Self__OE3P,*Self__WE3P;
  __tmp__2OPN=Self__0OPN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__3OPN=Self__0OPN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__3OPN)->__id) {
  case __LIST__: {
    __tmp__4OPN=my_copy__2HYM(__tmp__3OPN);
  } break;
  case __STRING_CST__: {
    Self__HE3P=((__STRING_CST *)__tmp__3OPN);
    __tmp__4OPN=create__text__AUMH(Self__HE3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HE3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__4OPN=my_copy__2K2H(__tmp__3OPN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__IE3P=((__PROTOTYPE_CST *)__tmp__3OPN);
    __tmp__4OPN=create__type__CLQC(Self__IE3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IE3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__JE3P=((__INTEGER_CST *)__tmp__3OPN);
    __tmp__4OPN=create__value__type__DNQC(Self__JE3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JE3P->value__PAZD,Self__JE3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__4OPN=my_copy__OAFJ(__tmp__3OPN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4OPN=my_copy__KM2H(__tmp__3OPN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4OPN=my_copy__DN2H(__tmp__3OPN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4OPN=my_copy__QN2H(__tmp__3OPN);
  } break;
  case __REAL_CST__: {
    Self__LE3P=((__REAL_CST *)__tmp__3OPN);
    __tmp__4OPN=create__value__type__1SMH(Self__LE3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LE3P->value__5N2H,Self__LE3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__NE3P=((__CHARACTER_CST *)__tmp__3OPN);
    __tmp__4OPN=create__char__WTMH(Self__NE3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NE3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__OE3P=((__IS_EXPANDED *)__tmp__3OPN);
    __tmp__4OPN=create__receiver__WRWH(Self__OE3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__OE3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__4OPN=my_copy__TO2H(__tmp__3OPN);
  } break;
  case __EXPR_SUP__: {
    __tmp__4OPN=my_copy__2O2H(__tmp__3OPN);
  } break;
  case __EXPR_SUB__: {
    __tmp__4OPN=my_copy__HP2H(__tmp__3OPN);
  } break;
  case __EXPR_MUL__: {
    __tmp__4OPN=my_copy__TP2H(__tmp__3OPN);
  } break;
  case __EXPR_DIV__: {
    __tmp__4OPN=my_copy__4P2H(__tmp__3OPN);
  } break;
  case __EXPR_AND__: {
    __tmp__4OPN=my_copy__JQ2H(__tmp__3OPN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4OPN=my_copy__UQ2H(__tmp__3OPN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4OPN=my_copy__5Q2H(__tmp__3OPN);
  } break;
  case __PUT_TO__: {
    __tmp__4OPN=my_copy__KR2H(__tmp__3OPN);
  } break;
  case __ITEM__: {
    __tmp__4OPN=my_copy__1R2H(__tmp__3OPN);
  } break;
  case __SIZE_OF__: {
    __tmp__4OPN=my_copy__HS2H(__tmp__3OPN);
  } break;
  case __CAST__: {
    __tmp__4OPN=my_copy__QS2H(__tmp__3OPN);
  } break;
  case __CALL_SLOT__: {
    __tmp__4OPN=my_copy__PIYM(__tmp__3OPN);
  } break;
  case __READ_SLOT__: {
    __tmp__4OPN=my_copy__AVGK(__tmp__3OPN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__4OPN=my_copy__NVGK(__tmp__3OPN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4OPN=my_copy__RFCN(__tmp__3OPN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4OPN=my_copy__JMEO(__tmp__3OPN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4OPN=my_copy__RTJO(__tmp__3OPN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4OPN=my_copy__WMEO(__tmp__3OPN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4OPN=my_copy__3TJO(__tmp__3OPN);
  } break;
  case __EXPR_NEG__: {
    __tmp__4OPN=my_copy__YEJM(__tmp__3OPN);
  } break;
  case __EXPR_ADD__: {
    __tmp__4OPN=my_copy__YRLL(__tmp__3OPN);
  } break;
  case __EXPR_NOT__: {
    __tmp__4OPN=my_copy__GLYM(__tmp__3OPN);
  } break;
  case __EXPR_MOD__: {
    __tmp__4OPN=my_copy__BNEO(__tmp__3OPN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4OPN=my_copy__M3DP(__tmp__3OPN);
  } break;
  case __EXPR_INF__: {
    __tmp__4OPN=my_copy__PBSN(__tmp__3OPN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4OPN=my_copy__0BSN(__tmp__3OPN);
  } break;
  case __EXPR_OR__: {
    __tmp__4OPN=my_copy__ZOPN(__tmp__3OPN);
  } break;
  case __EXPR_XOR__: {
    __tmp__4OPN=my_copy__CYSO(__tmp__3OPN);
  } break;
  };
  __tmp__APPN=Self__0OPN->parent_expr_binary__ET1M.right__OP2H;
  switch (((struct ___OBJ *)__tmp__APPN)->__id) {
  case __LIST__: {
    __tmp__BPPN=my_copy__2HYM(__tmp__APPN);
  } break;
  case __STRING_CST__: {
    Self__PE3P=((__STRING_CST *)__tmp__APPN);
    __tmp__BPPN=create__text__AUMH(Self__PE3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PE3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__BPPN=my_copy__2K2H(__tmp__APPN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__QE3P=((__PROTOTYPE_CST *)__tmp__APPN);
    __tmp__BPPN=create__type__CLQC(Self__QE3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QE3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__RE3P=((__INTEGER_CST *)__tmp__APPN);
    __tmp__BPPN=create__value__type__DNQC(Self__RE3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RE3P->value__PAZD,Self__RE3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__BPPN=my_copy__OAFJ(__tmp__APPN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BPPN=my_copy__KM2H(__tmp__APPN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BPPN=my_copy__DN2H(__tmp__APPN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BPPN=my_copy__QN2H(__tmp__APPN);
  } break;
  case __REAL_CST__: {
    Self__TE3P=((__REAL_CST *)__tmp__APPN);
    __tmp__BPPN=create__value__type__1SMH(Self__TE3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TE3P->value__5N2H,Self__TE3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__VE3P=((__CHARACTER_CST *)__tmp__APPN);
    __tmp__BPPN=create__char__WTMH(Self__VE3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VE3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__WE3P=((__IS_EXPANDED *)__tmp__APPN);
    __tmp__BPPN=create__receiver__WRWH(Self__WE3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__WE3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BPPN=my_copy__TO2H(__tmp__APPN);
  } break;
  case __EXPR_SUP__: {
    __tmp__BPPN=my_copy__2O2H(__tmp__APPN);
  } break;
  case __EXPR_SUB__: {
    __tmp__BPPN=my_copy__HP2H(__tmp__APPN);
  } break;
  case __EXPR_MUL__: {
    __tmp__BPPN=my_copy__TP2H(__tmp__APPN);
  } break;
  case __EXPR_DIV__: {
    __tmp__BPPN=my_copy__4P2H(__tmp__APPN);
  } break;
  case __EXPR_AND__: {
    __tmp__BPPN=my_copy__JQ2H(__tmp__APPN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BPPN=my_copy__UQ2H(__tmp__APPN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BPPN=my_copy__5Q2H(__tmp__APPN);
  } break;
  case __PUT_TO__: {
    __tmp__BPPN=my_copy__KR2H(__tmp__APPN);
  } break;
  case __ITEM__: {
    __tmp__BPPN=my_copy__1R2H(__tmp__APPN);
  } break;
  case __SIZE_OF__: {
    __tmp__BPPN=my_copy__HS2H(__tmp__APPN);
  } break;
  case __CAST__: {
    __tmp__BPPN=my_copy__QS2H(__tmp__APPN);
  } break;
  case __CALL_SLOT__: {
    __tmp__BPPN=my_copy__PIYM(__tmp__APPN);
  } break;
  case __READ_SLOT__: {
    __tmp__BPPN=my_copy__AVGK(__tmp__APPN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__BPPN=my_copy__NVGK(__tmp__APPN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BPPN=my_copy__RFCN(__tmp__APPN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BPPN=my_copy__JMEO(__tmp__APPN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BPPN=my_copy__RTJO(__tmp__APPN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BPPN=my_copy__WMEO(__tmp__APPN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BPPN=my_copy__3TJO(__tmp__APPN);
  } break;
  case __EXPR_NEG__: {
    __tmp__BPPN=my_copy__YEJM(__tmp__APPN);
  } break;
  case __EXPR_ADD__: {
    __tmp__BPPN=my_copy__YRLL(__tmp__APPN);
  } break;
  case __EXPR_NOT__: {
    __tmp__BPPN=my_copy__GLYM(__tmp__APPN);
  } break;
  case __EXPR_MOD__: {
    __tmp__BPPN=my_copy__BNEO(__tmp__APPN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BPPN=my_copy__M3DP(__tmp__APPN);
  } break;
  case __EXPR_INF__: {
    __tmp__BPPN=my_copy__PBSN(__tmp__APPN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BPPN=my_copy__0BSN(__tmp__APPN);
  } break;
  case __EXPR_OR__: {
    __tmp__BPPN=my_copy__ZOPN(__tmp__APPN);
  } break;
  case __EXPR_XOR__: {
    __tmp__BPPN=my_copy__CYSO(__tmp__APPN);
  } break;
  };
  return(create__with__and__UNJN(__tmp__2OPN,__tmp__4OPN,__tmp__BPPN));
}

static __EXPR_XOR* my_copy__CYSO(__EXPR_XOR *Self__DYSO)
// ({EXPR_XOR}) With resultRecursive, No inlinable.
{
  __POSITION __tmp__FYSO;
  void *__tmp__GYSO,*__tmp__HYSO,*__tmp__JYSO,*__tmp__KYSO;
  __STRING_CST *Self__XE3P,*Self__5E3P;
  __PROTOTYPE_CST *Self__YE3P,*Self__AF3P;
  __INTEGER_CST *Self__ZE3P,*Self__BF3P;
  __REAL_CST *Self__1E3P,*Self__DF3P;
  __CHARACTER_CST *Self__3E3P,*Self__FF3P;
  __IS_EXPANDED *Self__4E3P,*Self__GF3P;
  __tmp__FYSO=Self__DYSO->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  __tmp__GYSO=Self__DYSO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__GYSO)->__id) {
  case __LIST__: {
    __tmp__HYSO=my_copy__2HYM(__tmp__GYSO);
  } break;
  case __STRING_CST__: {
    Self__XE3P=((__STRING_CST *)__tmp__GYSO);
    __tmp__HYSO=create__text__AUMH(Self__XE3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XE3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__HYSO=my_copy__2K2H(__tmp__GYSO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__YE3P=((__PROTOTYPE_CST *)__tmp__GYSO);
    __tmp__HYSO=create__type__CLQC(Self__YE3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YE3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__ZE3P=((__INTEGER_CST *)__tmp__GYSO);
    __tmp__HYSO=create__value__type__DNQC(Self__ZE3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZE3P->value__PAZD,Self__ZE3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__HYSO=my_copy__OAFJ(__tmp__GYSO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HYSO=my_copy__KM2H(__tmp__GYSO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HYSO=my_copy__DN2H(__tmp__GYSO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HYSO=my_copy__QN2H(__tmp__GYSO);
  } break;
  case __REAL_CST__: {
    Self__1E3P=((__REAL_CST *)__tmp__GYSO);
    __tmp__HYSO=create__value__type__1SMH(Self__1E3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1E3P->value__5N2H,Self__1E3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__3E3P=((__CHARACTER_CST *)__tmp__GYSO);
    __tmp__HYSO=create__char__WTMH(Self__3E3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3E3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__4E3P=((__IS_EXPANDED *)__tmp__GYSO);
    __tmp__HYSO=create__receiver__WRWH(Self__4E3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4E3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__HYSO=my_copy__TO2H(__tmp__GYSO);
  } break;
  case __EXPR_SUP__: {
    __tmp__HYSO=my_copy__2O2H(__tmp__GYSO);
  } break;
  case __EXPR_SUB__: {
    __tmp__HYSO=my_copy__HP2H(__tmp__GYSO);
  } break;
  case __EXPR_MUL__: {
    __tmp__HYSO=my_copy__TP2H(__tmp__GYSO);
  } break;
  case __EXPR_DIV__: {
    __tmp__HYSO=my_copy__4P2H(__tmp__GYSO);
  } break;
  case __EXPR_AND__: {
    __tmp__HYSO=my_copy__JQ2H(__tmp__GYSO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HYSO=my_copy__UQ2H(__tmp__GYSO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HYSO=my_copy__5Q2H(__tmp__GYSO);
  } break;
  case __PUT_TO__: {
    __tmp__HYSO=my_copy__KR2H(__tmp__GYSO);
  } break;
  case __ITEM__: {
    __tmp__HYSO=my_copy__1R2H(__tmp__GYSO);
  } break;
  case __SIZE_OF__: {
    __tmp__HYSO=my_copy__HS2H(__tmp__GYSO);
  } break;
  case __CAST__: {
    __tmp__HYSO=my_copy__QS2H(__tmp__GYSO);
  } break;
  case __CALL_SLOT__: {
    __tmp__HYSO=my_copy__PIYM(__tmp__GYSO);
  } break;
  case __READ_SLOT__: {
    __tmp__HYSO=my_copy__AVGK(__tmp__GYSO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__HYSO=my_copy__NVGK(__tmp__GYSO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HYSO=my_copy__RFCN(__tmp__GYSO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HYSO=my_copy__JMEO(__tmp__GYSO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HYSO=my_copy__RTJO(__tmp__GYSO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HYSO=my_copy__WMEO(__tmp__GYSO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HYSO=my_copy__3TJO(__tmp__GYSO);
  } break;
  case __EXPR_NEG__: {
    __tmp__HYSO=my_copy__YEJM(__tmp__GYSO);
  } break;
  case __EXPR_ADD__: {
    __tmp__HYSO=my_copy__YRLL(__tmp__GYSO);
  } break;
  case __EXPR_NOT__: {
    __tmp__HYSO=my_copy__GLYM(__tmp__GYSO);
  } break;
  case __EXPR_MOD__: {
    __tmp__HYSO=my_copy__BNEO(__tmp__GYSO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HYSO=my_copy__M3DP(__tmp__GYSO);
  } break;
  case __EXPR_INF__: {
    __tmp__HYSO=my_copy__PBSN(__tmp__GYSO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HYSO=my_copy__0BSN(__tmp__GYSO);
  } break;
  case __EXPR_OR__: {
    __tmp__HYSO=my_copy__ZOPN(__tmp__GYSO);
  } break;
  case __EXPR_XOR__: {
    __tmp__HYSO=my_copy__CYSO(__tmp__GYSO);
  } break;
  };
  __tmp__JYSO=Self__DYSO->parent_expr_binary__UA5N.right__OP2H;
  switch (((struct ___OBJ *)__tmp__JYSO)->__id) {
  case __LIST__: {
    __tmp__KYSO=my_copy__2HYM(__tmp__JYSO);
  } break;
  case __STRING_CST__: {
    Self__5E3P=((__STRING_CST *)__tmp__JYSO);
    __tmp__KYSO=create__text__AUMH(Self__5E3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5E3P->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__KYSO=my_copy__2K2H(__tmp__JYSO);
  } break;
  case __PROTOTYPE_CST__: {
    Self__AF3P=((__PROTOTYPE_CST *)__tmp__JYSO);
    __tmp__KYSO=create__type__CLQC(Self__AF3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AF3P->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__BF3P=((__INTEGER_CST *)__tmp__JYSO);
    __tmp__KYSO=create__value__type__DNQC(Self__BF3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BF3P->value__PAZD,Self__BF3P->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__KYSO=my_copy__OAFJ(__tmp__JYSO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KYSO=my_copy__KM2H(__tmp__JYSO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KYSO=my_copy__DN2H(__tmp__JYSO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KYSO=my_copy__QN2H(__tmp__JYSO);
  } break;
  case __REAL_CST__: {
    Self__DF3P=((__REAL_CST *)__tmp__JYSO);
    __tmp__KYSO=create__value__type__1SMH(Self__DF3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DF3P->value__5N2H,Self__DF3P->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__FF3P=((__CHARACTER_CST *)__tmp__JYSO);
    __tmp__KYSO=create__char__WTMH(Self__FF3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FF3P->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__GF3P=((__IS_EXPANDED *)__tmp__JYSO);
    __tmp__KYSO=create__receiver__WRWH(Self__GF3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__GF3P->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__KYSO=my_copy__TO2H(__tmp__JYSO);
  } break;
  case __EXPR_SUP__: {
    __tmp__KYSO=my_copy__2O2H(__tmp__JYSO);
  } break;
  case __EXPR_SUB__: {
    __tmp__KYSO=my_copy__HP2H(__tmp__JYSO);
  } break;
  case __EXPR_MUL__: {
    __tmp__KYSO=my_copy__TP2H(__tmp__JYSO);
  } break;
  case __EXPR_DIV__: {
    __tmp__KYSO=my_copy__4P2H(__tmp__JYSO);
  } break;
  case __EXPR_AND__: {
    __tmp__KYSO=my_copy__JQ2H(__tmp__JYSO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KYSO=my_copy__UQ2H(__tmp__JYSO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KYSO=my_copy__5Q2H(__tmp__JYSO);
  } break;
  case __PUT_TO__: {
    __tmp__KYSO=my_copy__KR2H(__tmp__JYSO);
  } break;
  case __ITEM__: {
    __tmp__KYSO=my_copy__1R2H(__tmp__JYSO);
  } break;
  case __SIZE_OF__: {
    __tmp__KYSO=my_copy__HS2H(__tmp__JYSO);
  } break;
  case __CAST__: {
    __tmp__KYSO=my_copy__QS2H(__tmp__JYSO);
  } break;
  case __CALL_SLOT__: {
    __tmp__KYSO=my_copy__PIYM(__tmp__JYSO);
  } break;
  case __READ_SLOT__: {
    __tmp__KYSO=my_copy__AVGK(__tmp__JYSO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__KYSO=my_copy__NVGK(__tmp__JYSO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KYSO=my_copy__RFCN(__tmp__JYSO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KYSO=my_copy__JMEO(__tmp__JYSO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KYSO=my_copy__RTJO(__tmp__JYSO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KYSO=my_copy__WMEO(__tmp__JYSO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KYSO=my_copy__3TJO(__tmp__JYSO);
  } break;
  case __EXPR_NEG__: {
    __tmp__KYSO=my_copy__YEJM(__tmp__JYSO);
  } break;
  case __EXPR_ADD__: {
    __tmp__KYSO=my_copy__YRLL(__tmp__JYSO);
  } break;
  case __EXPR_NOT__: {
    __tmp__KYSO=my_copy__GLYM(__tmp__JYSO);
  } break;
  case __EXPR_MOD__: {
    __tmp__KYSO=my_copy__BNEO(__tmp__JYSO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KYSO=my_copy__M3DP(__tmp__JYSO);
  } break;
  case __EXPR_INF__: {
    __tmp__KYSO=my_copy__PBSN(__tmp__JYSO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KYSO=my_copy__0BSN(__tmp__JYSO);
  } break;
  case __EXPR_OR__: {
    __tmp__KYSO=my_copy__ZOPN(__tmp__JYSO);
  } break;
  case __EXPR_XOR__: {
    __tmp__KYSO=my_copy__CYSO(__tmp__JYSO);
  } break;
  };
  return(create__with__and__D5PO(__tmp__FYSO,__tmp__HYSO,__tmp__KYSO));
}

static __NODE_STYLE* create__with__result__2S1G(void *e__4S1G,void *sl__5S1G,void *dta__AT1G,void *r__BT1G)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSLOT_DATAxSLOT_CODE},{DTA_RDxDTA_WR_CODExDTA_WR_VALUExDTA_RD_ARGS},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __NODE_STYLE *result__H01G,*Self__BO5G;
  __POINTER ptr__I01G;
  __INTEGER typ_id__N01G;
  __UINTEGER_32 sz__K01G,a__020Q,new_size__Y20Q,t__420Q,a__A30Q;
  result__H01G=NULL;
  ptr__I01G=((__POINTER )(NULL));
  typ_id__N01G= 0;
  sz__K01G=((__UINTEGER_32 )sizeof(__NODE_STYLE));
  if ((sz__K01G ==  0)) {
    result__H01G=NODE_STYLE__;
  } else {
    typ_id__N01G=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__K01G);
    if ((typ_id__N01G == (__INTEGER)(-  1))) {
      a__020Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__Y20Q=(__UINTEGER_32)((__UINTEGER_32)(sz__K01G + a__020Q) & (__UINTEGER_32)(~ a__020Q));
      ptr__I01G=micro_alloc__table__lab__BOI(new_size__Y20Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y20Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Y20Q);
    } else {
      t__420Q=((__UINTEGER_32 )typ_id__N01G);
      a__A30Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__I01G=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__K01G + a__A30Q) & (__UINTEGER_32)(~ a__A30Q)),((__POINTER )(&(table_type[(t__420Q)]))),(__UINTEGER_32)(t__420Q |  1));
    };
    result__H01G=((__NODE_STYLE *)ptr__I01G);
    *(result__H01G) = *(NODE_STYLE__);
  };
  Self__BO5G=((__NODE_STYLE *)result__H01G);
  Self__BO5G->parent_node__OP0G.expr__KLZD=e__4S1G;
  Self__BO5G->slot__GO5G=sl__5S1G;
  Self__BO5G->parent_node__OP0G.data__LLZD=dta__AT1G;
  Self__BO5G->result_expr__HO5G=r__BT1G;
  return(result__H01G);
}

static void is_equal_profil__PL5G(__ITM_SLOT *Self__QL5G,void *other__RL5G)
// ({ITM_SLOT},{NULLxITM_SLOT}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__QN5G,Self__YTIH;
  void *__tmp__XN5G,*__tmp__0N5G;
  __ITM_ARG *Self__IYRH;
  void *err__LYRH,*err__K0RH;
  void *__tmp__TYRH,*o__KYRH;
  __POSITION __tmp__A0RH,__tmp__51RH;
  __ITM_ARGS *Self__H0RH;
  void *__tmp__S0RH,*o__J0RH;
  __BOOLEAN __tmp__0YRH,__tmp__IZRH,result__50TH,__tmp__Z0RH;
  __BOOLEAN __tmp__H1RH,result__L3TH;
  if (((void *)Self__QL5G != (void *)other__RL5G)) {
    if (((void *)Self__QL5G->type__PD2D != (void *)((__ITM_SLOT *)other__RL5G)->type__PD2D)) {
      copy__BNK(string_tmp__RB,(&__string_501));
      put_error__text__0AH( 1,string_tmp__RB);
      put_position__ECH(Self__QL5G->parent_named__XIM.parent_itm_object__PD.position__BJM);
      put_position__ECH(((__ITM_SLOT *)other__RL5G)->parent_named__XIM.parent_itm_object__PD.position__BJM);
      send_error__2FH();
    };
    if (((void *)Self__QL5G->id_section__EACC != (void *)((__ITM_SLOT *)other__RL5G)->id_section__EACC)) {
      put_error__text__0AH( 2,(&__string_502));
      put_position__ECH(Self__QL5G->parent_named__XIM.parent_itm_object__PD.position__BJM);
      put_position__ECH(((__ITM_SLOT *)other__RL5G)->parent_named__XIM.parent_itm_object__PD.position__BJM);
      send_error__2FH();
    };
    if (((void *)Self__QL5G->argument_list__BC2D != (void *)NULL)) {
      __tmp__QN5G=((__FAST_ARRAYoITM_ARGUMENTo *)Self__QL5G->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D;
      Self__YTIH= 0;
      while ((Self__YTIH <= __tmp__QN5G)) {
        __tmp__XN5G=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__QL5G->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[Self__YTIH];
        __tmp__0N5G=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)other__RL5G)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[Self__YTIH];
        if (((struct ___OBJ *)__tmp__XN5G)->__id==__ITM_ARG__) {
          Self__IYRH=((__ITM_ARG *)__tmp__XN5G);
          err__LYRH=NULL;
          if (__tmp__0N5G==NULL) {
            __tmp__TYRH=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__0N5G)->__id) {
            case __ITM_ARG__: {
              __tmp__TYRH=((void *)__tmp__0N5G);
            } break;
            case __ITM_ARGS__: {
              __tmp__TYRH=NULL;
            } break;
            }
          };
          o__KYRH=__tmp__TYRH;
          if (((void *)__tmp__TYRH == (void *)NULL)) {
            err__LYRH=(&__string_503);
            __tmp__0YRH=TRUE__;
          } else {
            __tmp__0YRH=FALSE__;
          };
          if (__tmp__0YRH) {
            __tmp__IZRH=TRUE__;
          } else {
            result__50TH=((void *)Self__IYRH->name__332D != (void *)((__ITM_ARG *)__tmp__TYRH)->name__332D);
            if (result__50TH) {
              err__LYRH=(&__string_504);
            };
            __tmp__IZRH=result__50TH;
          };
          if ((! __tmp__IZRH)) {
            if (((void *)Self__IYRH->type__432D != (void *)((__ITM_ARG *)__tmp__TYRH)->type__432D)) {
              err__LYRH=(&__string_505);
            };
          };
          if (((void *)err__LYRH != (void *)NULL)) {
            put_error__text__0AH( 1,err__LYRH);
            put_position__ECH(Self__IYRH->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM);
            if (((struct ___OBJ *)__tmp__0N5G)->__id==__ITM_ARG__) {
              __tmp__A0RH=((__ITM_ARG *)__tmp__0N5G)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
            } else {
              __tmp__A0RH=((__ITM_ARGS *)__tmp__0N5G)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
            };
            put_position__ECH(__tmp__A0RH);
            send_error__2FH();
          };
        } else {
          Self__H0RH=((__ITM_ARGS *)__tmp__XN5G);
          err__K0RH=NULL;
          if (__tmp__0N5G==NULL) {
            __tmp__S0RH=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__0N5G)->__id) {
            case __ITM_ARG__: {
              __tmp__S0RH=NULL;
            } break;
            case __ITM_ARGS__: {
              __tmp__S0RH=((void *)__tmp__0N5G);
            } break;
            }
          };
          o__J0RH=__tmp__S0RH;
          if (((void *)__tmp__S0RH == (void *)NULL)) {
            err__K0RH=(&__string_503);
            __tmp__Z0RH=TRUE__;
          } else {
            __tmp__Z0RH=FALSE__;
          };
          if (__tmp__Z0RH) {
            __tmp__H1RH=TRUE__;
          } else {
            result__L3TH=((void *)Self__H0RH->name__FH3D != (void *)((__ITM_ARGS *)__tmp__S0RH)->name__FH3D);
            if (result__L3TH) {
              err__K0RH=(&__string_504);
            };
            __tmp__H1RH=result__L3TH;
          };
          if ((! __tmp__H1RH)) {
            if (((void *)Self__H0RH->type__GH3D != (void *)((__ITM_ARGS *)__tmp__S0RH)->type__GH3D)) {
              err__K0RH=(&__string_505);
            };
          };
          if (((void *)err__K0RH != (void *)NULL)) {
            put_error__text__0AH( 1,err__K0RH);
            put_position__ECH(Self__H0RH->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM);
            if (((struct ___OBJ *)__tmp__0N5G)->__id==__ITM_ARG__) {
              __tmp__51RH=((__ITM_ARG *)__tmp__0N5G)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
            } else {
              __tmp__51RH=((__ITM_ARGS *)__tmp__0N5G)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
            };
            put_position__ECH(__tmp__51RH);
            send_error__2FH();
          };
        };
        Self__YTIH=(__INTEGER)(Self__YTIH +  1);
      };
    };
  };
}

static __CAST* create__value__S1WH(__CAST *Self__T1WH,void *t__U1WH,void *v__V1WH)
// ({CAST},{NULLxTYPE_FULL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __CAST *result__SNYH,*Self__YQFI;
  __POINTER ptr__TNYH;
  __INTEGER typ_id__YNYH;
  __UINTEGER_32 sz__VNYH,a__N30Q,new_size__L30Q,t__R30Q,a__T30Q;
  __POSITION __tmp__1QFI;
  result__SNYH=NULL;
  ptr__TNYH=((__POINTER )(NULL));
  typ_id__YNYH= 0;
  sz__VNYH=((__UINTEGER_32 )sizeof(__CAST));
  if ((sz__VNYH ==  0)) {
    result__SNYH=Self__T1WH;
  } else {
    typ_id__YNYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__VNYH);
    if ((typ_id__YNYH == (__INTEGER)(-  1))) {
      a__N30Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__L30Q=(__UINTEGER_32)((__UINTEGER_32)(sz__VNYH + a__N30Q) & (__UINTEGER_32)(~ a__N30Q));
      ptr__TNYH=micro_alloc__table__lab__BOI(new_size__L30Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__L30Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__L30Q);
    } else {
      t__R30Q=((__UINTEGER_32 )typ_id__YNYH);
      a__T30Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__TNYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__VNYH + a__T30Q) & (__UINTEGER_32)(~ a__T30Q)),((__POINTER )(&(table_type[(t__R30Q)]))),(__UINTEGER_32)(t__R30Q |  1));
    };
    result__SNYH=((__CAST *)ptr__TNYH);
    *(result__SNYH) = *(Self__T1WH);
  };
  Self__YQFI=((__CAST *)result__SNYH);
  switch (((struct ___OBJ *)v__V1WH)->__id) {
  case __LIST__: {
    __tmp__1QFI=((__LIST *)v__V1WH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __STRING_CST__: {
    __tmp__1QFI=((__STRING_CST *)v__V1WH)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1QFI=((__EXTERNAL_C *)v__V1WH)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__1QFI=((__PROTOTYPE_CST *)v__V1WH)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __INTEGER_CST__: {
    __tmp__1QFI=((__INTEGER_CST *)v__V1WH)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_LOCAL__: {
    __tmp__1QFI=((__READ_LOCAL *)v__V1WH)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1QFI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1QFI=((__EXPR_EQUAL *)v__V1WH)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1QFI=((__EXPR_NOT_EQUAL *)v__V1WH)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __REAL_CST__: {
    __tmp__1QFI=((__REAL_CST *)v__V1WH)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CHARACTER_CST__: {
    __tmp__1QFI=((__CHARACTER_CST *)v__V1WH)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __IS_EXPANDED__: {
    __tmp__1QFI=((__IS_EXPANDED *)v__V1WH)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1QFI=((__GET_TYPE_ID *)v__V1WH)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP__: {
    __tmp__1QFI=((__EXPR_SUP *)v__V1WH)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUB__: {
    __tmp__1QFI=((__EXPR_SUB *)v__V1WH)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MUL__: {
    __tmp__1QFI=((__EXPR_MUL *)v__V1WH)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_DIV__: {
    __tmp__1QFI=((__EXPR_DIV *)v__V1WH)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND__: {
    __tmp__1QFI=((__EXPR_AND *)v__V1WH)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1QFI=((__EXPR_SHIFT_R *)v__V1WH)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1QFI=((__EXPR_SHIFT_L *)v__V1WH)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __PUT_TO__: {
    __tmp__1QFI=((__PUT_TO *)v__V1WH)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __ITEM__: {
    __tmp__1QFI=((__ITEM *)v__V1WH)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __SIZE_OF__: {
    __tmp__1QFI=((__SIZE_OF *)v__V1WH)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CAST__: {
    __tmp__1QFI=((__CAST *)v__V1WH)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __CALL_SLOT__: {
    __tmp__1QFI=((__CALL_SLOT *)v__V1WH)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_SLOT__: {
    __tmp__1QFI=((__READ_SLOT *)v__V1WH)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __READ_GLOBAL__: {
    __tmp__1QFI=((__READ_GLOBAL *)v__V1WH)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1QFI=((__EXPR_NOT_LOGIC *)v__V1WH)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1QFI=((__EXPR_OR_LOGIC *)v__V1WH)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1QFI=((__EXPR_OR_OR_LOGIC *)v__V1WH)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1QFI=((__EXPR_AND_LOGIC *)v__V1WH)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1QFI=((__EXPR_AND_AND_LOGIC *)v__V1WH)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NEG__: {
    __tmp__1QFI=((__EXPR_NEG *)v__V1WH)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_ADD__: {
    __tmp__1QFI=((__EXPR_ADD *)v__V1WH)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_NOT__: {
    __tmp__1QFI=((__EXPR_NOT *)v__V1WH)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_MOD__: {
    __tmp__1QFI=((__EXPR_MOD *)v__V1WH)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1QFI=((__EXPR_SUP_EQ *)v__V1WH)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF__: {
    __tmp__1QFI=((__EXPR_INF *)v__V1WH)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1QFI=((__EXPR_INF_EQ *)v__V1WH)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_OR__: {
    __tmp__1QFI=((__EXPR_OR *)v__V1WH)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  case __EXPR_XOR__: {
    __tmp__1QFI=((__EXPR_XOR *)v__V1WH)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
  } break;
  };
  Self__YQFI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__1QFI;
  Self__YQFI->static_type__SO1H=t__U1WH;
  Self__YQFI->value__US2H=v__V1WH;
  return(result__SNYH);
}

static __BOOLEAN is_sub_type__5I3I(__TYPE *Self__AJ3I,void *other__BJ3I)
// ({TYPE},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__DJ3I,__tmp__KJ3I;
  void *__tmp__PJ3I,*__tmp__WJ3I;
  result__DJ3I=FALSE__;
  if (((void *)Self__AJ3I == (void *)other__BJ3I)) {
    result__DJ3I=TRUE__;
    __tmp__KJ3I=TRUE__;
  } else {
    __tmp__KJ3I=FALSE__;
  };
  if ((! __tmp__KJ3I)) {
    switch (((struct ___OBJ *)other__BJ3I)->__id) {
    case __TYPE__: {
      __tmp__PJ3I=((__TYPE *)other__BJ3I)->subtype_list__APY;
    } break;
    case __TYPE_NULL__: {
      __tmp__PJ3I=((__TYPE_NULL *)other__BJ3I)->parent_type__TIB.subtype_list__APY;
    } break;
    case __TYPE_VOID__: {
      __tmp__PJ3I=((__TYPE_VOID *)other__BJ3I)->parent_type__UIB.subtype_list__APY;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__PJ3I=((__TYPE_CONTEXT *)other__BJ3I)->parent_type__VIB.subtype_list__APY;
    } break;
    case __TYPE_ID__: {
      __tmp__PJ3I=((__TYPE_ID *)other__BJ3I)->parent_type__WIB.subtype_list__APY;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__PJ3I=((__TYPE_GENERIC *)other__BJ3I)->parent_type__T2IB.subtype_list__APY;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__PJ3I=subtype_list__0NFJ();
    } break;
    };
    if (((void *)__tmp__PJ3I != (void *)NULL)) {
      switch (((struct ___OBJ *)other__BJ3I)->__id) {
      case __TYPE__: {
        __tmp__WJ3I=((__TYPE *)other__BJ3I)->subtype_list__APY;
      } break;
      case __TYPE_NULL__: {
        __tmp__WJ3I=((__TYPE_NULL *)other__BJ3I)->parent_type__TIB.subtype_list__APY;
      } break;
      case __TYPE_VOID__: {
        __tmp__WJ3I=((__TYPE_VOID *)other__BJ3I)->parent_type__UIB.subtype_list__APY;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__WJ3I=((__TYPE_CONTEXT *)other__BJ3I)->parent_type__VIB.subtype_list__APY;
      } break;
      case __TYPE_ID__: {
        __tmp__WJ3I=((__TYPE_ID *)other__BJ3I)->parent_type__WIB.subtype_list__APY;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__WJ3I=((__TYPE_GENERIC *)other__BJ3I)->parent_type__T2IB.subtype_list__APY;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__WJ3I=subtype_list__0NFJ();
      } break;
      };
      result__DJ3I=fast_has__DCLB(__tmp__WJ3I,Self__AJ3I);
    };
  };
  return(result__DJ3I);
}

static __BOOLEAN is_sub_type__CK3I(__TYPE_CONTEXT *Self__DK3I,void *other__EK3I)
// ({TYPE_CONTEXT},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__GK3I,__tmp__NK3I;
  void *__tmp__SK3I,*__tmp__ZK3I;
  result__GK3I=FALSE__;
  if (((void *)Self__DK3I == (void *)other__EK3I)) {
    result__GK3I=TRUE__;
    __tmp__NK3I=TRUE__;
  } else {
    __tmp__NK3I=FALSE__;
  };
  if ((! __tmp__NK3I)) {
    switch (((struct ___OBJ *)other__EK3I)->__id) {
    case __TYPE__: {
      __tmp__SK3I=((__TYPE *)other__EK3I)->subtype_list__APY;
    } break;
    case __TYPE_NULL__: {
      __tmp__SK3I=((__TYPE_NULL *)other__EK3I)->parent_type__TIB.subtype_list__APY;
    } break;
    case __TYPE_VOID__: {
      __tmp__SK3I=((__TYPE_VOID *)other__EK3I)->parent_type__UIB.subtype_list__APY;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__SK3I=((__TYPE_CONTEXT *)other__EK3I)->parent_type__VIB.subtype_list__APY;
    } break;
    case __TYPE_ID__: {
      __tmp__SK3I=((__TYPE_ID *)other__EK3I)->parent_type__WIB.subtype_list__APY;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__SK3I=((__TYPE_GENERIC *)other__EK3I)->parent_type__T2IB.subtype_list__APY;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__SK3I=subtype_list__0NFJ();
    } break;
    };
    if (((void *)__tmp__SK3I != (void *)NULL)) {
      switch (((struct ___OBJ *)other__EK3I)->__id) {
      case __TYPE__: {
        __tmp__ZK3I=((__TYPE *)other__EK3I)->subtype_list__APY;
      } break;
      case __TYPE_NULL__: {
        __tmp__ZK3I=((__TYPE_NULL *)other__EK3I)->parent_type__TIB.subtype_list__APY;
      } break;
      case __TYPE_VOID__: {
        __tmp__ZK3I=((__TYPE_VOID *)other__EK3I)->parent_type__UIB.subtype_list__APY;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__ZK3I=((__TYPE_CONTEXT *)other__EK3I)->parent_type__VIB.subtype_list__APY;
      } break;
      case __TYPE_ID__: {
        __tmp__ZK3I=((__TYPE_ID *)other__EK3I)->parent_type__WIB.subtype_list__APY;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__ZK3I=((__TYPE_GENERIC *)other__EK3I)->parent_type__T2IB.subtype_list__APY;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__ZK3I=subtype_list__0NFJ();
      } break;
      };
      result__GK3I=fast_has__DCLB(__tmp__ZK3I,Self__DK3I);
    };
  };
  return(result__GK3I);
}

static __BOOLEAN is_sub_type__3K3I(void *other__5K3I)
// ({NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  void *__tmp__BL3I;
  switch (((struct ___OBJ *)other__5K3I)->__id) {
  case __TYPE__: {
    __tmp__BL3I=((__PROTOTYPE *)((__TYPE *)other__5K3I)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__BL3I=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__BL3I=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__BL3I=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__BL3I=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__BL3I=((__TYPE_GENERIC *)other__5K3I)->name__2R2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__BL3I=((__PROFIL_BLOCK *)other__5K3I)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  return(((void *)__tmp__BL3I == (void *)(&__string_46)));
}

static __BOOLEAN is_sub_type__DL3I(__TYPE_GENERIC *Self__EL3I,void *other__FL3I)
// ({TYPE_GENERIC},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__HL3I,__tmp__OL3I;
  void *__tmp__TL3I,*__tmp__0L3I;
  result__HL3I=FALSE__;
  if (((void *)Self__EL3I == (void *)other__FL3I)) {
    result__HL3I=TRUE__;
    __tmp__OL3I=TRUE__;
  } else {
    __tmp__OL3I=FALSE__;
  };
  if ((! __tmp__OL3I)) {
    switch (((struct ___OBJ *)other__FL3I)->__id) {
    case __TYPE__: {
      __tmp__TL3I=((__TYPE *)other__FL3I)->subtype_list__APY;
    } break;
    case __TYPE_NULL__: {
      __tmp__TL3I=((__TYPE_NULL *)other__FL3I)->parent_type__TIB.subtype_list__APY;
    } break;
    case __TYPE_VOID__: {
      __tmp__TL3I=((__TYPE_VOID *)other__FL3I)->parent_type__UIB.subtype_list__APY;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__TL3I=((__TYPE_CONTEXT *)other__FL3I)->parent_type__VIB.subtype_list__APY;
    } break;
    case __TYPE_ID__: {
      __tmp__TL3I=((__TYPE_ID *)other__FL3I)->parent_type__WIB.subtype_list__APY;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__TL3I=((__TYPE_GENERIC *)other__FL3I)->parent_type__T2IB.subtype_list__APY;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__TL3I=subtype_list__0NFJ();
    } break;
    };
    if (((void *)__tmp__TL3I != (void *)NULL)) {
      switch (((struct ___OBJ *)other__FL3I)->__id) {
      case __TYPE__: {
        __tmp__0L3I=((__TYPE *)other__FL3I)->subtype_list__APY;
      } break;
      case __TYPE_NULL__: {
        __tmp__0L3I=((__TYPE_NULL *)other__FL3I)->parent_type__TIB.subtype_list__APY;
      } break;
      case __TYPE_VOID__: {
        __tmp__0L3I=((__TYPE_VOID *)other__FL3I)->parent_type__UIB.subtype_list__APY;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__0L3I=((__TYPE_CONTEXT *)other__FL3I)->parent_type__VIB.subtype_list__APY;
      } break;
      case __TYPE_ID__: {
        __tmp__0L3I=((__TYPE_ID *)other__FL3I)->parent_type__WIB.subtype_list__APY;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__0L3I=((__TYPE_GENERIC *)other__FL3I)->parent_type__T2IB.subtype_list__APY;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__0L3I=subtype_list__0NFJ();
      } break;
      };
      result__HL3I=fast_has__DCLB(__tmp__0L3I,Self__EL3I);
    };
  };
  return(result__HL3I);
}

static __BOOLEAN __infix_equal_equal__GSFJ(__PROFIL_BLOCK *Self__HSFJ,void *other__ISFJ)
// ({PROFIL_BLOCK},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  void *t__KSFJ,*__tmp__ZSFJ;
  __BOOLEAN __tmp__3SFJ;
  t__KSFJ=NULL;
  if ((((void *)Self__HSFJ == (void *)other__ISFJ) || ((void *)other__ISFJ == (void *)type_block__BLB))) {
    __tmp__3SFJ=TRUE__;
  } else {
    if (other__ISFJ==NULL) {
      __tmp__ZSFJ=NULL;
    } else {
      switch (((struct ___OBJ *)other__ISFJ)->__id) {
      case __TYPE__: {
        __tmp__ZSFJ=NULL;
      } break;
      case __TYPE_NULL__: {
        __tmp__ZSFJ=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__ZSFJ=NULL;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__ZSFJ=NULL;
      } break;
      case __TYPE_ID__: {
        __tmp__ZSFJ=NULL;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__ZSFJ=NULL;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__ZSFJ=((void *)other__ISFJ);
      } break;
      }
    };
    t__KSFJ=__tmp__ZSFJ;
    __tmp__3SFJ=((void *)__tmp__ZSFJ != (void *)NULL);
  };
  return(__tmp__3SFJ);
}

static void* create__with__YJ3F(void *base__0J3F,void *val__1J3F)
// ({NULLxSLOT},{NULLxITM_LISTxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS}) With resultNo recursive, No inlinable.
{
  __SLOT_CODE *result__4M3F,*Self__505F;
  __POINTER ptr__5M3F;
  __INTEGER typ_id__EN3F;
  __UINTEGER_32 sz__BN3F,a__Y30Q,new_size__W30Q,t__230Q,a__430Q;
  result__4M3F=NULL;
  ptr__5M3F=((__POINTER )(NULL));
  typ_id__EN3F= 0;
  sz__BN3F=((__UINTEGER_32 )sizeof(__SLOT_CODE));
  if ((sz__BN3F ==  0)) {
    result__4M3F=SLOT_CODE__;
  } else {
    typ_id__EN3F=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__BN3F);
    if ((typ_id__EN3F == (__INTEGER)(-  1))) {
      a__Y30Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__W30Q=(__UINTEGER_32)((__UINTEGER_32)(sz__BN3F + a__Y30Q) & (__UINTEGER_32)(~ a__Y30Q));
      ptr__5M3F=micro_alloc__table__lab__BOI(new_size__W30Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W30Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__W30Q);
    } else {
      t__230Q=((__UINTEGER_32 )typ_id__EN3F);
      a__430Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__5M3F=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__BN3F + a__430Q) & (__UINTEGER_32)(~ a__430Q)),((__POINTER )(&(table_type[(t__230Q)]))),(__UINTEGER_32)(t__230Q |  1));
    };
    result__4M3F=((__SLOT_CODE *)ptr__5M3F);
    *(result__4M3F) = *(SLOT_CODE__);
  };
  Self__505F=((__SLOT_CODE *)result__4M3F);
  Self__505F->parent_slot__Y22F=base__0J3F;
  Self__505F->value__C15F=val__1J3F;
  Self__505F->profil__J15F=create_with_capacity__PKBG( 1);
  return(result__4M3F);
}

static void* get_index__B3ZH(__INTEGER idx__D3ZH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  void *result__F3ZH;
  result__F3ZH=NULL;
  if ((idx__D3ZH > ((__FAST_ARRAYoTYPE_IDo *)list_id__YKC)->parent_arrayed_collection__WKC.upper__MDL)) {
    result__F3ZH=create__WKD(idx__D3ZH);
    add_last__IDL(list_id__YKC,result__F3ZH);
  } else {
    result__F3ZH=((void **)((__FAST_ARRAYoTYPE_IDo *)list_id__YKC)->parent_arrayed_collection__WKC.storage__KEL)[idx__D3ZH];
  };
  return(result__F3ZH);
}

static __SLOT_DATA* clone__K53F()
// () With resultNo recursive, No inlinable.
{
  __SLOT_DATA *result__N53F;
  __POINTER ptr__O53F;
  __INTEGER typ_id__T53F;
  __UINTEGER_32 sz__Q53F,a__D40Q,new_size__B40Q,t__H40Q,a__J40Q;
  result__N53F=NULL;
  ptr__O53F=((__POINTER )(NULL));
  typ_id__T53F= 0;
  sz__Q53F=((__UINTEGER_32 )sizeof(__SLOT_DATA));
  if ((sz__Q53F ==  0)) {
    result__N53F=SLOT_DATA__;
  } else {
    typ_id__T53F=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__Q53F);
    if ((typ_id__T53F == (__INTEGER)(-  1))) {
      a__D40Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__B40Q=(__UINTEGER_32)((__UINTEGER_32)(sz__Q53F + a__D40Q) & (__UINTEGER_32)(~ a__D40Q));
      ptr__O53F=micro_alloc__table__lab__BOI(new_size__B40Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B40Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__B40Q);
    } else {
      t__H40Q=((__UINTEGER_32 )typ_id__T53F);
      a__J40Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__O53F=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__Q53F + a__J40Q) & (__UINTEGER_32)(~ a__J40Q)),((__POINTER )(&(table_type[(t__H40Q)]))),(__UINTEGER_32)(t__H40Q |  1));
    };
    result__N53F=((__SLOT_DATA *)ptr__O53F);
    *(result__N53F) = *(SLOT_DATA__);
  };
  return(result__N53F);
}

static void make__name__style__base__type__P25F(__SLOT_DATA *Self__Q25F,__POSITION pos__R25F,void *n__S25F,__CHARACTER s__T25F,void *b__U25F,void *t__V25F)
// ({SLOT_DATA},{POSITION},{NULLxSTRING_CONSTANT},{CHARACTER},{NULLxSLOT},{NULLxTYPE_FULL}) VoidNo recursive, No inlinable.
{
  void *tmp__X25F;
  tmp__X25F=NULL;
  Self__Q25F->parent_slot__BJZD=b__U25F;
  Self__Q25F->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM=pos__R25F;
  Self__Q25F->parent_variable__AJZD.parent_named__A2LC.name__1QB=n__S25F;
  Self__Q25F->parent_variable__AJZD.parent_named__A2LC.style__LDGC=s__T25F;
  Self__Q25F->parent_variable__AJZD.intern_name__025F=get_intern__3MBG(Self__Q25F->parent_variable__AJZD.parent_named__A2LC.name__1QB);
  Self__Q25F->parent_variable__AJZD.type__125F=t__V25F;
  if (((((__UINTEGER_8)(((__TYPE_FULL *)Self__Q25F->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)Self__Q25F->parent_variable__AJZD.type__125F)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)Self__Q25F->parent_variable__AJZD.parent_named__A2LC.name__1QB == (void *)(&__string_57)))) {
    tmp__X25F=new__XWSG();
    add__R2EJ(tmp__X25F,((__TYPE_FULL *)Self__Q25F->parent_variable__AJZD.type__125F)->parent_type__KTL);
    Self__Q25F->parent_variable__AJZD.type_list__HKZD=to_types__A4EJ(tmp__X25F);
  } else {
    Self__Q25F->parent_variable__AJZD.type_list__HKZD=TYPES__;
  };
}

static __FAST_ARRAYoSLOT_CODEo* create_with_capacity__HV4J()
// () With resultNo recursive, No inlinable.
{
  __POINTER ptr__KNAK;
  __INTEGER typ_id__PNAK;
  __UINTEGER_32 sz__MNAK,a__O40Q,new_size__M40Q,t__S40Q,a__U40Q;
  __FAST_ARRAYoSLOT_CODEo *result__JNAK,*Self__FFJK;
  result__JNAK=NULL;
  ptr__KNAK=((__POINTER )(NULL));
  typ_id__PNAK= 0;
  sz__MNAK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOT_CODEo));
  if ((sz__MNAK ==  0)) {
    result__JNAK=FAST_ARRAYoSLOT_CODEo__;
  } else {
    typ_id__PNAK=__FAST_ARRAYoSLOT_CODEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MNAK);
    if ((typ_id__PNAK == (__INTEGER)(-  1))) {
      a__O40Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__M40Q=(__UINTEGER_32)((__UINTEGER_32)(sz__MNAK + a__O40Q) & (__UINTEGER_32)(~ a__O40Q));
      ptr__KNAK=micro_alloc__table__lab__BOI(new_size__M40Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M40Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__M40Q);
    } else {
      t__S40Q=((__UINTEGER_32 )typ_id__PNAK);
      a__U40Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__KNAK=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MNAK + a__U40Q) & (__UINTEGER_32)(~ a__U40Q)),((__POINTER )(&(table_type[(t__S40Q)]))),(__UINTEGER_32)(t__S40Q |  1));
    };
    result__JNAK=((__FAST_ARRAYoSLOT_CODEo *)ptr__KNAK);
    *(result__JNAK) = *(FAST_ARRAYoSLOT_CODEo__);
  };
  Self__FFJK=((__FAST_ARRAYoSLOT_CODEo *)result__JNAK);
  if ((Self__FFJK->parent_arrayed_collection__YUIJ.capacity__VPIK <  1)) {
    Self__FFJK->parent_arrayed_collection__YUIJ.storage__RQIK=create__Q5YK( 1);
    Self__FFJK->parent_arrayed_collection__YUIJ.capacity__VPIK= 1;
  };
  Self__FFJK->parent_arrayed_collection__YUIJ.upper__TVIJ=(__INTEGER)(-  1);
  return(result__JNAK);
}

static void add_last__QPIK(__FAST_ARRAYoSLOT_CODEo *Self__RPIK,void *element__SPIK)
// ({FAST_ARRAYoSLOT_CODEo},{NULLxSLOT_CODE}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__TPIK,__tmp__1QIK,__tmp__4NOL,Self__3EMM;
  __BOOLEAN __tmp__CQIK;
  void **__tmp__0QIK,**new__LNOL;
  new_capacity__TPIK= 0;
  if (((__INTEGER)(Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ +  1) <= (__INTEGER)(Self__RPIK->parent_arrayed_collection__YUIJ.capacity__VPIK -  1))) {
    Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ=(__INTEGER)(Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ +  1);
    __tmp__CQIK=TRUE__;
  } else {
    __tmp__CQIK=FALSE__;
  };
  if ((! __tmp__CQIK)) {
    if ((Self__RPIK->parent_arrayed_collection__YUIJ.capacity__VPIK ==  0)) {
      Self__RPIK->parent_arrayed_collection__YUIJ.storage__RQIK=create__Q5YK( 2);
      Self__RPIK->parent_arrayed_collection__YUIJ.capacity__VPIK= 2;
      Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ= 0;
    } else {
      new_capacity__TPIK=(__INTEGER)(Self__RPIK->parent_arrayed_collection__YUIJ.capacity__VPIK <<  1);
      __tmp__0QIK=Self__RPIK->parent_arrayed_collection__YUIJ.storage__RQIK;
      __tmp__1QIK=Self__RPIK->parent_arrayed_collection__YUIJ.capacity__VPIK;
      new__LNOL=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__0QIK)),((__UINTEGER_32 )(__INTEGER)(__tmp__1QIK * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__TPIK * ((__INTEGER )(sizeof(void *)))))));
      __tmp__4NOL=(__INTEGER)(new_capacity__TPIK -  1);
      Self__3EMM=__tmp__1QIK;
      while ((Self__3EMM <= __tmp__4NOL)) {
        new__LNOL[Self__3EMM]=NULL;
        Self__3EMM=(__INTEGER)(Self__3EMM +  1);
      };
      Self__RPIK->parent_arrayed_collection__YUIJ.storage__RQIK=new__LNOL;
      Self__RPIK->parent_arrayed_collection__YUIJ.capacity__VPIK=new_capacity__TPIK;
      Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ=(__INTEGER)(Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ +  1);
    };
  };
  ((void **)Self__RPIK->parent_arrayed_collection__YUIJ.storage__RQIK)[Self__RPIK->parent_arrayed_collection__YUIJ.upper__TVIJ]=element__SPIK;
}

static void* get_argument__T0TI(__DTA_BLOCK *Self__U0TI)
// ({DTA_BLOCK}) With resultNo recursive, No inlinable.
{
  void *rd__Y0TI,*__tmp__H1TI;
  void *__tmp__G1TI,*__tmp__J1TI,*__tmp__K1TI,*__tmp__Z1TI,*__tmp__01TI;
  __STRING_CST *Self__MI3P,*Self__ZI3P;
  __PROTOTYPE_CST *Self__NI3P,*Self__0I3P;
  __INTEGER_CST *Self__OI3P,*Self__1I3P;
  __REAL_CST *Self__QI3P,*Self__3I3P;
  __CHARACTER_CST *Self__SI3P,*Self__5I3P;
  __IS_EXPANDED *Self__TI3P,*Self__AJ3P;
  __INTEGER __tmp__S1TI,Self__MPPJ;
  void *result__W0TI;
  result__W0TI=NULL;
  rd__Y0TI=NULL;
  if (Self__U0TI->copy_argument__Z0TI) {
    result__W0TI=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__U0TI->argument_list__2KFI)->parent_arrayed_collection__42LC.upper__USSH +  1));
    __tmp__G1TI=((void **)((__FAST_ARRAYoEXPRo *)Self__U0TI->argument_list__2KFI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    if (__tmp__G1TI==NULL) {
      __tmp__H1TI=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__G1TI)->__id) {
      case __LIST__: {
        __tmp__H1TI=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__H1TI=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__H1TI=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__H1TI=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__H1TI=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__H1TI=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__H1TI=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__H1TI=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__H1TI=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__H1TI=NULL;
      } break;
      case __ITEM__: {
        __tmp__H1TI=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__H1TI=NULL;
      } break;
      case __CAST__: {
        __tmp__H1TI=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__H1TI=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__H1TI=((void *)__tmp__G1TI);
      } break;
      case __READ_GLOBAL__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__H1TI=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__H1TI=NULL;
      } break;
      }
    };
    rd__Y0TI=__tmp__H1TI;
    __tmp__J1TI=((__READ_SLOT *)__tmp__H1TI)->receiver__I1TI;
    switch (((struct ___OBJ *)__tmp__J1TI)->__id) {
    case __LIST__: {
      __tmp__K1TI=my_copy__2HYM(__tmp__J1TI);
    } break;
    case __STRING_CST__: {
      Self__MI3P=((__STRING_CST *)__tmp__J1TI);
      __tmp__K1TI=create__text__AUMH(Self__MI3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MI3P->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__K1TI=my_copy__2K2H(__tmp__J1TI);
    } break;
    case __PROTOTYPE_CST__: {
      Self__NI3P=((__PROTOTYPE_CST *)__tmp__J1TI);
      __tmp__K1TI=create__type__CLQC(Self__NI3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NI3P->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__OI3P=((__INTEGER_CST *)__tmp__J1TI);
      __tmp__K1TI=create__value__type__DNQC(Self__OI3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OI3P->value__PAZD,Self__OI3P->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__K1TI=my_copy__OAFJ(__tmp__J1TI);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__K1TI=my_copy__KM2H(__tmp__J1TI);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__K1TI=my_copy__DN2H(__tmp__J1TI);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__K1TI=my_copy__QN2H(__tmp__J1TI);
    } break;
    case __REAL_CST__: {
      Self__QI3P=((__REAL_CST *)__tmp__J1TI);
      __tmp__K1TI=create__value__type__1SMH(Self__QI3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QI3P->value__5N2H,Self__QI3P->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__SI3P=((__CHARACTER_CST *)__tmp__J1TI);
      __tmp__K1TI=create__char__WTMH(Self__SI3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SI3P->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__TI3P=((__IS_EXPANDED *)__tmp__J1TI);
      __tmp__K1TI=create__receiver__WRWH(Self__TI3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__TI3P->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__K1TI=my_copy__TO2H(__tmp__J1TI);
    } break;
    case __EXPR_SUP__: {
      __tmp__K1TI=my_copy__2O2H(__tmp__J1TI);
    } break;
    case __EXPR_SUB__: {
      __tmp__K1TI=my_copy__HP2H(__tmp__J1TI);
    } break;
    case __EXPR_MUL__: {
      __tmp__K1TI=my_copy__TP2H(__tmp__J1TI);
    } break;
    case __EXPR_DIV__: {
      __tmp__K1TI=my_copy__4P2H(__tmp__J1TI);
    } break;
    case __EXPR_AND__: {
      __tmp__K1TI=my_copy__JQ2H(__tmp__J1TI);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__K1TI=my_copy__UQ2H(__tmp__J1TI);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__K1TI=my_copy__5Q2H(__tmp__J1TI);
    } break;
    case __PUT_TO__: {
      __tmp__K1TI=my_copy__KR2H(__tmp__J1TI);
    } break;
    case __ITEM__: {
      __tmp__K1TI=my_copy__1R2H(__tmp__J1TI);
    } break;
    case __SIZE_OF__: {
      __tmp__K1TI=my_copy__HS2H(__tmp__J1TI);
    } break;
    case __CAST__: {
      __tmp__K1TI=my_copy__QS2H(__tmp__J1TI);
    } break;
    case __CALL_SLOT__: {
      __tmp__K1TI=my_copy__PIYM(__tmp__J1TI);
    } break;
    case __READ_SLOT__: {
      __tmp__K1TI=my_copy__AVGK(__tmp__J1TI);
    } break;
    case __READ_GLOBAL__: {
      __tmp__K1TI=my_copy__NVGK(__tmp__J1TI);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__K1TI=my_copy__RFCN(__tmp__J1TI);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__K1TI=my_copy__JMEO(__tmp__J1TI);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__K1TI=my_copy__RTJO(__tmp__J1TI);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__K1TI=my_copy__WMEO(__tmp__J1TI);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__K1TI=my_copy__3TJO(__tmp__J1TI);
    } break;
    case __EXPR_NEG__: {
      __tmp__K1TI=my_copy__YEJM(__tmp__J1TI);
    } break;
    case __EXPR_ADD__: {
      __tmp__K1TI=my_copy__YRLL(__tmp__J1TI);
    } break;
    case __EXPR_NOT__: {
      __tmp__K1TI=my_copy__GLYM(__tmp__J1TI);
    } break;
    case __EXPR_MOD__: {
      __tmp__K1TI=my_copy__BNEO(__tmp__J1TI);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__K1TI=my_copy__M3DP(__tmp__J1TI);
    } break;
    case __EXPR_INF__: {
      __tmp__K1TI=my_copy__PBSN(__tmp__J1TI);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__K1TI=my_copy__0BSN(__tmp__J1TI);
    } break;
    case __EXPR_OR__: {
      __tmp__K1TI=my_copy__ZOPN(__tmp__J1TI);
    } break;
    case __EXPR_XOR__: {
      __tmp__K1TI=my_copy__CYSO(__tmp__J1TI);
    } break;
    };
    add_last__XSEI(result__W0TI,__tmp__K1TI);
    __tmp__S1TI=((__FAST_ARRAYoEXPRo *)Self__U0TI->argument_list__2KFI)->parent_arrayed_collection__42LC.upper__USSH;
    Self__MPPJ= 1;
    while ((Self__MPPJ <= __tmp__S1TI)) {
      __tmp__Z1TI=((void **)((__FAST_ARRAYoEXPRo *)Self__U0TI->argument_list__2KFI)->parent_arrayed_collection__42LC.storage__1SDI)[Self__MPPJ];
      switch (((struct ___OBJ *)__tmp__Z1TI)->__id) {
      case __LIST__: {
        __tmp__01TI=my_copy__2HYM(__tmp__Z1TI);
      } break;
      case __STRING_CST__: {
        Self__ZI3P=((__STRING_CST *)__tmp__Z1TI);
        __tmp__01TI=create__text__AUMH(Self__ZI3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZI3P->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__01TI=my_copy__2K2H(__tmp__Z1TI);
      } break;
      case __PROTOTYPE_CST__: {
        Self__0I3P=((__PROTOTYPE_CST *)__tmp__Z1TI);
        __tmp__01TI=create__type__CLQC(Self__0I3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0I3P->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__1I3P=((__INTEGER_CST *)__tmp__Z1TI);
        __tmp__01TI=create__value__type__DNQC(Self__1I3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1I3P->value__PAZD,Self__1I3P->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__01TI=my_copy__OAFJ(__tmp__Z1TI);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__01TI=my_copy__KM2H(__tmp__Z1TI);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__01TI=my_copy__DN2H(__tmp__Z1TI);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__01TI=my_copy__QN2H(__tmp__Z1TI);
      } break;
      case __REAL_CST__: {
        Self__3I3P=((__REAL_CST *)__tmp__Z1TI);
        __tmp__01TI=create__value__type__1SMH(Self__3I3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3I3P->value__5N2H,Self__3I3P->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__5I3P=((__CHARACTER_CST *)__tmp__Z1TI);
        __tmp__01TI=create__char__WTMH(Self__5I3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5I3P->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__AJ3P=((__IS_EXPANDED *)__tmp__Z1TI);
        __tmp__01TI=create__receiver__WRWH(Self__AJ3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__AJ3P->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__01TI=my_copy__TO2H(__tmp__Z1TI);
      } break;
      case __EXPR_SUP__: {
        __tmp__01TI=my_copy__2O2H(__tmp__Z1TI);
      } break;
      case __EXPR_SUB__: {
        __tmp__01TI=my_copy__HP2H(__tmp__Z1TI);
      } break;
      case __EXPR_MUL__: {
        __tmp__01TI=my_copy__TP2H(__tmp__Z1TI);
      } break;
      case __EXPR_DIV__: {
        __tmp__01TI=my_copy__4P2H(__tmp__Z1TI);
      } break;
      case __EXPR_AND__: {
        __tmp__01TI=my_copy__JQ2H(__tmp__Z1TI);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__01TI=my_copy__UQ2H(__tmp__Z1TI);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__01TI=my_copy__5Q2H(__tmp__Z1TI);
      } break;
      case __PUT_TO__: {
        __tmp__01TI=my_copy__KR2H(__tmp__Z1TI);
      } break;
      case __ITEM__: {
        __tmp__01TI=my_copy__1R2H(__tmp__Z1TI);
      } break;
      case __SIZE_OF__: {
        __tmp__01TI=my_copy__HS2H(__tmp__Z1TI);
      } break;
      case __CAST__: {
        __tmp__01TI=my_copy__QS2H(__tmp__Z1TI);
      } break;
      case __CALL_SLOT__: {
        __tmp__01TI=my_copy__PIYM(__tmp__Z1TI);
      } break;
      case __READ_SLOT__: {
        __tmp__01TI=my_copy__AVGK(__tmp__Z1TI);
      } break;
      case __READ_GLOBAL__: {
        __tmp__01TI=my_copy__NVGK(__tmp__Z1TI);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__01TI=my_copy__RFCN(__tmp__Z1TI);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__01TI=my_copy__JMEO(__tmp__Z1TI);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__01TI=my_copy__RTJO(__tmp__Z1TI);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__01TI=my_copy__WMEO(__tmp__Z1TI);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__01TI=my_copy__3TJO(__tmp__Z1TI);
      } break;
      case __EXPR_NEG__: {
        __tmp__01TI=my_copy__YEJM(__tmp__Z1TI);
      } break;
      case __EXPR_ADD__: {
        __tmp__01TI=my_copy__YRLL(__tmp__Z1TI);
      } break;
      case __EXPR_NOT__: {
        __tmp__01TI=my_copy__GLYM(__tmp__Z1TI);
      } break;
      case __EXPR_MOD__: {
        __tmp__01TI=my_copy__BNEO(__tmp__Z1TI);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__01TI=my_copy__M3DP(__tmp__Z1TI);
      } break;
      case __EXPR_INF__: {
        __tmp__01TI=my_copy__PBSN(__tmp__Z1TI);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__01TI=my_copy__0BSN(__tmp__Z1TI);
      } break;
      case __EXPR_OR__: {
        __tmp__01TI=my_copy__ZOPN(__tmp__Z1TI);
      } break;
      case __EXPR_XOR__: {
        __tmp__01TI=my_copy__CYSO(__tmp__Z1TI);
      } break;
      };
      add_last__XSEI(result__W0TI,__tmp__01TI);
      Self__MPPJ=(__INTEGER)(Self__MPPJ +  1);
    };
  } else {
    result__W0TI=Self__U0TI->argument_list__2KFI;
    Self__U0TI->copy_argument__Z0TI=TRUE__;
  };
  return(result__W0TI);
}

static void* read__with__FYKJ(__SLOT_DATA *Self__GYKJ,void *r__IYKJ)
// ({SLOT_DATA},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__GPOJ;
  void *result__H0UJ;
  __READ_GLOBAL *result__PABK,*Self__OHJK;
  __POINTER ptr__QABK,ptr__ZCBK;
  __INTEGER typ_id__VABK,typ_id__4CBK;
  __UINTEGER_32 sz__SABK,a__040Q,new_size__Y40Q,t__440Q,a__A50Q;
  __UINTEGER_32 sz__1CBK,a__F50Q,new_size__D50Q,t__J50Q,a__L50Q;
  __READ_SLOT *result__YCBK,*Self__XHJK;
  __tmp__GPOJ=Self__GYKJ->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
  result__H0UJ=NULL;
  if ((Self__GYKJ->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) {
    result__PABK=NULL;
    ptr__QABK=((__POINTER )(NULL));
    typ_id__VABK= 0;
    sz__SABK=((__UINTEGER_32 )sizeof(__READ_GLOBAL));
    if ((sz__SABK ==  0)) {
      result__PABK=READ_GLOBAL__;
    } else {
      typ_id__VABK=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__SABK);
      if ((typ_id__VABK == (__INTEGER)(-  1))) {
        a__040Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__Y40Q=(__UINTEGER_32)((__UINTEGER_32)(sz__SABK + a__040Q) & (__UINTEGER_32)(~ a__040Q));
        ptr__QABK=micro_alloc__table__lab__BOI(new_size__Y40Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y40Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Y40Q);
      } else {
        t__440Q=((__UINTEGER_32 )typ_id__VABK);
        a__A50Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__QABK=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__SABK + a__A50Q) & (__UINTEGER_32)(~ a__A50Q)),((__POINTER )(&(table_type[(t__440Q)]))),(__UINTEGER_32)(t__440Q |  1));
      };
      result__PABK=((__READ_GLOBAL *)ptr__QABK);
      *(result__PABK) = *(READ_GLOBAL__);
    };
    Self__OHJK=((__READ_GLOBAL *)result__PABK);
    Self__OHJK->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__GPOJ;
    Self__OHJK->global__RHJK=Self__GYKJ;
    result__H0UJ=result__PABK;
  } else {
    result__YCBK=NULL;
    ptr__ZCBK=((__POINTER )(NULL));
    typ_id__4CBK= 0;
    sz__1CBK=((__UINTEGER_32 )sizeof(__READ_SLOT));
    if ((sz__1CBK ==  0)) {
      result__YCBK=READ_SLOT__;
    } else {
      typ_id__4CBK=-1;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__1CBK);
      if ((typ_id__4CBK == (__INTEGER)(-  1))) {
        a__F50Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__D50Q=(__UINTEGER_32)((__UINTEGER_32)(sz__1CBK + a__F50Q) & (__UINTEGER_32)(~ a__F50Q));
        ptr__ZCBK=micro_alloc__table__lab__BOI(new_size__D50Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D50Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__D50Q);
      } else {
        t__J50Q=((__UINTEGER_32 )typ_id__4CBK);
        a__L50Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__ZCBK=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__1CBK + a__L50Q) & (__UINTEGER_32)(~ a__L50Q)),((__POINTER )(&(table_type[(t__J50Q)]))),(__UINTEGER_32)(t__J50Q |  1));
      };
      result__YCBK=((__READ_SLOT *)ptr__ZCBK);
      *(result__YCBK) = *(READ_SLOT__);
    };
    Self__XHJK=((__READ_SLOT *)result__YCBK);
    Self__XHJK->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__GPOJ;
    Self__XHJK->receiver__I1TI=r__IYKJ;
    Self__XHJK->slot__EVGK=Self__GYKJ;
    result__H0UJ=result__YCBK;
  };
  Self__GYKJ->parent_variable__AJZD.ensure_count__QEAG=(__INTEGER)(Self__GYKJ->parent_variable__AJZD.ensure_count__QEAG +  1);
  return(result__H0UJ);
}

static __FAST_ARRAYoWRITEo* create_with_capacity__UIPH(__INTEGER new_count__WIPH)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__LSRH;
  __INTEGER typ_id__QSRH;
  __UINTEGER_32 sz__NSRH,a__Q50Q,new_size__O50Q,t__U50Q,a__W50Q;
  __FAST_ARRAYoWRITEo *result__KSRH,*Self__UREI;
  result__KSRH=NULL;
  ptr__LSRH=((__POINTER )(NULL));
  typ_id__QSRH= 0;
  sz__NSRH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoWRITEo));
  if ((sz__NSRH ==  0)) {
    result__KSRH=FAST_ARRAYoWRITEo__;
  } else {
    typ_id__QSRH=__FAST_ARRAYoWRITEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__NSRH);
    if ((typ_id__QSRH == (__INTEGER)(-  1))) {
      a__Q50Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__O50Q=(__UINTEGER_32)((__UINTEGER_32)(sz__NSRH + a__Q50Q) & (__UINTEGER_32)(~ a__Q50Q));
      ptr__LSRH=micro_alloc__table__lab__BOI(new_size__O50Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O50Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__O50Q);
    } else {
      t__U50Q=((__UINTEGER_32 )typ_id__QSRH);
      a__W50Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__LSRH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__NSRH + a__W50Q) & (__UINTEGER_32)(~ a__W50Q)),((__POINTER )(&(table_type[(t__U50Q)]))),(__UINTEGER_32)(t__U50Q |  1));
    };
    result__KSRH=((__FAST_ARRAYoWRITEo *)ptr__LSRH);
    *(result__KSRH) = *(FAST_ARRAYoWRITEo__);
  };
  Self__UREI=((__FAST_ARRAYoWRITEo *)result__KSRH);
  if ((Self__UREI->parent_arrayed_collection__TAEH.capacity__PPDI < new_count__WIPH)) {
    Self__UREI->parent_arrayed_collection__TAEH.storage__LQDI=create__SVXI(new_count__WIPH);
    Self__UREI->parent_arrayed_collection__TAEH.capacity__PPDI=new_count__WIPH;
  };
  Self__UREI->parent_arrayed_collection__TAEH.upper__NPDI=(__INTEGER)(-  1);
  return(result__KSRH);
}

static void add_last__JPDI(__FAST_ARRAYoWRITEo *Self__KPDI,void *element__LPDI)
// ({FAST_ARRAYoWRITEo},{NULLxWRITE_GLOBALxWRITE_SLOTxWRITE_LOCAL}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__MPDI,__tmp__VQDI,__tmp__1FIJ,Self__22MK;
  __BOOLEAN __tmp__2PDI;
  void **__tmp__UQDI,**new__IFIJ;
  new_capacity__MPDI= 0;
  if (((__INTEGER)(Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI +  1) <= (__INTEGER)(Self__KPDI->parent_arrayed_collection__TAEH.capacity__PPDI -  1))) {
    Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI=(__INTEGER)(Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI +  1);
    __tmp__2PDI=TRUE__;
  } else {
    __tmp__2PDI=FALSE__;
  };
  if ((! __tmp__2PDI)) {
    if ((Self__KPDI->parent_arrayed_collection__TAEH.capacity__PPDI ==  0)) {
      Self__KPDI->parent_arrayed_collection__TAEH.storage__LQDI=create__SVXI( 2);
      Self__KPDI->parent_arrayed_collection__TAEH.capacity__PPDI= 2;
      Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI= 0;
    } else {
      new_capacity__MPDI=(__INTEGER)(Self__KPDI->parent_arrayed_collection__TAEH.capacity__PPDI <<  1);
      __tmp__UQDI=Self__KPDI->parent_arrayed_collection__TAEH.storage__LQDI;
      __tmp__VQDI=Self__KPDI->parent_arrayed_collection__TAEH.capacity__PPDI;
      new__IFIJ=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__UQDI)),((__UINTEGER_32 )(__INTEGER)(__tmp__VQDI * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MPDI * ((__INTEGER )(sizeof(void *)))))));
      __tmp__1FIJ=(__INTEGER)(new_capacity__MPDI -  1);
      Self__22MK=__tmp__VQDI;
      while ((Self__22MK <= __tmp__1FIJ)) {
        new__IFIJ[Self__22MK]=NULL;
        Self__22MK=(__INTEGER)(Self__22MK +  1);
      };
      Self__KPDI->parent_arrayed_collection__TAEH.storage__LQDI=new__IFIJ;
      Self__KPDI->parent_arrayed_collection__TAEH.capacity__PPDI=new_capacity__MPDI;
      Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI=(__INTEGER)(Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI +  1);
    };
  };
  ((void **)Self__KPDI->parent_arrayed_collection__TAEH.storage__LQDI)[Self__KPDI->parent_arrayed_collection__TAEH.upper__NPDI]=element__LPDI;
}

static void remove__UUAK(__EXTERNAL_C *Self__VUAK)
// ({EXTERNAL_C}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__BVAK,Self__LDDK;
  void *__tmp__IVAK;
  __READ_LOCAL *Self__RVAK,*Self__EWJQ;
  __READ_GLOBAL *Self__FWJQ;
  if (((void *)Self__VUAK->access_list__XXZD != (void *)NULL)) {
    __tmp__BVAK=((__FAST_ARRAYoEXPRo *)Self__VUAK->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH;
    Self__LDDK= 0;
    while ((Self__LDDK <= __tmp__BVAK)) {
      __tmp__IVAK=((void **)((__FAST_ARRAYoEXPRo *)Self__VUAK->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__LDDK];
      switch (((struct ___OBJ *)__tmp__IVAK)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__IVAK);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__IVAK);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__RVAK=((__READ_LOCAL *)__tmp__IVAK);
        unread__YVJK(Self__RVAK->local__ALZD,Self__RVAK);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__IVAK);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__IVAK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__IVAK);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__EWJQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__IVAK)->receiver__OO2H);
        unread__YVJK(Self__EWJQ->local__ALZD,Self__EWJQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__IVAK);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__IVAK);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__IVAK);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__IVAK);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__IVAK);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__IVAK);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__IVAK);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__IVAK);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__IVAK);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__IVAK);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__IVAK);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__IVAK);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__IVAK);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__IVAK);
      } break;
      case __READ_GLOBAL__: {
        Self__FWJQ=((__READ_GLOBAL *)__tmp__IVAK);
        unread__15ML(Self__FWJQ->global__RHJK,Self__FWJQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__IVAK);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__IVAK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__IVAK);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__IVAK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__IVAK);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__IVAK);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__IVAK);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__IVAK);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__IVAK);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__IVAK);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__IVAK);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__IVAK);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__IVAK);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__IVAK);
      } break;
      };
      Self__LDDK=(__INTEGER)(Self__LDDK +  1);
    };
  };
}

static void unread__YVJK(__LOCAL *Self__ZVJK,void *e__0VJK)
// ({LOCAL},{READ_LOCAL}) VoidNo recursive, No inlinable.
{
  void *voir__XFZK,*voir__GWJQ;
  __LIST *Self__HWJQ;
  Self__ZVJK->parent_variable__B2LC.ensure_count__QEAG=(__INTEGER)(Self__ZVJK->parent_variable__B2LC.ensure_count__QEAG -  1);
  if ((Self__ZVJK->parent_variable__B2LC.ensure_count__QEAG <  0)) {
    print__1ZE((&__string_506));
    voir__XFZK=create__AXB( 250);
    display__MYFK(e__0VJK,voir__XFZK);
    put_string__2EG(((__STRING *)voir__XFZK));
    fputc((int)('\n'),stdout);
    print__1ZE((&__string_507));
    Self__HWJQ=((__LIST *)list_current__IF1);
    voir__GWJQ=create__AXB( 250);
    display__2QQG(Self__HWJQ,voir__GWJQ);
    put_string__2EG(((__STRING *)voir__GWJQ));
    fputc((int)('\n'),stdout);
    fputc((int)('\n'),stdout);
    print__1ZE((&__string_460));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
}

static void remove__TVAK(__EXPR_MULTIPLE *Self__UVAK)
// ({EXPR_MULTIPLE}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__0VAK,Self__XXBK;
  void *__tmp__BWAK;
  __READ_LOCAL *Self__TM3P,*Self__OWJQ;
  __READ_GLOBAL *Self__PWJQ;
  __tmp__0VAK=((__FAST_ARRAYoEXPRo *)Self__UVAK->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH;
  Self__XXBK= 0;
  while ((Self__XXBK <= __tmp__0VAK)) {
    __tmp__BWAK=((void **)((__FAST_ARRAYoEXPRo *)Self__UVAK->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__XXBK];
    switch (((struct ___OBJ *)__tmp__BWAK)->__id) {
    case __LIST__: {
      remove__KPJJ(__tmp__BWAK);
    } break;
    case __STRING_CST__: {
    } break;
    case __EXTERNAL_C__: {
      remove__UUAK(__tmp__BWAK);
    } break;
    case __PROTOTYPE_CST__: {
    } break;
    case __INTEGER_CST__: {
    } break;
    case __READ_LOCAL__: {
      Self__TM3P=((__READ_LOCAL *)__tmp__BWAK);
      unread__YVJK(Self__TM3P->local__ALZD,Self__TM3P);
    } break;
    case __EXPR_MULTIPLE__: {
      remove__TVAK(__tmp__BWAK);
    } break;
    case __EXPR_EQUAL__: {
      remove__DWAK(__tmp__BWAK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      remove__HWAK(__tmp__BWAK);
    } break;
    case __REAL_CST__: {
    } break;
    case __CHARACTER_CST__: {
    } break;
    case __IS_EXPANDED__: {
      Self__OWJQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BWAK)->receiver__OO2H);
      unread__YVJK(Self__OWJQ->local__ALZD,Self__OWJQ);
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(__tmp__BWAK);
    } break;
    case __EXPR_SUP__: {
      remove__VWAK(__tmp__BWAK);
    } break;
    case __EXPR_SUB__: {
      remove__ZWAK(__tmp__BWAK);
    } break;
    case __EXPR_MUL__: {
      remove__3WAK(__tmp__BWAK);
    } break;
    case __EXPR_DIV__: {
      remove__BXAK(__tmp__BWAK);
    } break;
    case __EXPR_AND__: {
      remove__FXAK(__tmp__BWAK);
    } break;
    case __EXPR_SHIFT_R__: {
      remove__JXAK(__tmp__BWAK);
    } break;
    case __EXPR_SHIFT_L__: {
      remove__NXAK(__tmp__BWAK);
    } break;
    case __PUT_TO__: {
      remove__RXAK(__tmp__BWAK);
    } break;
    case __ITEM__: {
      remove__SYAK(__tmp__BWAK);
    } break;
    case __SIZE_OF__: {
      remove__WYAK(__tmp__BWAK);
    } break;
    case __CAST__: {
      remove__ZYAK(__tmp__BWAK);
    } break;
    case __CALL_SLOT__: {
      remove__2NML(__tmp__BWAK);
    } break;
    case __READ_SLOT__: {
      remove__4GHK(__tmp__BWAK);
    } break;
    case __READ_GLOBAL__: {
      Self__PWJQ=((__READ_GLOBAL *)__tmp__BWAK);
      unread__15ML(Self__PWJQ->global__RHJK,Self__PWJQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      remove__GWZM(__tmp__BWAK);
    } break;
    case __EXPR_OR_LOGIC__: {
      remove__WPEO(__tmp__BWAK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      remove__WMKO(__tmp__BWAK);
    } break;
    case __EXPR_AND_LOGIC__: {
      remove__0PEO(__tmp__BWAK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      remove__1MKO(__tmp__BWAK);
    } break;
    case __EXPR_NEG__: {
      remove__3KJM(__tmp__BWAK);
    } break;
    case __EXPR_ADD__: {
      remove__QQML(__tmp__BWAK);
    } break;
    case __EXPR_NOT__: {
      remove__D5YM(__tmp__BWAK);
    } break;
    case __EXPR_MOD__: {
      remove__4PEO(__tmp__BWAK);
    } break;
    case __EXPR_SUP_EQ__: {
      remove__X5DP(__tmp__BWAK);
    } break;
    case __EXPR_INF__: {
      remove__KZQN(__tmp__BWAK);
    } break;
    case __EXPR_INF_EQ__: {
      remove__OZQN(__tmp__BWAK);
    } break;
    case __EXPR_OR__: {
      remove__LUPN(__tmp__BWAK);
    } break;
    case __EXPR_XOR__: {
      remove__AQTO(__tmp__BWAK);
    } break;
    };
    Self__XXBK=(__INTEGER)(Self__XXBK +  1);
  };
}

static void remove__DWAK(__EXPR_EQUAL *Self__EWAK)
// ({EXPR_EQUAL}) VoidRecursive, No inlinable.
{
  void *__tmp__FWAK,*__tmp__GWAK;
  __READ_LOCAL *Self__XM3P,*Self__RWJQ,*Self__YM3P,*Self__UWJQ;
  __READ_GLOBAL *Self__SWJQ,*Self__VWJQ;
  __tmp__FWAK=Self__EWAK->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__FWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__FWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__FWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__XM3P=((__READ_LOCAL *)__tmp__FWAK);
    unread__YVJK(Self__XM3P->local__ALZD,Self__XM3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__FWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__FWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__FWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__RWJQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__FWAK)->receiver__OO2H);
    unread__YVJK(Self__RWJQ->local__ALZD,Self__RWJQ);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__FWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__FWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__FWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__FWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__FWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__FWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__FWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__FWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__FWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__FWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__FWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__FWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__FWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__FWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__SWJQ=((__READ_GLOBAL *)__tmp__FWAK);
    unread__15ML(Self__SWJQ->global__RHJK,Self__SWJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__FWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__FWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__FWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__FWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__FWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__FWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__FWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__FWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__FWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__FWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__FWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__FWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__FWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__FWAK);
  } break;
  };
  __tmp__GWAK=Self__EWAK->parent_expr_binary_cmp__1LJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__GWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__GWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__GWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__YM3P=((__READ_LOCAL *)__tmp__GWAK);
    unread__YVJK(Self__YM3P->local__ALZD,Self__YM3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__GWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__GWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__GWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__UWJQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GWAK)->receiver__OO2H);
    unread__YVJK(Self__UWJQ->local__ALZD,Self__UWJQ);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__GWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__GWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__GWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__GWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__GWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__GWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__GWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__GWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__GWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__GWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__GWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__GWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__GWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__GWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__VWJQ=((__READ_GLOBAL *)__tmp__GWAK);
    unread__15ML(Self__VWJQ->global__RHJK,Self__VWJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__GWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__GWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__GWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__GWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__GWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__GWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__GWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__GWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__GWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__GWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__GWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__GWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__GWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__GWAK);
  } break;
  };
}

static void remove__HWAK(__EXPR_NOT_EQUAL *Self__IWAK)
// ({EXPR_NOT_EQUAL}) VoidRecursive, No inlinable.
{
  void *__tmp__JWAK,*__tmp__KWAK;
  __READ_LOCAL *Self__ZM3P,*Self__XWJQ,*Self__0M3P,*Self__1M3P;
  __READ_GLOBAL *Self__YWJQ,*Self__ZWJQ;
  __tmp__JWAK=Self__IWAK->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__JWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__JWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__JWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__ZM3P=((__READ_LOCAL *)__tmp__JWAK);
    unread__YVJK(Self__ZM3P->local__ALZD,Self__ZM3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__JWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__JWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__JWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__XWJQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__JWAK)->receiver__OO2H);
    unread__YVJK(Self__XWJQ->local__ALZD,Self__XWJQ);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__JWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__JWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__JWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__JWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__JWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__JWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__JWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__JWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__JWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__JWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__JWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__JWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__JWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__JWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__YWJQ=((__READ_GLOBAL *)__tmp__JWAK);
    unread__15ML(Self__YWJQ->global__RHJK,Self__YWJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__JWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__JWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__JWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__JWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__JWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__JWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__JWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__JWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__JWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__JWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__JWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__JWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__JWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__JWAK);
  } break;
  };
  __tmp__KWAK=Self__IWAK->parent_expr_binary_cmp__DMJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__KWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__KWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__KWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__0M3P=((__READ_LOCAL *)__tmp__KWAK);
    unread__YVJK(Self__0M3P->local__ALZD,Self__0M3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__KWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__KWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__KWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__1M3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__KWAK)->receiver__OO2H);
    unread__YVJK(Self__1M3P->local__ALZD,Self__1M3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__KWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__KWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__KWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__KWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__KWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__KWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__KWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__KWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__KWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__KWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__KWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__KWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__KWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__KWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__ZWJQ=((__READ_GLOBAL *)__tmp__KWAK);
    unread__15ML(Self__ZWJQ->global__RHJK,Self__ZWJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__KWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__KWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__KWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__KWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__KWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__KWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__KWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__KWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__KWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__KWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__KWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__KWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__KWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__KWAK);
  } break;
  };
}

static void remove__SWAK(__GET_TYPE_ID *Self__TWAK)
// ({GET_TYPE_ID}) VoidRecursive, No inlinable.
{
  void *__tmp__UWAK;
  __READ_LOCAL *Self__2M3P,*Self__4M3P;
  __READ_GLOBAL *Self__0WJQ;
  __tmp__UWAK=Self__TWAK->receiver__XO2H;
  switch (((struct ___OBJ *)__tmp__UWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__UWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__UWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__2M3P=((__READ_LOCAL *)__tmp__UWAK);
    unread__YVJK(Self__2M3P->local__ALZD,Self__2M3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__UWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__UWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__UWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__4M3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__UWAK)->receiver__OO2H);
    unread__YVJK(Self__4M3P->local__ALZD,Self__4M3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__UWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__UWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__UWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__UWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__UWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__UWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__UWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__UWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__UWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__UWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__UWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__UWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__UWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__UWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__0WJQ=((__READ_GLOBAL *)__tmp__UWAK);
    unread__15ML(Self__0WJQ->global__RHJK,Self__0WJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__UWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__UWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__UWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__UWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__UWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__UWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__UWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__UWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__UWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__UWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__UWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__UWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__UWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__UWAK);
  } break;
  };
}

static void remove__VWAK(__EXPR_SUP *Self__WWAK)
// ({EXPR_SUP}) VoidRecursive, No inlinable.
{
  void *__tmp__XWAK,*__tmp__YWAK;
  __READ_LOCAL *Self__5M3P,*Self__BN3P,*Self__CN3P,*Self__EN3P;
  __READ_GLOBAL *Self__1WJQ,*Self__2WJQ;
  __tmp__XWAK=Self__WWAK->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__XWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__XWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__XWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__5M3P=((__READ_LOCAL *)__tmp__XWAK);
    unread__YVJK(Self__5M3P->local__ALZD,Self__5M3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__XWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__XWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__XWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__BN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__XWAK)->receiver__OO2H);
    unread__YVJK(Self__BN3P->local__ALZD,Self__BN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__XWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__XWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__XWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__XWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__XWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__XWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__XWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__XWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__XWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__XWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__XWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__XWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__XWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__XWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__1WJQ=((__READ_GLOBAL *)__tmp__XWAK);
    unread__15ML(Self__1WJQ->global__RHJK,Self__1WJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__XWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__XWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__XWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__XWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__XWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__XWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__XWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__XWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__XWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__XWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__XWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__XWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__XWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__XWAK);
  } break;
  };
  __tmp__YWAK=Self__WWAK->parent_expr_binary_cmp__TAKH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__YWAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__YWAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__YWAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__CN3P=((__READ_LOCAL *)__tmp__YWAK);
    unread__YVJK(Self__CN3P->local__ALZD,Self__CN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__YWAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__YWAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__YWAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__EN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YWAK)->receiver__OO2H);
    unread__YVJK(Self__EN3P->local__ALZD,Self__EN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__YWAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__YWAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__YWAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__YWAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__YWAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__YWAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__YWAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__YWAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__YWAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__YWAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__YWAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__YWAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__YWAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__YWAK);
  } break;
  case __READ_GLOBAL__: {
    Self__2WJQ=((__READ_GLOBAL *)__tmp__YWAK);
    unread__15ML(Self__2WJQ->global__RHJK,Self__2WJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__YWAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__YWAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__YWAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__YWAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__YWAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__YWAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__YWAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__YWAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__YWAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__YWAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__YWAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__YWAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__YWAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__YWAK);
  } break;
  };
}

static void remove__ZWAK(__EXPR_SUB *Self__0WAK)
// ({EXPR_SUB}) VoidRecursive, No inlinable.
{
  void *__tmp__1WAK,*__tmp__2WAK;
  __READ_LOCAL *Self__FN3P,*Self__HN3P,*Self__IN3P,*Self__KN3P;
  __READ_GLOBAL *Self__3WJQ,*Self__4WJQ;
  __tmp__1WAK=Self__0WAK->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__1WAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__1WAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__1WAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__FN3P=((__READ_LOCAL *)__tmp__1WAK);
    unread__YVJK(Self__FN3P->local__ALZD,Self__FN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__1WAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__1WAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__1WAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__HN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__1WAK)->receiver__OO2H);
    unread__YVJK(Self__HN3P->local__ALZD,Self__HN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__1WAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__1WAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__1WAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__1WAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__1WAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__1WAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__1WAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__1WAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__1WAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__1WAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__1WAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__1WAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__1WAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__1WAK);
  } break;
  case __READ_GLOBAL__: {
    Self__3WJQ=((__READ_GLOBAL *)__tmp__1WAK);
    unread__15ML(Self__3WJQ->global__RHJK,Self__3WJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__1WAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__1WAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__1WAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__1WAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__1WAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__1WAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__1WAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__1WAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__1WAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__1WAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__1WAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__1WAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__1WAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__1WAK);
  } break;
  };
  __tmp__2WAK=Self__0WAK->parent_expr_binary__HBKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__2WAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__2WAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__2WAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__IN3P=((__READ_LOCAL *)__tmp__2WAK);
    unread__YVJK(Self__IN3P->local__ALZD,Self__IN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__2WAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__2WAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__2WAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__KN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2WAK)->receiver__OO2H);
    unread__YVJK(Self__KN3P->local__ALZD,Self__KN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__2WAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__2WAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__2WAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__2WAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__2WAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__2WAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__2WAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__2WAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__2WAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__2WAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__2WAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__2WAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__2WAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__2WAK);
  } break;
  case __READ_GLOBAL__: {
    Self__4WJQ=((__READ_GLOBAL *)__tmp__2WAK);
    unread__15ML(Self__4WJQ->global__RHJK,Self__4WJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__2WAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__2WAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__2WAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__2WAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__2WAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__2WAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__2WAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__2WAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__2WAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__2WAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__2WAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__2WAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__2WAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__2WAK);
  } break;
  };
}

static void remove__3WAK(__EXPR_MUL *Self__4WAK)
// ({EXPR_MUL}) VoidRecursive, No inlinable.
{
  void *__tmp__5WAK,*__tmp__AXAK;
  __READ_LOCAL *Self__LN3P,*Self__NN3P,*Self__ON3P,*Self__QN3P;
  __READ_GLOBAL *Self__5WJQ,*Self__AXJQ;
  __tmp__5WAK=Self__4WAK->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__5WAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__5WAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__5WAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__LN3P=((__READ_LOCAL *)__tmp__5WAK);
    unread__YVJK(Self__LN3P->local__ALZD,Self__LN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__5WAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__5WAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__5WAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__NN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__5WAK)->receiver__OO2H);
    unread__YVJK(Self__NN3P->local__ALZD,Self__NN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__5WAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__5WAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__5WAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__5WAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__5WAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__5WAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__5WAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__5WAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__5WAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__5WAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__5WAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__5WAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__5WAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__5WAK);
  } break;
  case __READ_GLOBAL__: {
    Self__5WJQ=((__READ_GLOBAL *)__tmp__5WAK);
    unread__15ML(Self__5WJQ->global__RHJK,Self__5WJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__5WAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__5WAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__5WAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__5WAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__5WAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__5WAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__5WAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__5WAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__5WAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__5WAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__5WAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__5WAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__5WAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__5WAK);
  } break;
  };
  __tmp__AXAK=Self__4WAK->parent_expr_binary__0BKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__AXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__AXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__AXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__ON3P=((__READ_LOCAL *)__tmp__AXAK);
    unread__YVJK(Self__ON3P->local__ALZD,Self__ON3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__AXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__AXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__AXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__QN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__AXAK)->receiver__OO2H);
    unread__YVJK(Self__QN3P->local__ALZD,Self__QN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__AXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__AXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__AXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__AXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__AXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__AXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__AXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__AXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__AXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__AXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__AXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__AXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__AXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__AXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__AXJQ=((__READ_GLOBAL *)__tmp__AXAK);
    unread__15ML(Self__AXJQ->global__RHJK,Self__AXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__AXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__AXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__AXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__AXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__AXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__AXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__AXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__AXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__AXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__AXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__AXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__AXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__AXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__AXAK);
  } break;
  };
}

static void remove__BXAK(__EXPR_DIV *Self__CXAK)
// ({EXPR_DIV}) VoidRecursive, No inlinable.
{
  void *__tmp__DXAK,*__tmp__EXAK;
  __READ_LOCAL *Self__RN3P,*Self__TN3P,*Self__UN3P,*Self__WN3P;
  __READ_GLOBAL *Self__BXJQ,*Self__CXJQ;
  __tmp__DXAK=Self__CXAK->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__DXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__DXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__DXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__RN3P=((__READ_LOCAL *)__tmp__DXAK);
    unread__YVJK(Self__RN3P->local__ALZD,Self__RN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__DXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__DXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__DXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__TN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__DXAK)->receiver__OO2H);
    unread__YVJK(Self__TN3P->local__ALZD,Self__TN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__DXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__DXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__DXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__DXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__DXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__DXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__DXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__DXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__DXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__DXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__DXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__DXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__DXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__DXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__BXJQ=((__READ_GLOBAL *)__tmp__DXAK);
    unread__15ML(Self__BXJQ->global__RHJK,Self__BXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__DXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__DXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__DXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__DXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__DXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__DXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__DXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__DXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__DXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__DXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__DXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__DXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__DXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__DXAK);
  } break;
  };
  __tmp__EXAK=Self__CXAK->parent_expr_binary__NCKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__EXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__EXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__EXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__UN3P=((__READ_LOCAL *)__tmp__EXAK);
    unread__YVJK(Self__UN3P->local__ALZD,Self__UN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__EXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__EXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__EXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__WN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__EXAK)->receiver__OO2H);
    unread__YVJK(Self__WN3P->local__ALZD,Self__WN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__EXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__EXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__EXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__EXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__EXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__EXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__EXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__EXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__EXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__EXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__EXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__EXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__EXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__EXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__CXJQ=((__READ_GLOBAL *)__tmp__EXAK);
    unread__15ML(Self__CXJQ->global__RHJK,Self__CXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__EXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__EXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__EXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__EXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__EXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__EXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__EXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__EXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__EXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__EXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__EXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__EXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__EXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__EXAK);
  } break;
  };
}

static void remove__FXAK(__EXPR_AND *Self__GXAK)
// ({EXPR_AND}) VoidRecursive, No inlinable.
{
  void *__tmp__HXAK,*__tmp__IXAK;
  __READ_LOCAL *Self__XN3P,*Self__ZN3P,*Self__0N3P,*Self__2N3P;
  __READ_GLOBAL *Self__DXJQ,*Self__EXJQ;
  __tmp__HXAK=Self__GXAK->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__HXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__HXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__HXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__XN3P=((__READ_LOCAL *)__tmp__HXAK);
    unread__YVJK(Self__XN3P->local__ALZD,Self__XN3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__HXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__HXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__HXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__ZN3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__HXAK)->receiver__OO2H);
    unread__YVJK(Self__ZN3P->local__ALZD,Self__ZN3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__HXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__HXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__HXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__HXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__HXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__HXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__HXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__HXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__HXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__HXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__HXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__HXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__HXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__HXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__DXJQ=((__READ_GLOBAL *)__tmp__HXAK);
    unread__15ML(Self__DXJQ->global__RHJK,Self__DXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__HXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__HXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__HXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__HXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__HXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__HXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__HXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__HXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__HXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__HXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__HXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__HXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__HXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__HXAK);
  } break;
  };
  __tmp__IXAK=Self__GXAK->parent_expr_binary__ADKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__IXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__IXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__IXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__0N3P=((__READ_LOCAL *)__tmp__IXAK);
    unread__YVJK(Self__0N3P->local__ALZD,Self__0N3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__IXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__IXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__IXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__2N3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__IXAK)->receiver__OO2H);
    unread__YVJK(Self__2N3P->local__ALZD,Self__2N3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__IXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__IXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__IXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__IXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__IXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__IXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__IXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__IXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__IXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__IXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__IXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__IXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__IXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__IXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__EXJQ=((__READ_GLOBAL *)__tmp__IXAK);
    unread__15ML(Self__EXJQ->global__RHJK,Self__EXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__IXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__IXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__IXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__IXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__IXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__IXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__IXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__IXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__IXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__IXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__IXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__IXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__IXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__IXAK);
  } break;
  };
}

static void remove__JXAK(__EXPR_SHIFT_R *Self__KXAK)
// ({EXPR_SHIFT_R}) VoidRecursive, No inlinable.
{
  void *__tmp__LXAK,*__tmp__MXAK;
  __READ_LOCAL *Self__3N3P,*Self__5N3P,*Self__AO3P,*Self__CO3P;
  __READ_GLOBAL *Self__FXJQ,*Self__GXJQ;
  __tmp__LXAK=Self__KXAK->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__LXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__LXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__LXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__3N3P=((__READ_LOCAL *)__tmp__LXAK);
    unread__YVJK(Self__3N3P->local__ALZD,Self__3N3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__LXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__LXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__LXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__5N3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LXAK)->receiver__OO2H);
    unread__YVJK(Self__5N3P->local__ALZD,Self__5N3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__LXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__LXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__LXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__LXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__LXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__LXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__LXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__LXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__LXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__LXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__LXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__LXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__LXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__LXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__FXJQ=((__READ_GLOBAL *)__tmp__LXAK);
    unread__15ML(Self__FXJQ->global__RHJK,Self__FXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__LXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__LXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__LXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__LXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__LXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__LXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__LXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__LXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__LXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__LXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__LXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__LXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__LXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__LXAK);
  } break;
  };
  __tmp__MXAK=Self__KXAK->parent_expr_binary__TDKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__MXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__MXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__MXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__AO3P=((__READ_LOCAL *)__tmp__MXAK);
    unread__YVJK(Self__AO3P->local__ALZD,Self__AO3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__MXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__MXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__MXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__CO3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MXAK)->receiver__OO2H);
    unread__YVJK(Self__CO3P->local__ALZD,Self__CO3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__MXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__MXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__MXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__MXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__MXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__MXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__MXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__MXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__MXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__MXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__MXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__MXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__MXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__MXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__GXJQ=((__READ_GLOBAL *)__tmp__MXAK);
    unread__15ML(Self__GXJQ->global__RHJK,Self__GXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__MXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__MXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__MXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__MXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__MXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__MXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__MXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__MXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__MXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__MXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__MXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__MXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__MXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__MXAK);
  } break;
  };
}

static void remove__NXAK(__EXPR_SHIFT_L *Self__OXAK)
// ({EXPR_SHIFT_L}) VoidRecursive, No inlinable.
{
  void *__tmp__PXAK,*__tmp__QXAK;
  __READ_LOCAL *Self__DO3P,*Self__FO3P,*Self__GO3P,*Self__IO3P;
  __READ_GLOBAL *Self__HXJQ,*Self__IXJQ;
  __tmp__PXAK=Self__OXAK->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__PXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__PXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__PXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__DO3P=((__READ_LOCAL *)__tmp__PXAK);
    unread__YVJK(Self__DO3P->local__ALZD,Self__DO3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__PXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__PXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__PXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__FO3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__PXAK)->receiver__OO2H);
    unread__YVJK(Self__FO3P->local__ALZD,Self__FO3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__PXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__PXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__PXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__PXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__PXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__PXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__PXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__PXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__PXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__PXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__PXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__PXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__PXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__PXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__HXJQ=((__READ_GLOBAL *)__tmp__PXAK);
    unread__15ML(Self__HXJQ->global__RHJK,Self__HXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__PXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__PXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__PXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__PXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__PXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__PXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__PXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__PXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__PXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__PXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__PXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__PXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__PXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__PXAK);
  } break;
  };
  __tmp__QXAK=Self__OXAK->parent_expr_binary__GEKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__QXAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__QXAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__QXAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__GO3P=((__READ_LOCAL *)__tmp__QXAK);
    unread__YVJK(Self__GO3P->local__ALZD,Self__GO3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__QXAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__QXAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__QXAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__IO3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QXAK)->receiver__OO2H);
    unread__YVJK(Self__IO3P->local__ALZD,Self__IO3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__QXAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__QXAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__QXAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__QXAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__QXAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__QXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__QXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__QXAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__QXAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__QXAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__QXAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__QXAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__QXAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__QXAK);
  } break;
  case __READ_GLOBAL__: {
    Self__IXJQ=((__READ_GLOBAL *)__tmp__QXAK);
    unread__15ML(Self__IXJQ->global__RHJK,Self__IXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__QXAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__QXAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__QXAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__QXAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__QXAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__QXAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__QXAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__QXAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__QXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__QXAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__QXAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__QXAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__QXAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__QXAK);
  } break;
  };
}

static void remove__RXAK(__PUT_TO *Self__SXAK)
// ({PUT_TO}) VoidRecursive, No inlinable.
{
  void *__tmp__VXAK,*__tmp__PYAK,*__tmp__QYAK,*__tmp__RYAK;
  void *__tmp__WXAK,*first_type__UXAK;
  void *__tmp__YXAK;
  void *__tmp__ZXAK,*type_generic__TXAK;
  __TYPE_GENERIC *Self__PIZM;
  __INTEGER result__MVFN,__tmp__VVFN,idx__DMSN,__tmp__XIZM;
  void *tmp__YWFN;
  __READ_LOCAL *Self__NQ3P,*Self__PQ3P,*Self__QQ3P,*Self__SQ3P;
  __READ_LOCAL *Self__TQ3P,*Self__VQ3P;
  __READ_GLOBAL *Self__JXJQ,*Self__KXJQ,*Self__LXJQ;
  __FAST_ARRAYoPUT_TOo *Self__JVFN,*Self__HWFN,*Self__ZXFN;
  void **__tmp__UVFN,**Self__XLSN;
  void *__tmp__UIZM;
  __tmp__VXAK=Self__SXAK->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__VXAK)->__id) {
  case __LIST__: {
    __tmp__WXAK=static_type__GIQG(__tmp__VXAK);
  } break;
  case __STRING_CST__: {
    __tmp__WXAK=((__STRING_CST *)__tmp__VXAK)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__WXAK=((__EXTERNAL_C *)__tmp__VXAK)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__WXAK=((__PROTOTYPE_CST *)__tmp__VXAK)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__WXAK=((__INTEGER_CST *)__tmp__VXAK)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__WXAK=((__LOCAL *)((__READ_LOCAL *)__tmp__VXAK)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WXAK=static_type__0N1H(__tmp__VXAK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WXAK=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WXAK=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__WXAK=((__REAL_CST *)__tmp__VXAK)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__WXAK=((__CHARACTER_CST *)__tmp__VXAK)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__WXAK=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WXAK=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__WXAK=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__WXAK=static_type__MP1H(__tmp__VXAK);
  } break;
  case __EXPR_MUL__: {
    __tmp__WXAK=static_type__SP1H(__tmp__VXAK);
  } break;
  case __EXPR_DIV__: {
    __tmp__WXAK=static_type__XP1H(__tmp__VXAK);
  } break;
  case __EXPR_AND__: {
    __tmp__WXAK=static_type__2P1H(__tmp__VXAK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WXAK=static_type__BQ1H(__tmp__VXAK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WXAK=static_type__GQ1H(__tmp__VXAK);
  } break;
  case __PUT_TO__: {
    __tmp__WXAK=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__WXAK=static_type__PQ1H(__tmp__VXAK);
  } break;
  case __SIZE_OF__: {
    __tmp__WXAK=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__WXAK=((__CAST *)__tmp__VXAK)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__WXAK=static_type__GIKL(__tmp__VXAK);
  } break;
  case __READ_SLOT__: {
    __tmp__WXAK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VXAK)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__WXAK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VXAK)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WXAK=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WXAK=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WXAK=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WXAK=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WXAK=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__WXAK=static_type__Z2IM(__tmp__VXAK);
  } break;
  case __EXPR_ADD__: {
    __tmp__WXAK=static_type__IXML(__tmp__VXAK);
  } break;
  case __EXPR_NOT__: {
    __tmp__WXAK=static_type__BTXM(__tmp__VXAK);
  } break;
  case __EXPR_MOD__: {
    __tmp__WXAK=static_type__5LEO(__tmp__VXAK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WXAK=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__WXAK=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WXAK=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__WXAK=static_type__NOPN(__tmp__VXAK);
  } break;
  case __EXPR_XOR__: {
    __tmp__WXAK=static_type__XCSO(__tmp__VXAK);
  } break;
  };
  __tmp__YXAK=((__TYPE_FULL *)__tmp__WXAK)->parent_type__KTL;
  if (__tmp__YXAK==NULL) {
    __tmp__ZXAK=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__YXAK)->__id) {
    case __TYPE__: {
      __tmp__ZXAK=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__ZXAK=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__ZXAK=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__ZXAK=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__ZXAK=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__ZXAK=((void *)__tmp__YXAK);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__ZXAK=NULL;
    } break;
    }
  };
  type_generic__TXAK=__tmp__ZXAK;
  first_type__UXAK=((void **)((__FAST_ARRAYoTYPE_FULLo *)((__TYPE_GENERIC *)__tmp__ZXAK)->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0];
  if (((! ((__UINTEGER_8)(((__TYPE_FULL *)first_type__UXAK)->flag__LTL &  1) !=  0)) || ((void *)((__TYPE_FULL *)first_type__UXAK)->parent_type__KTL == (void *)type_boolean__VJB))) {
    Self__PIZM=((__TYPE_GENERIC *)__tmp__ZXAK);
    Self__JVFN=((__FAST_ARRAYoPUT_TOo *)Self__PIZM->put_to_list__F1YM);
    result__MVFN= 0;
    if ((Self__JVFN->parent_arrayed_collection__E1YM.upper__01YM >=  0)) {
      __tmp__UVFN=Self__JVFN->parent_arrayed_collection__E1YM.storage__RTFN;
      __tmp__VVFN=Self__JVFN->parent_arrayed_collection__E1YM.upper__01YM;
      Self__XLSN=((void **)__tmp__UVFN);
      idx__DMSN= 0;
      while ((! ((idx__DMSN > __tmp__VVFN) || ((void *)Self__SXAK == (void *)Self__XLSN[idx__DMSN])))) {
        idx__DMSN=(__INTEGER)(idx__DMSN +  1);
      };
      result__MVFN=idx__DMSN;
    };
    __tmp__UIZM=Self__PIZM->put_to_list__F1YM;
    __tmp__XIZM=((__FAST_ARRAYoPUT_TOo *)Self__PIZM->put_to_list__F1YM)->parent_arrayed_collection__E1YM.upper__01YM;
    Self__HWFN=((__FAST_ARRAYoPUT_TOo *)__tmp__UIZM);
    tmp__YWFN=((void **)Self__HWFN->parent_arrayed_collection__E1YM.storage__RTFN)[result__MVFN];
    ((void **)Self__HWFN->parent_arrayed_collection__E1YM.storage__RTFN)[result__MVFN]=((void **)Self__HWFN->parent_arrayed_collection__E1YM.storage__RTFN)[__tmp__XIZM];
    ((void **)Self__HWFN->parent_arrayed_collection__E1YM.storage__RTFN)[__tmp__XIZM]=tmp__YWFN;
    Self__ZXFN=((__FAST_ARRAYoPUT_TOo *)Self__PIZM->put_to_list__F1YM);
    Self__ZXFN->parent_arrayed_collection__E1YM.upper__01YM=(__INTEGER)(Self__ZXFN->parent_arrayed_collection__E1YM.upper__01YM -  1);
  };
  __tmp__PYAK=Self__SXAK->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__PYAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__PYAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__PYAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__NQ3P=((__READ_LOCAL *)__tmp__PYAK);
    unread__YVJK(Self__NQ3P->local__ALZD,Self__NQ3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__PYAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__PYAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__PYAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__PQ3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__PYAK)->receiver__OO2H);
    unread__YVJK(Self__PQ3P->local__ALZD,Self__PQ3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__PYAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__PYAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__PYAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__PYAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__PYAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__PYAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__PYAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__PYAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__PYAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__PYAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__PYAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__PYAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__PYAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__PYAK);
  } break;
  case __READ_GLOBAL__: {
    Self__JXJQ=((__READ_GLOBAL *)__tmp__PYAK);
    unread__15ML(Self__JXJQ->global__RHJK,Self__JXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__PYAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__PYAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__PYAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__PYAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__PYAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__PYAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__PYAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__PYAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__PYAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__PYAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__PYAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__PYAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__PYAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__PYAK);
  } break;
  };
  __tmp__QYAK=Self__SXAK->index__SR2H;
  switch (((struct ___OBJ *)__tmp__QYAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__QYAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__QYAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__QQ3P=((__READ_LOCAL *)__tmp__QYAK);
    unread__YVJK(Self__QQ3P->local__ALZD,Self__QQ3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__QYAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__QYAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__QYAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__SQ3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QYAK)->receiver__OO2H);
    unread__YVJK(Self__SQ3P->local__ALZD,Self__SQ3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__QYAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__QYAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__QYAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__QYAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__QYAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__QYAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__QYAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__QYAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__QYAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__QYAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__QYAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__QYAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__QYAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__QYAK);
  } break;
  case __READ_GLOBAL__: {
    Self__KXJQ=((__READ_GLOBAL *)__tmp__QYAK);
    unread__15ML(Self__KXJQ->global__RHJK,Self__KXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__QYAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__QYAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__QYAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__QYAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__QYAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__QYAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__QYAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__QYAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__QYAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__QYAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__QYAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__QYAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__QYAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__QYAK);
  } break;
  };
  __tmp__RYAK=Self__SXAK->value__WR2H;
  switch (((struct ___OBJ *)__tmp__RYAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__RYAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__RYAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__TQ3P=((__READ_LOCAL *)__tmp__RYAK);
    unread__YVJK(Self__TQ3P->local__ALZD,Self__TQ3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__RYAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__RYAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__RYAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__VQ3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__RYAK)->receiver__OO2H);
    unread__YVJK(Self__VQ3P->local__ALZD,Self__VQ3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__RYAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__RYAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__RYAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__RYAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__RYAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__RYAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__RYAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__RYAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__RYAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__RYAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__RYAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__RYAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__RYAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__RYAK);
  } break;
  case __READ_GLOBAL__: {
    Self__LXJQ=((__READ_GLOBAL *)__tmp__RYAK);
    unread__15ML(Self__LXJQ->global__RHJK,Self__LXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__RYAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__RYAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__RYAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__RYAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__RYAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__RYAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__RYAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__RYAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__RYAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__RYAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__RYAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__RYAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__RYAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__RYAK);
  } break;
  };
}

static void remove__SYAK(__ITEM *Self__TYAK)
// ({ITEM}) VoidRecursive, No inlinable.
{
  void *__tmp__UYAK,*__tmp__VYAK;
  __READ_LOCAL *Self__WQ3P,*Self__YQ3P,*Self__ZQ3P,*Self__1Q3P;
  __READ_GLOBAL *Self__MXJQ,*Self__NXJQ;
  __tmp__UYAK=Self__TYAK->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__UYAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__UYAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__UYAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__WQ3P=((__READ_LOCAL *)__tmp__UYAK);
    unread__YVJK(Self__WQ3P->local__ALZD,Self__WQ3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__UYAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__UYAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__UYAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__YQ3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__UYAK)->receiver__OO2H);
    unread__YVJK(Self__YQ3P->local__ALZD,Self__YQ3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__UYAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__UYAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__UYAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__UYAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__UYAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__UYAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__UYAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__UYAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__UYAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__UYAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__UYAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__UYAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__UYAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__UYAK);
  } break;
  case __READ_GLOBAL__: {
    Self__MXJQ=((__READ_GLOBAL *)__tmp__UYAK);
    unread__15ML(Self__MXJQ->global__RHJK,Self__MXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__UYAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__UYAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__UYAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__UYAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__UYAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__UYAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__UYAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__UYAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__UYAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__UYAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__UYAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__UYAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__UYAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__UYAK);
  } break;
  };
  __tmp__VYAK=Self__TYAK->index__CS2H;
  switch (((struct ___OBJ *)__tmp__VYAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__VYAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__VYAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__ZQ3P=((__READ_LOCAL *)__tmp__VYAK);
    unread__YVJK(Self__ZQ3P->local__ALZD,Self__ZQ3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__VYAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__VYAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__VYAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__1Q3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__VYAK)->receiver__OO2H);
    unread__YVJK(Self__1Q3P->local__ALZD,Self__1Q3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__VYAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__VYAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__VYAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__VYAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__VYAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__VYAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__VYAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__VYAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__VYAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__VYAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__VYAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__VYAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__VYAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__VYAK);
  } break;
  case __READ_GLOBAL__: {
    Self__NXJQ=((__READ_GLOBAL *)__tmp__VYAK);
    unread__15ML(Self__NXJQ->global__RHJK,Self__NXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__VYAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__VYAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__VYAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__VYAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__VYAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__VYAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__VYAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__VYAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__VYAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__VYAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__VYAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__VYAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__VYAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__VYAK);
  } break;
  };
}

static void remove__WYAK(__SIZE_OF *Self__XYAK)
// ({SIZE_OF}) VoidRecursive, No inlinable.
{
  void *__tmp__YYAK;
  __READ_LOCAL *Self__2Q3P,*Self__4Q3P;
  __READ_GLOBAL *Self__OXJQ;
  __tmp__YYAK=Self__XYAK->receiver__LS2H;
  switch (((struct ___OBJ *)__tmp__YYAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__YYAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__YYAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__2Q3P=((__READ_LOCAL *)__tmp__YYAK);
    unread__YVJK(Self__2Q3P->local__ALZD,Self__2Q3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__YYAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__YYAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__YYAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__4Q3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YYAK)->receiver__OO2H);
    unread__YVJK(Self__4Q3P->local__ALZD,Self__4Q3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__YYAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__YYAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__YYAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__YYAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__YYAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__YYAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__YYAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__YYAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__YYAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__YYAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__YYAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__YYAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__YYAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__YYAK);
  } break;
  case __READ_GLOBAL__: {
    Self__OXJQ=((__READ_GLOBAL *)__tmp__YYAK);
    unread__15ML(Self__OXJQ->global__RHJK,Self__OXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__YYAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__YYAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__YYAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__YYAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__YYAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__YYAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__YYAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__YYAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__YYAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__YYAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__YYAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__YYAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__YYAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__YYAK);
  } break;
  };
}

static void remove__ZYAK(__CAST *Self__0YAK)
// ({CAST}) VoidRecursive, No inlinable.
{
  void *__tmp__1YAK;
  __READ_LOCAL *Self__5Q3P,*Self__BR3P;
  __READ_GLOBAL *Self__PXJQ;
  __tmp__1YAK=Self__0YAK->value__US2H;
  switch (((struct ___OBJ *)__tmp__1YAK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__1YAK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__1YAK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__5Q3P=((__READ_LOCAL *)__tmp__1YAK);
    unread__YVJK(Self__5Q3P->local__ALZD,Self__5Q3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__1YAK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__1YAK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__1YAK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__BR3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__1YAK)->receiver__OO2H);
    unread__YVJK(Self__BR3P->local__ALZD,Self__BR3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__1YAK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__1YAK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__1YAK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__1YAK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__1YAK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__1YAK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__1YAK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__1YAK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__1YAK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__1YAK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__1YAK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__1YAK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__1YAK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__1YAK);
  } break;
  case __READ_GLOBAL__: {
    Self__PXJQ=((__READ_GLOBAL *)__tmp__1YAK);
    unread__15ML(Self__PXJQ->global__RHJK,Self__PXJQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__1YAK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__1YAK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__1YAK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__1YAK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__1YAK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__1YAK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__1YAK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__1YAK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__1YAK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__1YAK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__1YAK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__1YAK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__1YAK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__1YAK);
  } break;
  };
}

static void remove__2NML(__CALL_SLOT *Self__3NML)
// ({CALL_SLOT}) VoidRecursive, No inlinable.
{
  void *e__4NML;
  void *__tmp__5NML,*__tmp__IOML;
  __INTEGER __tmp__AOML,__tmp__OOML,Self__YXQL;
  void *voir__4ZYL;
  e__4NML=NULL;
  __tmp__5NML=Self__3NML->profil__QA2H;
  if (((struct ___OBJ *)__tmp__5NML)->__id==__PROFIL_SLOT__) {
    __tmp__AOML=((__PROFIL_SLOT *)__tmp__5NML)->parent_profil__51LC.link_count__FALJ;
  } else {
    __tmp__AOML=((__PROFIL_BLOCK *)__tmp__5NML)->parent_profil__GHAG.link_count__FALJ;
  };
  if ((__tmp__AOML ==  0)) {
    voir__4ZYL=create__AXB( 250);
    display__VNKL(Self__3NML,voir__4ZYL);
    put_string__2EG(((__STRING *)voir__4ZYL));
    fputc((int)('\n'),stdout);
  };
  __tmp__IOML=Self__3NML->profil__QA2H;
  if (((struct ___OBJ *)__tmp__IOML)->__id==__PROFIL_SLOT__) {
    unlink__ZVQL(__tmp__IOML);
  } else {
    unlink__XWQL(__tmp__IOML);
  };
  __tmp__OOML=((__FAST_ARRAYoWRITEo *)Self__3NML->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
  Self__YXQL= 0;
  while ((Self__YXQL <= __tmp__OOML)) {
    e__4NML=((void **)((__FAST_ARRAYoWRITEo *)Self__3NML->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__YXQL];
    if (((void *)e__4NML != (void *)NULL)) {
      switch (((struct ___OBJ *)e__4NML)->__id) {
      case __WRITE_GLOBAL__: {
        remove__S5IK(e__4NML);
      } break;
      case __WRITE_SLOT__: {
        remove__W5IK(e__4NML);
      } break;
      case __WRITE_LOCAL__: {
        remove__25IK(e__4NML);
      } break;
      };
    };
    Self__YXQL=(__INTEGER)(Self__YXQL +  1);
  };
}

static void remove__4GHK(__READ_SLOT *Self__5GHK)
// ({READ_SLOT}) VoidRecursive, No inlinable.
{
  void *__tmp__AHHK;
  __READ_LOCAL *Self__KR3P,*Self__MR3P;
  __READ_GLOBAL *Self__DHHK;
  __tmp__AHHK=Self__5GHK->receiver__I1TI;
  switch (((struct ___OBJ *)__tmp__AHHK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__AHHK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__AHHK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__KR3P=((__READ_LOCAL *)__tmp__AHHK);
    unread__YVJK(Self__KR3P->local__ALZD,Self__KR3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__AHHK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__AHHK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__AHHK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__MR3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__AHHK)->receiver__OO2H);
    unread__YVJK(Self__MR3P->local__ALZD,Self__MR3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__AHHK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__AHHK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__AHHK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__AHHK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__AHHK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__AHHK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__AHHK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__AHHK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__AHHK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__AHHK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__AHHK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__AHHK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__AHHK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__AHHK);
  } break;
  case __READ_GLOBAL__: {
    Self__DHHK=((__READ_GLOBAL *)__tmp__AHHK);
    unread__15ML(Self__DHHK->global__RHJK,Self__DHHK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__AHHK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__AHHK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__AHHK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__AHHK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__AHHK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__AHHK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__AHHK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__AHHK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__AHHK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__AHHK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__AHHK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__AHHK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__AHHK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__AHHK);
  } break;
  };
  unread__15ML(Self__5GHK->slot__EVGK,Self__5GHK);
}

static void unread__15ML(__SLOT_DATA *Self__25ML,void *e__35ML)
// ({SLOT_DATA},{READ_SLOTxREAD_GLOBAL}) VoidNo recursive, No inlinable.
{
  __READ_SLOT *Self__LRZL;
  void *voir__MRZL,*voir__SRZL,*voir__QXJQ;
  __READ_GLOBAL *Self__RRZL;
  __LIST *Self__RXJQ;
  Self__25ML->parent_variable__AJZD.ensure_count__QEAG=(__INTEGER)(Self__25ML->parent_variable__AJZD.ensure_count__QEAG -  1);
  if ((Self__25ML->parent_variable__AJZD.ensure_count__QEAG <  0)) {
    print__1ZE((&__string_506));
    if (((struct ___OBJ *)e__35ML)->__id==__READ_SLOT__) {
      Self__LRZL=((__READ_SLOT *)e__35ML);
      voir__MRZL=create__AXB( 250);
      display__N1ZK(Self__LRZL,voir__MRZL);
      put_string__2EG(((__STRING *)voir__MRZL));
      fputc((int)('\n'),stdout);
    } else {
      Self__RRZL=((__READ_GLOBAL *)e__35ML);
      voir__SRZL=create__AXB( 250);
      display__S1ZK(Self__RRZL,voir__SRZL);
      put_string__2EG(((__STRING *)voir__SRZL));
      fputc((int)('\n'),stdout);
    };
    print__1ZE((&__string_507));
    Self__RXJQ=((__LIST *)list_current__IF1);
    voir__QXJQ=create__AXB( 250);
    display__2QQG(Self__RXJQ,voir__QXJQ);
    put_string__2EG(((__STRING *)voir__QXJQ));
    fputc((int)('\n'),stdout);
    fputc((int)('\n'),stdout);
    print__1ZE((&__string_460));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
}

static void remove__GWZM(__EXPR_NOT_LOGIC *Self__HWZM)
// ({EXPR_NOT_LOGIC}) VoidRecursive, No inlinable.
{
  void *__tmp__IWZM;
  __READ_LOCAL *Self__NR3P,*Self__PR3P;
  __READ_GLOBAL *Self__QR3P;
  __tmp__IWZM=Self__HWZM->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__IWZM)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__IWZM);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__IWZM);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__NR3P=((__READ_LOCAL *)__tmp__IWZM);
    unread__YVJK(Self__NR3P->local__ALZD,Self__NR3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__IWZM);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__IWZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__IWZM);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__PR3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__IWZM)->receiver__OO2H);
    unread__YVJK(Self__PR3P->local__ALZD,Self__PR3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__IWZM);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__IWZM);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__IWZM);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__IWZM);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__IWZM);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__IWZM);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__IWZM);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__IWZM);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__IWZM);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__IWZM);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__IWZM);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__IWZM);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__IWZM);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__IWZM);
  } break;
  case __READ_GLOBAL__: {
    Self__QR3P=((__READ_GLOBAL *)__tmp__IWZM);
    unread__15ML(Self__QR3P->global__RHJK,Self__QR3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__IWZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__IWZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__IWZM);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__IWZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__IWZM);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__IWZM);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__IWZM);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__IWZM);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__IWZM);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__IWZM);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__IWZM);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__IWZM);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__IWZM);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__IWZM);
  } break;
  };
}

static void remove__WPEO(__EXPR_OR_LOGIC *Self__XPEO)
// ({EXPR_OR_LOGIC}) VoidRecursive, No inlinable.
{
  void *__tmp__YPEO,*__tmp__ZPEO;
  __READ_LOCAL *Self__RR3P,*Self__TR3P,*Self__VR3P,*Self__XR3P;
  __READ_GLOBAL *Self__UR3P,*Self__YR3P;
  __tmp__YPEO=Self__XPEO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__YPEO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__YPEO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__YPEO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__RR3P=((__READ_LOCAL *)__tmp__YPEO);
    unread__YVJK(Self__RR3P->local__ALZD,Self__RR3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__YPEO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__YPEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__YPEO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__TR3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YPEO)->receiver__OO2H);
    unread__YVJK(Self__TR3P->local__ALZD,Self__TR3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__YPEO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__YPEO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__YPEO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__YPEO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__YPEO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__YPEO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__YPEO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__YPEO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__YPEO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__YPEO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__YPEO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__YPEO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__YPEO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__YPEO);
  } break;
  case __READ_GLOBAL__: {
    Self__UR3P=((__READ_GLOBAL *)__tmp__YPEO);
    unread__15ML(Self__UR3P->global__RHJK,Self__UR3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__YPEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__YPEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__YPEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__YPEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__YPEO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__YPEO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__YPEO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__YPEO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__YPEO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__YPEO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__YPEO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__YPEO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__YPEO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__YPEO);
  } break;
  };
  __tmp__ZPEO=Self__XPEO->parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__ZPEO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__ZPEO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__ZPEO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__VR3P=((__READ_LOCAL *)__tmp__ZPEO);
    unread__YVJK(Self__VR3P->local__ALZD,Self__VR3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__ZPEO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__ZPEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__ZPEO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__XR3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZPEO)->receiver__OO2H);
    unread__YVJK(Self__XR3P->local__ALZD,Self__XR3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__ZPEO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__ZPEO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__ZPEO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__ZPEO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__ZPEO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__ZPEO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__ZPEO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__ZPEO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__ZPEO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__ZPEO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__ZPEO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__ZPEO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__ZPEO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__ZPEO);
  } break;
  case __READ_GLOBAL__: {
    Self__YR3P=((__READ_GLOBAL *)__tmp__ZPEO);
    unread__15ML(Self__YR3P->global__RHJK,Self__YR3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__ZPEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__ZPEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__ZPEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__ZPEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__ZPEO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__ZPEO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__ZPEO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__ZPEO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__ZPEO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__ZPEO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__ZPEO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__ZPEO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__ZPEO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__ZPEO);
  } break;
  };
}

static void remove__WMKO(__EXPR_OR_OR_LOGIC *Self__XMKO)
// ({EXPR_OR_OR_LOGIC}) VoidRecursive, No inlinable.
{
  void *__tmp__YMKO,*__tmp__ZMKO;
  __READ_LOCAL *Self__ZR3P,*Self__1R3P,*Self__3R3P,*Self__5R3P;
  __READ_GLOBAL *Self__2R3P,*Self__AS3P;
  __tmp__YMKO=Self__XMKO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__YMKO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__YMKO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__YMKO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__ZR3P=((__READ_LOCAL *)__tmp__YMKO);
    unread__YVJK(Self__ZR3P->local__ALZD,Self__ZR3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__YMKO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__YMKO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__YMKO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__1R3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YMKO)->receiver__OO2H);
    unread__YVJK(Self__1R3P->local__ALZD,Self__1R3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__YMKO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__YMKO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__YMKO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__YMKO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__YMKO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__YMKO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__YMKO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__YMKO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__YMKO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__YMKO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__YMKO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__YMKO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__YMKO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__YMKO);
  } break;
  case __READ_GLOBAL__: {
    Self__2R3P=((__READ_GLOBAL *)__tmp__YMKO);
    unread__15ML(Self__2R3P->global__RHJK,Self__2R3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__YMKO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__YMKO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__YMKO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__YMKO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__YMKO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__YMKO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__YMKO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__YMKO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__YMKO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__YMKO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__YMKO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__YMKO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__YMKO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__YMKO);
  } break;
  };
  __tmp__ZMKO=Self__XMKO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__ZMKO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__ZMKO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__ZMKO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__3R3P=((__READ_LOCAL *)__tmp__ZMKO);
    unread__YVJK(Self__3R3P->local__ALZD,Self__3R3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__ZMKO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__ZMKO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__ZMKO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__5R3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZMKO)->receiver__OO2H);
    unread__YVJK(Self__5R3P->local__ALZD,Self__5R3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__ZMKO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__ZMKO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__ZMKO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__ZMKO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__ZMKO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__ZMKO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__ZMKO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__ZMKO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__ZMKO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__ZMKO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__ZMKO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__ZMKO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__ZMKO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__ZMKO);
  } break;
  case __READ_GLOBAL__: {
    Self__AS3P=((__READ_GLOBAL *)__tmp__ZMKO);
    unread__15ML(Self__AS3P->global__RHJK,Self__AS3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__ZMKO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__ZMKO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__ZMKO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__ZMKO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__ZMKO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__ZMKO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__ZMKO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__ZMKO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__ZMKO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__ZMKO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__ZMKO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__ZMKO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__ZMKO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__ZMKO);
  } break;
  };
}

static void remove__0PEO(__EXPR_AND_LOGIC *Self__1PEO)
// ({EXPR_AND_LOGIC}) VoidRecursive, No inlinable.
{
  void *__tmp__2PEO,*__tmp__3PEO;
  __READ_LOCAL *Self__BS3P,*Self__DS3P,*Self__FS3P,*Self__HS3P;
  __READ_GLOBAL *Self__ES3P,*Self__IS3P;
  __tmp__2PEO=Self__1PEO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__2PEO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__2PEO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__2PEO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__BS3P=((__READ_LOCAL *)__tmp__2PEO);
    unread__YVJK(Self__BS3P->local__ALZD,Self__BS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__2PEO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__2PEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__2PEO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__DS3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2PEO)->receiver__OO2H);
    unread__YVJK(Self__DS3P->local__ALZD,Self__DS3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__2PEO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__2PEO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__2PEO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__2PEO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__2PEO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__2PEO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__2PEO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__2PEO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__2PEO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__2PEO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__2PEO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__2PEO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__2PEO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__2PEO);
  } break;
  case __READ_GLOBAL__: {
    Self__ES3P=((__READ_GLOBAL *)__tmp__2PEO);
    unread__15ML(Self__ES3P->global__RHJK,Self__ES3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__2PEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__2PEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__2PEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__2PEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__2PEO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__2PEO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__2PEO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__2PEO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__2PEO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__2PEO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__2PEO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__2PEO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__2PEO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__2PEO);
  } break;
  };
  __tmp__3PEO=Self__1PEO->parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__3PEO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__3PEO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__3PEO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__FS3P=((__READ_LOCAL *)__tmp__3PEO);
    unread__YVJK(Self__FS3P->local__ALZD,Self__FS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__3PEO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__3PEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__3PEO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__HS3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3PEO)->receiver__OO2H);
    unread__YVJK(Self__HS3P->local__ALZD,Self__HS3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__3PEO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__3PEO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__3PEO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__3PEO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__3PEO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__3PEO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__3PEO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__3PEO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__3PEO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__3PEO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__3PEO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__3PEO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__3PEO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__3PEO);
  } break;
  case __READ_GLOBAL__: {
    Self__IS3P=((__READ_GLOBAL *)__tmp__3PEO);
    unread__15ML(Self__IS3P->global__RHJK,Self__IS3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__3PEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__3PEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__3PEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__3PEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__3PEO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__3PEO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__3PEO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__3PEO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__3PEO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__3PEO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__3PEO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__3PEO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__3PEO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__3PEO);
  } break;
  };
}

static void remove__1MKO(__EXPR_AND_AND_LOGIC *Self__2MKO)
// ({EXPR_AND_AND_LOGIC}) VoidRecursive, No inlinable.
{
  void *__tmp__3MKO,*__tmp__4MKO;
  __READ_LOCAL *Self__JS3P,*Self__LS3P,*Self__NS3P,*Self__PS3P;
  __READ_GLOBAL *Self__MS3P,*Self__QS3P;
  __tmp__3MKO=Self__2MKO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__3MKO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__3MKO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__3MKO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__JS3P=((__READ_LOCAL *)__tmp__3MKO);
    unread__YVJK(Self__JS3P->local__ALZD,Self__JS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__3MKO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__3MKO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__3MKO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__LS3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3MKO)->receiver__OO2H);
    unread__YVJK(Self__LS3P->local__ALZD,Self__LS3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__3MKO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__3MKO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__3MKO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__3MKO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__3MKO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__3MKO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__3MKO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__3MKO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__3MKO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__3MKO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__3MKO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__3MKO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__3MKO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__3MKO);
  } break;
  case __READ_GLOBAL__: {
    Self__MS3P=((__READ_GLOBAL *)__tmp__3MKO);
    unread__15ML(Self__MS3P->global__RHJK,Self__MS3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__3MKO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__3MKO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__3MKO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__3MKO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__3MKO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__3MKO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__3MKO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__3MKO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__3MKO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__3MKO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__3MKO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__3MKO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__3MKO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__3MKO);
  } break;
  };
  __tmp__4MKO=Self__2MKO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__4MKO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__4MKO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__4MKO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__NS3P=((__READ_LOCAL *)__tmp__4MKO);
    unread__YVJK(Self__NS3P->local__ALZD,Self__NS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__4MKO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__4MKO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__4MKO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__PS3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__4MKO)->receiver__OO2H);
    unread__YVJK(Self__PS3P->local__ALZD,Self__PS3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__4MKO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__4MKO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__4MKO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__4MKO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__4MKO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__4MKO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__4MKO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__4MKO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__4MKO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__4MKO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__4MKO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__4MKO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__4MKO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__4MKO);
  } break;
  case __READ_GLOBAL__: {
    Self__QS3P=((__READ_GLOBAL *)__tmp__4MKO);
    unread__15ML(Self__QS3P->global__RHJK,Self__QS3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__4MKO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__4MKO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__4MKO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__4MKO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__4MKO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__4MKO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__4MKO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__4MKO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__4MKO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__4MKO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__4MKO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__4MKO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__4MKO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__4MKO);
  } break;
  };
}

static void remove__3KJM(__EXPR_NEG *Self__4KJM)
// ({EXPR_NEG}) VoidRecursive, No inlinable.
{
  void *__tmp__5KJM;
  __READ_LOCAL *Self__RS3P,*Self__TS3P;
  __READ_GLOBAL *Self__US3P;
  __tmp__5KJM=Self__4KJM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__5KJM)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__5KJM);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__5KJM);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__RS3P=((__READ_LOCAL *)__tmp__5KJM);
    unread__YVJK(Self__RS3P->local__ALZD,Self__RS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__5KJM);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__5KJM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__5KJM);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__TS3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__5KJM)->receiver__OO2H);
    unread__YVJK(Self__TS3P->local__ALZD,Self__TS3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__5KJM);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__5KJM);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__5KJM);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__5KJM);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__5KJM);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__5KJM);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__5KJM);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__5KJM);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__5KJM);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__5KJM);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__5KJM);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__5KJM);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__5KJM);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__5KJM);
  } break;
  case __READ_GLOBAL__: {
    Self__US3P=((__READ_GLOBAL *)__tmp__5KJM);
    unread__15ML(Self__US3P->global__RHJK,Self__US3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__5KJM);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__5KJM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__5KJM);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__5KJM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__5KJM);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__5KJM);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__5KJM);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__5KJM);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__5KJM);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__5KJM);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__5KJM);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__5KJM);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__5KJM);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__5KJM);
  } break;
  };
}

static void remove__QQML(__EXPR_ADD *Self__RQML)
// ({EXPR_ADD}) VoidRecursive, No inlinable.
{
  void *__tmp__SQML,*__tmp__TQML;
  __READ_LOCAL *Self__VS3P,*Self__XS3P,*Self__ZS3P,*Self__1S3P;
  __READ_GLOBAL *Self__YS3P,*Self__2S3P;
  __tmp__SQML=Self__RQML->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__SQML)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__SQML);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__SQML);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__VS3P=((__READ_LOCAL *)__tmp__SQML);
    unread__YVJK(Self__VS3P->local__ALZD,Self__VS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__SQML);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__SQML);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__SQML);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__XS3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__SQML)->receiver__OO2H);
    unread__YVJK(Self__XS3P->local__ALZD,Self__XS3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__SQML);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__SQML);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__SQML);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__SQML);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__SQML);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__SQML);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__SQML);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__SQML);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__SQML);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__SQML);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__SQML);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__SQML);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__SQML);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__SQML);
  } break;
  case __READ_GLOBAL__: {
    Self__YS3P=((__READ_GLOBAL *)__tmp__SQML);
    unread__15ML(Self__YS3P->global__RHJK,Self__YS3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__SQML);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__SQML);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__SQML);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__SQML);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__SQML);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__SQML);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__SQML);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__SQML);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__SQML);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__SQML);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__SQML);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__SQML);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__SQML);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__SQML);
  } break;
  };
  __tmp__TQML=Self__RQML->parent_expr_binary__UZDL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__TQML)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__TQML);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__TQML);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__ZS3P=((__READ_LOCAL *)__tmp__TQML);
    unread__YVJK(Self__ZS3P->local__ALZD,Self__ZS3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__TQML);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__TQML);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__TQML);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__1S3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__TQML)->receiver__OO2H);
    unread__YVJK(Self__1S3P->local__ALZD,Self__1S3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__TQML);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__TQML);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__TQML);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__TQML);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__TQML);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__TQML);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__TQML);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__TQML);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__TQML);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__TQML);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__TQML);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__TQML);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__TQML);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__TQML);
  } break;
  case __READ_GLOBAL__: {
    Self__2S3P=((__READ_GLOBAL *)__tmp__TQML);
    unread__15ML(Self__2S3P->global__RHJK,Self__2S3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__TQML);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__TQML);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__TQML);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__TQML);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__TQML);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__TQML);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__TQML);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__TQML);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__TQML);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__TQML);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__TQML);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__TQML);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__TQML);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__TQML);
  } break;
  };
}

static void remove__D5YM(__EXPR_NOT *Self__E5YM)
// ({EXPR_NOT}) VoidRecursive, No inlinable.
{
  void *__tmp__F5YM;
  __READ_LOCAL *Self__3S3P,*Self__5S3P;
  __READ_GLOBAL *Self__AT3P;
  __tmp__F5YM=Self__E5YM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__F5YM)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__F5YM);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__F5YM);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__3S3P=((__READ_LOCAL *)__tmp__F5YM);
    unread__YVJK(Self__3S3P->local__ALZD,Self__3S3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__F5YM);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__F5YM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__F5YM);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__5S3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__F5YM)->receiver__OO2H);
    unread__YVJK(Self__5S3P->local__ALZD,Self__5S3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__F5YM);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__F5YM);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__F5YM);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__F5YM);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__F5YM);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__F5YM);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__F5YM);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__F5YM);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__F5YM);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__F5YM);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__F5YM);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__F5YM);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__F5YM);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__F5YM);
  } break;
  case __READ_GLOBAL__: {
    Self__AT3P=((__READ_GLOBAL *)__tmp__F5YM);
    unread__15ML(Self__AT3P->global__RHJK,Self__AT3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__F5YM);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__F5YM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__F5YM);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__F5YM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__F5YM);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__F5YM);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__F5YM);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__F5YM);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__F5YM);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__F5YM);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__F5YM);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__F5YM);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__F5YM);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__F5YM);
  } break;
  };
}

static void remove__4PEO(__EXPR_MOD *Self__5PEO)
// ({EXPR_MOD}) VoidRecursive, No inlinable.
{
  void *__tmp__AQEO,*__tmp__BQEO;
  __READ_LOCAL *Self__BT3P,*Self__DT3P,*Self__FT3P,*Self__HT3P;
  __READ_GLOBAL *Self__ET3P,*Self__IT3P;
  __tmp__AQEO=Self__5PEO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__AQEO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__AQEO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__AQEO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__BT3P=((__READ_LOCAL *)__tmp__AQEO);
    unread__YVJK(Self__BT3P->local__ALZD,Self__BT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__AQEO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__AQEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__AQEO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__DT3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__AQEO)->receiver__OO2H);
    unread__YVJK(Self__DT3P->local__ALZD,Self__DT3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__AQEO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__AQEO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__AQEO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__AQEO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__AQEO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__AQEO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__AQEO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__AQEO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__AQEO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__AQEO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__AQEO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__AQEO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__AQEO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__AQEO);
  } break;
  case __READ_GLOBAL__: {
    Self__ET3P=((__READ_GLOBAL *)__tmp__AQEO);
    unread__15ML(Self__ET3P->global__RHJK,Self__ET3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__AQEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__AQEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__AQEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__AQEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__AQEO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__AQEO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__AQEO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__AQEO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__AQEO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__AQEO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__AQEO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__AQEO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__AQEO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__AQEO);
  } break;
  };
  __tmp__BQEO=Self__5PEO->parent_expr_binary__PDWL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__BQEO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__BQEO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__BQEO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__FT3P=((__READ_LOCAL *)__tmp__BQEO);
    unread__YVJK(Self__FT3P->local__ALZD,Self__FT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__BQEO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__BQEO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__BQEO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__HT3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BQEO)->receiver__OO2H);
    unread__YVJK(Self__HT3P->local__ALZD,Self__HT3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__BQEO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__BQEO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__BQEO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__BQEO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__BQEO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__BQEO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__BQEO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__BQEO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__BQEO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__BQEO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__BQEO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__BQEO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__BQEO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__BQEO);
  } break;
  case __READ_GLOBAL__: {
    Self__IT3P=((__READ_GLOBAL *)__tmp__BQEO);
    unread__15ML(Self__IT3P->global__RHJK,Self__IT3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__BQEO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__BQEO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__BQEO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__BQEO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__BQEO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__BQEO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__BQEO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__BQEO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__BQEO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__BQEO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__BQEO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__BQEO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__BQEO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__BQEO);
  } break;
  };
}

static void remove__X5DP(__EXPR_SUP_EQ *Self__Y5DP)
// ({EXPR_SUP_EQ}) VoidRecursive, No inlinable.
{
  void *__tmp__Z5DP,*__tmp__05DP;
  __READ_LOCAL *Self__JT3P,*Self__LT3P,*Self__NT3P,*Self__PT3P;
  __READ_GLOBAL *Self__MT3P,*Self__QT3P;
  __tmp__Z5DP=Self__Y5DP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__Z5DP)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__Z5DP);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__Z5DP);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__JT3P=((__READ_LOCAL *)__tmp__Z5DP);
    unread__YVJK(Self__JT3P->local__ALZD,Self__JT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__Z5DP);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__Z5DP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__Z5DP);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__LT3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__Z5DP)->receiver__OO2H);
    unread__YVJK(Self__LT3P->local__ALZD,Self__LT3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__Z5DP);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__Z5DP);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__Z5DP);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__Z5DP);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__Z5DP);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__Z5DP);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__Z5DP);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__Z5DP);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__Z5DP);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__Z5DP);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__Z5DP);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__Z5DP);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__Z5DP);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__Z5DP);
  } break;
  case __READ_GLOBAL__: {
    Self__MT3P=((__READ_GLOBAL *)__tmp__Z5DP);
    unread__15ML(Self__MT3P->global__RHJK,Self__MT3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__Z5DP);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__Z5DP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__Z5DP);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__Z5DP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__Z5DP);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__Z5DP);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__Z5DP);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__Z5DP);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__Z5DP);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__Z5DP);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__Z5DP);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__Z5DP);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__Z5DP);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__Z5DP);
  } break;
  };
  __tmp__05DP=Self__Y5DP->parent_expr_binary_cmp__EP1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__05DP)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__05DP);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__05DP);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__NT3P=((__READ_LOCAL *)__tmp__05DP);
    unread__YVJK(Self__NT3P->local__ALZD,Self__NT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__05DP);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__05DP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__05DP);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__PT3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__05DP)->receiver__OO2H);
    unread__YVJK(Self__PT3P->local__ALZD,Self__PT3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__05DP);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__05DP);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__05DP);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__05DP);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__05DP);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__05DP);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__05DP);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__05DP);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__05DP);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__05DP);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__05DP);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__05DP);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__05DP);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__05DP);
  } break;
  case __READ_GLOBAL__: {
    Self__QT3P=((__READ_GLOBAL *)__tmp__05DP);
    unread__15ML(Self__QT3P->global__RHJK,Self__QT3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__05DP);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__05DP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__05DP);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__05DP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__05DP);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__05DP);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__05DP);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__05DP);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__05DP);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__05DP);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__05DP);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__05DP);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__05DP);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__05DP);
  } break;
  };
}

static void remove__KZQN(__EXPR_INF *Self__LZQN)
// ({EXPR_INF}) VoidRecursive, No inlinable.
{
  void *__tmp__MZQN,*__tmp__NZQN;
  __READ_LOCAL *Self__RT3P,*Self__TT3P,*Self__VT3P,*Self__XT3P;
  __READ_GLOBAL *Self__UT3P,*Self__YT3P;
  __tmp__MZQN=Self__LZQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__MZQN)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__MZQN);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__MZQN);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__RT3P=((__READ_LOCAL *)__tmp__MZQN);
    unread__YVJK(Self__RT3P->local__ALZD,Self__RT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__MZQN);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__MZQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__MZQN);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__TT3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MZQN)->receiver__OO2H);
    unread__YVJK(Self__TT3P->local__ALZD,Self__TT3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__MZQN);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__MZQN);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__MZQN);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__MZQN);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__MZQN);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__MZQN);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__MZQN);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__MZQN);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__MZQN);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__MZQN);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__MZQN);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__MZQN);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__MZQN);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__MZQN);
  } break;
  case __READ_GLOBAL__: {
    Self__UT3P=((__READ_GLOBAL *)__tmp__MZQN);
    unread__15ML(Self__UT3P->global__RHJK,Self__UT3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__MZQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__MZQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__MZQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__MZQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__MZQN);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__MZQN);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__MZQN);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__MZQN);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__MZQN);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__MZQN);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__MZQN);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__MZQN);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__MZQN);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__MZQN);
  } break;
  };
  __tmp__NZQN=Self__LZQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__NZQN)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__NZQN);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__NZQN);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__VT3P=((__READ_LOCAL *)__tmp__NZQN);
    unread__YVJK(Self__VT3P->local__ALZD,Self__VT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__NZQN);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__NZQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__NZQN);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__XT3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__NZQN)->receiver__OO2H);
    unread__YVJK(Self__XT3P->local__ALZD,Self__XT3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__NZQN);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__NZQN);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__NZQN);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__NZQN);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__NZQN);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__NZQN);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__NZQN);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__NZQN);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__NZQN);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__NZQN);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__NZQN);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__NZQN);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__NZQN);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__NZQN);
  } break;
  case __READ_GLOBAL__: {
    Self__YT3P=((__READ_GLOBAL *)__tmp__NZQN);
    unread__15ML(Self__YT3P->global__RHJK,Self__YT3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__NZQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__NZQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__NZQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__NZQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__NZQN);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__NZQN);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__NZQN);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__NZQN);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__NZQN);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__NZQN);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__NZQN);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__NZQN);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__NZQN);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__NZQN);
  } break;
  };
}

static void remove__OZQN(__EXPR_INF_EQ *Self__PZQN)
// ({EXPR_INF_EQ}) VoidRecursive, No inlinable.
{
  void *__tmp__QZQN,*__tmp__RZQN;
  __READ_LOCAL *Self__ZT3P,*Self__1T3P,*Self__3T3P,*Self__5T3P;
  __READ_GLOBAL *Self__2T3P,*Self__AU3P;
  __tmp__QZQN=Self__PZQN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__QZQN)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__QZQN);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__QZQN);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__ZT3P=((__READ_LOCAL *)__tmp__QZQN);
    unread__YVJK(Self__ZT3P->local__ALZD,Self__ZT3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__QZQN);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__QZQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__QZQN);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__1T3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QZQN)->receiver__OO2H);
    unread__YVJK(Self__1T3P->local__ALZD,Self__1T3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__QZQN);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__QZQN);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__QZQN);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__QZQN);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__QZQN);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__QZQN);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__QZQN);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__QZQN);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__QZQN);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__QZQN);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__QZQN);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__QZQN);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__QZQN);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__QZQN);
  } break;
  case __READ_GLOBAL__: {
    Self__2T3P=((__READ_GLOBAL *)__tmp__QZQN);
    unread__15ML(Self__2T3P->global__RHJK,Self__2T3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__QZQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__QZQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__QZQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__QZQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__QZQN);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__QZQN);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__QZQN);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__QZQN);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__QZQN);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__QZQN);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__QZQN);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__QZQN);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__QZQN);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__QZQN);
  } break;
  };
  __tmp__RZQN=Self__PZQN->parent_expr_binary_cmp__MR1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__RZQN)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__RZQN);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__RZQN);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__3T3P=((__READ_LOCAL *)__tmp__RZQN);
    unread__YVJK(Self__3T3P->local__ALZD,Self__3T3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__RZQN);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__RZQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__RZQN);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__5T3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__RZQN)->receiver__OO2H);
    unread__YVJK(Self__5T3P->local__ALZD,Self__5T3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__RZQN);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__RZQN);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__RZQN);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__RZQN);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__RZQN);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__RZQN);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__RZQN);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__RZQN);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__RZQN);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__RZQN);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__RZQN);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__RZQN);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__RZQN);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__RZQN);
  } break;
  case __READ_GLOBAL__: {
    Self__AU3P=((__READ_GLOBAL *)__tmp__RZQN);
    unread__15ML(Self__AU3P->global__RHJK,Self__AU3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__RZQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__RZQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__RZQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__RZQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__RZQN);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__RZQN);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__RZQN);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__RZQN);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__RZQN);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__RZQN);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__RZQN);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__RZQN);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__RZQN);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__RZQN);
  } break;
  };
}

static void remove__LUPN(__EXPR_OR *Self__MUPN)
// ({EXPR_OR}) VoidRecursive, No inlinable.
{
  void *__tmp__NUPN,*__tmp__OUPN;
  __READ_LOCAL *Self__BU3P,*Self__DU3P,*Self__FU3P,*Self__HU3P;
  __READ_GLOBAL *Self__EU3P,*Self__IU3P;
  __tmp__NUPN=Self__MUPN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__NUPN)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__NUPN);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__NUPN);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__BU3P=((__READ_LOCAL *)__tmp__NUPN);
    unread__YVJK(Self__BU3P->local__ALZD,Self__BU3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__NUPN);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__NUPN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__NUPN);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__DU3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__NUPN)->receiver__OO2H);
    unread__YVJK(Self__DU3P->local__ALZD,Self__DU3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__NUPN);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__NUPN);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__NUPN);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__NUPN);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__NUPN);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__NUPN);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__NUPN);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__NUPN);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__NUPN);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__NUPN);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__NUPN);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__NUPN);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__NUPN);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__NUPN);
  } break;
  case __READ_GLOBAL__: {
    Self__EU3P=((__READ_GLOBAL *)__tmp__NUPN);
    unread__15ML(Self__EU3P->global__RHJK,Self__EU3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__NUPN);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__NUPN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__NUPN);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__NUPN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__NUPN);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__NUPN);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__NUPN);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__NUPN);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__NUPN);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__NUPN);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__NUPN);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__NUPN);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__NUPN);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__NUPN);
  } break;
  };
  __tmp__OUPN=Self__MUPN->parent_expr_binary__ET1M.right__OP2H;
  switch (((struct ___OBJ *)__tmp__OUPN)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__OUPN);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__OUPN);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__FU3P=((__READ_LOCAL *)__tmp__OUPN);
    unread__YVJK(Self__FU3P->local__ALZD,Self__FU3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__OUPN);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__OUPN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__OUPN);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__HU3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__OUPN)->receiver__OO2H);
    unread__YVJK(Self__HU3P->local__ALZD,Self__HU3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__OUPN);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__OUPN);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__OUPN);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__OUPN);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__OUPN);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__OUPN);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__OUPN);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__OUPN);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__OUPN);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__OUPN);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__OUPN);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__OUPN);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__OUPN);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__OUPN);
  } break;
  case __READ_GLOBAL__: {
    Self__IU3P=((__READ_GLOBAL *)__tmp__OUPN);
    unread__15ML(Self__IU3P->global__RHJK,Self__IU3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__OUPN);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__OUPN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__OUPN);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__OUPN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__OUPN);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__OUPN);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__OUPN);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__OUPN);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__OUPN);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__OUPN);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__OUPN);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__OUPN);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__OUPN);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__OUPN);
  } break;
  };
}

static void remove__AQTO(__EXPR_XOR *Self__BQTO)
// ({EXPR_XOR}) VoidRecursive, No inlinable.
{
  void *__tmp__CQTO,*__tmp__DQTO;
  __READ_LOCAL *Self__JU3P,*Self__LU3P,*Self__NU3P,*Self__PU3P;
  __READ_GLOBAL *Self__MU3P,*Self__QU3P;
  __tmp__CQTO=Self__BQTO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__CQTO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__CQTO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__CQTO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__JU3P=((__READ_LOCAL *)__tmp__CQTO);
    unread__YVJK(Self__JU3P->local__ALZD,Self__JU3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__CQTO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__CQTO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__CQTO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__LU3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__CQTO)->receiver__OO2H);
    unread__YVJK(Self__LU3P->local__ALZD,Self__LU3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__CQTO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__CQTO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__CQTO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__CQTO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__CQTO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__CQTO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__CQTO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__CQTO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__CQTO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__CQTO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__CQTO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__CQTO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__CQTO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__CQTO);
  } break;
  case __READ_GLOBAL__: {
    Self__MU3P=((__READ_GLOBAL *)__tmp__CQTO);
    unread__15ML(Self__MU3P->global__RHJK,Self__MU3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__CQTO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__CQTO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__CQTO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__CQTO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__CQTO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__CQTO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__CQTO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__CQTO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__CQTO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__CQTO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__CQTO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__CQTO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__CQTO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__CQTO);
  } break;
  };
  __tmp__DQTO=Self__BQTO->parent_expr_binary__UA5N.right__OP2H;
  switch (((struct ___OBJ *)__tmp__DQTO)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__DQTO);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__DQTO);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__NU3P=((__READ_LOCAL *)__tmp__DQTO);
    unread__YVJK(Self__NU3P->local__ALZD,Self__NU3P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__DQTO);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__DQTO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__DQTO);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__PU3P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__DQTO)->receiver__OO2H);
    unread__YVJK(Self__PU3P->local__ALZD,Self__PU3P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__DQTO);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__DQTO);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__DQTO);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__DQTO);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__DQTO);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__DQTO);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__DQTO);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__DQTO);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__DQTO);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__DQTO);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__DQTO);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__DQTO);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__DQTO);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__DQTO);
  } break;
  case __READ_GLOBAL__: {
    Self__QU3P=((__READ_GLOBAL *)__tmp__DQTO);
    unread__15ML(Self__QU3P->global__RHJK,Self__QU3P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__DQTO);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__DQTO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__DQTO);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__DQTO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__DQTO);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__DQTO);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__DQTO);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__DQTO);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__DQTO);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__DQTO);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__DQTO);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__DQTO);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__DQTO);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__DQTO);
  } break;
  };
}

static __CALL_SLOT* create__profil__with__W4TI(__POSITION p__Y4TI,void *prof__Z4TI,void *l_arg__04TI)
// ({POSITION},{NULLxPROFIL_SLOTxPROFIL_BLOCK},{NULLxFAST_ARRAYoWRITEo}) With resultNo recursive, No inlinable.
{
  __CALL_SLOT *result__24TI,*Self__KTHJ;
  __PROFIL_SLOT *Self__Z5LL;
  void *__tmp__QTHJ,*__tmp__XTHJ;
  void *__tmp__RTHJ,*__tmp__YTHJ;
  result__24TI=clone__EBZI(CALL_SLOT__);
  Self__KTHJ=((__CALL_SLOT *)result__24TI);
  Self__KTHJ->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=p__Y4TI;
  Self__KTHJ->profil__QA2H=prof__Z4TI;
  Self__KTHJ->argument_list__OTHJ=l_arg__04TI;
  if (((struct ___OBJ *)prof__Z4TI)->__id==__PROFIL_SLOT__) {
    Self__Z5LL=((__PROFIL_SLOT *)prof__Z4TI);
    Self__Z5LL->parent_profil__51LC.link_count__FALJ=(__INTEGER)(Self__Z5LL->parent_profil__51LC.link_count__FALJ +  1);
  } else {
    link__DALJ(prof__Z4TI);
  };
  __tmp__QTHJ=Self__KTHJ->profil__QA2H;
  if (((struct ___OBJ *)__tmp__QTHJ)->__id==__PROFIL_SLOT__) {
    __tmp__RTHJ=((__PROFIL_SLOT *)__tmp__QTHJ)->parent_profil__51LC.result_list__SA2H;
  } else {
    __tmp__RTHJ=((__PROFIL_BLOCK *)__tmp__QTHJ)->parent_profil__GHAG.result_list__SA2H;
  };
  if (((void *)__tmp__RTHJ != (void *)NULL)) {
    __tmp__XTHJ=Self__KTHJ->profil__QA2H;
    if (((struct ___OBJ *)__tmp__XTHJ)->__id==__PROFIL_SLOT__) {
      __tmp__YTHJ=((__PROFIL_SLOT *)__tmp__XTHJ)->parent_profil__51LC.result_list__SA2H;
    } else {
      __tmp__YTHJ=((__PROFIL_BLOCK *)__tmp__XTHJ)->parent_profil__GHAG.result_list__SA2H;
    };
    Self__KTHJ->result_list__1A2H=create_with_capacity__UIPH((__INTEGER)(((__FAST_ARRAYoLOCALo *)__tmp__YTHJ)->parent_arrayed_collection__QI4F.upper__TI4F +  1));
  };
  return(result__24TI);
}

static void* read__IC5G(__LOCAL *Self__JC5G)
// ({LOCAL}) With resultNo recursive, No inlinable.
{
  void *result__OWAH;
  __BOOLEAN __tmp__ZWAH;
  result__OWAH=NULL;
  if (((void *)Self__JC5G->my_alias__PWAH != (void *)NULL)) {
    result__OWAH=read_direct__with__4AVI(Self__JC5G->my_alias__PWAH);
    __tmp__ZWAH=TRUE__;
  } else {
    __tmp__ZWAH=FALSE__;
  };
  if ((! __tmp__ZWAH)) {
    if (is_alias__4WAH) {
      result__OWAH=read_direct__with__4AVI(get_alias__IX4N(Self__JC5G));
    } else {
      result__OWAH=read_direct__with__4AVI(Self__JC5G);
    };
  };
  return(result__OWAH);
}

static void* new_write__rec__value__UKBJ(void *sd__WKBJ,void *e__XKBJ,void *val__YKBJ)
// ({NULLxSLOT_DATA},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *result__0KBJ;
  __POSITION __tmp__BLBJ,__tmp__LLBJ;
  void *__tmp__DLBJ;
  __STRING_CST *Self__RU3P;
  __PROTOTYPE_CST *Self__SU3P;
  __INTEGER_CST *Self__TU3P;
  __REAL_CST *Self__VU3P;
  __CHARACTER_CST *Self__XU3P;
  __IS_EXPANDED *Self__YU3P;
  result__0KBJ=NULL;
  if ((((__SLOT_DATA *)sd__WKBJ)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '+')) {
    switch (((struct ___OBJ *)e__XKBJ)->__id) {
    case __LIST__: {
      __tmp__BLBJ=((__LIST *)e__XKBJ)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__BLBJ=((__STRING_CST *)e__XKBJ)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BLBJ=((__EXTERNAL_C *)e__XKBJ)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BLBJ=((__PROTOTYPE_CST *)e__XKBJ)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__BLBJ=((__INTEGER_CST *)e__XKBJ)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__BLBJ=((__READ_LOCAL *)e__XKBJ)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BLBJ=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BLBJ=((__EXPR_EQUAL *)e__XKBJ)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BLBJ=((__EXPR_NOT_EQUAL *)e__XKBJ)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__BLBJ=((__REAL_CST *)e__XKBJ)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__BLBJ=((__CHARACTER_CST *)e__XKBJ)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__BLBJ=((__IS_EXPANDED *)e__XKBJ)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BLBJ=((__GET_TYPE_ID *)e__XKBJ)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__BLBJ=((__EXPR_SUP *)e__XKBJ)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__BLBJ=((__EXPR_SUB *)e__XKBJ)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__BLBJ=((__EXPR_MUL *)e__XKBJ)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__BLBJ=((__EXPR_DIV *)e__XKBJ)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__BLBJ=((__EXPR_AND *)e__XKBJ)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BLBJ=((__EXPR_SHIFT_R *)e__XKBJ)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BLBJ=((__EXPR_SHIFT_L *)e__XKBJ)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__BLBJ=((__PUT_TO *)e__XKBJ)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__BLBJ=((__ITEM *)e__XKBJ)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__BLBJ=((__SIZE_OF *)e__XKBJ)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__BLBJ=((__CAST *)e__XKBJ)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__BLBJ=((__CALL_SLOT *)e__XKBJ)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__BLBJ=((__READ_SLOT *)e__XKBJ)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__BLBJ=((__READ_GLOBAL *)e__XKBJ)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BLBJ=((__EXPR_NOT_LOGIC *)e__XKBJ)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BLBJ=((__EXPR_OR_LOGIC *)e__XKBJ)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BLBJ=((__EXPR_OR_OR_LOGIC *)e__XKBJ)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BLBJ=((__EXPR_AND_LOGIC *)e__XKBJ)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BLBJ=((__EXPR_AND_AND_LOGIC *)e__XKBJ)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__BLBJ=((__EXPR_NEG *)e__XKBJ)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__BLBJ=((__EXPR_ADD *)e__XKBJ)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__BLBJ=((__EXPR_NOT *)e__XKBJ)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__BLBJ=((__EXPR_MOD *)e__XKBJ)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BLBJ=((__EXPR_SUP_EQ *)e__XKBJ)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__BLBJ=((__EXPR_INF *)e__XKBJ)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BLBJ=((__EXPR_INF_EQ *)e__XKBJ)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__BLBJ=((__EXPR_OR *)e__XKBJ)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__BLBJ=((__EXPR_XOR *)e__XKBJ)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    switch (((struct ___OBJ *)e__XKBJ)->__id) {
    case __LIST__: {
      __tmp__DLBJ=my_copy__2HYM(e__XKBJ);
    } break;
    case __STRING_CST__: {
      Self__RU3P=((__STRING_CST *)e__XKBJ);
      __tmp__DLBJ=create__text__AUMH(Self__RU3P->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RU3P->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__DLBJ=my_copy__2K2H(e__XKBJ);
    } break;
    case __PROTOTYPE_CST__: {
      Self__SU3P=((__PROTOTYPE_CST *)e__XKBJ);
      __tmp__DLBJ=create__type__CLQC(Self__SU3P->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SU3P->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__TU3P=((__INTEGER_CST *)e__XKBJ);
      __tmp__DLBJ=create__value__type__DNQC(Self__TU3P->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TU3P->value__PAZD,Self__TU3P->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__DLBJ=my_copy__OAFJ(e__XKBJ);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DLBJ=my_copy__KM2H(e__XKBJ);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DLBJ=my_copy__DN2H(e__XKBJ);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DLBJ=my_copy__QN2H(e__XKBJ);
    } break;
    case __REAL_CST__: {
      Self__VU3P=((__REAL_CST *)e__XKBJ);
      __tmp__DLBJ=create__value__type__1SMH(Self__VU3P->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VU3P->value__5N2H,Self__VU3P->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__XU3P=((__CHARACTER_CST *)e__XKBJ);
      __tmp__DLBJ=create__char__WTMH(Self__XU3P->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XU3P->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__YU3P=((__IS_EXPANDED *)e__XKBJ);
      __tmp__DLBJ=create__receiver__WRWH(Self__YU3P->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__YU3P->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DLBJ=my_copy__TO2H(e__XKBJ);
    } break;
    case __EXPR_SUP__: {
      __tmp__DLBJ=my_copy__2O2H(e__XKBJ);
    } break;
    case __EXPR_SUB__: {
      __tmp__DLBJ=my_copy__HP2H(e__XKBJ);
    } break;
    case __EXPR_MUL__: {
      __tmp__DLBJ=my_copy__TP2H(e__XKBJ);
    } break;
    case __EXPR_DIV__: {
      __tmp__DLBJ=my_copy__4P2H(e__XKBJ);
    } break;
    case __EXPR_AND__: {
      __tmp__DLBJ=my_copy__JQ2H(e__XKBJ);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DLBJ=my_copy__UQ2H(e__XKBJ);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DLBJ=my_copy__5Q2H(e__XKBJ);
    } break;
    case __PUT_TO__: {
      __tmp__DLBJ=my_copy__KR2H(e__XKBJ);
    } break;
    case __ITEM__: {
      __tmp__DLBJ=my_copy__1R2H(e__XKBJ);
    } break;
    case __SIZE_OF__: {
      __tmp__DLBJ=my_copy__HS2H(e__XKBJ);
    } break;
    case __CAST__: {
      __tmp__DLBJ=my_copy__QS2H(e__XKBJ);
    } break;
    case __CALL_SLOT__: {
      __tmp__DLBJ=my_copy__PIYM(e__XKBJ);
    } break;
    case __READ_SLOT__: {
      __tmp__DLBJ=my_copy__AVGK(e__XKBJ);
    } break;
    case __READ_GLOBAL__: {
      __tmp__DLBJ=my_copy__NVGK(e__XKBJ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DLBJ=my_copy__RFCN(e__XKBJ);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DLBJ=my_copy__JMEO(e__XKBJ);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DLBJ=my_copy__RTJO(e__XKBJ);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DLBJ=my_copy__WMEO(e__XKBJ);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DLBJ=my_copy__3TJO(e__XKBJ);
    } break;
    case __EXPR_NEG__: {
      __tmp__DLBJ=my_copy__YEJM(e__XKBJ);
    } break;
    case __EXPR_ADD__: {
      __tmp__DLBJ=my_copy__YRLL(e__XKBJ);
    } break;
    case __EXPR_NOT__: {
      __tmp__DLBJ=my_copy__GLYM(e__XKBJ);
    } break;
    case __EXPR_MOD__: {
      __tmp__DLBJ=my_copy__BNEO(e__XKBJ);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DLBJ=my_copy__M3DP(e__XKBJ);
    } break;
    case __EXPR_INF__: {
      __tmp__DLBJ=my_copy__PBSN(e__XKBJ);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DLBJ=my_copy__0BSN(e__XKBJ);
    } break;
    case __EXPR_OR__: {
      __tmp__DLBJ=my_copy__ZOPN(e__XKBJ);
    } break;
    case __EXPR_XOR__: {
      __tmp__DLBJ=my_copy__CYSO(e__XKBJ);
    } break;
    };
    result__0KBJ=write_direct__with__value__05DH(((__SLOT_DATA *)sd__WKBJ),__tmp__BLBJ,__tmp__DLBJ,val__YKBJ);
  } else {
    switch (((struct ___OBJ *)e__XKBJ)->__id) {
    case __LIST__: {
      __tmp__LLBJ=((__LIST *)e__XKBJ)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__LLBJ=((__STRING_CST *)e__XKBJ)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LLBJ=((__EXTERNAL_C *)e__XKBJ)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LLBJ=((__PROTOTYPE_CST *)e__XKBJ)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__LLBJ=((__INTEGER_CST *)e__XKBJ)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__LLBJ=((__READ_LOCAL *)e__XKBJ)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LLBJ=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LLBJ=((__EXPR_EQUAL *)e__XKBJ)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LLBJ=((__EXPR_NOT_EQUAL *)e__XKBJ)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__LLBJ=((__REAL_CST *)e__XKBJ)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LLBJ=((__CHARACTER_CST *)e__XKBJ)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LLBJ=((__IS_EXPANDED *)e__XKBJ)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LLBJ=((__GET_TYPE_ID *)e__XKBJ)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__LLBJ=((__EXPR_SUP *)e__XKBJ)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__LLBJ=((__EXPR_SUB *)e__XKBJ)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__LLBJ=((__EXPR_MUL *)e__XKBJ)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__LLBJ=((__EXPR_DIV *)e__XKBJ)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__LLBJ=((__EXPR_AND *)e__XKBJ)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LLBJ=((__EXPR_SHIFT_R *)e__XKBJ)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LLBJ=((__EXPR_SHIFT_L *)e__XKBJ)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__LLBJ=((__PUT_TO *)e__XKBJ)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__LLBJ=((__ITEM *)e__XKBJ)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__LLBJ=((__SIZE_OF *)e__XKBJ)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__LLBJ=((__CAST *)e__XKBJ)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__LLBJ=((__CALL_SLOT *)e__XKBJ)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__LLBJ=((__READ_SLOT *)e__XKBJ)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LLBJ=((__READ_GLOBAL *)e__XKBJ)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LLBJ=((__EXPR_NOT_LOGIC *)e__XKBJ)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LLBJ=((__EXPR_OR_LOGIC *)e__XKBJ)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LLBJ=((__EXPR_OR_OR_LOGIC *)e__XKBJ)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LLBJ=((__EXPR_AND_LOGIC *)e__XKBJ)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LLBJ=((__EXPR_AND_AND_LOGIC *)e__XKBJ)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__LLBJ=((__EXPR_NEG *)e__XKBJ)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__LLBJ=((__EXPR_ADD *)e__XKBJ)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__LLBJ=((__EXPR_NOT *)e__XKBJ)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__LLBJ=((__EXPR_MOD *)e__XKBJ)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LLBJ=((__EXPR_SUP_EQ *)e__XKBJ)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__LLBJ=((__EXPR_INF *)e__XKBJ)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LLBJ=((__EXPR_INF_EQ *)e__XKBJ)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__LLBJ=((__EXPR_OR *)e__XKBJ)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__LLBJ=((__EXPR_XOR *)e__XKBJ)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    result__0KBJ=write_direct__with__value__05DH(((__SLOT_DATA *)sd__WKBJ),__tmp__LLBJ,NULL,val__YKBJ);
  };
  return(result__0KBJ);
}

static void add_write_id__in__REBJ(void *e__TEBJ,void *s__UEBJ,void *lst__VEBJ)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSLOT_DATAxSLOT_CODE},{NULLxLIST}) VoidNo recursive, No inlinable.
{
  void *new_value__WEBJ;
  void *__tmp__4EBJ;
  new_value__WEBJ=create__type__CLQC(((__LIST *)lst__VEBJ)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,((__TYPE_ID *)get_index__B3ZH( 0))->parent_type__WIB.default__AKC);
  if (((struct ___OBJ *)s__UEBJ)->__id==__SLOT_DATA__) {
    __tmp__4EBJ=((__SLOT *)((__SLOT_DATA *)s__UEBJ)->parent_slot__BJZD)->slot_id__04OG;
  } else {
    __tmp__4EBJ=((__SLOT *)((__SLOT_CODE *)s__UEBJ)->parent_slot__Y22F)->slot_id__04OG;
  };
  add__to__1H5G(((__LIST *)lst__VEBJ)->expr_list__JUOG,new_write__rec__value__UKBJ(__tmp__4EBJ,e__TEBJ,new_value__WEBJ), 1);
}

static void add_last__TWRJ(__TYPES_TMP *Self__UWRJ,void *t__VWRJ)
// ({TYPES_TMP},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__WWRJ;
  new_capacity__WWRJ= 0;
  if (((__INTEGER)(Self__UWRJ->parent_types__W25F.upper__4LAG +  1) > (__INTEGER)(Self__UWRJ->capacity__W3GJ -  1))) {
    new_capacity__WWRJ=(__INTEGER)(Self__UWRJ->capacity__W3GJ <<  1);
    Self__UWRJ->parent_types__W25F.storage__WWFJ=realloc__with__0QZG(Self__UWRJ->parent_types__W25F.storage__WWFJ,Self__UWRJ->capacity__W3GJ,new_capacity__WWRJ);
    Self__UWRJ->capacity__W3GJ=new_capacity__WWRJ;
  };
  Self__UWRJ->parent_types__W25F.upper__4LAG=(__INTEGER)(Self__UWRJ->parent_types__W25F.upper__4LAG +  1);
  ((void **)Self__UWRJ->parent_types__W25F.storage__WWFJ)[Self__UWRJ->parent_types__W25F.upper__4LAG]=t__VWRJ;
}

static __INTEGER search__from__to__NXRJ(__TYPES_TMP *Self__OXRJ,void *t__PXRJ,__INTEGER beg__QXRJ,__INTEGER end__RXRJ)
// ({TYPES_TMP},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{INTEGER},{INTEGER}) With resultRecursive, No inlinable.
{
  __INTEGER middle__TXRJ,result__UXRJ,__tmp__3XRJ,__tmp__5XRJ;
  __INTEGER __tmp__UYRJ,__tmp__WYRJ;
  void *__tmp__4XRJ,*__tmp__VYRJ;
  middle__TXRJ= 0;
  result__UXRJ= 0;
  if (((__INTEGER)(end__RXRJ - beg__QXRJ) <  2)) {
    switch (((struct ___OBJ *)t__PXRJ)->__id) {
    case __TYPE__: {
      __tmp__3XRJ=((__TYPE *)t__PXRJ)->index__LJC;
    } break;
    case __TYPE_NULL__: {
      __tmp__3XRJ=((__TYPE_NULL *)t__PXRJ)->parent_type__TIB.index__LJC;
    } break;
    case __TYPE_VOID__: {
      __tmp__3XRJ=((__TYPE_VOID *)t__PXRJ)->parent_type__UIB.index__LJC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__3XRJ=((__TYPE_CONTEXT *)t__PXRJ)->parent_type__VIB.index__LJC;
    } break;
    case __TYPE_ID__: {
      __tmp__3XRJ=((__TYPE_ID *)t__PXRJ)->parent_type__WIB.index__LJC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__3XRJ=((__TYPE_GENERIC *)t__PXRJ)->parent_type__T2IB.index__LJC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__3XRJ=((__PROFIL_BLOCK *)t__PXRJ)->parent_type__HHAG.index__LJC;
    } break;
    };
    __tmp__4XRJ=((void **)Self__OXRJ->parent_types__W25F.storage__WWFJ)[beg__QXRJ];
    switch (((struct ___OBJ *)__tmp__4XRJ)->__id) {
    case __TYPE__: {
      __tmp__5XRJ=((__TYPE *)__tmp__4XRJ)->index__LJC;
    } break;
    case __TYPE_NULL__: {
      __tmp__5XRJ=((__TYPE_NULL *)__tmp__4XRJ)->parent_type__TIB.index__LJC;
    } break;
    case __TYPE_VOID__: {
      __tmp__5XRJ=((__TYPE_VOID *)__tmp__4XRJ)->parent_type__UIB.index__LJC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__5XRJ=((__TYPE_CONTEXT *)__tmp__4XRJ)->parent_type__VIB.index__LJC;
    } break;
    case __TYPE_ID__: {
      __tmp__5XRJ=((__TYPE_ID *)__tmp__4XRJ)->parent_type__WIB.index__LJC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__5XRJ=((__TYPE_GENERIC *)__tmp__4XRJ)->parent_type__T2IB.index__LJC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__5XRJ=((__PROFIL_BLOCK *)__tmp__4XRJ)->parent_type__HHAG.index__LJC;
    } break;
    };
    if ((__tmp__3XRJ > __tmp__5XRJ)) {
      result__UXRJ=end__RXRJ;
    } else {
      result__UXRJ=beg__QXRJ;
    };
  } else {
    middle__TXRJ=(__INTEGER)((__INTEGER)(beg__QXRJ + end__RXRJ) >>  1);
    switch (((struct ___OBJ *)t__PXRJ)->__id) {
    case __TYPE__: {
      __tmp__UYRJ=((__TYPE *)t__PXRJ)->index__LJC;
    } break;
    case __TYPE_NULL__: {
      __tmp__UYRJ=((__TYPE_NULL *)t__PXRJ)->parent_type__TIB.index__LJC;
    } break;
    case __TYPE_VOID__: {
      __tmp__UYRJ=((__TYPE_VOID *)t__PXRJ)->parent_type__UIB.index__LJC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__UYRJ=((__TYPE_CONTEXT *)t__PXRJ)->parent_type__VIB.index__LJC;
    } break;
    case __TYPE_ID__: {
      __tmp__UYRJ=((__TYPE_ID *)t__PXRJ)->parent_type__WIB.index__LJC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__UYRJ=((__TYPE_GENERIC *)t__PXRJ)->parent_type__T2IB.index__LJC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__UYRJ=((__PROFIL_BLOCK *)t__PXRJ)->parent_type__HHAG.index__LJC;
    } break;
    };
    __tmp__VYRJ=((void **)Self__OXRJ->parent_types__W25F.storage__WWFJ)[middle__TXRJ];
    switch (((struct ___OBJ *)__tmp__VYRJ)->__id) {
    case __TYPE__: {
      __tmp__WYRJ=((__TYPE *)__tmp__VYRJ)->index__LJC;
    } break;
    case __TYPE_NULL__: {
      __tmp__WYRJ=((__TYPE_NULL *)__tmp__VYRJ)->parent_type__TIB.index__LJC;
    } break;
    case __TYPE_VOID__: {
      __tmp__WYRJ=((__TYPE_VOID *)__tmp__VYRJ)->parent_type__UIB.index__LJC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__WYRJ=((__TYPE_CONTEXT *)__tmp__VYRJ)->parent_type__VIB.index__LJC;
    } break;
    case __TYPE_ID__: {
      __tmp__WYRJ=((__TYPE_ID *)__tmp__VYRJ)->parent_type__WIB.index__LJC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__WYRJ=((__TYPE_GENERIC *)__tmp__VYRJ)->parent_type__T2IB.index__LJC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__WYRJ=((__PROFIL_BLOCK *)__tmp__VYRJ)->parent_type__HHAG.index__LJC;
    } break;
    };
    if ((__tmp__UYRJ > __tmp__WYRJ)) {
      result__UXRJ=search__from__to__NXRJ(Self__OXRJ,t__PXRJ,middle__TXRJ,end__RXRJ);
    } else {
      result__UXRJ=search__from__to__NXRJ(Self__OXRJ,t__PXRJ,beg__QXRJ,middle__TXRJ);
    };
  };
  return(result__UXRJ);
}

static void add__to__BLYK(__TYPES_TMP *Self__CLYK,void *t__DLYK,__INTEGER index__ELYK)
// ({TYPES_TMP},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__FLYK,Self__WSCL;
  void **__tmp__SA1Q,**__tmp__TA1Q;
  new_capacity__FLYK= 0;
  if ((index__ELYK == (__INTEGER)(Self__CLYK->parent_types__W25F.upper__4LAG +  1))) {
    add_last__TWRJ(Self__CLYK,t__DLYK);
  } else {
    if (((__INTEGER)(Self__CLYK->parent_types__W25F.upper__4LAG +  1) > (__INTEGER)(Self__CLYK->capacity__W3GJ -  1))) {
      new_capacity__FLYK=(__INTEGER)(Self__CLYK->capacity__W3GJ <<  1);
      Self__CLYK->parent_types__W25F.storage__WWFJ=realloc__with__0QZG(Self__CLYK->parent_types__W25F.storage__WWFJ,Self__CLYK->capacity__W3GJ,new_capacity__FLYK);
      Self__CLYK->capacity__W3GJ=new_capacity__FLYK;
    };
    Self__CLYK->parent_types__W25F.upper__4LAG=(__INTEGER)(Self__CLYK->parent_types__W25F.upper__4LAG +  1);
    Self__WSCL=(__INTEGER)(Self__CLYK->parent_types__W25F.upper__4LAG -  1);
    __tmp__SA1Q=Self__CLYK->parent_types__W25F.storage__WWFJ;
    __tmp__TA1Q=Self__CLYK->parent_types__W25F.storage__WWFJ;
    while ((Self__WSCL >= index__ELYK)) {
      ((void **)__tmp__SA1Q)[(__INTEGER)(Self__WSCL +  1)]=((void **)__tmp__TA1Q)[Self__WSCL];
      Self__WSCL=(__INTEGER)(Self__WSCL -  1);
    };
    ((void **)Self__CLYK->parent_types__W25F.storage__WWFJ)[index__ELYK]=t__DLYK;
  };
}

static void union__IKHJ(__TYPES_TMP *Self__JKHJ,void *other__KKHJ)
// ({TYPES_TMP},{NULLxTYPES}) VoidNo recursive, No inlinable.
{
  __INTEGER idx1__LKHJ,idx2__MKHJ,t2idx__NKHJ,__tmp__2KHJ,__tmp__1A1Q;
  __INTEGER __tmp__JLHJ;
  void *t2__OKHJ,*__tmp__ILHJ;
  void **__tmp__2A1Q;
  __BOOLEAN __tmp__NLHJ;
  idx1__LKHJ= 0;
  idx2__MKHJ= 0;
  t2idx__NKHJ= 0;
  t2__OKHJ=NULL;
  while ((idx2__MKHJ <= ((__TYPES *)other__KKHJ)->upper__4LAG)) {
    t2__OKHJ=((void **)((__TYPES *)other__KKHJ)->storage__WWFJ)[idx2__MKHJ];
    switch (((struct ___OBJ *)t2__OKHJ)->__id) {
    case __TYPE__: {
      __tmp__2KHJ=((__TYPE *)t2__OKHJ)->index__LJC;
    } break;
    case __TYPE_NULL__: {
      __tmp__2KHJ=((__TYPE_NULL *)t2__OKHJ)->parent_type__TIB.index__LJC;
    } break;
    case __TYPE_VOID__: {
      __tmp__2KHJ=((__TYPE_VOID *)t2__OKHJ)->parent_type__UIB.index__LJC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__2KHJ=((__TYPE_CONTEXT *)t2__OKHJ)->parent_type__VIB.index__LJC;
    } break;
    case __TYPE_ID__: {
      __tmp__2KHJ=((__TYPE_ID *)t2__OKHJ)->parent_type__WIB.index__LJC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__2KHJ=((__TYPE_GENERIC *)t2__OKHJ)->parent_type__T2IB.index__LJC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__2KHJ=((__PROFIL_BLOCK *)t2__OKHJ)->parent_type__HHAG.index__LJC;
    } break;
    };
    t2idx__NKHJ=__tmp__2KHJ;
    __tmp__1A1Q=Self__JKHJ->parent_types__W25F.upper__4LAG;
    __tmp__2A1Q=Self__JKHJ->parent_types__W25F.storage__WWFJ;
    while_do__U2XK:
    {
      if ((idx1__LKHJ <= __tmp__1A1Q)) {
        __tmp__ILHJ=((void **)__tmp__2A1Q)[idx1__LKHJ];
        switch (((struct ___OBJ *)__tmp__ILHJ)->__id) {
        case __TYPE__: {
          __tmp__JLHJ=((__TYPE *)__tmp__ILHJ)->index__LJC;
        } break;
        case __TYPE_NULL__: {
          __tmp__JLHJ=((__TYPE_NULL *)__tmp__ILHJ)->parent_type__TIB.index__LJC;
        } break;
        case __TYPE_VOID__: {
          __tmp__JLHJ=((__TYPE_VOID *)__tmp__ILHJ)->parent_type__UIB.index__LJC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__JLHJ=((__TYPE_CONTEXT *)__tmp__ILHJ)->parent_type__VIB.index__LJC;
        } break;
        case __TYPE_ID__: {
          __tmp__JLHJ=((__TYPE_ID *)__tmp__ILHJ)->parent_type__WIB.index__LJC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__JLHJ=((__TYPE_GENERIC *)__tmp__ILHJ)->parent_type__T2IB.index__LJC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__JLHJ=((__PROFIL_BLOCK *)__tmp__ILHJ)->parent_type__HHAG.index__LJC;
        } break;
        };
        __tmp__NLHJ=(__tmp__JLHJ < t2idx__NKHJ);
      } else {
        __tmp__NLHJ=FALSE__;
      };
      if (__tmp__NLHJ) {
        idx1__LKHJ=(__INTEGER)(idx1__LKHJ +  1);
        goto while_do__U2XK;
      };
    };
    if (((idx1__LKHJ > Self__JKHJ->parent_types__W25F.upper__4LAG) || ((void *)((void **)Self__JKHJ->parent_types__W25F.storage__WWFJ)[idx1__LKHJ] != (void *)t2__OKHJ))) {
      add__to__BLYK(Self__JKHJ,t2__OKHJ,idx1__LKHJ);
    };
    idx1__LKHJ=(__INTEGER)(idx1__LKHJ +  1);
    idx2__MKHJ=(__INTEGER)(idx2__MKHJ +  1);
  };
}

static void get_type__44GL(__WRITE_GLOBAL *Self__54GL,void *t__A5GL)
// ({WRITE_GLOBAL},{NULLxTYPES_TMP}) VoidRecursive, No inlinable.
{
  void *__tmp__H5GL;
  if (((void *)Self__54GL->parent_write__QBGH.value__HBEH != (void *)NULL)) {
    __tmp__H5GL=Self__54GL->parent_write__QBGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__H5GL)->__id) {
    case __LIST__: {
      get_type__EYMJ(__tmp__H5GL,t__A5GL);
    } break;
    case __STRING_CST__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)((__STRING_CST *)__tmp__H5GL)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
    } break;
    case __EXTERNAL_C__: {
      get_type__ZHDI(__tmp__H5GL,t__A5GL);
    } break;
    case __PROTOTYPE_CST__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__H5GL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __INTEGER_CST__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__H5GL)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __READ_LOCAL__: {
      get_type__AOFJ(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_MULTIPLE__: {
      print__1ZE((&__string_253));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __EXPR_EQUAL__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_NOT_EQUAL__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __REAL_CST__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)((__REAL_CST *)__tmp__H5GL)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __CHARACTER_CST__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__H5GL)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __IS_EXPANDED__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __GET_TYPE_ID__: {
      add__R2EJ(t__A5GL,type_integer__3JB);
    } break;
    case __EXPR_SUP__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_SUB__: {
      get_type__ZJDI(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_MUL__: {
      get_type__3JDI(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_DIV__: {
      get_type__BKDI(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_AND__: {
      get_type__FKDI(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_SHIFT_R__: {
      get_type__JKDI(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_SHIFT_L__: {
      get_type__NKDI(__tmp__H5GL,t__A5GL);
    } break;
    case __PUT_TO__: {
      add__R2EJ(t__A5GL,TYPE_VOID__);
    } break;
    case __ITEM__: {
      get_type__UKDI(__tmp__H5GL,t__A5GL);
    } break;
    case __SIZE_OF__: {
      add__R2EJ(t__A5GL,type_integer__3JB);
    } break;
    case __CAST__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)((__CAST *)__tmp__H5GL)->static_type__SO1H)->parent_type__KTL);
    } break;
    case __CALL_SLOT__: {
      get_type__DAML(__tmp__H5GL,t__A5GL);
    } break;
    case __READ_SLOT__: {
      get_type__OD0K(__tmp__H5GL,t__A5GL);
    } break;
    case __READ_GLOBAL__: {
      get_type__ZJOL(((__READ_GLOBAL *)__tmp__H5GL)->global__RHJK,t__A5GL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_OR_LOGIC__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_AND_LOGIC__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_NEG__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__H5GL)))->parent_type__KTL);
    } break;
    case __EXPR_ADD__: {
      get_type__YEOL(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_NOT__: {
      add__R2EJ(t__A5GL,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__H5GL)))->parent_type__KTL);
    } break;
    case __EXPR_MOD__: {
      get_type__FSEO(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_SUP_EQ__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_INF__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_INF_EQ__: {
      add__R2EJ(t__A5GL,type_true__FJB);
      add__R2EJ(t__A5GL,type_false__NJB);
    } break;
    case __EXPR_OR__: {
      get_type__CVPN(__tmp__H5GL,t__A5GL);
    } break;
    case __EXPR_XOR__: {
      get_type__FNTO(__tmp__H5GL,t__A5GL);
    } break;
    };
  };
}

static void get_type__K5GL(__WRITE_SLOT *Self__L5GL,void *t__M5GL)
// ({WRITE_SLOT},{NULLxTYPES_TMP}) VoidNo recursive, No inlinable.
{
  void *__tmp__T5GL;
  if (((void *)Self__L5GL->parent_write__3BGH.value__HBEH != (void *)NULL)) {
    __tmp__T5GL=Self__L5GL->parent_write__3BGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__T5GL)->__id) {
    case __LIST__: {
      get_type__EYMJ(__tmp__T5GL,t__M5GL);
    } break;
    case __STRING_CST__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)((__STRING_CST *)__tmp__T5GL)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
    } break;
    case __EXTERNAL_C__: {
      get_type__ZHDI(__tmp__T5GL,t__M5GL);
    } break;
    case __PROTOTYPE_CST__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__T5GL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __INTEGER_CST__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__T5GL)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __READ_LOCAL__: {
      get_type__AOFJ(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_MULTIPLE__: {
      print__1ZE((&__string_253));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __EXPR_EQUAL__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_NOT_EQUAL__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __REAL_CST__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)((__REAL_CST *)__tmp__T5GL)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __CHARACTER_CST__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__T5GL)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __IS_EXPANDED__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __GET_TYPE_ID__: {
      add__R2EJ(t__M5GL,type_integer__3JB);
    } break;
    case __EXPR_SUP__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_SUB__: {
      get_type__ZJDI(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_MUL__: {
      get_type__3JDI(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_DIV__: {
      get_type__BKDI(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_AND__: {
      get_type__FKDI(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_SHIFT_R__: {
      get_type__JKDI(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_SHIFT_L__: {
      get_type__NKDI(__tmp__T5GL,t__M5GL);
    } break;
    case __PUT_TO__: {
      add__R2EJ(t__M5GL,TYPE_VOID__);
    } break;
    case __ITEM__: {
      get_type__UKDI(__tmp__T5GL,t__M5GL);
    } break;
    case __SIZE_OF__: {
      add__R2EJ(t__M5GL,type_integer__3JB);
    } break;
    case __CAST__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)((__CAST *)__tmp__T5GL)->static_type__SO1H)->parent_type__KTL);
    } break;
    case __CALL_SLOT__: {
      get_type__DAML(__tmp__T5GL,t__M5GL);
    } break;
    case __READ_SLOT__: {
      get_type__OD0K(__tmp__T5GL,t__M5GL);
    } break;
    case __READ_GLOBAL__: {
      get_type__ZJOL(((__READ_GLOBAL *)__tmp__T5GL)->global__RHJK,t__M5GL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_OR_LOGIC__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_AND_LOGIC__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_NEG__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__T5GL)))->parent_type__KTL);
    } break;
    case __EXPR_ADD__: {
      get_type__YEOL(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_NOT__: {
      add__R2EJ(t__M5GL,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__T5GL)))->parent_type__KTL);
    } break;
    case __EXPR_MOD__: {
      get_type__FSEO(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_SUP_EQ__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_INF__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_INF_EQ__: {
      add__R2EJ(t__M5GL,type_true__FJB);
      add__R2EJ(t__M5GL,type_false__NJB);
    } break;
    case __EXPR_OR__: {
      get_type__CVPN(__tmp__T5GL,t__M5GL);
    } break;
    case __EXPR_XOR__: {
      get_type__FNTO(__tmp__T5GL,t__M5GL);
    } break;
    };
  };
}

static void get_type__W5GL(__WRITE_LOCAL *Self__X5GL,void *t__Y5GL)
// ({WRITE_LOCAL},{NULLxTYPES_TMP}) VoidNo recursive, No inlinable.
{
  void *__tmp__55GL;
  if (((void *)Self__X5GL->parent_write__X50I.value__HBEH != (void *)NULL)) {
    __tmp__55GL=Self__X5GL->parent_write__X50I.value__HBEH;
    switch (((struct ___OBJ *)__tmp__55GL)->__id) {
    case __LIST__: {
      get_type__EYMJ(__tmp__55GL,t__Y5GL);
    } break;
    case __STRING_CST__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)((__STRING_CST *)__tmp__55GL)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
    } break;
    case __EXTERNAL_C__: {
      get_type__ZHDI(__tmp__55GL,t__Y5GL);
    } break;
    case __PROTOTYPE_CST__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__55GL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __INTEGER_CST__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__55GL)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __READ_LOCAL__: {
      get_type__AOFJ(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_MULTIPLE__: {
      print__1ZE((&__string_253));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __EXPR_EQUAL__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_NOT_EQUAL__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __REAL_CST__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)((__REAL_CST *)__tmp__55GL)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __CHARACTER_CST__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__55GL)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __IS_EXPANDED__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __GET_TYPE_ID__: {
      add__R2EJ(t__Y5GL,type_integer__3JB);
    } break;
    case __EXPR_SUP__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_SUB__: {
      get_type__ZJDI(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_MUL__: {
      get_type__3JDI(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_DIV__: {
      get_type__BKDI(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_AND__: {
      get_type__FKDI(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_SHIFT_R__: {
      get_type__JKDI(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_SHIFT_L__: {
      get_type__NKDI(__tmp__55GL,t__Y5GL);
    } break;
    case __PUT_TO__: {
      add__R2EJ(t__Y5GL,TYPE_VOID__);
    } break;
    case __ITEM__: {
      get_type__UKDI(__tmp__55GL,t__Y5GL);
    } break;
    case __SIZE_OF__: {
      add__R2EJ(t__Y5GL,type_integer__3JB);
    } break;
    case __CAST__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)((__CAST *)__tmp__55GL)->static_type__SO1H)->parent_type__KTL);
    } break;
    case __CALL_SLOT__: {
      get_type__DAML(__tmp__55GL,t__Y5GL);
    } break;
    case __READ_SLOT__: {
      get_type__OD0K(__tmp__55GL,t__Y5GL);
    } break;
    case __READ_GLOBAL__: {
      get_type__ZJOL(((__READ_GLOBAL *)__tmp__55GL)->global__RHJK,t__Y5GL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_OR_LOGIC__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_AND_LOGIC__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_NEG__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__55GL)))->parent_type__KTL);
    } break;
    case __EXPR_ADD__: {
      get_type__YEOL(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_NOT__: {
      add__R2EJ(t__Y5GL,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__55GL)))->parent_type__KTL);
    } break;
    case __EXPR_MOD__: {
      get_type__FSEO(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_SUP_EQ__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_INF__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_INF_EQ__: {
      add__R2EJ(t__Y5GL,type_true__FJB);
      add__R2EJ(t__Y5GL,type_false__NJB);
    } break;
    case __EXPR_OR__: {
      get_type__CVPN(__tmp__55GL,t__Y5GL);
    } break;
    case __EXPR_XOR__: {
      get_type__FNTO(__tmp__55GL,t__Y5GL);
    } break;
    };
  };
}

static void* update__JYMJ(__TYPES_TMP *Self__KYMJ,void *t__LYMJ)
// ({TYPES_TMP},{NULLxTYPES}) With resultNo recursive, No inlinable.
{
  void *result__WYMJ;
  result__WYMJ=NULL;
  if ((((void *)t__LYMJ != (void *)NULL) && ((__INTEGER)(((__TYPES *)t__LYMJ)->upper__4LAG +  1) == (__INTEGER)(Self__KYMJ->parent_types__W25F.upper__4LAG +  1)))) {
    result__WYMJ=t__LYMJ;
    free__OOFJ(Self__KYMJ);
  } else {
    result__WYMJ=to_types__A4EJ(Self__KYMJ);
  };
  return(result__WYMJ);
}

static void* source__Q53L(__CALL_SLOT *Self__R53L)
// ({CALL_SLOT}) With resultNo recursive, No inlinable.
{
  void *__tmp__T53L;
  void *__tmp__U53L;
  __tmp__T53L=Self__R53L->profil__QA2H;
  if (((struct ___OBJ *)__tmp__T53L)->__id==__PROFIL_SLOT__) {
    __tmp__U53L=((__PROFIL_SLOT *)__tmp__T53L)->parent_profil__51LC.code__HZJH;
  } else {
    __tmp__U53L=((__PROFIL_BLOCK *)__tmp__T53L)->parent_profil__GHAG.code__HZJH;
  };
  return(__tmp__U53L);
}

static __SWITCH* clone__CBXH(__SWITCH *Self__DBXH)
// ({SWITCH}) With resultNo recursive, No inlinable.
{
  __SWITCH *result__FBXH;
  __POINTER ptr__GBXH;
  __INTEGER typ_id__LBXH;
  __UINTEGER_32 sz__IBXH,a__EB1Q,new_size__CB1Q,t__IB1Q,a__KB1Q;
  result__FBXH=NULL;
  ptr__GBXH=((__POINTER )(NULL));
  typ_id__LBXH= 0;
  sz__IBXH=((__UINTEGER_32 )sizeof(__SWITCH));
  if ((sz__IBXH ==  0)) {
    result__FBXH=Self__DBXH;
  } else {
    typ_id__LBXH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__IBXH);
    if ((typ_id__LBXH == (__INTEGER)(-  1))) {
      a__EB1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__CB1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__IBXH + a__EB1Q) & (__UINTEGER_32)(~ a__EB1Q));
      ptr__GBXH=micro_alloc__table__lab__BOI(new_size__CB1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CB1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__CB1Q);
    } else {
      t__IB1Q=((__UINTEGER_32 )typ_id__LBXH);
      a__KB1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GBXH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__IBXH + a__KB1Q) & (__UINTEGER_32)(~ a__KB1Q)),((__POINTER )(&(table_type[(t__IB1Q)]))),(__UINTEGER_32)(t__IB1Q |  1));
    };
    result__FBXH=((__SWITCH *)ptr__GBXH);
    *(result__FBXH) = *(Self__DBXH);
  };
  return(result__FBXH);
}

static __POSITION position__V54J(__NODE_STYLE *Self__W54J)
// ({NODE_STYLE}) With resultNo recursive, No inlinable.
{
  void *__tmp__Y54J;
  __POSITION __tmp__Z54J;
  __tmp__Y54J=Self__W54J->parent_node__OP0G.data__LLZD;
  switch (((struct ___OBJ *)__tmp__Y54J)->__id) {
  case __DTA_RD__: {
    __tmp__Z54J=((__DTA_RD *)__tmp__Y54J)->parent_dta__AMQC.parent_itm_object__5LQC.position__BJM;
  } break;
  case __DTA_CAST__: {
    __tmp__Z54J=DTA__->parent_itm_object__5LQC.position__BJM;
  } break;
  case __DTA_WR_CODE__: {
    __tmp__Z54J=((__DTA_WR_CODE *)__tmp__Y54J)->parent_dta__E0LH.parent_itm_object__5LQC.position__BJM;
  } break;
  case __DTA_BLOCK__: {
    __tmp__Z54J=DTA__->parent_itm_object__5LQC.position__BJM;
  } break;
  case __DTA_WR_VALUE__: {
    __tmp__Z54J=((__DTA_WR_VALUE *)__tmp__Y54J)->parent_dta__PTUH.parent_itm_object__5LQC.position__BJM;
  } break;
  case __DTA_RD_ARGS__: {
    __tmp__Z54J=((__DTA_RD_ARGS *)__tmp__Y54J)->parent_dta__5OWH.parent_itm_object__5LQC.position__BJM;
  } break;
  };
  return(__tmp__Z54J);
}

static __FAST_ARRAYoCASEo* create_with_capacity__RZNI(__INTEGER new_count__TZNI)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__B3SI;
  __INTEGER typ_id__G3SI;
  __UINTEGER_32 sz__D3SI,a__PB1Q,new_size__NB1Q,t__TB1Q,a__VB1Q;
  __FAST_ARRAYoCASEo *result__A3SI,*Self__H2GJ;
  result__A3SI=NULL;
  ptr__B3SI=((__POINTER )(NULL));
  typ_id__G3SI= 0;
  sz__D3SI=((__UINTEGER_32 )sizeof(__FAST_ARRAYoCASEo));
  if ((sz__D3SI ==  0)) {
    result__A3SI=FAST_ARRAYoCASEo__;
  } else {
    typ_id__G3SI=__FAST_ARRAYoCASEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__D3SI);
    if ((typ_id__G3SI == (__INTEGER)(-  1))) {
      a__PB1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__NB1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__D3SI + a__PB1Q) & (__UINTEGER_32)(~ a__PB1Q));
      ptr__B3SI=micro_alloc__table__lab__BOI(new_size__NB1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NB1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NB1Q);
    } else {
      t__TB1Q=((__UINTEGER_32 )typ_id__G3SI);
      a__VB1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__B3SI=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__D3SI + a__VB1Q) & (__UINTEGER_32)(~ a__VB1Q)),((__POINTER )(&(table_type[(t__TB1Q)]))),(__UINTEGER_32)(t__TB1Q |  1));
    };
    result__A3SI=((__FAST_ARRAYoCASEo *)ptr__B3SI);
    *(result__A3SI) = *(FAST_ARRAYoCASEo__);
  };
  Self__H2GJ=((__FAST_ARRAYoCASEo *)result__A3SI);
  if ((Self__H2GJ->parent_arrayed_collection__CHAG.capacity__Q2GJ < new_count__TZNI)) {
    Self__H2GJ->parent_arrayed_collection__CHAG.storage__NYEJ=create__FZUJ(new_count__TZNI);
    Self__H2GJ->parent_arrayed_collection__CHAG.capacity__Q2GJ=new_count__TZNI;
  };
  Self__H2GJ->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(-  1);
  return(result__A3SI);
}

static void add_last__VPHJ(__FAST_ARRAYoCASEo *Self__WPHJ,void *element__XPHJ)
// ({FAST_ARRAYoCASEo},{NULLxCASE}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__YPHJ,__tmp__2QHJ,__tmp__T0IK,Self__FARL;
  __BOOLEAN __tmp__GQHJ;
  void **__tmp__1QHJ,**new__A0IK;
  new_capacity__YPHJ= 0;
  if (((__INTEGER)(Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG +  1) <= (__INTEGER)(Self__WPHJ->parent_arrayed_collection__CHAG.capacity__Q2GJ -  1))) {
    Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG +  1);
    __tmp__GQHJ=TRUE__;
  } else {
    __tmp__GQHJ=FALSE__;
  };
  if ((! __tmp__GQHJ)) {
    if ((Self__WPHJ->parent_arrayed_collection__CHAG.capacity__Q2GJ ==  0)) {
      Self__WPHJ->parent_arrayed_collection__CHAG.storage__NYEJ=create__FZUJ( 2);
      Self__WPHJ->parent_arrayed_collection__CHAG.capacity__Q2GJ= 2;
      Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG= 0;
    } else {
      new_capacity__YPHJ=(__INTEGER)(Self__WPHJ->parent_arrayed_collection__CHAG.capacity__Q2GJ <<  1);
      __tmp__1QHJ=Self__WPHJ->parent_arrayed_collection__CHAG.storage__NYEJ;
      __tmp__2QHJ=Self__WPHJ->parent_arrayed_collection__CHAG.capacity__Q2GJ;
      new__A0IK=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__1QHJ)),((__UINTEGER_32 )(__INTEGER)(__tmp__2QHJ * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__YPHJ * ((__INTEGER )(sizeof(void *)))))));
      __tmp__T0IK=(__INTEGER)(new_capacity__YPHJ -  1);
      Self__FARL=__tmp__2QHJ;
      while ((Self__FARL <= __tmp__T0IK)) {
        new__A0IK[Self__FARL]=NULL;
        Self__FARL=(__INTEGER)(Self__FARL +  1);
      };
      Self__WPHJ->parent_arrayed_collection__CHAG.storage__NYEJ=new__A0IK;
      Self__WPHJ->parent_arrayed_collection__CHAG.capacity__Q2GJ=new_capacity__YPHJ;
      Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG +  1);
    };
  };
  ((void **)Self__WPHJ->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__WPHJ->parent_arrayed_collection__CHAG.upper__HMAG]=element__XPHJ;
}

static void add_last__YAQG(__FAST_ARRAYoTYPEo *Self__ZAQG,void *element__0AQG)
// ({FAST_ARRAYoTYPEo},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__1AQG;
  __BOOLEAN __tmp__JBQG;
  new_capacity__1AQG= 0;
  if (((__INTEGER)(Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB +  1) <= (__INTEGER)(Self__ZAQG->parent_arrayed_collection__UOB.capacity__M2L -  1))) {
    Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB=(__INTEGER)(Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB +  1);
    __tmp__JBQG=TRUE__;
  } else {
    __tmp__JBQG=FALSE__;
  };
  if ((! __tmp__JBQG)) {
    if ((Self__ZAQG->parent_arrayed_collection__UOB.capacity__M2L ==  0)) {
      Self__ZAQG->parent_arrayed_collection__UOB.storage__X2L=create__CVSB( 2);
      Self__ZAQG->parent_arrayed_collection__UOB.capacity__M2L= 2;
      Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB= 0;
    } else {
      new_capacity__1AQG=(__INTEGER)(Self__ZAQG->parent_arrayed_collection__UOB.capacity__M2L <<  1);
      Self__ZAQG->parent_arrayed_collection__UOB.storage__X2L=realloc__with__0QZG(Self__ZAQG->parent_arrayed_collection__UOB.storage__X2L,Self__ZAQG->parent_arrayed_collection__UOB.capacity__M2L,new_capacity__1AQG);
      Self__ZAQG->parent_arrayed_collection__UOB.capacity__M2L=new_capacity__1AQG;
      Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB=(__INTEGER)(Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB +  1);
    };
  };
  ((void **)Self__ZAQG->parent_arrayed_collection__UOB.storage__X2L)[Self__ZAQG->parent_arrayed_collection__UOB.upper__1OB]=element__0AQG;
}

static __BOOLEAN update_link__WYEJ(__NODE_STYLE *Self__XYEJ)
// ({NODE_STYLE}) With resultNo recursive, No inlinable.
{
  void *typ__ZYEJ;
  void *e__2YEJ,*__tmp__R0EJ;
  __INTEGER low__3YEJ,count__5YEJ,__tmp__OZEJ,__tmp__1ZEJ,result__MURJ;
  __INTEGER __tmp__3ZEJ,result__HVRJ,__tmp__J1EJ,Self__X22J;
  void *__tmp__AZEJ,*__tmp__NZEJ,*__tmp__0ZEJ,*__tmp__2ZEJ,*__tmp__G0EJ;
  void *__tmp__N0EJ,*__tmp__X0EJ;
  void *__tmp__BZEJ,*__tmp__O0EJ,*__tmp__Y0EJ;
  __SLOT_DATA *Self__KURJ;
  __SLOT_CODE *Self__FVRJ;
  __READ_LOCAL *Self__U43P,*Self__W43P;
  __READ_GLOBAL *Self__X43P;
  void *list__0YEJ;
  __CHARACTER __tmp__H0EJ;
  typ__ZYEJ=NULL;
  list__0YEJ=NULL;
  e__2YEJ=NULL;
  low__3YEJ= 0;
  count__5YEJ= 0;
  __tmp__AZEJ=Self__XYEJ->slot__GO5G;
  if (((struct ___OBJ *)__tmp__AZEJ)->__id==__SLOT_DATA__) {
    __tmp__BZEJ=((__SLOT *)((__SLOT_DATA *)__tmp__AZEJ)->parent_slot__BJZD)->slot_id__04OG;
  } else {
    __tmp__BZEJ=((__SLOT *)((__SLOT_CODE *)__tmp__AZEJ)->parent_slot__Y22F)->slot_id__04OG;
  };
  if (((void *)__tmp__BZEJ == (void *)NULL)) {
    if (((void *)Self__XYEJ->parent_node__OP0G.first_code__FIAG == (void *)NULL)) {
      __tmp__NZEJ=Self__XYEJ->slot__GO5G;
      if (((struct ___OBJ *)__tmp__NZEJ)->__id==__SLOT_DATA__) {
        __tmp__OZEJ=lower_style__DSPH(__tmp__NZEJ);
      } else {
        __tmp__OZEJ=lower_style__PSPH(__tmp__NZEJ);
      };
      Self__XYEJ->parent_node__OP0G.first_type__NIAG=get_index__B3ZH(__tmp__OZEJ);
      Self__XYEJ->parent_node__OP0G.first_code__FIAG=call_for__1S2J(Self__XYEJ,Self__XYEJ->parent_node__OP0G.first_type__NIAG);
    };
  } else {
    __tmp__0ZEJ=Self__XYEJ->slot__GO5G;
    if (((struct ___OBJ *)__tmp__0ZEJ)->__id==__SLOT_DATA__) {
      __tmp__1ZEJ=lower_style__DSPH(__tmp__0ZEJ);
    } else {
      __tmp__1ZEJ=lower_style__PSPH(__tmp__0ZEJ);
    };
    low__3YEJ=__tmp__1ZEJ;
    __tmp__2ZEJ=Self__XYEJ->slot__GO5G;
    if (((struct ___OBJ *)__tmp__2ZEJ)->__id==__SLOT_DATA__) {
      Self__KURJ=((__SLOT_DATA *)__tmp__2ZEJ);
      result__MURJ= 0;
      if (((void *)((__SLOT *)Self__KURJ->parent_slot__BJZD)->slot_code_intern__322F != (void *)NULL)) {
        if (((void *)((__SLOT *)Self__KURJ->parent_slot__BJZD)->slot_code_list__ZUIJ != (void *)NULL)) {
          result__MURJ=(__INTEGER)(((__FAST_ARRAYoSLOT_CODEo *)((__SLOT *)Self__KURJ->parent_slot__BJZD)->slot_code_list__ZUIJ)->parent_arrayed_collection__YUIJ.upper__TVIJ +  2);
        } else {
          result__MURJ= 1;
        };
      };
      __tmp__3ZEJ=result__MURJ;
    } else {
      Self__FVRJ=((__SLOT_CODE *)__tmp__2ZEJ);
      result__HVRJ= 0;
      if (((void *)((__SLOT *)Self__FVRJ->parent_slot__Y22F)->slot_code_intern__322F != (void *)NULL)) {
        if (((void *)((__SLOT *)Self__FVRJ->parent_slot__Y22F)->slot_code_list__ZUIJ != (void *)NULL)) {
          result__HVRJ=(__INTEGER)(((__FAST_ARRAYoSLOT_CODEo *)((__SLOT *)Self__FVRJ->parent_slot__Y22F)->slot_code_list__ZUIJ)->parent_arrayed_collection__YUIJ.upper__TVIJ +  2);
        } else {
          result__HVRJ= 1;
        };
      };
      __tmp__3ZEJ=result__HVRJ;
    };
    count__5YEJ=(__INTEGER)((__INTEGER)(__tmp__3ZEJ - __tmp__1ZEJ) +  1);
    if (((void *)Self__XYEJ->parent_node__OP0G.switch__ELAG == (void *)NULL)) {
      __tmp__G0EJ=Self__XYEJ->slot__GO5G;
      if (((struct ___OBJ *)__tmp__G0EJ)->__id==__SLOT_DATA__) {
        __tmp__H0EJ=((__SLOT_DATA *)__tmp__G0EJ)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
      } else {
        __tmp__H0EJ=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__G0EJ)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
      };
      if ((__tmp__H0EJ == '-')) {
        __tmp__N0EJ=Self__XYEJ->slot__GO5G;
        if (((struct ___OBJ *)__tmp__N0EJ)->__id==__SLOT_DATA__) {
          __tmp__O0EJ=((__SLOT *)((__SLOT_DATA *)__tmp__N0EJ)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__O0EJ=((__SLOT *)((__SLOT_CODE *)__tmp__N0EJ)->parent_slot__Y22F)->slot_id__04OG;
        };
        position__V54J(Self__XYEJ);
        e__2YEJ=read__with__FYKJ(((__SLOT_DATA *)__tmp__O0EJ),NULL);
        __tmp__R0EJ=Self__XYEJ->parent_node__OP0G.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__R0EJ)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__R0EJ);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__R0EJ);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__U43P=((__READ_LOCAL *)__tmp__R0EJ);
          unread__YVJK(Self__U43P->local__ALZD,Self__U43P);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__R0EJ);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__R0EJ);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__R0EJ);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__W43P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__R0EJ)->receiver__OO2H);
          unread__YVJK(Self__W43P->local__ALZD,Self__W43P);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__R0EJ);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__R0EJ);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__R0EJ);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__R0EJ);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__R0EJ);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__R0EJ);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__R0EJ);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__R0EJ);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__R0EJ);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__R0EJ);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__R0EJ);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__R0EJ);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__R0EJ);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__R0EJ);
        } break;
        case __READ_GLOBAL__: {
          Self__X43P=((__READ_GLOBAL *)__tmp__R0EJ);
          unread__15ML(Self__X43P->global__RHJK,Self__X43P);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__R0EJ);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__R0EJ);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__R0EJ);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__R0EJ);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__R0EJ);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__R0EJ);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__R0EJ);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__R0EJ);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__R0EJ);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__R0EJ);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__R0EJ);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__R0EJ);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__R0EJ);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__R0EJ);
        } break;
        };
      } else {
        __tmp__X0EJ=Self__XYEJ->slot__GO5G;
        if (((struct ___OBJ *)__tmp__X0EJ)->__id==__SLOT_DATA__) {
          __tmp__Y0EJ=((__SLOT *)((__SLOT_DATA *)__tmp__X0EJ)->parent_slot__BJZD)->slot_id__04OG;
        } else {
          __tmp__Y0EJ=((__SLOT *)((__SLOT_CODE *)__tmp__X0EJ)->parent_slot__Y22F)->slot_id__04OG;
        };
        position__V54J(Self__XYEJ);
        e__2YEJ=read__with__FYKJ(__tmp__Y0EJ,Self__XYEJ->parent_node__OP0G.expr__KLZD);
      };
      Self__XYEJ->parent_node__OP0G.switch__ELAG=create__with__size__5JVH(Self__XYEJ,e__2YEJ,count__5YEJ);
    };
    list__0YEJ=((__SWITCH *)Self__XYEJ->parent_node__OP0G.switch__ELAG)->list__SLAG;
    if (((__INTEGER)(((__FAST_ARRAYoCASEo *)list__0YEJ)->parent_arrayed_collection__CHAG.upper__HMAG +  1) != count__5YEJ)) {
      __tmp__J1EJ=(__INTEGER)(count__5YEJ -  1);
      Self__X22J= 0;
      while ((Self__X22J <= __tmp__J1EJ)) {
        typ__ZYEJ=get_index__B3ZH((__INTEGER)(Self__X22J + low__3YEJ));
        if (((Self__X22J > ((__FAST_ARRAYoCASEo *)list__0YEJ)->parent_arrayed_collection__CHAG.upper__HMAG) || ((void *)typ__ZYEJ != (void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)list__0YEJ)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__X22J])->id__QMAG))) {
          add__to__IDGJ(list__0YEJ,create__with__NC1H(typ__ZYEJ,call_for__1S2J(Self__XYEJ,typ__ZYEJ)),Self__X22J);
        };
        Self__X22J=(__INTEGER)(Self__X22J +  1);
      };
    };
  };
  return(FALSE__);
}

static void execute_case__0WRG(__LIST *Self__1WRG)
// ({LIST}) VoidRecursive, No inlinable.
{
  __INTEGER new_capacity__RU4G,__tmp__0V4G,__tmp__TMDI,Self__EHKJ;
  void *old_list_current__3WRG;
  void *__tmp__EYRG,*__tmp__FYRG,*result__OAGK,*__tmp__ABGK;
  void *result__EDGK,*result__LEGK;
  __PUSH *Self__MAGK,*other__PAGK,*__tmp__BBGK;
  __NODE_TYPE *Self__CDGK;
  void *__tmp__FDGK,*__tmp__MEGK;
  void *__tmp__TDGK,*__tmp__0EGK,*__tmp__XYRG,*__tmp__YYRG;
  __READ_LOCAL *Self__4I4P,*Self__AJ4P,*Self__BEGK,*Self__CJ4P;
  __READ_LOCAL *Self__EJ4P,*Self__N4TQ;
  __READ_GLOBAL *Self__BJ4P,*Self__FJ4P,*Self__VDJM;
  __NODE_STYLE *Self__JEGK;
  __LOOP_END *Self__J3CN;
  __FAST_ARRAYoLISTo *Self__PU4G,*Self__KX4G;
  __BOOLEAN __tmp__BV4G,__tmp__XBGK;
  void **__tmp__ZV4G,**new__AMDI;
  Self__PU4G=((__FAST_ARRAYoLISTo *)seq_list__DXRG);
  new_capacity__RU4G= 0;
  if (((__INTEGER)(Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G +  1) <= (__INTEGER)(Self__PU4G->parent_arrayed_collection__CXRG.capacity__UU4G -  1))) {
    Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G=(__INTEGER)(Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G +  1);
    __tmp__BV4G=TRUE__;
  } else {
    __tmp__BV4G=FALSE__;
  };
  if ((! __tmp__BV4G)) {
    if ((Self__PU4G->parent_arrayed_collection__CXRG.capacity__UU4G ==  0)) {
      Self__PU4G->parent_arrayed_collection__CXRG.storage__QV4G=create__BZEH( 2);
      Self__PU4G->parent_arrayed_collection__CXRG.capacity__UU4G= 2;
      Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G= 0;
    } else {
      new_capacity__RU4G=(__INTEGER)(Self__PU4G->parent_arrayed_collection__CXRG.capacity__UU4G <<  1);
      __tmp__ZV4G=Self__PU4G->parent_arrayed_collection__CXRG.storage__QV4G;
      __tmp__0V4G=Self__PU4G->parent_arrayed_collection__CXRG.capacity__UU4G;
      new__AMDI=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__ZV4G)),((__UINTEGER_32 )(__INTEGER)(__tmp__0V4G * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RU4G * ((__INTEGER )(sizeof(void *)))))));
      __tmp__TMDI=(__INTEGER)(new_capacity__RU4G -  1);
      Self__EHKJ=__tmp__0V4G;
      while ((Self__EHKJ <= __tmp__TMDI)) {
        new__AMDI[Self__EHKJ]=NULL;
        Self__EHKJ=(__INTEGER)(Self__EHKJ +  1);
      };
      Self__PU4G->parent_arrayed_collection__CXRG.storage__QV4G=new__AMDI;
      Self__PU4G->parent_arrayed_collection__CXRG.capacity__UU4G=new_capacity__RU4G;
      Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G=(__INTEGER)(Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G +  1);
    };
  };
  ((void **)Self__PU4G->parent_arrayed_collection__CXRG.storage__QV4G)[Self__PU4G->parent_arrayed_collection__CXRG.upper__SU4G]=Self__1WRG;
  seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
  old_list_current__3WRG=list_current__IF1;
  list_current__IF1=Self__1WRG;
  Self__1WRG->index__PXRG= 1;
  while ((Self__1WRG->index__PXRG != (__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__1WRG->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1))) {
    old_seq_or_and__CYRG=seq_or_and__AYRG;
    __tmp__EYRG=((void **)((__FAST_ARRAYoINSTRo *)Self__1WRG->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__1WRG->index__PXRG -  1)];
    switch (((struct ___OBJ *)__tmp__EYRG)->__id) {
    case __LIST__: {
      __tmp__FYRG=execute_unlink__0SRJ(((__LIST *)__tmp__EYRG));
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __PUSH__: {
      Self__MAGK=((__PUSH *)__tmp__EYRG);
      other__PAGK=NULL;
      result__OAGK=Self__MAGK;
      if ((((__LIST *)list_current__IF1)->index__PXRG < (__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1))) {
        __tmp__ABGK=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)(((__LIST *)list_current__IF1)->index__PXRG +  1) -  1)];
        if (__tmp__ABGK==NULL) {
          __tmp__BBGK=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__ABGK)->__id) {
          case __LIST__: {
            __tmp__BBGK=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__BBGK=NULL;
          } break;
          case __PUSH__: {
            __tmp__BBGK=((__PUSH *)__tmp__ABGK);
          } break;
          case __EXTERNAL_C__: {
            __tmp__BBGK=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__BBGK=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__BBGK=NULL;
          } break;
          case __SWITCH__: {
            __tmp__BBGK=NULL;
          } break;
          case __NODE_TYPE__: {
            __tmp__BBGK=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__BBGK=NULL;
          } break;
          case __NODE_STYLE__: {
            __tmp__BBGK=NULL;
          } break;
          case __WRITE_GLOBAL__: {
            __tmp__BBGK=NULL;
          } break;
          case __WRITE_SLOT__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__BBGK=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__BBGK=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__BBGK=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__BBGK=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__BBGK=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__BBGK=NULL;
          } break;
          case __ITEM__: {
            __tmp__BBGK=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__BBGK=NULL;
          } break;
          case __CAST__: {
            __tmp__BBGK=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__BBGK=NULL;
          } break;
          case __NOP__: {
            __tmp__BBGK=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__BBGK=NULL;
          } break;
          case __WRITE_LOCAL__: {
            __tmp__BBGK=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__BBGK=NULL;
          } break;
          case __LOOP__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__BBGK=NULL;
          } break;
          case __LOOP_END__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__BBGK=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__BBGK=NULL;
          } break;
          }
        };
        other__PAGK=__tmp__BBGK;
        if (((void *)__tmp__BBGK != (void *)NULL)) {
          if (((void *)__tmp__BBGK->context__ZYPG == (void *)Self__MAGK->context__ZYPG)) {
            result__OAGK=NULL;
            if (Self__MAGK->is_first__0YPG) {
              ((__PUSH *)__tmp__BBGK)->is_first__0YPG=TRUE__;
            };
            __tmp__XBGK=TRUE__;
          } else {
            __tmp__XBGK=FALSE__;
          };
          if ((! __tmp__XBGK)) {
            if ((Self__MAGK->is_first__0YPG && (! __tmp__BBGK->is_first__0YPG))) {
              result__OAGK=NULL;
            };
          };
        };
      };
      __tmp__FYRG=result__OAGK;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FYRG=execute_unlink__42LK(((__EXTERNAL_C *)__tmp__EYRG));
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __SWITCH__: {
      __tmp__FYRG=execute__F2TK(__tmp__EYRG);
    } break;
    case __NODE_TYPE__: {
      Self__CDGK=((__NODE_TYPE *)__tmp__EYRG);
      result__EDGK=NULL;
      __tmp__FDGK=Self__CDGK->parent_node__DMQC.data__LLZD;
      switch (((struct ___OBJ *)__tmp__FDGK)->__id) {
      case __DTA_RD__: {
      } break;
      case __DTA_CAST__: {
      } break;
      case __DTA_WR_CODE__: {
      } break;
      case __DTA_BLOCK__: {
        remove__C5LK(__tmp__FDGK);
      } break;
      case __DTA_WR_VALUE__: {
        remove__15LK(__tmp__FDGK);
      } break;
      case __DTA_RD_ARGS__: {
        remove__HAMK(__tmp__FDGK);
      } break;
      };
      if (((void *)Self__CDGK->parent_node__DMQC.switch__ELAG != (void *)NULL)) {
        result__EDGK=execute__F2TK(Self__CDGK->parent_node__DMQC.switch__ELAG);
      } else {
        __tmp__TDGK=Self__CDGK->parent_node__DMQC.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__TDGK)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__TDGK);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__TDGK);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__4I4P=((__READ_LOCAL *)__tmp__TDGK);
          unread__YVJK(Self__4I4P->local__ALZD,Self__4I4P);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__TDGK);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__TDGK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__TDGK);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__AJ4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__TDGK)->receiver__OO2H);
          unread__YVJK(Self__AJ4P->local__ALZD,Self__AJ4P);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__TDGK);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__TDGK);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__TDGK);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__TDGK);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__TDGK);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__TDGK);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__TDGK);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__TDGK);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__TDGK);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__TDGK);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__TDGK);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__TDGK);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__TDGK);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__TDGK);
        } break;
        case __READ_GLOBAL__: {
          Self__BJ4P=((__READ_GLOBAL *)__tmp__TDGK);
          unread__15ML(Self__BJ4P->global__RHJK,Self__BJ4P);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__TDGK);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__TDGK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__TDGK);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__TDGK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__TDGK);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__TDGK);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__TDGK);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__TDGK);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__TDGK);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__TDGK);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__TDGK);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__TDGK);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__TDGK);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__TDGK);
        } break;
        };
        if (((void *)Self__CDGK->parent_node__DMQC.first_code__FIAG != (void *)NULL)) {
          result__EDGK=execute_unlink__0SRJ(Self__CDGK->parent_node__DMQC.first_code__FIAG);
        };
      };
      __tmp__FYRG=result__EDGK;
    } break;
    case __READ_LOCAL__: {
      Self__BEGK=((__READ_LOCAL *)__tmp__EYRG);
      unread__YVJK(Self__BEGK->local__ALZD,Self__BEGK);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FYRG=execute_unlink__PBMK(((__EXPR_MULTIPLE *)__tmp__EYRG));
    } break;
    case __NODE_STYLE__: {
      Self__JEGK=((__NODE_STYLE *)__tmp__EYRG);
      result__LEGK=NULL;
      __tmp__MEGK=Self__JEGK->parent_node__OP0G.data__LLZD;
      switch (((struct ___OBJ *)__tmp__MEGK)->__id) {
      case __DTA_RD__: {
      } break;
      case __DTA_CAST__: {
      } break;
      case __DTA_WR_CODE__: {
      } break;
      case __DTA_BLOCK__: {
        remove__C5LK(__tmp__MEGK);
      } break;
      case __DTA_WR_VALUE__: {
        remove__15LK(__tmp__MEGK);
      } break;
      case __DTA_RD_ARGS__: {
        remove__HAMK(__tmp__MEGK);
      } break;
      };
      if (((void *)Self__JEGK->parent_node__OP0G.switch__ELAG != (void *)NULL)) {
        result__LEGK=execute__F2TK(Self__JEGK->parent_node__OP0G.switch__ELAG);
      } else {
        __tmp__0EGK=Self__JEGK->parent_node__OP0G.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__0EGK)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__0EGK);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__0EGK);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__CJ4P=((__READ_LOCAL *)__tmp__0EGK);
          unread__YVJK(Self__CJ4P->local__ALZD,Self__CJ4P);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__0EGK);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__0EGK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__0EGK);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__EJ4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0EGK)->receiver__OO2H);
          unread__YVJK(Self__EJ4P->local__ALZD,Self__EJ4P);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__0EGK);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__0EGK);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__0EGK);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__0EGK);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__0EGK);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__0EGK);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__0EGK);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__0EGK);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__0EGK);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__0EGK);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__0EGK);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__0EGK);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__0EGK);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__0EGK);
        } break;
        case __READ_GLOBAL__: {
          Self__FJ4P=((__READ_GLOBAL *)__tmp__0EGK);
          unread__15ML(Self__FJ4P->global__RHJK,Self__FJ4P);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__0EGK);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__0EGK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__0EGK);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__0EGK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__0EGK);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__0EGK);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__0EGK);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__0EGK);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__0EGK);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__0EGK);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__0EGK);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__0EGK);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__0EGK);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__0EGK);
        } break;
        };
        if (((void *)Self__JEGK->parent_node__OP0G.first_code__FIAG != (void *)NULL)) {
          result__LEGK=execute_unlink__0SRJ(Self__JEGK->parent_node__OP0G.first_code__FIAG);
        };
      };
      __tmp__FYRG=result__LEGK;
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__FYRG=execute__GFGK(__tmp__EYRG);
    } break;
    case __WRITE_SLOT__: {
      __tmp__FYRG=execute__ZIGK(__tmp__EYRG);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FYRG=execute_unlink__WGMK(((__EXPR_EQUAL *)__tmp__EYRG));
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FYRG=execute_unlink__HHMK(((__EXPR_NOT_EQUAL *)__tmp__EYRG));
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__N4TQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__EYRG)->receiver__OO2H);
      unread__YVJK(Self__N4TQ->local__ALZD,Self__N4TQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__EYRG));
      __tmp__FYRG=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__FYRG=execute_unlink__IIMK(((__EXPR_SUP *)__tmp__EYRG));
    } break;
    case __EXPR_SUB__: {
      __tmp__FYRG=execute_unlink__ZIMK(((__EXPR_SUB *)__tmp__EYRG));
    } break;
    case __EXPR_MUL__: {
      __tmp__FYRG=execute_unlink__KJMK(((__EXPR_MUL *)__tmp__EYRG));
    } break;
    case __EXPR_DIV__: {
      __tmp__FYRG=execute_unlink__1JMK(((__EXPR_DIV *)__tmp__EYRG));
    } break;
    case __EXPR_AND__: {
      __tmp__FYRG=execute_unlink__MKMK(((__EXPR_AND *)__tmp__EYRG));
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FYRG=execute_unlink__3KMK(((__EXPR_SHIFT_R *)__tmp__EYRG));
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FYRG=execute_unlink__OLMK(((__EXPR_SHIFT_L *)__tmp__EYRG));
    } break;
    case __PUT_TO__: {
      __tmp__FYRG=execute_link__BOPK(((__PUT_TO *)__tmp__EYRG));
    } break;
    case __ITEM__: {
      __tmp__FYRG=execute_unlink__CMMK(((__ITEM *)__tmp__EYRG));
    } break;
    case __SIZE_OF__: {
      __tmp__FYRG=execute_unlink__SMMK(((__SIZE_OF *)__tmp__EYRG));
    } break;
    case __CAST__: {
      __tmp__FYRG=execute_unlink__XMMK(((__CAST *)__tmp__EYRG));
    } break;
    case __CALL_SLOT__: {
      __tmp__FYRG=execute_unlink__2NQL(((__CALL_SLOT *)__tmp__EYRG));
    } break;
    case __NOP__: {
      __tmp__FYRG=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__FYRG=execute_unlink__WDAL(((__READ_SLOT *)__tmp__EYRG));
    } break;
    case __WRITE_LOCAL__: {
      __tmp__FYRG=execute__3OGK(__tmp__EYRG);
    } break;
    case __READ_GLOBAL__: {
      Self__VDJM=((__READ_GLOBAL *)__tmp__EYRG);
      unread__15ML(Self__VDJM->global__RHJK,Self__VDJM);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__FYRG=execute_access_unlink__VMDL(Self__VDJM);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FYRG=execute_unlink__CRZM(((__EXPR_NOT_LOGIC *)__tmp__EYRG));
    } break;
    case __LOOP__: {
      __tmp__FYRG=execute__SALM(__tmp__EYRG);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FYRG=execute_unlink__B2EO(((__EXPR_OR_LOGIC *)__tmp__EYRG));
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FYRG=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__EYRG));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FYRG=execute_unlink__R2EO(((__EXPR_AND_LOGIC *)__tmp__EYRG));
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FYRG=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__EYRG));
    } break;
    case __EXPR_NEG__: {
      __tmp__FYRG=execute_unlink__XYJM(((__EXPR_NEG *)__tmp__EYRG));
    } break;
    case __EXPR_ADD__: {
      __tmp__FYRG=execute_unlink__3NNL(((__EXPR_ADD *)__tmp__EYRG));
    } break;
    case __EXPR_NOT__: {
      __tmp__FYRG=execute_unlink__YLZM(((__EXPR_NOT *)__tmp__EYRG));
    } break;
    case __EXPR_MOD__: {
      __tmp__FYRG=execute_unlink__B3EO(((__EXPR_MOD *)__tmp__EYRG));
    } break;
    case __LOOP_END__: {
      Self__J3CN=((__LOOP_END *)__tmp__EYRG);
      if (((void *)list_current__IF1 == (void *)((__LOOP *)Self__J3CN->loop__5WLM)->body__5ALM)) {
        put_error__text__0AH( 1,(&__string_508));
        put_position__ECH(((__LOOP *)Self__J3CN->loop__5WLM)->parent_instr__QKAL.parent_itm_object__TE.position__BJM);
        put_position__ECH(Self__J3CN->parent_instr__G12L.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
      if (((is_optimization__II && ((void *)loop_invariant__RKAL == (void *)NULL)) && (((__LOOP *)Self__J3CN->loop__5WLM)->link_count__YALM ==  1))) {
        loop_invariant__RKAL=Self__J3CN->loop__5WLM;
      };
      seq_call_local_and_loop__51IL=(__UINTEGER_32)(seq_call_local_and_loop__51IL -  1);
      seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ -  1);
      seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
      __tmp__FYRG=Self__J3CN;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FYRG=execute_unlink__AJEP(((__EXPR_SUP_EQ *)__tmp__EYRG));
    } break;
    case __EXPR_INF__: {
      __tmp__FYRG=execute_unlink__CPQN(((__EXPR_INF *)__tmp__EYRG));
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FYRG=execute_unlink__SPQN(((__EXPR_INF_EQ *)__tmp__EYRG));
    } break;
    case __EXPR_OR__: {
      __tmp__FYRG=execute_unlink__JDQN(((__EXPR_OR *)__tmp__EYRG));
    } break;
    case __EXPR_XOR__: {
      __tmp__FYRG=execute_unlink__YNUO(((__EXPR_XOR *)__tmp__EYRG));
    } break;
    };
    if (((void *)__tmp__FYRG != (void *)NULL)) {
      ((void **)((__FAST_ARRAYoINSTRo *)Self__1WRG->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__1WRG->index__PXRG -  1)]=__tmp__FYRG;
      Self__1WRG->index__PXRG=(__INTEGER)(Self__1WRG->index__PXRG +  1);
    } else {
      remove_index__MD1G(Self__1WRG,Self__1WRG->index__PXRG);
    };
  };
  old_seq_or_and__CYRG=seq_or_and__AYRG;
  __tmp__XYRG=last_expr__URRG(Self__1WRG);
  switch (((struct ___OBJ *)__tmp__XYRG)->__id) {
  case __LIST__: {
    __tmp__YYRG=execute_link__LUOG(__tmp__XYRG);
  } break;
  case __STRING_CST__: {
    __tmp__YYRG=((__STRING_CST *)__tmp__XYRG);
  } break;
  case __EXTERNAL_C__: {
    __tmp__YYRG=execute_link__U5ZK(__tmp__XYRG);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__YYRG=((__PROTOTYPE_CST *)__tmp__XYRG);
  } break;
  case __INTEGER_CST__: {
    __tmp__YYRG=((__INTEGER_CST *)__tmp__XYRG);
  } break;
  case __READ_LOCAL__: {
    __tmp__YYRG=execute_link__EHAL(__tmp__XYRG);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__YYRG=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__YYRG=execute_link__2LAL(__tmp__XYRG);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__YYRG=execute_link__FQAL(__tmp__XYRG);
  } break;
  case __REAL_CST__: {
    __tmp__YYRG=((__REAL_CST *)__tmp__XYRG);
  } break;
  case __CHARACTER_CST__: {
    __tmp__YYRG=((__CHARACTER_CST *)__tmp__XYRG);
  } break;
  case __IS_EXPANDED__: {
    __tmp__YYRG=execute_link__UUAL(__tmp__XYRG);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__YYRG=execute_link__1VAL(__tmp__XYRG);
  } break;
  case __EXPR_SUP__: {
    __tmp__YYRG=execute_link__AWAL(__tmp__XYRG);
  } break;
  case __EXPR_SUB__: {
    __tmp__YYRG=execute_link__J0AL(__tmp__XYRG);
  } break;
  case __EXPR_MUL__: {
    __tmp__YYRG=execute_link__S4AL(__tmp__XYRG);
  } break;
  case __EXPR_DIV__: {
    __tmp__YYRG=execute_link__1CBL(__tmp__XYRG);
  } break;
  case __EXPR_AND__: {
    __tmp__YYRG=execute_link__EHBL(__tmp__XYRG);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__YYRG=execute_link__NLBL(__tmp__XYRG);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__YYRG=execute_link__WPBL(__tmp__XYRG);
  } break;
  case __PUT_TO__: {
    __tmp__YYRG=execute_link__BOPK(__tmp__XYRG);
  } break;
  case __ITEM__: {
    __tmp__YYRG=execute_link__5TBL(__tmp__XYRG);
  } break;
  case __SIZE_OF__: {
    __tmp__YYRG=execute_link__GUBL(__tmp__XYRG);
  } break;
  case __CAST__: {
    __tmp__YYRG=execute_link__LUBL(__tmp__XYRG);
  } break;
  case __CALL_SLOT__: {
    __tmp__YYRG=execute_link__A2TL(__tmp__XYRG);
  } break;
  case __READ_SLOT__: {
    __tmp__YYRG=execute_link__EYBL(__tmp__XYRG);
  } break;
  case __READ_GLOBAL__: {
    __tmp__YYRG=execute_link__U2BL(__tmp__XYRG);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__YYRG=execute_link__SRZM(__tmp__XYRG);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__YYRG=execute_link__OBFO(__tmp__XYRG);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__YYRG=execute_link__GJLO(__tmp__XYRG);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__YYRG=execute_link__HHFO(__tmp__XYRG);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__YYRG=execute_link__KPLO(__tmp__XYRG);
  } break;
  case __EXPR_NEG__: {
    __tmp__YYRG=execute_link__0GKM(__tmp__XYRG);
  } break;
  case __EXPR_ADD__: {
    __tmp__YYRG=execute_link__RROL(__tmp__XYRG);
  } break;
  case __EXPR_NOT__: {
    __tmp__YYRG=execute_link__GUZM(__tmp__XYRG);
  } break;
  case __EXPR_MOD__: {
    __tmp__YYRG=execute_link__ANFO(__tmp__XYRG);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__YYRG=execute_link__YLEP(__tmp__XYRG);
  } break;
  case __EXPR_INF__: {
    __tmp__YYRG=execute_link__VQQN(__tmp__XYRG);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__YYRG=execute_link__4UQN(__tmp__XYRG);
  } break;
  case __EXPR_OR__: {
    __tmp__YYRG=execute_link__1HQN(__tmp__XYRG);
  } break;
  case __EXPR_XOR__: {
    __tmp__YYRG=execute_link__IYUO(__tmp__XYRG);
  } break;
  };
  ((void **)((__FAST_ARRAYoINSTRo *)Self__1WRG->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__1WRG->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1)]=__tmp__YYRG;
  Self__1WRG->index__PXRG= 0;
  list_current__IF1=old_list_current__3WRG;
  Self__KX4G=((__FAST_ARRAYoLISTo *)seq_list__DXRG);
  Self__KX4G->parent_arrayed_collection__CXRG.upper__SU4G=(__INTEGER)(Self__KX4G->parent_arrayed_collection__CXRG.upper__SU4G -  1);
  seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
}

static void add__to__1H5G(__FAST_ARRAYoINSTRo *Self__2H5G,void *element__3H5G,__INTEGER index__4H5G)
// ({FAST_ARRAYoINSTRo},{NULLxLISTxSTRING_CSTxPUSHxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxSWITCHxNODE_TYPExREAD_LOCALxEXPR_MULTIPLExNODE_STYLExWRITE_GLOBALxWRITE_SLOTxEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxNOPxREAD_SLOTxWRITE_LOCALxREAD_GLOBALxEXPR_NOT_LOGICxLOOPxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxLOOP_ENDxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{INTEGER}) VoidNo recursive, No inlinable.
{
  if ((index__4H5G == (__INTEGER)(Self__2H5G->parent_arrayed_collection__IUOG.upper__THQG +  1))) {
    add_last__AL4G(Self__2H5G,element__3H5G);
  } else {
    add_last__AL4G(Self__2H5G,element__3H5G);
    move__to__by__ZAFH(Self__2H5G,index__4H5G,(__INTEGER)(Self__2H5G->parent_arrayed_collection__IUOG.upper__THQG -  1));
    ((void **)Self__2H5G->parent_arrayed_collection__IUOG.storage__BM4G)[index__4H5G]=element__3H5G;
  };
}

static void remove__OZYK(__SWITCH *Self__PZYK)
// ({SWITCH}) VoidNo recursive, No inlinable.
{
  void *__tmp__WZYK;
  __READ_LOCAL *Self__EK4P,*Self__GK4P;
  __READ_GLOBAL *Self__HK4P;
  __INTEGER __tmp__4ZYK,Self__VZ1K;
  if (((void *)Self__PZYK->expr__MMFI != (void *)NULL)) {
    __tmp__WZYK=Self__PZYK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__WZYK)->__id) {
    case __LIST__: {
      remove__KPJJ(__tmp__WZYK);
    } break;
    case __STRING_CST__: {
    } break;
    case __EXTERNAL_C__: {
      remove__UUAK(__tmp__WZYK);
    } break;
    case __PROTOTYPE_CST__: {
    } break;
    case __INTEGER_CST__: {
    } break;
    case __READ_LOCAL__: {
      Self__EK4P=((__READ_LOCAL *)__tmp__WZYK);
      unread__YVJK(Self__EK4P->local__ALZD,Self__EK4P);
    } break;
    case __EXPR_MULTIPLE__: {
      remove__TVAK(__tmp__WZYK);
    } break;
    case __EXPR_EQUAL__: {
      remove__DWAK(__tmp__WZYK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      remove__HWAK(__tmp__WZYK);
    } break;
    case __REAL_CST__: {
    } break;
    case __CHARACTER_CST__: {
    } break;
    case __IS_EXPANDED__: {
      Self__GK4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__WZYK)->receiver__OO2H);
      unread__YVJK(Self__GK4P->local__ALZD,Self__GK4P);
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(__tmp__WZYK);
    } break;
    case __EXPR_SUP__: {
      remove__VWAK(__tmp__WZYK);
    } break;
    case __EXPR_SUB__: {
      remove__ZWAK(__tmp__WZYK);
    } break;
    case __EXPR_MUL__: {
      remove__3WAK(__tmp__WZYK);
    } break;
    case __EXPR_DIV__: {
      remove__BXAK(__tmp__WZYK);
    } break;
    case __EXPR_AND__: {
      remove__FXAK(__tmp__WZYK);
    } break;
    case __EXPR_SHIFT_R__: {
      remove__JXAK(__tmp__WZYK);
    } break;
    case __EXPR_SHIFT_L__: {
      remove__NXAK(__tmp__WZYK);
    } break;
    case __PUT_TO__: {
      remove__RXAK(__tmp__WZYK);
    } break;
    case __ITEM__: {
      remove__SYAK(__tmp__WZYK);
    } break;
    case __SIZE_OF__: {
      remove__WYAK(__tmp__WZYK);
    } break;
    case __CAST__: {
      remove__ZYAK(__tmp__WZYK);
    } break;
    case __CALL_SLOT__: {
      remove__2NML(__tmp__WZYK);
    } break;
    case __READ_SLOT__: {
      remove__4GHK(__tmp__WZYK);
    } break;
    case __READ_GLOBAL__: {
      Self__HK4P=((__READ_GLOBAL *)__tmp__WZYK);
      unread__15ML(Self__HK4P->global__RHJK,Self__HK4P);
    } break;
    case __EXPR_NOT_LOGIC__: {
      remove__GWZM(__tmp__WZYK);
    } break;
    case __EXPR_OR_LOGIC__: {
      remove__WPEO(__tmp__WZYK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      remove__WMKO(__tmp__WZYK);
    } break;
    case __EXPR_AND_LOGIC__: {
      remove__0PEO(__tmp__WZYK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      remove__1MKO(__tmp__WZYK);
    } break;
    case __EXPR_NEG__: {
      remove__3KJM(__tmp__WZYK);
    } break;
    case __EXPR_ADD__: {
      remove__QQML(__tmp__WZYK);
    } break;
    case __EXPR_NOT__: {
      remove__D5YM(__tmp__WZYK);
    } break;
    case __EXPR_MOD__: {
      remove__4PEO(__tmp__WZYK);
    } break;
    case __EXPR_SUP_EQ__: {
      remove__X5DP(__tmp__WZYK);
    } break;
    case __EXPR_INF__: {
      remove__KZQN(__tmp__WZYK);
    } break;
    case __EXPR_INF_EQ__: {
      remove__OZQN(__tmp__WZYK);
    } break;
    case __EXPR_OR__: {
      remove__LUPN(__tmp__WZYK);
    } break;
    case __EXPR_XOR__: {
      remove__AQTO(__tmp__WZYK);
    } break;
    };
  };
  __tmp__4ZYK=((__FAST_ARRAYoCASEo *)Self__PZYK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
  Self__VZ1K= 0;
  while ((Self__VZ1K <= __tmp__4ZYK)) {
    remove__KPJJ(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__PZYK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__VZ1K])->code__BQAG);
    Self__VZ1K=(__INTEGER)(Self__VZ1K +  1);
  };
}

static void remove__C5LK(__DTA_BLOCK *Self__D5LK)
// ({DTA_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__Q5LK,Self__RB0K;
  void *__tmp__X5LK;
  __READ_LOCAL *Self__PK4P,*Self__RK4P;
  __READ_GLOBAL *Self__SK4P;
  if ((! Self__D5LK->copy_argument__Z0TI)) {
    __tmp__Q5LK=((__FAST_ARRAYoEXPRo *)Self__D5LK->argument_list__2KFI)->parent_arrayed_collection__42LC.upper__USSH;
    Self__RB0K= 0;
    while ((Self__RB0K <= __tmp__Q5LK)) {
      __tmp__X5LK=((void **)((__FAST_ARRAYoEXPRo *)Self__D5LK->argument_list__2KFI)->parent_arrayed_collection__42LC.storage__1SDI)[Self__RB0K];
      switch (((struct ___OBJ *)__tmp__X5LK)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__X5LK);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__X5LK);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__PK4P=((__READ_LOCAL *)__tmp__X5LK);
        unread__YVJK(Self__PK4P->local__ALZD,Self__PK4P);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__X5LK);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__X5LK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__X5LK);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__RK4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__X5LK)->receiver__OO2H);
        unread__YVJK(Self__RK4P->local__ALZD,Self__RK4P);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__X5LK);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__X5LK);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__X5LK);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__X5LK);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__X5LK);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__X5LK);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__X5LK);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__X5LK);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__X5LK);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__X5LK);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__X5LK);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__X5LK);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__X5LK);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__X5LK);
      } break;
      case __READ_GLOBAL__: {
        Self__SK4P=((__READ_GLOBAL *)__tmp__X5LK);
        unread__15ML(Self__SK4P->global__RHJK,Self__SK4P);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__X5LK);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__X5LK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__X5LK);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__X5LK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__X5LK);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__X5LK);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__X5LK);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__X5LK);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__X5LK);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__X5LK);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__X5LK);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__X5LK);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__X5LK);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__X5LK);
      } break;
      };
      Self__RB0K=(__INTEGER)(Self__RB0K +  1);
    };
    Self__D5LK->copy_argument__Z0TI=TRUE__;
  };
}

static void remove__15LK(__DTA_WR_VALUE *Self__25LK)
// ({DTA_WR_VALUE}) VoidNo recursive, No inlinable.
{
  void *__tmp__EAMK;
  __READ_LOCAL *Self__WK4P,*Self__YK4P;
  __READ_GLOBAL *Self__ZK4P;
  if ((! Self__25LK->copy_value__ZZ5I)) {
    __tmp__EAMK=Self__25LK->value__RNFI;
    switch (((struct ___OBJ *)__tmp__EAMK)->__id) {
    case __LIST__: {
      remove__KPJJ(__tmp__EAMK);
    } break;
    case __STRING_CST__: {
    } break;
    case __EXTERNAL_C__: {
      remove__UUAK(__tmp__EAMK);
    } break;
    case __PROTOTYPE_CST__: {
    } break;
    case __INTEGER_CST__: {
    } break;
    case __READ_LOCAL__: {
      Self__WK4P=((__READ_LOCAL *)__tmp__EAMK);
      unread__YVJK(Self__WK4P->local__ALZD,Self__WK4P);
    } break;
    case __EXPR_MULTIPLE__: {
      remove__TVAK(__tmp__EAMK);
    } break;
    case __EXPR_EQUAL__: {
      remove__DWAK(__tmp__EAMK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      remove__HWAK(__tmp__EAMK);
    } break;
    case __REAL_CST__: {
    } break;
    case __CHARACTER_CST__: {
    } break;
    case __IS_EXPANDED__: {
      Self__YK4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__EAMK)->receiver__OO2H);
      unread__YVJK(Self__YK4P->local__ALZD,Self__YK4P);
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(__tmp__EAMK);
    } break;
    case __EXPR_SUP__: {
      remove__VWAK(__tmp__EAMK);
    } break;
    case __EXPR_SUB__: {
      remove__ZWAK(__tmp__EAMK);
    } break;
    case __EXPR_MUL__: {
      remove__3WAK(__tmp__EAMK);
    } break;
    case __EXPR_DIV__: {
      remove__BXAK(__tmp__EAMK);
    } break;
    case __EXPR_AND__: {
      remove__FXAK(__tmp__EAMK);
    } break;
    case __EXPR_SHIFT_R__: {
      remove__JXAK(__tmp__EAMK);
    } break;
    case __EXPR_SHIFT_L__: {
      remove__NXAK(__tmp__EAMK);
    } break;
    case __PUT_TO__: {
      remove__RXAK(__tmp__EAMK);
    } break;
    case __ITEM__: {
      remove__SYAK(__tmp__EAMK);
    } break;
    case __SIZE_OF__: {
      remove__WYAK(__tmp__EAMK);
    } break;
    case __CAST__: {
      remove__ZYAK(__tmp__EAMK);
    } break;
    case __CALL_SLOT__: {
      remove__2NML(__tmp__EAMK);
    } break;
    case __READ_SLOT__: {
      remove__4GHK(__tmp__EAMK);
    } break;
    case __READ_GLOBAL__: {
      Self__ZK4P=((__READ_GLOBAL *)__tmp__EAMK);
      unread__15ML(Self__ZK4P->global__RHJK,Self__ZK4P);
    } break;
    case __EXPR_NOT_LOGIC__: {
      remove__GWZM(__tmp__EAMK);
    } break;
    case __EXPR_OR_LOGIC__: {
      remove__WPEO(__tmp__EAMK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      remove__WMKO(__tmp__EAMK);
    } break;
    case __EXPR_AND_LOGIC__: {
      remove__0PEO(__tmp__EAMK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      remove__1MKO(__tmp__EAMK);
    } break;
    case __EXPR_NEG__: {
      remove__3KJM(__tmp__EAMK);
    } break;
    case __EXPR_ADD__: {
      remove__QQML(__tmp__EAMK);
    } break;
    case __EXPR_NOT__: {
      remove__D5YM(__tmp__EAMK);
    } break;
    case __EXPR_MOD__: {
      remove__4PEO(__tmp__EAMK);
    } break;
    case __EXPR_SUP_EQ__: {
      remove__X5DP(__tmp__EAMK);
    } break;
    case __EXPR_INF__: {
      remove__KZQN(__tmp__EAMK);
    } break;
    case __EXPR_INF_EQ__: {
      remove__OZQN(__tmp__EAMK);
    } break;
    case __EXPR_OR__: {
      remove__LUPN(__tmp__EAMK);
    } break;
    case __EXPR_XOR__: {
      remove__AQTO(__tmp__EAMK);
    } break;
    };
    Self__25LK->copy_value__ZZ5I=TRUE__;
  };
}

static void remove__HAMK(__DTA_RD_ARGS *Self__IAMK)
// ({DTA_RD_ARGS}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__VAMK,Self__QC0K;
  void *__tmp__2AMK;
  __READ_LOCAL *Self__2K4P,*Self__4K4P;
  __READ_GLOBAL *Self__5K4P;
  if ((! Self__IAMK->copy_argument__WADK)) {
    __tmp__VAMK=((__FAST_ARRAYoEXPRo *)Self__IAMK->argument_list__UTFI)->parent_arrayed_collection__42LC.upper__USSH;
    Self__QC0K= 0;
    while ((Self__QC0K <= __tmp__VAMK)) {
      __tmp__2AMK=((void **)((__FAST_ARRAYoEXPRo *)Self__IAMK->argument_list__UTFI)->parent_arrayed_collection__42LC.storage__1SDI)[Self__QC0K];
      switch (((struct ___OBJ *)__tmp__2AMK)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__2AMK);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__2AMK);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__2K4P=((__READ_LOCAL *)__tmp__2AMK);
        unread__YVJK(Self__2K4P->local__ALZD,Self__2K4P);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__2AMK);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__2AMK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__2AMK);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__4K4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2AMK)->receiver__OO2H);
        unread__YVJK(Self__4K4P->local__ALZD,Self__4K4P);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__2AMK);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__2AMK);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__2AMK);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__2AMK);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__2AMK);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__2AMK);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__2AMK);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__2AMK);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__2AMK);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__2AMK);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__2AMK);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__2AMK);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__2AMK);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__2AMK);
      } break;
      case __READ_GLOBAL__: {
        Self__5K4P=((__READ_GLOBAL *)__tmp__2AMK);
        unread__15ML(Self__5K4P->global__RHJK,Self__5K4P);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__2AMK);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__2AMK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__2AMK);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__2AMK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__2AMK);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__2AMK);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__2AMK);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__2AMK);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__2AMK);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__2AMK);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__2AMK);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__2AMK);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__2AMK);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__2AMK);
      } break;
      };
      Self__QC0K=(__INTEGER)(Self__QC0K +  1);
    };
    Self__IAMK->copy_argument__WADK=TRUE__;
  };
}

static void remove__S5IK(__WRITE_GLOBAL *Self__T5IK)
// ({WRITE_GLOBAL}) VoidNo recursive, No inlinable.
{
  void *__tmp__V5IK;
  __READ_LOCAL *Self__DL4P,*Self__FL4P;
  __READ_GLOBAL *Self__GL4P;
  unwrite__CDNL(Self__T5IK->global__4U1H,Self__T5IK);
  __tmp__V5IK=Self__T5IK->parent_write__QBGH.value__HBEH;
  switch (((struct ___OBJ *)__tmp__V5IK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__V5IK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__V5IK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__DL4P=((__READ_LOCAL *)__tmp__V5IK);
    unread__YVJK(Self__DL4P->local__ALZD,Self__DL4P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__V5IK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__V5IK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__V5IK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__FL4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__V5IK)->receiver__OO2H);
    unread__YVJK(Self__FL4P->local__ALZD,Self__FL4P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__V5IK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__V5IK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__V5IK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__V5IK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__V5IK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__V5IK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__V5IK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__V5IK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__V5IK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__V5IK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__V5IK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__V5IK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__V5IK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__V5IK);
  } break;
  case __READ_GLOBAL__: {
    Self__GL4P=((__READ_GLOBAL *)__tmp__V5IK);
    unread__15ML(Self__GL4P->global__RHJK,Self__GL4P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__V5IK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__V5IK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__V5IK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__V5IK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__V5IK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__V5IK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__V5IK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__V5IK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__V5IK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__V5IK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__V5IK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__V5IK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__V5IK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__V5IK);
  } break;
  };
}

static void remove__W5IK(__WRITE_SLOT *Self__X5IK)
// ({WRITE_SLOT}) VoidNo recursive, No inlinable.
{
  void *__tmp__Y5IK,*__tmp__14NK;
  __READ_LOCAL *Self__HL4P,*Self__JL4P,*Self__LL4P,*Self__NL4P;
  __READ_GLOBAL *Self__KL4P,*Self__OL4P;
  __tmp__Y5IK=Self__X5IK->receiver__HU1H;
  switch (((struct ___OBJ *)__tmp__Y5IK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__Y5IK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__Y5IK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__HL4P=((__READ_LOCAL *)__tmp__Y5IK);
    unread__YVJK(Self__HL4P->local__ALZD,Self__HL4P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__Y5IK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__Y5IK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__Y5IK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__JL4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__Y5IK)->receiver__OO2H);
    unread__YVJK(Self__JL4P->local__ALZD,Self__JL4P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__Y5IK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__Y5IK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__Y5IK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__Y5IK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__Y5IK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__Y5IK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__Y5IK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__Y5IK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__Y5IK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__Y5IK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__Y5IK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__Y5IK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__Y5IK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__Y5IK);
  } break;
  case __READ_GLOBAL__: {
    Self__KL4P=((__READ_GLOBAL *)__tmp__Y5IK);
    unread__15ML(Self__KL4P->global__RHJK,Self__KL4P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__Y5IK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__Y5IK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__Y5IK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__Y5IK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__Y5IK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__Y5IK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__Y5IK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__Y5IK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__Y5IK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__Y5IK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__Y5IK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__Y5IK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__Y5IK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__Y5IK);
  } break;
  };
  unwrite__CDNL(Self__X5IK->slot__5T1H,Self__X5IK);
  __tmp__14NK=Self__X5IK->parent_write__3BGH.value__HBEH;
  switch (((struct ___OBJ *)__tmp__14NK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__14NK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__14NK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__LL4P=((__READ_LOCAL *)__tmp__14NK);
    unread__YVJK(Self__LL4P->local__ALZD,Self__LL4P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__14NK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__14NK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__14NK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__NL4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__14NK)->receiver__OO2H);
    unread__YVJK(Self__NL4P->local__ALZD,Self__NL4P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__14NK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__14NK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__14NK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__14NK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__14NK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__14NK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__14NK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__14NK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__14NK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__14NK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__14NK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__14NK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__14NK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__14NK);
  } break;
  case __READ_GLOBAL__: {
    Self__OL4P=((__READ_GLOBAL *)__tmp__14NK);
    unread__15ML(Self__OL4P->global__RHJK,Self__OL4P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__14NK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__14NK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__14NK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__14NK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__14NK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__14NK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__14NK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__14NK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__14NK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__14NK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__14NK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__14NK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__14NK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__14NK);
  } break;
  };
}

static void remove__25IK(__WRITE_LOCAL *Self__35IK)
// ({WRITE_LOCAL}) VoidNo recursive, No inlinable.
{
  void *__tmp__55IK;
  __READ_LOCAL *Self__PL4P,*Self__RL4P;
  __READ_GLOBAL *Self__SL4P;
  unwrite__OGNL(Self__35IK->local__2RIJ,Self__35IK);
  __tmp__55IK=Self__35IK->parent_write__X50I.value__HBEH;
  switch (((struct ___OBJ *)__tmp__55IK)->__id) {
  case __LIST__: {
    remove__KPJJ(__tmp__55IK);
  } break;
  case __STRING_CST__: {
  } break;
  case __EXTERNAL_C__: {
    remove__UUAK(__tmp__55IK);
  } break;
  case __PROTOTYPE_CST__: {
  } break;
  case __INTEGER_CST__: {
  } break;
  case __READ_LOCAL__: {
    Self__PL4P=((__READ_LOCAL *)__tmp__55IK);
    unread__YVJK(Self__PL4P->local__ALZD,Self__PL4P);
  } break;
  case __EXPR_MULTIPLE__: {
    remove__TVAK(__tmp__55IK);
  } break;
  case __EXPR_EQUAL__: {
    remove__DWAK(__tmp__55IK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    remove__HWAK(__tmp__55IK);
  } break;
  case __REAL_CST__: {
  } break;
  case __CHARACTER_CST__: {
  } break;
  case __IS_EXPANDED__: {
    Self__RL4P=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__55IK)->receiver__OO2H);
    unread__YVJK(Self__RL4P->local__ALZD,Self__RL4P);
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(__tmp__55IK);
  } break;
  case __EXPR_SUP__: {
    remove__VWAK(__tmp__55IK);
  } break;
  case __EXPR_SUB__: {
    remove__ZWAK(__tmp__55IK);
  } break;
  case __EXPR_MUL__: {
    remove__3WAK(__tmp__55IK);
  } break;
  case __EXPR_DIV__: {
    remove__BXAK(__tmp__55IK);
  } break;
  case __EXPR_AND__: {
    remove__FXAK(__tmp__55IK);
  } break;
  case __EXPR_SHIFT_R__: {
    remove__JXAK(__tmp__55IK);
  } break;
  case __EXPR_SHIFT_L__: {
    remove__NXAK(__tmp__55IK);
  } break;
  case __PUT_TO__: {
    remove__RXAK(__tmp__55IK);
  } break;
  case __ITEM__: {
    remove__SYAK(__tmp__55IK);
  } break;
  case __SIZE_OF__: {
    remove__WYAK(__tmp__55IK);
  } break;
  case __CAST__: {
    remove__ZYAK(__tmp__55IK);
  } break;
  case __CALL_SLOT__: {
    remove__2NML(__tmp__55IK);
  } break;
  case __READ_SLOT__: {
    remove__4GHK(__tmp__55IK);
  } break;
  case __READ_GLOBAL__: {
    Self__SL4P=((__READ_GLOBAL *)__tmp__55IK);
    unread__15ML(Self__SL4P->global__RHJK,Self__SL4P);
  } break;
  case __EXPR_NOT_LOGIC__: {
    remove__GWZM(__tmp__55IK);
  } break;
  case __EXPR_OR_LOGIC__: {
    remove__WPEO(__tmp__55IK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    remove__WMKO(__tmp__55IK);
  } break;
  case __EXPR_AND_LOGIC__: {
    remove__0PEO(__tmp__55IK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    remove__1MKO(__tmp__55IK);
  } break;
  case __EXPR_NEG__: {
    remove__3KJM(__tmp__55IK);
  } break;
  case __EXPR_ADD__: {
    remove__QQML(__tmp__55IK);
  } break;
  case __EXPR_NOT__: {
    remove__D5YM(__tmp__55IK);
  } break;
  case __EXPR_MOD__: {
    remove__4PEO(__tmp__55IK);
  } break;
  case __EXPR_SUP_EQ__: {
    remove__X5DP(__tmp__55IK);
  } break;
  case __EXPR_INF__: {
    remove__KZQN(__tmp__55IK);
  } break;
  case __EXPR_INF_EQ__: {
    remove__OZQN(__tmp__55IK);
  } break;
  case __EXPR_OR__: {
    remove__LUPN(__tmp__55IK);
  } break;
  case __EXPR_XOR__: {
    remove__AQTO(__tmp__55IK);
  } break;
  };
}

static void display__5S2K(__DTA_WR_CODE *Self__AT2K,void *buffer__BT2K)
// ({DTA_WR_CODE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__CT2K;
  void *__tmp__DT2K;
  append__MOK(buffer__BT2K,(&__string_509));
  __tmp__CT2K=Self__AT2K->parent_dta__E0LH.slot__PJZD;
  if (((struct ___OBJ *)__tmp__CT2K)->__id==__SLOT_DATA__) {
    __tmp__DT2K=((__SLOT_DATA *)__tmp__CT2K)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
  } else {
    __tmp__DT2K=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__CT2K)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
  };
  append__MOK(buffer__BT2K,__tmp__DT2K);
}

static void display__IT2K(__DTA_WR_VALUE *Self__JT2K,void *buffer__KT2K)
// ({DTA_WR_VALUE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__LT2K;
  void *__tmp__MT2K;
  append__MOK(buffer__KT2K,(&__string_510));
  __tmp__LT2K=Self__JT2K->parent_dta__PTUH.slot__PJZD;
  if (((struct ___OBJ *)__tmp__LT2K)->__id==__SLOT_DATA__) {
    __tmp__MT2K=((__SLOT_DATA *)__tmp__LT2K)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
  } else {
    __tmp__MT2K=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__LT2K)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
  };
  append__MOK(buffer__KT2K,__tmp__MT2K);
}

static void display__OT2K(__DTA_RD_ARGS *Self__PT2K,void *buffer__QT2K)
// ({DTA_RD_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__RT2K;
  void *__tmp__ST2K;
  append__MOK(buffer__QT2K,(&__string_511));
  __tmp__RT2K=Self__PT2K->parent_dta__5OWH.slot__PJZD;
  if (((struct ___OBJ *)__tmp__RT2K)->__id==__SLOT_DATA__) {
    __tmp__ST2K=((__SLOT_DATA *)__tmp__RT2K)->parent_variable__AJZD.parent_named__A2LC.name__1QB;
  } else {
    __tmp__ST2K=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__RT2K)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
  };
  append__MOK(buffer__QT2K,__tmp__ST2K);
}

static void* result_expr__PVDI(__NODE_TYPE *Self__QVDI)
// ({NODE_TYPE}) With resultNo recursive, No inlinable.
{
  void *__tmp__SVDI;
  void *__tmp__TVDI;
  __tmp__SVDI=Self__QVDI->parent_node__DMQC.data__LLZD;
  switch (((struct ___OBJ *)__tmp__SVDI)->__id) {
  case __DTA_RD__: {
    __tmp__TVDI=((__DTA_RD *)__tmp__SVDI)->parent_dta__AMQC.result_expr__RJZD;
  } break;
  case __DTA_CAST__: {
    __tmp__TVDI=((__DTA_CAST *)__tmp__SVDI)->result_expr__401H;
  } break;
  case __DTA_WR_CODE__: {
    __tmp__TVDI=((__DTA_WR_CODE *)__tmp__SVDI)->parent_dta__E0LH.result_expr__RJZD;
  } break;
  case __DTA_BLOCK__: {
    __tmp__TVDI=((__DTA_BLOCK *)__tmp__SVDI)->result_expr__341H;
  } break;
  case __DTA_WR_VALUE__: {
    __tmp__TVDI=((__DTA_WR_VALUE *)__tmp__SVDI)->parent_dta__PTUH.result_expr__RJZD;
  } break;
  case __DTA_RD_ARGS__: {
    __tmp__TVDI=((__DTA_RD_ARGS *)__tmp__SVDI)->parent_dta__5OWH.result_expr__RJZD;
  } break;
  };
  return(__tmp__TVDI);
}

static void add_genere_list__MK5I(__TYPE *Self__NK5I)
// ({TYPE}) VoidNo recursive, No inlinable.
{
  if ((((void *)Self__NK5I->slot_run__1JC != (void *)NULL) && ((((__FAST_ARRAYoSLOTo *)Self__NK5I->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__NK5I->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL)))) {
    if ((fast_first_index_of__J0QJ(genere_list__VOB,Self__NK5I) > ((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB)) {
      add_last__YAQG(genere_list__VOB,Self__NK5I);
    };
  };
}

static void add_genere_list__ZL5I(__TYPE_NULL *Self__0L5I)
// ({TYPE_NULL}) VoidNo recursive, No inlinable.
{
  if ((((void *)Self__0L5I->parent_type__TIB.slot_run__1JC != (void *)NULL) && ((((__FAST_ARRAYoSLOTo *)Self__0L5I->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__0L5I->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL)))) {
    if ((fast_first_index_of__J0QJ(genere_list__VOB,Self__0L5I) > ((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB)) {
      add_last__YAQG(genere_list__VOB,Self__0L5I);
    };
  };
}

static void add_genere_list__GN5I(__TYPE_VOID *Self__HN5I)
// ({TYPE_VOID}) VoidNo recursive, No inlinable.
{
  if ((((void *)Self__HN5I->parent_type__UIB.slot_run__1JC != (void *)NULL) && ((((__FAST_ARRAYoSLOTo *)Self__HN5I->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__HN5I->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL)))) {
    if ((fast_first_index_of__J0QJ(genere_list__VOB,Self__HN5I) > ((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB)) {
      add_last__YAQG(genere_list__VOB,Self__HN5I);
    };
  };
}

static void add_genere_list__TO5I(__TYPE_CONTEXT *Self__UO5I)
// ({TYPE_CONTEXT}) VoidNo recursive, No inlinable.
{
  if ((((void *)Self__UO5I->parent_type__VIB.slot_run__1JC != (void *)NULL) && ((((__FAST_ARRAYoSLOTo *)Self__UO5I->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__UO5I->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL)))) {
    if ((fast_first_index_of__J0QJ(genere_list__VOB,Self__UO5I) > ((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB)) {
      add_last__YAQG(genere_list__VOB,Self__UO5I);
    };
  };
}

static void add_genere_list__BQ5I(__TYPE_GENERIC *Self__CQ5I)
// ({TYPE_GENERIC}) VoidNo recursive, No inlinable.
{
  if ((((void *)Self__CQ5I->parent_type__T2IB.slot_run__1JC != (void *)NULL) && ((((__FAST_ARRAYoSLOTo *)Self__CQ5I->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__CQ5I->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL)))) {
    if ((fast_first_index_of__J0QJ(genere_list__VOB,Self__CQ5I) > ((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB)) {
      add_last__YAQG(genere_list__VOB,Self__CQ5I);
    };
  };
}

static void put_reference_declaration__55UJ(__TYPE_GENERIC *Self__AAVJ,void *buffer__BAVJ)
// ({TYPE_GENERIC},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __BOOLEAN __tmp__NAVJ;
  if (((void *)((__PROTOTYPE *)Self__AAVJ->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_37))) {
    genere_declaration__Q2NI(((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__AAVJ->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0],buffer__BAVJ);
    __tmp__NAVJ=TRUE__;
  } else {
    __tmp__NAVJ=FALSE__;
  };
  if ((! __tmp__NAVJ)) {
    if (((void *)((__PROTOTYPE *)Self__AAVJ->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_38))) {
      append__MOK(buffer__BAVJ,(&__string_512));
      genere_declaration__Q2NI(((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__AAVJ->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0],buffer__BAVJ);
    } else {
      append__MOK(buffer__BAVJ,(&__string_92));
      append__MOK(buffer__BAVJ,Self__AAVJ->intern_name__FS2B);
      add_genere_list__BQ5I(Self__AAVJ);
    };
  };
}

static void add_genere_list__NW0J(__PROFIL_BLOCK *Self__OW0J)
// ({PROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  if ((((void *)Self__OW0J->parent_type__HHAG.slot_run__1JC != (void *)NULL) && ((((__FAST_ARRAYoSLOTo *)Self__OW0J->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL <  0) || ((void *)((void **)((__FAST_ARRAYoSLOTo *)Self__OW0J->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[ 0] != (void *)NULL)))) {
    if ((fast_first_index_of__J0QJ(genere_list__VOB,Self__OW0J) > ((__FAST_ARRAYoTYPEo *)genere_list__VOB)->parent_arrayed_collection__UOB.upper__1OB)) {
      add_last__YAQG(genere_list__VOB,Self__OW0J);
    };
  };
}

static void put_reference_star_declaration__TE3I(__TYPE *Self__UE3I,void *buffer__VE3I)
// ({TYPE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  if (((void *)Self__UE3I != (void *)type_block__BLB)) {
    add_last__YPK(buffer__VE3I,'*');
  };
}

static void put_reference_star_declaration__4E3I(__TYPE_NULL *Self__5E3I,void *buffer__AF3I)
// ({TYPE_NULL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  if (((void *)Self__5E3I != (void *)type_block__BLB)) {
    add_last__YPK(buffer__AF3I,'*');
  };
}

static void put_reference_star_declaration__JF3I(__TYPE_VOID *Self__KF3I,void *buffer__LF3I)
// ({TYPE_VOID},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  if (((void *)Self__KF3I != (void *)type_block__BLB)) {
    add_last__YPK(buffer__LF3I,'*');
  };
}

static void put_reference_star_declaration__UF3I(__TYPE_CONTEXT *Self__VF3I,void *buffer__WF3I)
// ({TYPE_CONTEXT},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  if (((void *)Self__VF3I != (void *)type_block__BLB)) {
    add_last__YPK(buffer__WF3I,'*');
  };
}

static void put_reference_star_declaration__AG3I(__TYPE_GENERIC *Self__BG3I,void *buffer__CG3I)
// ({TYPE_GENERIC},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  if ((((void *)((__PROTOTYPE *)Self__BG3I->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_37)) || ((void *)((__PROTOTYPE *)Self__BG3I->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB == (void *)(&__string_38)))) {
    add_last__YPK(buffer__CG3I,'*');
    genere_star_declaration__Q3NI(((void **)((__FAST_ARRAYoTYPE_FULLo *)Self__BG3I->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0],buffer__CG3I);
  } else {
    if (((void *)Self__BG3I != (void *)type_block__BLB)) {
      add_last__YPK(buffer__CG3I,'*');
    };
  };
}

static void put_reference_star_declaration__BDIJ(__PROFIL_BLOCK *Self__CDIJ,void *buffer__DDIJ)
// ({PROFIL_BLOCK},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  if (((void *)Self__CDIJ != (void *)type_block__BLB)) {
    add_last__YPK(buffer__DDIJ,'*');
  };
}

static __BOOLEAN is_late_binding__LQSK(__TYPE_FULL *Self__MQSK)
// ({TYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *__tmp__OQSK;
  __BOOLEAN __tmp__PQSK;
  __tmp__OQSK=Self__MQSK->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__OQSK)->__id) {
  case __TYPE__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__TYPE *)__tmp__OQSK)->last_pass_binding__YYZI);
  } break;
  case __TYPE_NULL__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__TYPE_NULL *)__tmp__OQSK)->parent_type__TIB.last_pass_binding__YYZI);
  } break;
  case __TYPE_VOID__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__TYPE_VOID *)__tmp__OQSK)->parent_type__UIB.last_pass_binding__YYZI);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__TYPE_CONTEXT *)__tmp__OQSK)->parent_type__VIB.last_pass_binding__YYZI);
  } break;
  case __TYPE_ID__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__TYPE_ID *)__tmp__OQSK)->parent_type__WIB.last_pass_binding__YYZI);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__TYPE_GENERIC *)__tmp__OQSK)->parent_type__T2IB.last_pass_binding__YYZI);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__PQSK=(pass_count__Z3LC == ((__PROFIL_BLOCK *)__tmp__OQSK)->parent_type__HHAG.last_pass_binding__YYZI);
  } break;
  };
  return(__tmp__PQSK);
}

static void fast_put__to__RJFF(__HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo *Self__SJFF,__INTEGER v__TJFF,void *k__UJFF)
// ({HASHED_DICTIONARYoExpanded_INTEGERxSTRING_CONSTANTo},{INTEGER},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER h__1JFF,idx__2JFF,idx__CX1F,new_capacity__DX1F,i__EX1F;
  __INTEGER typ_id__SZ1F;
  __POINTER ptr__NZ1F;
  __UINTEGER_32 sz__PZ1F,a__JE1Q,new_size__HE1Q,t__NE1Q,a__PE1Q;
  void *node__4JFF,*node1__GX1F,*node2__HX1F,*__tmp__SLFF;
  void **old_buckets__FX1F;
  __HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *result__MZ1F;
  __HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *Self__VW5F;
  h__1JFF=hash_code__WPN(k__UJFF);
  idx__2JFF=(__INTEGER)(h__1JFF % Self__SJFF->capacity__AKFF);
  node__4JFF=((void **)Self__SJFF->buckets__FKFF)[idx__2JFF];
  while ((! (((void *)node__4JFF == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node__4JFF)->key__RKFF == (void *)k__UJFF)))) {
    node__4JFF=((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node__4JFF)->next__2KFF;
  };
  if (((void *)node__4JFF == (void *)NULL)) {
    if ((Self__SJFF->capacity__AKFF == Self__SJFF->count__FLFF)) {
      idx__CX1F= 0;
      node1__GX1F=NULL;
      node2__HX1F=NULL;
      old_buckets__FX1F=Self__SJFF->buckets__FKFF;
      new_capacity__DX1F=prime_number_ceiling__A4Q((__INTEGER)(Self__SJFF->capacity__AKFF +  1));
      Self__SJFF->buckets__FKFF=create__YXOF(new_capacity__DX1F);
      i__EX1F=(__INTEGER)(Self__SJFF->capacity__AKFF -  1);
      Self__SJFF->capacity__AKFF=new_capacity__DX1F;
      while ((i__EX1F >=  0)) {
        node1__GX1F=((void **)old_buckets__FX1F)[i__EX1F];
        while (((void *)node1__GX1F != (void *)NULL)) {
          node2__HX1F=((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node1__GX1F)->next__2KFF;
          idx__CX1F=(__INTEGER)(hash_code__WPN(((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node1__GX1F)->key__RKFF) % Self__SJFF->capacity__AKFF);
          ((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node1__GX1F)->next__2KFF=((void **)Self__SJFF->buckets__FKFF)[idx__CX1F];
          ((void **)Self__SJFF->buckets__FKFF)[idx__CX1F]=node1__GX1F;
          node1__GX1F=node2__HX1F;
        };
        i__EX1F=(__INTEGER)(i__EX1F -  1);
      };
      idx__2JFF=(__INTEGER)(h__1JFF % Self__SJFF->capacity__AKFF);
    };
    __tmp__SLFF=((void **)Self__SJFF->buckets__FKFF)[idx__2JFF];
    result__MZ1F=NULL;
    ptr__NZ1F=((__POINTER )(NULL));
    typ_id__SZ1F= 0;
    sz__PZ1F=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo));
    if ((sz__PZ1F ==  0)) {
      result__MZ1F=HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__;
    } else {
      typ_id__SZ1F=__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__;
      clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PZ1F);
      if ((typ_id__SZ1F == (__INTEGER)(-  1))) {
        a__JE1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        new_size__HE1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__PZ1F + a__JE1Q) & (__UINTEGER_32)(~ a__JE1Q));
        ptr__NZ1F=micro_alloc__table__lab__BOI(new_size__HE1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HE1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HE1Q);
      } else {
        t__NE1Q=((__UINTEGER_32 )typ_id__SZ1F);
        a__PE1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
        ptr__NZ1F=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PZ1F + a__PE1Q) & (__UINTEGER_32)(~ a__PE1Q)),((__POINTER )(&(table_type[(t__NE1Q)]))),(__UINTEGER_32)(t__NE1Q |  1));
      };
      result__MZ1F=((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)ptr__NZ1F);
      *(result__MZ1F) = *(HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo__);
    };
    Self__VW5F=((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)result__MZ1F);
    Self__VW5F->item__U11F=v__TJFF;
    Self__VW5F->key__RKFF=k__UJFF;
    Self__VW5F->next__2KFF=__tmp__SLFF;
    node__4JFF=result__MZ1F;
    ((void **)Self__SJFF->buckets__FKFF)[idx__2JFF]=result__MZ1F;
    Self__SJFF->count__FLFF=(__INTEGER)(Self__SJFF->count__FLFF +  1);
  } else {
    ((__HASHED_DICTIONARY_NODEoExpanded_INTEGERxSTRING_CONSTANTo *)node__4JFF)->item__U11F=v__TJFF;
  };
}

static __INTEGER size__P2BJ(__TYPE_FULL *Self__Q2BJ)
// ({TYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *__tmp__S2BJ;
  __INTEGER __tmp__T2BJ;
  __tmp__S2BJ=Self__Q2BJ->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__S2BJ)->__id) {
  case __TYPE__: {
    __tmp__T2BJ=((__TYPE *)__tmp__S2BJ)->size__JPY;
  } break;
  case __TYPE_NULL__: {
    __tmp__T2BJ=((__TYPE_NULL *)__tmp__S2BJ)->parent_type__TIB.size__JPY;
  } break;
  case __TYPE_VOID__: {
    __tmp__T2BJ=((__TYPE_VOID *)__tmp__S2BJ)->parent_type__UIB.size__JPY;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__T2BJ=((__TYPE_CONTEXT *)__tmp__S2BJ)->parent_type__VIB.size__JPY;
  } break;
  case __TYPE_ID__: {
    __tmp__T2BJ=((__TYPE_ID *)__tmp__S2BJ)->parent_type__WIB.size__JPY;
  } break;
  case __TYPE_GENERIC__: {
    __tmp__T2BJ=((__TYPE_GENERIC *)__tmp__S2BJ)->parent_type__T2IB.size__JPY;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__T2BJ=((__PROFIL_BLOCK *)__tmp__S2BJ)->parent_type__HHAG.size__JPY;
  } break;
  };
  return(__tmp__T2BJ);
}

static void add__to__DU5K(__FAST_ARRAYoLOCALo *Self__EU5K,void *element__FU5K,__INTEGER index__GU5K)
// ({FAST_ARRAYoLOCALo},{NULLxLOCAL},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__1WJL;
  void **__tmp__X35Q,**__tmp__Y35Q,**__tmp__Z35Q;
  if ((index__GU5K == (__INTEGER)(Self__EU5K->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
    add_last__T2FH(Self__EU5K,element__FU5K);
  } else {
    add_last__T2FH(Self__EU5K,element__FU5K);
    Self__1WJL=(__INTEGER)(Self__EU5K->parent_arrayed_collection__QI4F.upper__TI4F -  1);
    __tmp__X35Q=Self__EU5K->parent_arrayed_collection__QI4F.storage__FXPG;
    __tmp__Y35Q=Self__EU5K->parent_arrayed_collection__QI4F.storage__FXPG;
    __tmp__Z35Q=Self__EU5K->parent_arrayed_collection__QI4F.storage__FXPG;
    while ((Self__1WJL >= index__GU5K)) {
      ((void **)__tmp__Y35Q)[(__INTEGER)(Self__1WJL +  1)]=((void **)__tmp__X35Q)[Self__1WJL];
      ((void **)__tmp__Z35Q)[Self__1WJL]=NULL;
      Self__1WJL=(__INTEGER)(Self__1WJL -  1);
    };
    ((void **)Self__EU5K->parent_arrayed_collection__QI4F.storage__FXPG)[index__GU5K]=element__FU5K;
  };
}

static __INTEGER index_of__since__ARSK(__STRING_CONSTANT *Self__BRSK,__INTEGER start_index__DRSK)
// ({STRING_CONSTANT},{INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER result__FRSK,__tmp__3E1Q;
  __CHARACTER *__tmp__4E1Q;
  result__FRSK=start_index__DRSK;
  __tmp__3E1Q=Self__BRSK->count__XHB;
  __tmp__4E1Q=Self__BRSK->storage__C5K;
  while ((! ((result__FRSK > __tmp__3E1Q) || ('@' == ((__CHARACTER *)__tmp__4E1Q)[(__INTEGER)(result__FRSK -  1)])))) {
    result__FRSK=(__INTEGER)(result__FRSK +  1);
  };
  return(result__FRSK);
}

static void put_access_id__in__5KPM(void *e__BLPM,void *buffer__CLPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__ELPM;
  void *t__DLPM;
  __CHARACTER_CST *Self__0R4P,*Self__FS4P,*Self__QS4P;
  __BOOLEAN __tmp__NLPM;
  switch (((struct ___OBJ *)e__BLPM)->__id) {
  case __LIST__: {
    __tmp__ELPM=static_type__GIQG(e__BLPM);
  } break;
  case __STRING_CST__: {
    __tmp__ELPM=((__STRING_CST *)e__BLPM)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ELPM=((__EXTERNAL_C *)e__BLPM)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__ELPM=((__PROTOTYPE_CST *)e__BLPM)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__ELPM=((__INTEGER_CST *)e__BLPM)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__ELPM=((__LOCAL *)((__READ_LOCAL *)e__BLPM)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ELPM=static_type__0N1H(e__BLPM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ELPM=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ELPM=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__ELPM=((__REAL_CST *)e__BLPM)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__ELPM=((__CHARACTER_CST *)e__BLPM)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__ELPM=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ELPM=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__ELPM=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__ELPM=static_type__MP1H(e__BLPM);
  } break;
  case __EXPR_MUL__: {
    __tmp__ELPM=static_type__SP1H(e__BLPM);
  } break;
  case __EXPR_DIV__: {
    __tmp__ELPM=static_type__XP1H(e__BLPM);
  } break;
  case __EXPR_AND__: {
    __tmp__ELPM=static_type__2P1H(e__BLPM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ELPM=static_type__BQ1H(e__BLPM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ELPM=static_type__GQ1H(e__BLPM);
  } break;
  case __PUT_TO__: {
    __tmp__ELPM=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__ELPM=static_type__PQ1H(e__BLPM);
  } break;
  case __SIZE_OF__: {
    __tmp__ELPM=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__ELPM=((__CAST *)e__BLPM)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__ELPM=static_type__GIKL(e__BLPM);
  } break;
  case __READ_SLOT__: {
    __tmp__ELPM=((__SLOT_DATA *)((__READ_SLOT *)e__BLPM)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__ELPM=((__SLOT_DATA *)((__READ_GLOBAL *)e__BLPM)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ELPM=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ELPM=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ELPM=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ELPM=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ELPM=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__ELPM=static_type__Z2IM(e__BLPM);
  } break;
  case __EXPR_ADD__: {
    __tmp__ELPM=static_type__IXML(e__BLPM);
  } break;
  case __EXPR_NOT__: {
    __tmp__ELPM=static_type__BTXM(e__BLPM);
  } break;
  case __EXPR_MOD__: {
    __tmp__ELPM=static_type__5LEO(e__BLPM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ELPM=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__ELPM=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ELPM=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__ELPM=static_type__NOPN(e__BLPM);
  } break;
  case __EXPR_XOR__: {
    __tmp__ELPM=static_type__XCSO(e__BLPM);
  } break;
  };
  t__DLPM=((__TYPE_FULL *)__tmp__ELPM)->parent_type__KTL;
  if (((void *)t__DLPM == (void *)type_boolean__VJB)) {
    switch (((struct ___OBJ *)e__BLPM)->__id) {
    case __LIST__: {
      genere__SFEK(e__BLPM,buffer__CLPM);
    } break;
    case __STRING_CST__: {
      genere__EGEK(e__BLPM,buffer__CLPM);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(e__BLPM,buffer__CLPM);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(e__BLPM,buffer__CLPM);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(e__BLPM,buffer__CLPM);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)e__BLPM),buffer__CLPM);
      append__MOK(buffer__CLPM,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(e__BLPM,buffer__CLPM);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__CLPM,((__REAL_CST *)e__BLPM)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__0R4P=((__CHARACTER_CST *)e__BLPM);
      add_last__YPK(buffer__CLPM,'\'');
      append__MOK(buffer__CLPM,Self__0R4P->text__HO2H);
      add_last__YPK(buffer__CLPM,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(e__BLPM,buffer__CLPM);
    } break;
    case __PUT_TO__: {
      genere__VKFK(e__BLPM,buffer__CLPM);
    } break;
    case __ITEM__: {
      genere__KMFK(e__BLPM,buffer__CLPM);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(e__BLPM,buffer__CLPM);
    } break;
    case __CAST__: {
      genere__WMFK(e__BLPM,buffer__CLPM);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(e__BLPM,buffer__CLPM);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(e__BLPM,buffer__CLPM);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__CLPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__BLPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(e__BLPM,buffer__CLPM);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(e__BLPM,buffer__CLPM);
    } break;
    };
    __tmp__NLPM=TRUE__;
  } else {
    __tmp__NLPM=FALSE__;
  };
  if ((! __tmp__NLPM)) {
    if (((void *)t__DLPM == (void *)type_block__BLB)) {
      switch (((struct ___OBJ *)e__BLPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__BLPM,buffer__CLPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__BLPM,buffer__CLPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__BLPM,buffer__CLPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__BLPM,buffer__CLPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__BLPM),buffer__CLPM);
        append__MOK(buffer__CLPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__BLPM,buffer__CLPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__CLPM,((__REAL_CST *)e__BLPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__FS4P=((__CHARACTER_CST *)e__BLPM);
        add_last__YPK(buffer__CLPM,'\'');
        append__MOK(buffer__CLPM,Self__FS4P->text__HO2H);
        add_last__YPK(buffer__CLPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__BLPM,buffer__CLPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__BLPM,buffer__CLPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__BLPM,buffer__CLPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__BLPM,buffer__CLPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__BLPM,buffer__CLPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__BLPM,buffer__CLPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__BLPM,buffer__CLPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__CLPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__BLPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__BLPM,buffer__CLPM);
      } break;
      };
    } else {
      append__MOK(buffer__CLPM,(&__string_513));
      switch (((struct ___OBJ *)e__BLPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__BLPM,buffer__CLPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__BLPM,buffer__CLPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__BLPM,buffer__CLPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__BLPM,buffer__CLPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__BLPM),buffer__CLPM);
        append__MOK(buffer__CLPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__BLPM,buffer__CLPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__CLPM,((__REAL_CST *)e__BLPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__QS4P=((__CHARACTER_CST *)e__BLPM);
        add_last__YPK(buffer__CLPM,'\'');
        append__MOK(buffer__CLPM,Self__QS4P->text__HO2H);
        add_last__YPK(buffer__CLPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__BLPM,buffer__CLPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__BLPM,buffer__CLPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__BLPM,buffer__CLPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__BLPM,buffer__CLPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__BLPM,buffer__CLPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__BLPM,buffer__CLPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__BLPM,buffer__CLPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__CLPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__BLPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__BLPM,buffer__CLPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__BLPM,buffer__CLPM);
      } break;
      };
      append__MOK(buffer__CLPM,(&__string_514));
    };
  };
}

static void put_access_id__in__5LPM(void *e__BMPM,void *buffer__CMPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __CHARACTER_CST *Self__1S4P;
  switch (((struct ___OBJ *)e__BMPM)->__id) {
  case __LIST__: {
    genere__SFEK(e__BMPM,buffer__CMPM);
  } break;
  case __STRING_CST__: {
    genere__EGEK(e__BMPM,buffer__CMPM);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(e__BMPM,buffer__CMPM);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(e__BMPM,buffer__CMPM);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(e__BMPM,buffer__CMPM);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)e__BMPM),buffer__CMPM);
    append__MOK(buffer__CMPM,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(e__BMPM,buffer__CMPM);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__CMPM,((__REAL_CST *)e__BMPM)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__1S4P=((__CHARACTER_CST *)e__BMPM);
    add_last__YPK(buffer__CMPM,'\'');
    append__MOK(buffer__CMPM,Self__1S4P->text__HO2H);
    add_last__YPK(buffer__CMPM,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(e__BMPM,buffer__CMPM);
  } break;
  case __PUT_TO__: {
    genere__VKFK(e__BMPM,buffer__CMPM);
  } break;
  case __ITEM__: {
    genere__KMFK(e__BMPM,buffer__CMPM);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(e__BMPM,buffer__CMPM);
  } break;
  case __CAST__: {
    genere__WMFK(e__BMPM,buffer__CMPM);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(e__BMPM,buffer__CMPM);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(e__BMPM,buffer__CMPM);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__CMPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__BMPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(e__BMPM,buffer__CMPM);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(e__BMPM,buffer__CMPM);
  } break;
  };
}

static void put_access_id__in__DMPM(void *e__FMPM,void *buffer__GMPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__IMPM;
  void *t__HMPM;
  __CHARACTER_CST *Self__MT4P,*Self__XT4P,*Self__CU4P;
  __BOOLEAN __tmp__RMPM;
  switch (((struct ___OBJ *)e__FMPM)->__id) {
  case __LIST__: {
    __tmp__IMPM=static_type__GIQG(e__FMPM);
  } break;
  case __STRING_CST__: {
    __tmp__IMPM=((__STRING_CST *)e__FMPM)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__IMPM=((__EXTERNAL_C *)e__FMPM)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__IMPM=((__PROTOTYPE_CST *)e__FMPM)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__IMPM=((__INTEGER_CST *)e__FMPM)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__IMPM=((__LOCAL *)((__READ_LOCAL *)e__FMPM)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IMPM=static_type__0N1H(e__FMPM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IMPM=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IMPM=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__IMPM=((__REAL_CST *)e__FMPM)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__IMPM=((__CHARACTER_CST *)e__FMPM)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__IMPM=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IMPM=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__IMPM=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__IMPM=static_type__MP1H(e__FMPM);
  } break;
  case __EXPR_MUL__: {
    __tmp__IMPM=static_type__SP1H(e__FMPM);
  } break;
  case __EXPR_DIV__: {
    __tmp__IMPM=static_type__XP1H(e__FMPM);
  } break;
  case __EXPR_AND__: {
    __tmp__IMPM=static_type__2P1H(e__FMPM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IMPM=static_type__BQ1H(e__FMPM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IMPM=static_type__GQ1H(e__FMPM);
  } break;
  case __PUT_TO__: {
    __tmp__IMPM=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__IMPM=static_type__PQ1H(e__FMPM);
  } break;
  case __SIZE_OF__: {
    __tmp__IMPM=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__IMPM=((__CAST *)e__FMPM)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__IMPM=static_type__GIKL(e__FMPM);
  } break;
  case __READ_SLOT__: {
    __tmp__IMPM=((__SLOT_DATA *)((__READ_SLOT *)e__FMPM)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__IMPM=((__SLOT_DATA *)((__READ_GLOBAL *)e__FMPM)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IMPM=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IMPM=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IMPM=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IMPM=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IMPM=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__IMPM=static_type__Z2IM(e__FMPM);
  } break;
  case __EXPR_ADD__: {
    __tmp__IMPM=static_type__IXML(e__FMPM);
  } break;
  case __EXPR_NOT__: {
    __tmp__IMPM=static_type__BTXM(e__FMPM);
  } break;
  case __EXPR_MOD__: {
    __tmp__IMPM=static_type__5LEO(e__FMPM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IMPM=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__IMPM=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IMPM=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__IMPM=static_type__NOPN(e__FMPM);
  } break;
  case __EXPR_XOR__: {
    __tmp__IMPM=static_type__XCSO(e__FMPM);
  } break;
  };
  t__HMPM=((__TYPE_FULL *)__tmp__IMPM)->parent_type__KTL;
  if (((void *)t__HMPM == (void *)type_boolean__VJB)) {
    switch (((struct ___OBJ *)e__FMPM)->__id) {
    case __LIST__: {
      genere__SFEK(e__FMPM,buffer__GMPM);
    } break;
    case __STRING_CST__: {
      genere__EGEK(e__FMPM,buffer__GMPM);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(e__FMPM,buffer__GMPM);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(e__FMPM,buffer__GMPM);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(e__FMPM,buffer__GMPM);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)e__FMPM),buffer__GMPM);
      append__MOK(buffer__GMPM,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(e__FMPM,buffer__GMPM);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__GMPM,((__REAL_CST *)e__FMPM)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__MT4P=((__CHARACTER_CST *)e__FMPM);
      add_last__YPK(buffer__GMPM,'\'');
      append__MOK(buffer__GMPM,Self__MT4P->text__HO2H);
      add_last__YPK(buffer__GMPM,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(e__FMPM,buffer__GMPM);
    } break;
    case __PUT_TO__: {
      genere__VKFK(e__FMPM,buffer__GMPM);
    } break;
    case __ITEM__: {
      genere__KMFK(e__FMPM,buffer__GMPM);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(e__FMPM,buffer__GMPM);
    } break;
    case __CAST__: {
      genere__WMFK(e__FMPM,buffer__GMPM);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(e__FMPM,buffer__GMPM);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(e__FMPM,buffer__GMPM);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__GMPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FMPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(e__FMPM,buffer__GMPM);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(e__FMPM,buffer__GMPM);
    } break;
    };
    __tmp__RMPM=TRUE__;
  } else {
    __tmp__RMPM=FALSE__;
  };
  if ((! __tmp__RMPM)) {
    if (((void *)t__HMPM == (void *)type_block__BLB)) {
      switch (((struct ___OBJ *)e__FMPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__FMPM,buffer__GMPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__FMPM,buffer__GMPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__FMPM,buffer__GMPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__FMPM,buffer__GMPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__FMPM),buffer__GMPM);
        append__MOK(buffer__GMPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__FMPM,buffer__GMPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__GMPM,((__REAL_CST *)e__FMPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__XT4P=((__CHARACTER_CST *)e__FMPM);
        add_last__YPK(buffer__GMPM,'\'');
        append__MOK(buffer__GMPM,Self__XT4P->text__HO2H);
        add_last__YPK(buffer__GMPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__FMPM,buffer__GMPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__FMPM,buffer__GMPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__FMPM,buffer__GMPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__FMPM,buffer__GMPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__FMPM,buffer__GMPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__FMPM,buffer__GMPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__FMPM,buffer__GMPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__GMPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FMPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__FMPM,buffer__GMPM);
      } break;
      };
    } else {
      append__MOK(buffer__GMPM,(&__string_513));
      switch (((struct ___OBJ *)e__FMPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__FMPM,buffer__GMPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__FMPM,buffer__GMPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__FMPM,buffer__GMPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__FMPM,buffer__GMPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__FMPM),buffer__GMPM);
        append__MOK(buffer__GMPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__FMPM,buffer__GMPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__GMPM,((__REAL_CST *)e__FMPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__CU4P=((__CHARACTER_CST *)e__FMPM);
        add_last__YPK(buffer__GMPM,'\'');
        append__MOK(buffer__GMPM,Self__CU4P->text__HO2H);
        add_last__YPK(buffer__GMPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__FMPM,buffer__GMPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__FMPM,buffer__GMPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__FMPM,buffer__GMPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__FMPM,buffer__GMPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__FMPM,buffer__GMPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__FMPM,buffer__GMPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__FMPM,buffer__GMPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__GMPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FMPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__FMPM,buffer__GMPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__FMPM,buffer__GMPM);
      } break;
      };
      append__MOK(buffer__GMPM,(&__string_514));
    };
  };
}

static void put_access_id__in__DNPM(void *e__FNPM,void *buffer__GNPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__INPM;
  void *t__HNPM;
  __CHARACTER_CST *Self__TU4P,*Self__4U4P,*Self__JV4P;
  __BOOLEAN __tmp__RNPM;
  switch (((struct ___OBJ *)e__FNPM)->__id) {
  case __LIST__: {
    __tmp__INPM=static_type__GIQG(e__FNPM);
  } break;
  case __STRING_CST__: {
    __tmp__INPM=((__STRING_CST *)e__FNPM)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__INPM=((__EXTERNAL_C *)e__FNPM)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__INPM=((__PROTOTYPE_CST *)e__FNPM)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__INPM=((__INTEGER_CST *)e__FNPM)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__INPM=((__LOCAL *)((__READ_LOCAL *)e__FNPM)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__INPM=static_type__0N1H(e__FNPM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__INPM=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__INPM=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__INPM=((__REAL_CST *)e__FNPM)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__INPM=((__CHARACTER_CST *)e__FNPM)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__INPM=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__INPM=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__INPM=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__INPM=static_type__MP1H(e__FNPM);
  } break;
  case __EXPR_MUL__: {
    __tmp__INPM=static_type__SP1H(e__FNPM);
  } break;
  case __EXPR_DIV__: {
    __tmp__INPM=static_type__XP1H(e__FNPM);
  } break;
  case __EXPR_AND__: {
    __tmp__INPM=static_type__2P1H(e__FNPM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__INPM=static_type__BQ1H(e__FNPM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__INPM=static_type__GQ1H(e__FNPM);
  } break;
  case __PUT_TO__: {
    __tmp__INPM=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__INPM=static_type__PQ1H(e__FNPM);
  } break;
  case __SIZE_OF__: {
    __tmp__INPM=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__INPM=((__CAST *)e__FNPM)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__INPM=static_type__GIKL(e__FNPM);
  } break;
  case __READ_SLOT__: {
    __tmp__INPM=((__SLOT_DATA *)((__READ_SLOT *)e__FNPM)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__INPM=((__SLOT_DATA *)((__READ_GLOBAL *)e__FNPM)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__INPM=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__INPM=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__INPM=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__INPM=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__INPM=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__INPM=static_type__Z2IM(e__FNPM);
  } break;
  case __EXPR_ADD__: {
    __tmp__INPM=static_type__IXML(e__FNPM);
  } break;
  case __EXPR_NOT__: {
    __tmp__INPM=static_type__BTXM(e__FNPM);
  } break;
  case __EXPR_MOD__: {
    __tmp__INPM=static_type__5LEO(e__FNPM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__INPM=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__INPM=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__INPM=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__INPM=static_type__NOPN(e__FNPM);
  } break;
  case __EXPR_XOR__: {
    __tmp__INPM=static_type__XCSO(e__FNPM);
  } break;
  };
  t__HNPM=((__TYPE_FULL *)__tmp__INPM)->parent_type__KTL;
  if (((void *)t__HNPM == (void *)type_boolean__VJB)) {
    switch (((struct ___OBJ *)e__FNPM)->__id) {
    case __LIST__: {
      genere__SFEK(e__FNPM,buffer__GNPM);
    } break;
    case __STRING_CST__: {
      genere__EGEK(e__FNPM,buffer__GNPM);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(e__FNPM,buffer__GNPM);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(e__FNPM,buffer__GNPM);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(e__FNPM,buffer__GNPM);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)e__FNPM),buffer__GNPM);
      append__MOK(buffer__GNPM,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(e__FNPM,buffer__GNPM);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__GNPM,((__REAL_CST *)e__FNPM)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__TU4P=((__CHARACTER_CST *)e__FNPM);
      add_last__YPK(buffer__GNPM,'\'');
      append__MOK(buffer__GNPM,Self__TU4P->text__HO2H);
      add_last__YPK(buffer__GNPM,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(e__FNPM,buffer__GNPM);
    } break;
    case __PUT_TO__: {
      genere__VKFK(e__FNPM,buffer__GNPM);
    } break;
    case __ITEM__: {
      genere__KMFK(e__FNPM,buffer__GNPM);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(e__FNPM,buffer__GNPM);
    } break;
    case __CAST__: {
      genere__WMFK(e__FNPM,buffer__GNPM);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(e__FNPM,buffer__GNPM);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(e__FNPM,buffer__GNPM);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__GNPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FNPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(e__FNPM,buffer__GNPM);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(e__FNPM,buffer__GNPM);
    } break;
    };
    __tmp__RNPM=TRUE__;
  } else {
    __tmp__RNPM=FALSE__;
  };
  if ((! __tmp__RNPM)) {
    if (((void *)t__HNPM == (void *)type_block__BLB)) {
      switch (((struct ___OBJ *)e__FNPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__FNPM,buffer__GNPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__FNPM,buffer__GNPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__FNPM,buffer__GNPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__FNPM,buffer__GNPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__FNPM),buffer__GNPM);
        append__MOK(buffer__GNPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__FNPM,buffer__GNPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__GNPM,((__REAL_CST *)e__FNPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__4U4P=((__CHARACTER_CST *)e__FNPM);
        add_last__YPK(buffer__GNPM,'\'');
        append__MOK(buffer__GNPM,Self__4U4P->text__HO2H);
        add_last__YPK(buffer__GNPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__FNPM,buffer__GNPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__FNPM,buffer__GNPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__FNPM,buffer__GNPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__FNPM,buffer__GNPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__FNPM,buffer__GNPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__FNPM,buffer__GNPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__FNPM,buffer__GNPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__GNPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FNPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__FNPM,buffer__GNPM);
      } break;
      };
    } else {
      append__MOK(buffer__GNPM,(&__string_513));
      switch (((struct ___OBJ *)e__FNPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__FNPM,buffer__GNPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__FNPM,buffer__GNPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__FNPM,buffer__GNPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__FNPM,buffer__GNPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__FNPM),buffer__GNPM);
        append__MOK(buffer__GNPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__FNPM,buffer__GNPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__GNPM,((__REAL_CST *)e__FNPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__JV4P=((__CHARACTER_CST *)e__FNPM);
        add_last__YPK(buffer__GNPM,'\'');
        append__MOK(buffer__GNPM,Self__JV4P->text__HO2H);
        add_last__YPK(buffer__GNPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__FNPM,buffer__GNPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__FNPM,buffer__GNPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__FNPM,buffer__GNPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__FNPM,buffer__GNPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__FNPM,buffer__GNPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__FNPM,buffer__GNPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__FNPM,buffer__GNPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__GNPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FNPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__FNPM,buffer__GNPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__FNPM,buffer__GNPM);
      } break;
      };
      append__MOK(buffer__GNPM,(&__string_514));
    };
  };
}

static void put_access_id__in__DOPM(void *e__FOPM,void *buffer__GOPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __CHARACTER_CST *Self__UV4P;
  switch (((struct ___OBJ *)e__FOPM)->__id) {
  case __LIST__: {
    genere__SFEK(e__FOPM,buffer__GOPM);
  } break;
  case __STRING_CST__: {
    genere__EGEK(e__FOPM,buffer__GOPM);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(e__FOPM,buffer__GOPM);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(e__FOPM,buffer__GOPM);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(e__FOPM,buffer__GOPM);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)e__FOPM),buffer__GOPM);
    append__MOK(buffer__GOPM,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(e__FOPM,buffer__GOPM);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__GOPM,((__REAL_CST *)e__FOPM)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__UV4P=((__CHARACTER_CST *)e__FOPM);
    add_last__YPK(buffer__GOPM,'\'');
    append__MOK(buffer__GOPM,Self__UV4P->text__HO2H);
    add_last__YPK(buffer__GOPM,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(e__FOPM,buffer__GOPM);
  } break;
  case __PUT_TO__: {
    genere__VKFK(e__FOPM,buffer__GOPM);
  } break;
  case __ITEM__: {
    genere__KMFK(e__FOPM,buffer__GOPM);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(e__FOPM,buffer__GOPM);
  } break;
  case __CAST__: {
    genere__WMFK(e__FOPM,buffer__GOPM);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(e__FOPM,buffer__GOPM);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(e__FOPM,buffer__GOPM);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__GOPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__FOPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(e__FOPM,buffer__GOPM);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(e__FOPM,buffer__GOPM);
  } break;
  };
}

static void put_access_id__in__HOPM(void *e__JOPM,void *buffer__KOPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__MOPM;
  void *t__LOPM;
  __CHARACTER_CST *Self__FW4P,*Self__QW4P,*Self__1W4P;
  __BOOLEAN __tmp__VOPM;
  switch (((struct ___OBJ *)e__JOPM)->__id) {
  case __LIST__: {
    __tmp__MOPM=static_type__GIQG(e__JOPM);
  } break;
  case __STRING_CST__: {
    __tmp__MOPM=((__STRING_CST *)e__JOPM)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__MOPM=((__EXTERNAL_C *)e__JOPM)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__MOPM=((__PROTOTYPE_CST *)e__JOPM)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__MOPM=((__INTEGER_CST *)e__JOPM)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__MOPM=((__LOCAL *)((__READ_LOCAL *)e__JOPM)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MOPM=static_type__0N1H(e__JOPM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MOPM=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MOPM=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__MOPM=((__REAL_CST *)e__JOPM)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__MOPM=((__CHARACTER_CST *)e__JOPM)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__MOPM=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__MOPM=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__MOPM=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__MOPM=static_type__MP1H(e__JOPM);
  } break;
  case __EXPR_MUL__: {
    __tmp__MOPM=static_type__SP1H(e__JOPM);
  } break;
  case __EXPR_DIV__: {
    __tmp__MOPM=static_type__XP1H(e__JOPM);
  } break;
  case __EXPR_AND__: {
    __tmp__MOPM=static_type__2P1H(e__JOPM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MOPM=static_type__BQ1H(e__JOPM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MOPM=static_type__GQ1H(e__JOPM);
  } break;
  case __PUT_TO__: {
    __tmp__MOPM=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__MOPM=static_type__PQ1H(e__JOPM);
  } break;
  case __SIZE_OF__: {
    __tmp__MOPM=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__MOPM=((__CAST *)e__JOPM)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__MOPM=static_type__GIKL(e__JOPM);
  } break;
  case __READ_SLOT__: {
    __tmp__MOPM=((__SLOT_DATA *)((__READ_SLOT *)e__JOPM)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__MOPM=((__SLOT_DATA *)((__READ_GLOBAL *)e__JOPM)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MOPM=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MOPM=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MOPM=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MOPM=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MOPM=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__MOPM=static_type__Z2IM(e__JOPM);
  } break;
  case __EXPR_ADD__: {
    __tmp__MOPM=static_type__IXML(e__JOPM);
  } break;
  case __EXPR_NOT__: {
    __tmp__MOPM=static_type__BTXM(e__JOPM);
  } break;
  case __EXPR_MOD__: {
    __tmp__MOPM=static_type__5LEO(e__JOPM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MOPM=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__MOPM=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MOPM=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__MOPM=static_type__NOPN(e__JOPM);
  } break;
  case __EXPR_XOR__: {
    __tmp__MOPM=static_type__XCSO(e__JOPM);
  } break;
  };
  t__LOPM=((__TYPE_FULL *)__tmp__MOPM)->parent_type__KTL;
  if (((void *)t__LOPM == (void *)type_boolean__VJB)) {
    switch (((struct ___OBJ *)e__JOPM)->__id) {
    case __LIST__: {
      genere__SFEK(e__JOPM,buffer__KOPM);
    } break;
    case __STRING_CST__: {
      genere__EGEK(e__JOPM,buffer__KOPM);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(e__JOPM,buffer__KOPM);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(e__JOPM,buffer__KOPM);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(e__JOPM,buffer__KOPM);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)e__JOPM),buffer__KOPM);
      append__MOK(buffer__KOPM,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(e__JOPM,buffer__KOPM);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__KOPM,((__REAL_CST *)e__JOPM)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__FW4P=((__CHARACTER_CST *)e__JOPM);
      add_last__YPK(buffer__KOPM,'\'');
      append__MOK(buffer__KOPM,Self__FW4P->text__HO2H);
      add_last__YPK(buffer__KOPM,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(e__JOPM,buffer__KOPM);
    } break;
    case __PUT_TO__: {
      genere__VKFK(e__JOPM,buffer__KOPM);
    } break;
    case __ITEM__: {
      genere__KMFK(e__JOPM,buffer__KOPM);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(e__JOPM,buffer__KOPM);
    } break;
    case __CAST__: {
      genere__WMFK(e__JOPM,buffer__KOPM);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(e__JOPM,buffer__KOPM);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(e__JOPM,buffer__KOPM);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__KOPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__JOPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(e__JOPM,buffer__KOPM);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(e__JOPM,buffer__KOPM);
    } break;
    };
    __tmp__VOPM=TRUE__;
  } else {
    __tmp__VOPM=FALSE__;
  };
  if ((! __tmp__VOPM)) {
    if (((void *)t__LOPM == (void *)type_block__BLB)) {
      switch (((struct ___OBJ *)e__JOPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__JOPM,buffer__KOPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__JOPM,buffer__KOPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__JOPM,buffer__KOPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__JOPM,buffer__KOPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__JOPM),buffer__KOPM);
        append__MOK(buffer__KOPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__JOPM,buffer__KOPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__KOPM,((__REAL_CST *)e__JOPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__QW4P=((__CHARACTER_CST *)e__JOPM);
        add_last__YPK(buffer__KOPM,'\'');
        append__MOK(buffer__KOPM,Self__QW4P->text__HO2H);
        add_last__YPK(buffer__KOPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__JOPM,buffer__KOPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__JOPM,buffer__KOPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__JOPM,buffer__KOPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__JOPM,buffer__KOPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__JOPM,buffer__KOPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__JOPM,buffer__KOPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__JOPM,buffer__KOPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__KOPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__JOPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__JOPM,buffer__KOPM);
      } break;
      };
    } else {
      append__MOK(buffer__KOPM,(&__string_513));
      switch (((struct ___OBJ *)e__JOPM)->__id) {
      case __LIST__: {
        genere__SFEK(e__JOPM,buffer__KOPM);
      } break;
      case __STRING_CST__: {
        genere__EGEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(e__JOPM,buffer__KOPM);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(e__JOPM,buffer__KOPM);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(e__JOPM,buffer__KOPM);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)e__JOPM),buffer__KOPM);
        append__MOK(buffer__KOPM,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(e__JOPM,buffer__KOPM);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__KOPM,((__REAL_CST *)e__JOPM)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__1W4P=((__CHARACTER_CST *)e__JOPM);
        add_last__YPK(buffer__KOPM,'\'');
        append__MOK(buffer__KOPM,Self__1W4P->text__HO2H);
        add_last__YPK(buffer__KOPM,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(e__JOPM,buffer__KOPM);
      } break;
      case __PUT_TO__: {
        genere__VKFK(e__JOPM,buffer__KOPM);
      } break;
      case __ITEM__: {
        genere__KMFK(e__JOPM,buffer__KOPM);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(e__JOPM,buffer__KOPM);
      } break;
      case __CAST__: {
        genere__WMFK(e__JOPM,buffer__KOPM);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(e__JOPM,buffer__KOPM);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(e__JOPM,buffer__KOPM);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__KOPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__JOPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(e__JOPM,buffer__KOPM);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(e__JOPM,buffer__KOPM);
      } break;
      };
      append__MOK(buffer__KOPM,(&__string_514));
    };
  };
}

static void put_access_id__in__HPPM(void *e__JPPM,void *buffer__KPPM)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __CHARACTER_CST *Self__GX4P;
  switch (((struct ___OBJ *)e__JPPM)->__id) {
  case __LIST__: {
    genere__SFEK(e__JPPM,buffer__KPPM);
  } break;
  case __STRING_CST__: {
    genere__EGEK(e__JPPM,buffer__KPPM);
  } break;
  case __EXTERNAL_C__: {
    genere__OJEK(e__JPPM,buffer__KPPM);
  } break;
  case __PROTOTYPE_CST__: {
    genere__AMEK(e__JPPM,buffer__KPPM);
  } break;
  case __INTEGER_CST__: {
    genere__EMEK(e__JPPM,buffer__KPPM);
  } break;
  case __READ_LOCAL__: {
    genere__FNEK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_MULTIPLE__: {
    display__UYFK(((__EXPR_MULTIPLE *)e__JPPM),buffer__KPPM);
    append__MOK(buffer__KPPM,(&__string_270));
  } break;
  case __EXPR_EQUAL__: {
    genere__HOEK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    genere__WSEK(e__JPPM,buffer__KPPM);
  } break;
  case __REAL_CST__: {
    append__MOK(buffer__KPPM,((__REAL_CST *)e__JPPM)->value__5N2H);
  } break;
  case __CHARACTER_CST__: {
    Self__GX4P=((__CHARACTER_CST *)e__JPPM);
    add_last__YPK(buffer__KPPM,'\'');
    append__MOK(buffer__KPPM,Self__GX4P->text__HO2H);
    add_last__YPK(buffer__KPPM,'\'');
  } break;
  case __IS_EXPANDED__: {
    print__1ZE((&__string_271));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __GET_TYPE_ID__: {
    genere__QXEK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_SUP__: {
    genere__KYEK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_SUB__: {
    genere__Z2EK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_MUL__: {
    genere__D5EK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_DIV__: {
    genere__NBFK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_AND__: {
    genere__XDFK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_SHIFT_R__: {
    genere__BGFK(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_SHIFT_L__: {
    genere__LIFK(e__JPPM,buffer__KPPM);
  } break;
  case __PUT_TO__: {
    genere__VKFK(e__JPPM,buffer__KPPM);
  } break;
  case __ITEM__: {
    genere__KMFK(e__JPPM,buffer__KPPM);
  } break;
  case __SIZE_OF__: {
    genere__PMFK(e__JPPM,buffer__KPPM);
  } break;
  case __CAST__: {
    genere__WMFK(e__JPPM,buffer__KPPM);
  } break;
  case __CALL_SLOT__: {
    genere__MJKL(e__JPPM,buffer__KPPM);
  } break;
  case __READ_SLOT__: {
    genere__NUNL(e__JPPM,buffer__KPPM);
  } break;
  case __READ_GLOBAL__: {
    append__MOK(buffer__KPPM,((__SLOT_DATA *)((__READ_GLOBAL *)e__JPPM)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
  } break;
  case __EXPR_NOT_LOGIC__: {
    genere__GZ0M(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_OR_LOGIC__: {
    genere__XVEO(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    genere__J2KO(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_AND_LOGIC__: {
    genere__4VEO(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    genere__R2KO(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_NEG__: {
    genere__CXJM(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_ADD__: {
    genere__VYML(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_NOT__: {
    genere__4JZM(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_MOD__: {
    genere__FWEO(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_SUP_EQ__: {
    genere__PCEP(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_INF__: {
    genere__LNRN(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_INF_EQ__: {
    genere__ZRRN(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_OR__: {
    genere__W0PN(e__JPPM,buffer__KPPM);
  } break;
  case __EXPR_XOR__: {
    genere__YAUO(e__JPPM,buffer__KPPM);
  } break;
  };
  append__MOK(buffer__KPPM,(&__string_402));
}

static __BOOLEAN is_empty__UJVL(__LIST *Self__VJVL)
// ({LIST}) With resultNo recursive, No inlinable.
{
  void *void___XJVL,*__tmp__OKVL;
  void *__tmp__NKVL;
  __BOOLEAN result__YJVL,__tmp__AKVL;
  void___XJVL=NULL;
  result__YJVL=FALSE__;
  if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__VJVL->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) ==  0)) {
    result__YJVL=TRUE__;
    __tmp__AKVL=TRUE__;
  } else {
    __tmp__AKVL=FALSE__;
  };
  if ((! __tmp__AKVL)) {
    if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)Self__VJVL->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) ==  1)) {
      __tmp__NKVL=((void **)((__FAST_ARRAYoINSTRo *)Self__VJVL->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
      if (__tmp__NKVL==NULL) {
        __tmp__OKVL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__NKVL)->__id) {
        case __LIST__: {
          __tmp__OKVL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__OKVL=NULL;
        } break;
        case __PUSH__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__OKVL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__OKVL=((void *)__tmp__NKVL);
        } break;
        case __INTEGER_CST__: {
          __tmp__OKVL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__OKVL=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__OKVL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__OKVL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__OKVL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__OKVL=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__OKVL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__OKVL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__OKVL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__OKVL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__OKVL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__OKVL=NULL;
        } break;
        case __ITEM__: {
          __tmp__OKVL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__OKVL=NULL;
        } break;
        case __CAST__: {
          __tmp__OKVL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__OKVL=NULL;
        } break;
        case __NOP__: {
          __tmp__OKVL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__OKVL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__OKVL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__OKVL=NULL;
        } break;
        case __LOOP__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__OKVL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__OKVL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__OKVL=NULL;
        } break;
        }
      };
      void___XJVL=__tmp__OKVL;
      result__YJVL=(((void *)__tmp__OKVL != (void *)NULL) && ((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__OKVL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)TYPE_VOID__));
    };
  };
  return(result__YJVL);
}

static void genere_value__0JTK(__WRITE_GLOBAL *Self__1JTK,void *buffer__2JTK)
// ({WRITE_GLOBAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__EKTK,*__tmp__ZKTK,*__tmp__QLTK,*__tmp__ZLTK,*__tmp__FMTK;
  void *__tmp__TMTK,*__tmp__ZMTK;
  void *__tmp__FKTK,*__tmp__RLTK,*__tmp__0LTK,*__tmp__GMTK;
  __CHARACTER_CST *Self__TY4P,*Self__A04P,*Self__L04P;
  __BOOLEAN __tmp__KKTK,__tmp__1KTK,__tmp__4LTK,__tmp__LMTK,__tmp__MMTK;
  if (((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__1JTK->global__4U1H)->parent_variable__AJZD.type__125F)->flag__LTL &  16) !=  0)) {
    __tmp__EKTK=Self__1JTK->parent_write__QBGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__EKTK)->__id) {
    case __LIST__: {
      __tmp__FKTK=static_type__GIQG(__tmp__EKTK);
    } break;
    case __STRING_CST__: {
      __tmp__FKTK=((__STRING_CST *)__tmp__EKTK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FKTK=((__EXTERNAL_C *)__tmp__EKTK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FKTK=((__PROTOTYPE_CST *)__tmp__EKTK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__FKTK=((__INTEGER_CST *)__tmp__EKTK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__FKTK=((__LOCAL *)((__READ_LOCAL *)__tmp__EKTK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FKTK=static_type__0N1H(__tmp__EKTK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FKTK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FKTK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__FKTK=((__REAL_CST *)__tmp__EKTK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__FKTK=((__CHARACTER_CST *)__tmp__EKTK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__FKTK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FKTK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__FKTK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__FKTK=static_type__MP1H(__tmp__EKTK);
    } break;
    case __EXPR_MUL__: {
      __tmp__FKTK=static_type__SP1H(__tmp__EKTK);
    } break;
    case __EXPR_DIV__: {
      __tmp__FKTK=static_type__XP1H(__tmp__EKTK);
    } break;
    case __EXPR_AND__: {
      __tmp__FKTK=static_type__2P1H(__tmp__EKTK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FKTK=static_type__BQ1H(__tmp__EKTK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FKTK=static_type__GQ1H(__tmp__EKTK);
    } break;
    case __PUT_TO__: {
      __tmp__FKTK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__FKTK=static_type__PQ1H(__tmp__EKTK);
    } break;
    case __SIZE_OF__: {
      __tmp__FKTK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__FKTK=((__CAST *)__tmp__EKTK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__FKTK=static_type__GIKL(__tmp__EKTK);
    } break;
    case __READ_SLOT__: {
      __tmp__FKTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__EKTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__FKTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__EKTK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FKTK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FKTK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FKTK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FKTK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FKTK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__FKTK=static_type__Z2IM(__tmp__EKTK);
    } break;
    case __EXPR_ADD__: {
      __tmp__FKTK=static_type__IXML(__tmp__EKTK);
    } break;
    case __EXPR_NOT__: {
      __tmp__FKTK=static_type__BTXM(__tmp__EKTK);
    } break;
    case __EXPR_MOD__: {
      __tmp__FKTK=static_type__5LEO(__tmp__EKTK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FKTK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__FKTK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FKTK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__FKTK=static_type__NOPN(__tmp__EKTK);
    } break;
    case __EXPR_XOR__: {
      __tmp__FKTK=static_type__XCSO(__tmp__EKTK);
    } break;
    };
    __tmp__KKTK=(! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__FKTK)->flag__LTL &  16) !=  0));
  } else {
    __tmp__KKTK=FALSE__;
  };
  if (__tmp__KKTK) {
    append__MOK(buffer__2JTK,(&__string_515));
    __tmp__ZKTK=Self__1JTK->parent_write__QBGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__ZKTK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__ZKTK),buffer__2JTK);
      append__MOK(buffer__2JTK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__2JTK,((__REAL_CST *)__tmp__ZKTK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__TY4P=((__CHARACTER_CST *)__tmp__ZKTK);
      add_last__YPK(buffer__2JTK,'\'');
      append__MOK(buffer__2JTK,Self__TY4P->text__HO2H);
      add_last__YPK(buffer__2JTK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__2JTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZKTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__ZKTK,buffer__2JTK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__ZKTK,buffer__2JTK);
    } break;
    };
    add_last__YPK(buffer__2JTK,')');
    __tmp__1KTK=TRUE__;
  } else {
    __tmp__1KTK=FALSE__;
  };
  if ((! __tmp__1KTK)) {
    if ((((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__1JTK->global__4U1H)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__1JTK->global__4U1H)->parent_variable__AJZD.type__125F)->flag__LTL &  16) !=  0)))) {
      __tmp__QLTK=Self__1JTK->parent_write__QBGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__QLTK)->__id) {
      case __LIST__: {
        __tmp__RLTK=static_type__GIQG(__tmp__QLTK);
      } break;
      case __STRING_CST__: {
        __tmp__RLTK=((__STRING_CST *)__tmp__QLTK)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__RLTK=((__EXTERNAL_C *)__tmp__QLTK)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__RLTK=((__PROTOTYPE_CST *)__tmp__QLTK)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__RLTK=((__INTEGER_CST *)__tmp__QLTK)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__RLTK=((__LOCAL *)((__READ_LOCAL *)__tmp__QLTK)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__RLTK=static_type__0N1H(__tmp__QLTK);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__RLTK=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__RLTK=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__RLTK=((__REAL_CST *)__tmp__QLTK)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__RLTK=((__CHARACTER_CST *)__tmp__QLTK)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__RLTK=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__RLTK=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__RLTK=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__RLTK=static_type__MP1H(__tmp__QLTK);
      } break;
      case __EXPR_MUL__: {
        __tmp__RLTK=static_type__SP1H(__tmp__QLTK);
      } break;
      case __EXPR_DIV__: {
        __tmp__RLTK=static_type__XP1H(__tmp__QLTK);
      } break;
      case __EXPR_AND__: {
        __tmp__RLTK=static_type__2P1H(__tmp__QLTK);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__RLTK=static_type__BQ1H(__tmp__QLTK);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__RLTK=static_type__GQ1H(__tmp__QLTK);
      } break;
      case __PUT_TO__: {
        __tmp__RLTK=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__RLTK=static_type__PQ1H(__tmp__QLTK);
      } break;
      case __SIZE_OF__: {
        __tmp__RLTK=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__RLTK=((__CAST *)__tmp__QLTK)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__RLTK=static_type__GIKL(__tmp__QLTK);
      } break;
      case __READ_SLOT__: {
        __tmp__RLTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__QLTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__RLTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__QLTK)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__RLTK=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__RLTK=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__RLTK=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__RLTK=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__RLTK=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__RLTK=static_type__Z2IM(__tmp__QLTK);
      } break;
      case __EXPR_ADD__: {
        __tmp__RLTK=static_type__IXML(__tmp__QLTK);
      } break;
      case __EXPR_NOT__: {
        __tmp__RLTK=static_type__BTXM(__tmp__QLTK);
      } break;
      case __EXPR_MOD__: {
        __tmp__RLTK=static_type__5LEO(__tmp__QLTK);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__RLTK=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__RLTK=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__RLTK=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__RLTK=static_type__NOPN(__tmp__QLTK);
      } break;
      case __EXPR_XOR__: {
        __tmp__RLTK=static_type__XCSO(__tmp__QLTK);
      } break;
      };
      if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__RLTK)->flag__LTL &  1) !=  0))) {
        __tmp__4LTK=TRUE__;
      } else {
        __tmp__ZLTK=Self__1JTK->parent_write__QBGH.value__HBEH;
        switch (((struct ___OBJ *)__tmp__ZLTK)->__id) {
        case __LIST__: {
          __tmp__0LTK=static_type__GIQG(__tmp__ZLTK);
        } break;
        case __STRING_CST__: {
          __tmp__0LTK=((__STRING_CST *)__tmp__ZLTK)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__0LTK=((__EXTERNAL_C *)__tmp__ZLTK)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__0LTK=((__PROTOTYPE_CST *)__tmp__ZLTK)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__0LTK=((__INTEGER_CST *)__tmp__ZLTK)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__0LTK=((__LOCAL *)((__READ_LOCAL *)__tmp__ZLTK)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__0LTK=static_type__0N1H(__tmp__ZLTK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__0LTK=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__0LTK=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__0LTK=((__REAL_CST *)__tmp__ZLTK)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__0LTK=((__CHARACTER_CST *)__tmp__ZLTK)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__0LTK=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__0LTK=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__0LTK=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__0LTK=static_type__MP1H(__tmp__ZLTK);
        } break;
        case __EXPR_MUL__: {
          __tmp__0LTK=static_type__SP1H(__tmp__ZLTK);
        } break;
        case __EXPR_DIV__: {
          __tmp__0LTK=static_type__XP1H(__tmp__ZLTK);
        } break;
        case __EXPR_AND__: {
          __tmp__0LTK=static_type__2P1H(__tmp__ZLTK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__0LTK=static_type__BQ1H(__tmp__ZLTK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__0LTK=static_type__GQ1H(__tmp__ZLTK);
        } break;
        case __PUT_TO__: {
          __tmp__0LTK=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__0LTK=static_type__PQ1H(__tmp__ZLTK);
        } break;
        case __SIZE_OF__: {
          __tmp__0LTK=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__0LTK=((__CAST *)__tmp__ZLTK)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__0LTK=static_type__GIKL(__tmp__ZLTK);
        } break;
        case __READ_SLOT__: {
          __tmp__0LTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ZLTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__0LTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZLTK)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__0LTK=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__0LTK=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__0LTK=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__0LTK=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__0LTK=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__0LTK=static_type__Z2IM(__tmp__ZLTK);
        } break;
        case __EXPR_ADD__: {
          __tmp__0LTK=static_type__IXML(__tmp__ZLTK);
        } break;
        case __EXPR_NOT__: {
          __tmp__0LTK=static_type__BTXM(__tmp__ZLTK);
        } break;
        case __EXPR_MOD__: {
          __tmp__0LTK=static_type__5LEO(__tmp__ZLTK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__0LTK=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__0LTK=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__0LTK=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__0LTK=static_type__NOPN(__tmp__ZLTK);
        } break;
        case __EXPR_XOR__: {
          __tmp__0LTK=static_type__XCSO(__tmp__ZLTK);
        } break;
        };
        __tmp__4LTK=((__UINTEGER_8)(((__TYPE_FULL *)__tmp__0LTK)->flag__LTL &  16) !=  0);
      };
      __tmp__LMTK=__tmp__4LTK;
    } else {
      __tmp__LMTK=FALSE__;
    };
    if (__tmp__LMTK) {
      __tmp__FMTK=Self__1JTK->parent_write__QBGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__FMTK)->__id) {
      case __LIST__: {
        __tmp__GMTK=static_type__GIQG(__tmp__FMTK);
      } break;
      case __STRING_CST__: {
        __tmp__GMTK=((__STRING_CST *)__tmp__FMTK)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__GMTK=((__EXTERNAL_C *)__tmp__FMTK)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__GMTK=((__PROTOTYPE_CST *)__tmp__FMTK)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__GMTK=((__INTEGER_CST *)__tmp__FMTK)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__GMTK=((__LOCAL *)((__READ_LOCAL *)__tmp__FMTK)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__GMTK=static_type__0N1H(__tmp__FMTK);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__GMTK=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__GMTK=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__GMTK=((__REAL_CST *)__tmp__FMTK)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__GMTK=((__CHARACTER_CST *)__tmp__FMTK)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__GMTK=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__GMTK=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__GMTK=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__GMTK=static_type__MP1H(__tmp__FMTK);
      } break;
      case __EXPR_MUL__: {
        __tmp__GMTK=static_type__SP1H(__tmp__FMTK);
      } break;
      case __EXPR_DIV__: {
        __tmp__GMTK=static_type__XP1H(__tmp__FMTK);
      } break;
      case __EXPR_AND__: {
        __tmp__GMTK=static_type__2P1H(__tmp__FMTK);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__GMTK=static_type__BQ1H(__tmp__FMTK);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__GMTK=static_type__GQ1H(__tmp__FMTK);
      } break;
      case __PUT_TO__: {
        __tmp__GMTK=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__GMTK=static_type__PQ1H(__tmp__FMTK);
      } break;
      case __SIZE_OF__: {
        __tmp__GMTK=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__GMTK=((__CAST *)__tmp__FMTK)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__GMTK=static_type__GIKL(__tmp__FMTK);
      } break;
      case __READ_SLOT__: {
        __tmp__GMTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__FMTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__GMTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__FMTK)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__GMTK=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__GMTK=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__GMTK=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__GMTK=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__GMTK=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__GMTK=static_type__Z2IM(__tmp__FMTK);
      } break;
      case __EXPR_ADD__: {
        __tmp__GMTK=static_type__IXML(__tmp__FMTK);
      } break;
      case __EXPR_NOT__: {
        __tmp__GMTK=static_type__BTXM(__tmp__FMTK);
      } break;
      case __EXPR_MOD__: {
        __tmp__GMTK=static_type__5LEO(__tmp__FMTK);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__GMTK=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__GMTK=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__GMTK=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__GMTK=static_type__NOPN(__tmp__FMTK);
      } break;
      case __EXPR_XOR__: {
        __tmp__GMTK=static_type__XCSO(__tmp__FMTK);
      } break;
      };
      __tmp__MMTK=((void *)((__TYPE_FULL *)__tmp__GMTK)->parent_type__KTL != (void *)TYPE_NULL__);
    } else {
      __tmp__MMTK=FALSE__;
    };
    if (__tmp__MMTK) {
      append__MOK(buffer__2JTK,(&__string_404));
      __tmp__TMTK=Self__1JTK->parent_write__QBGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__TMTK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__TMTK),buffer__2JTK);
        append__MOK(buffer__2JTK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__2JTK,((__REAL_CST *)__tmp__TMTK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__A04P=((__CHARACTER_CST *)__tmp__TMTK);
        add_last__YPK(buffer__2JTK,'\'');
        append__MOK(buffer__2JTK,Self__A04P->text__HO2H);
        add_last__YPK(buffer__2JTK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__TMTK,buffer__2JTK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__TMTK,buffer__2JTK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__TMTK,buffer__2JTK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__2JTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TMTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__TMTK,buffer__2JTK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__TMTK,buffer__2JTK);
      } break;
      };
      add_last__YPK(buffer__2JTK,')');
    } else {
      __tmp__ZMTK=Self__1JTK->parent_write__QBGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__ZMTK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__ZMTK),buffer__2JTK);
        append__MOK(buffer__2JTK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__2JTK,((__REAL_CST *)__tmp__ZMTK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__L04P=((__CHARACTER_CST *)__tmp__ZMTK);
        add_last__YPK(buffer__2JTK,'\'');
        append__MOK(buffer__2JTK,Self__L04P->text__HO2H);
        add_last__YPK(buffer__2JTK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__2JTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ZMTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__ZMTK,buffer__2JTK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__ZMTK,buffer__2JTK);
      } break;
      };
    };
  };
}

static void genere_value__LNTK(__WRITE_SLOT *Self__MNTK,void *buffer__NNTK)
// ({WRITE_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__VNTK,*__tmp__KOTK,*__tmp__BPTK,*__tmp__KPTK,*__tmp__WPTK;
  void *__tmp__EQTK,*__tmp__KQTK;
  void *__tmp__WNTK,*__tmp__CPTK,*__tmp__LPTK,*__tmp__XPTK;
  __CHARACTER_CST *Self__Q14P,*Self__324P,*Self__I34P;
  __BOOLEAN __tmp__1NTK,__tmp__MOTK,__tmp__PPTK,__tmp__2PTK,__tmp__3PTK;
  if (((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__MNTK->slot__5T1H)->parent_variable__AJZD.type__125F)->flag__LTL &  16) !=  0)) {
    __tmp__VNTK=Self__MNTK->parent_write__3BGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__VNTK)->__id) {
    case __LIST__: {
      __tmp__WNTK=static_type__GIQG(__tmp__VNTK);
    } break;
    case __STRING_CST__: {
      __tmp__WNTK=((__STRING_CST *)__tmp__VNTK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WNTK=((__EXTERNAL_C *)__tmp__VNTK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WNTK=((__PROTOTYPE_CST *)__tmp__VNTK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__WNTK=((__INTEGER_CST *)__tmp__VNTK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__WNTK=((__LOCAL *)((__READ_LOCAL *)__tmp__VNTK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WNTK=static_type__0N1H(__tmp__VNTK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WNTK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WNTK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__WNTK=((__REAL_CST *)__tmp__VNTK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WNTK=((__CHARACTER_CST *)__tmp__VNTK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WNTK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WNTK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__WNTK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__WNTK=static_type__MP1H(__tmp__VNTK);
    } break;
    case __EXPR_MUL__: {
      __tmp__WNTK=static_type__SP1H(__tmp__VNTK);
    } break;
    case __EXPR_DIV__: {
      __tmp__WNTK=static_type__XP1H(__tmp__VNTK);
    } break;
    case __EXPR_AND__: {
      __tmp__WNTK=static_type__2P1H(__tmp__VNTK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WNTK=static_type__BQ1H(__tmp__VNTK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WNTK=static_type__GQ1H(__tmp__VNTK);
    } break;
    case __PUT_TO__: {
      __tmp__WNTK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__WNTK=static_type__PQ1H(__tmp__VNTK);
    } break;
    case __SIZE_OF__: {
      __tmp__WNTK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__WNTK=((__CAST *)__tmp__VNTK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__WNTK=static_type__GIKL(__tmp__VNTK);
    } break;
    case __READ_SLOT__: {
      __tmp__WNTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__VNTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WNTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__VNTK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WNTK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WNTK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WNTK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WNTK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WNTK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__WNTK=static_type__Z2IM(__tmp__VNTK);
    } break;
    case __EXPR_ADD__: {
      __tmp__WNTK=static_type__IXML(__tmp__VNTK);
    } break;
    case __EXPR_NOT__: {
      __tmp__WNTK=static_type__BTXM(__tmp__VNTK);
    } break;
    case __EXPR_MOD__: {
      __tmp__WNTK=static_type__5LEO(__tmp__VNTK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WNTK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__WNTK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WNTK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__WNTK=static_type__NOPN(__tmp__VNTK);
    } break;
    case __EXPR_XOR__: {
      __tmp__WNTK=static_type__XCSO(__tmp__VNTK);
    } break;
    };
    __tmp__1NTK=(! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__WNTK)->flag__LTL &  16) !=  0));
  } else {
    __tmp__1NTK=FALSE__;
  };
  if (__tmp__1NTK) {
    append__MOK(buffer__NNTK,(&__string_515));
    __tmp__KOTK=Self__MNTK->parent_write__3BGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__KOTK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__KOTK),buffer__NNTK);
      append__MOK(buffer__NNTK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__NNTK,((__REAL_CST *)__tmp__KOTK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__Q14P=((__CHARACTER_CST *)__tmp__KOTK);
      add_last__YPK(buffer__NNTK,'\'');
      append__MOK(buffer__NNTK,Self__Q14P->text__HO2H);
      add_last__YPK(buffer__NNTK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__KOTK,buffer__NNTK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__KOTK,buffer__NNTK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__KOTK,buffer__NNTK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__NNTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KOTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__KOTK,buffer__NNTK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__KOTK,buffer__NNTK);
    } break;
    };
    add_last__YPK(buffer__NNTK,')');
    __tmp__MOTK=TRUE__;
  } else {
    __tmp__MOTK=FALSE__;
  };
  if ((! __tmp__MOTK)) {
    if ((((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__MNTK->slot__5T1H)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__MNTK->slot__5T1H)->parent_variable__AJZD.type__125F)->flag__LTL &  16) !=  0)))) {
      __tmp__BPTK=Self__MNTK->parent_write__3BGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__BPTK)->__id) {
      case __LIST__: {
        __tmp__CPTK=static_type__GIQG(__tmp__BPTK);
      } break;
      case __STRING_CST__: {
        __tmp__CPTK=((__STRING_CST *)__tmp__BPTK)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__CPTK=((__EXTERNAL_C *)__tmp__BPTK)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__CPTK=((__PROTOTYPE_CST *)__tmp__BPTK)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__CPTK=((__INTEGER_CST *)__tmp__BPTK)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__CPTK=((__LOCAL *)((__READ_LOCAL *)__tmp__BPTK)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__CPTK=static_type__0N1H(__tmp__BPTK);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__CPTK=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__CPTK=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__CPTK=((__REAL_CST *)__tmp__BPTK)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__CPTK=((__CHARACTER_CST *)__tmp__BPTK)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__CPTK=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__CPTK=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__CPTK=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__CPTK=static_type__MP1H(__tmp__BPTK);
      } break;
      case __EXPR_MUL__: {
        __tmp__CPTK=static_type__SP1H(__tmp__BPTK);
      } break;
      case __EXPR_DIV__: {
        __tmp__CPTK=static_type__XP1H(__tmp__BPTK);
      } break;
      case __EXPR_AND__: {
        __tmp__CPTK=static_type__2P1H(__tmp__BPTK);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__CPTK=static_type__BQ1H(__tmp__BPTK);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__CPTK=static_type__GQ1H(__tmp__BPTK);
      } break;
      case __PUT_TO__: {
        __tmp__CPTK=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__CPTK=static_type__PQ1H(__tmp__BPTK);
      } break;
      case __SIZE_OF__: {
        __tmp__CPTK=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__CPTK=((__CAST *)__tmp__BPTK)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__CPTK=static_type__GIKL(__tmp__BPTK);
      } break;
      case __READ_SLOT__: {
        __tmp__CPTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__BPTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__CPTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__BPTK)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__CPTK=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__CPTK=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__CPTK=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__CPTK=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__CPTK=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__CPTK=static_type__Z2IM(__tmp__BPTK);
      } break;
      case __EXPR_ADD__: {
        __tmp__CPTK=static_type__IXML(__tmp__BPTK);
      } break;
      case __EXPR_NOT__: {
        __tmp__CPTK=static_type__BTXM(__tmp__BPTK);
      } break;
      case __EXPR_MOD__: {
        __tmp__CPTK=static_type__5LEO(__tmp__BPTK);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__CPTK=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__CPTK=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__CPTK=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__CPTK=static_type__NOPN(__tmp__BPTK);
      } break;
      case __EXPR_XOR__: {
        __tmp__CPTK=static_type__XCSO(__tmp__BPTK);
      } break;
      };
      if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__CPTK)->flag__LTL &  1) !=  0))) {
        __tmp__PPTK=TRUE__;
      } else {
        __tmp__KPTK=Self__MNTK->parent_write__3BGH.value__HBEH;
        switch (((struct ___OBJ *)__tmp__KPTK)->__id) {
        case __LIST__: {
          __tmp__LPTK=static_type__GIQG(__tmp__KPTK);
        } break;
        case __STRING_CST__: {
          __tmp__LPTK=((__STRING_CST *)__tmp__KPTK)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__LPTK=((__EXTERNAL_C *)__tmp__KPTK)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__LPTK=((__PROTOTYPE_CST *)__tmp__KPTK)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__LPTK=((__INTEGER_CST *)__tmp__KPTK)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__LPTK=((__LOCAL *)((__READ_LOCAL *)__tmp__KPTK)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__LPTK=static_type__0N1H(__tmp__KPTK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__LPTK=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__LPTK=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__LPTK=((__REAL_CST *)__tmp__KPTK)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__LPTK=((__CHARACTER_CST *)__tmp__KPTK)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__LPTK=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__LPTK=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__LPTK=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__LPTK=static_type__MP1H(__tmp__KPTK);
        } break;
        case __EXPR_MUL__: {
          __tmp__LPTK=static_type__SP1H(__tmp__KPTK);
        } break;
        case __EXPR_DIV__: {
          __tmp__LPTK=static_type__XP1H(__tmp__KPTK);
        } break;
        case __EXPR_AND__: {
          __tmp__LPTK=static_type__2P1H(__tmp__KPTK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__LPTK=static_type__BQ1H(__tmp__KPTK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__LPTK=static_type__GQ1H(__tmp__KPTK);
        } break;
        case __PUT_TO__: {
          __tmp__LPTK=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__LPTK=static_type__PQ1H(__tmp__KPTK);
        } break;
        case __SIZE_OF__: {
          __tmp__LPTK=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__LPTK=((__CAST *)__tmp__KPTK)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__LPTK=static_type__GIKL(__tmp__KPTK);
        } break;
        case __READ_SLOT__: {
          __tmp__LPTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__KPTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__LPTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KPTK)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__LPTK=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__LPTK=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__LPTK=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__LPTK=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__LPTK=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__LPTK=static_type__Z2IM(__tmp__KPTK);
        } break;
        case __EXPR_ADD__: {
          __tmp__LPTK=static_type__IXML(__tmp__KPTK);
        } break;
        case __EXPR_NOT__: {
          __tmp__LPTK=static_type__BTXM(__tmp__KPTK);
        } break;
        case __EXPR_MOD__: {
          __tmp__LPTK=static_type__5LEO(__tmp__KPTK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__LPTK=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__LPTK=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__LPTK=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__LPTK=static_type__NOPN(__tmp__KPTK);
        } break;
        case __EXPR_XOR__: {
          __tmp__LPTK=static_type__XCSO(__tmp__KPTK);
        } break;
        };
        __tmp__PPTK=((__UINTEGER_8)(((__TYPE_FULL *)__tmp__LPTK)->flag__LTL &  16) !=  0);
      };
      __tmp__2PTK=__tmp__PPTK;
    } else {
      __tmp__2PTK=FALSE__;
    };
    if (__tmp__2PTK) {
      __tmp__WPTK=Self__MNTK->parent_write__3BGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__WPTK)->__id) {
      case __LIST__: {
        __tmp__XPTK=static_type__GIQG(__tmp__WPTK);
      } break;
      case __STRING_CST__: {
        __tmp__XPTK=((__STRING_CST *)__tmp__WPTK)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__XPTK=((__EXTERNAL_C *)__tmp__WPTK)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__XPTK=((__PROTOTYPE_CST *)__tmp__WPTK)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__XPTK=((__INTEGER_CST *)__tmp__WPTK)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__XPTK=((__LOCAL *)((__READ_LOCAL *)__tmp__WPTK)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__XPTK=static_type__0N1H(__tmp__WPTK);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__XPTK=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__XPTK=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__XPTK=((__REAL_CST *)__tmp__WPTK)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__XPTK=((__CHARACTER_CST *)__tmp__WPTK)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__XPTK=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__XPTK=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__XPTK=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__XPTK=static_type__MP1H(__tmp__WPTK);
      } break;
      case __EXPR_MUL__: {
        __tmp__XPTK=static_type__SP1H(__tmp__WPTK);
      } break;
      case __EXPR_DIV__: {
        __tmp__XPTK=static_type__XP1H(__tmp__WPTK);
      } break;
      case __EXPR_AND__: {
        __tmp__XPTK=static_type__2P1H(__tmp__WPTK);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__XPTK=static_type__BQ1H(__tmp__WPTK);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__XPTK=static_type__GQ1H(__tmp__WPTK);
      } break;
      case __PUT_TO__: {
        __tmp__XPTK=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__XPTK=static_type__PQ1H(__tmp__WPTK);
      } break;
      case __SIZE_OF__: {
        __tmp__XPTK=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__XPTK=((__CAST *)__tmp__WPTK)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__XPTK=static_type__GIKL(__tmp__WPTK);
      } break;
      case __READ_SLOT__: {
        __tmp__XPTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__WPTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__XPTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__WPTK)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__XPTK=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__XPTK=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__XPTK=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__XPTK=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__XPTK=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__XPTK=static_type__Z2IM(__tmp__WPTK);
      } break;
      case __EXPR_ADD__: {
        __tmp__XPTK=static_type__IXML(__tmp__WPTK);
      } break;
      case __EXPR_NOT__: {
        __tmp__XPTK=static_type__BTXM(__tmp__WPTK);
      } break;
      case __EXPR_MOD__: {
        __tmp__XPTK=static_type__5LEO(__tmp__WPTK);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__XPTK=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__XPTK=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__XPTK=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__XPTK=static_type__NOPN(__tmp__WPTK);
      } break;
      case __EXPR_XOR__: {
        __tmp__XPTK=static_type__XCSO(__tmp__WPTK);
      } break;
      };
      __tmp__3PTK=((void *)((__TYPE_FULL *)__tmp__XPTK)->parent_type__KTL != (void *)TYPE_NULL__);
    } else {
      __tmp__3PTK=FALSE__;
    };
    if (__tmp__3PTK) {
      append__MOK(buffer__NNTK,(&__string_404));
      __tmp__EQTK=Self__MNTK->parent_write__3BGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__EQTK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__EQTK),buffer__NNTK);
        append__MOK(buffer__NNTK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__NNTK,((__REAL_CST *)__tmp__EQTK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__324P=((__CHARACTER_CST *)__tmp__EQTK);
        add_last__YPK(buffer__NNTK,'\'');
        append__MOK(buffer__NNTK,Self__324P->text__HO2H);
        add_last__YPK(buffer__NNTK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__EQTK,buffer__NNTK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__EQTK,buffer__NNTK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__EQTK,buffer__NNTK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__NNTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__EQTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__EQTK,buffer__NNTK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__EQTK,buffer__NNTK);
      } break;
      };
      add_last__YPK(buffer__NNTK,')');
    } else {
      __tmp__KQTK=Self__MNTK->parent_write__3BGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__KQTK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__KQTK),buffer__NNTK);
        append__MOK(buffer__NNTK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__NNTK,((__REAL_CST *)__tmp__KQTK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__I34P=((__CHARACTER_CST *)__tmp__KQTK);
        add_last__YPK(buffer__NNTK,'\'');
        append__MOK(buffer__NNTK,Self__I34P->text__HO2H);
        add_last__YPK(buffer__NNTK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__KQTK,buffer__NNTK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__KQTK,buffer__NNTK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__KQTK,buffer__NNTK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__NNTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__KQTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__KQTK,buffer__NNTK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__KQTK,buffer__NNTK);
      } break;
      };
    };
  };
}

static __BOOLEAN is_external__23NM(__CALL_SLOT *Self__33NM)
// ({CALL_SLOT}) With resultNo recursive, No inlinable.
{
  void *__tmp__53NM;
  __BOOLEAN __tmp__B4NM;
  __tmp__53NM=Self__33NM->profil__QA2H;
  if (((struct ___OBJ *)__tmp__53NM)->__id==__PROFIL_SLOT__) {
    __tmp__B4NM=((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)__tmp__53NM)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_30));
  } else {
    __tmp__B4NM=FALSE__;
  };
  return(__tmp__B4NM);
}

static void genere_value__HRTK(__WRITE_LOCAL *Self__IRTK,void *buffer__JRTK)
// ({WRITE_LOCAL},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  void *__tmp__RRTK,*__tmp__GSTK,*__tmp__3STK,*__tmp__GTTK,*__tmp__STTK;
  void *__tmp__AUTK,*__tmp__GUTK;
  void *__tmp__SRTK,*__tmp__4STK,*__tmp__HTTK,*__tmp__TTTK;
  __CHARACTER_CST *Self__R44P,*Self__454P,*Self__JA5P;
  __BOOLEAN __tmp__XRTK,__tmp__ISTK,__tmp__LTTK,__tmp__YTTK,__tmp__ZTTK;
  if (((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)Self__IRTK->local__2RIJ)->parent_variable__B2LC.type__125F)->flag__LTL &  16) !=  0)) {
    __tmp__RRTK=Self__IRTK->parent_write__X50I.value__HBEH;
    switch (((struct ___OBJ *)__tmp__RRTK)->__id) {
    case __LIST__: {
      __tmp__SRTK=static_type__GIQG(__tmp__RRTK);
    } break;
    case __STRING_CST__: {
      __tmp__SRTK=((__STRING_CST *)__tmp__RRTK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__SRTK=((__EXTERNAL_C *)__tmp__RRTK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__SRTK=((__PROTOTYPE_CST *)__tmp__RRTK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__SRTK=((__INTEGER_CST *)__tmp__RRTK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__SRTK=((__LOCAL *)((__READ_LOCAL *)__tmp__RRTK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__SRTK=static_type__0N1H(__tmp__RRTK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__SRTK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__SRTK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__SRTK=((__REAL_CST *)__tmp__RRTK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__SRTK=((__CHARACTER_CST *)__tmp__RRTK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__SRTK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__SRTK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__SRTK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__SRTK=static_type__MP1H(__tmp__RRTK);
    } break;
    case __EXPR_MUL__: {
      __tmp__SRTK=static_type__SP1H(__tmp__RRTK);
    } break;
    case __EXPR_DIV__: {
      __tmp__SRTK=static_type__XP1H(__tmp__RRTK);
    } break;
    case __EXPR_AND__: {
      __tmp__SRTK=static_type__2P1H(__tmp__RRTK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__SRTK=static_type__BQ1H(__tmp__RRTK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__SRTK=static_type__GQ1H(__tmp__RRTK);
    } break;
    case __PUT_TO__: {
      __tmp__SRTK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__SRTK=static_type__PQ1H(__tmp__RRTK);
    } break;
    case __SIZE_OF__: {
      __tmp__SRTK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__SRTK=((__CAST *)__tmp__RRTK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__SRTK=static_type__GIKL(__tmp__RRTK);
    } break;
    case __READ_SLOT__: {
      __tmp__SRTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__RRTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__SRTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__RRTK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__SRTK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__SRTK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__SRTK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__SRTK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__SRTK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__SRTK=static_type__Z2IM(__tmp__RRTK);
    } break;
    case __EXPR_ADD__: {
      __tmp__SRTK=static_type__IXML(__tmp__RRTK);
    } break;
    case __EXPR_NOT__: {
      __tmp__SRTK=static_type__BTXM(__tmp__RRTK);
    } break;
    case __EXPR_MOD__: {
      __tmp__SRTK=static_type__5LEO(__tmp__RRTK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__SRTK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__SRTK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__SRTK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__SRTK=static_type__NOPN(__tmp__RRTK);
    } break;
    case __EXPR_XOR__: {
      __tmp__SRTK=static_type__XCSO(__tmp__RRTK);
    } break;
    };
    __tmp__XRTK=(! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__SRTK)->flag__LTL &  16) !=  0));
  } else {
    __tmp__XRTK=FALSE__;
  };
  if (__tmp__XRTK) {
    append__MOK(buffer__JRTK,(&__string_515));
    __tmp__GSTK=Self__IRTK->parent_write__X50I.value__HBEH;
    switch (((struct ___OBJ *)__tmp__GSTK)->__id) {
    case __LIST__: {
      genere__SFEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __STRING_CST__: {
      genere__EGEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXTERNAL_C__: {
      genere__OJEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __PROTOTYPE_CST__: {
      genere__AMEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __INTEGER_CST__: {
      genere__EMEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __READ_LOCAL__: {
      genere__FNEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_MULTIPLE__: {
      display__UYFK(((__EXPR_MULTIPLE *)__tmp__GSTK),buffer__JRTK);
      append__MOK(buffer__JRTK,(&__string_270));
    } break;
    case __EXPR_EQUAL__: {
      genere__HOEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      genere__WSEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __REAL_CST__: {
      append__MOK(buffer__JRTK,((__REAL_CST *)__tmp__GSTK)->value__5N2H);
    } break;
    case __CHARACTER_CST__: {
      Self__R44P=((__CHARACTER_CST *)__tmp__GSTK);
      add_last__YPK(buffer__JRTK,'\'');
      append__MOK(buffer__JRTK,Self__R44P->text__HO2H);
      add_last__YPK(buffer__JRTK,'\'');
    } break;
    case __IS_EXPANDED__: {
      print__1ZE((&__string_271));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __GET_TYPE_ID__: {
      genere__QXEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_SUP__: {
      genere__KYEK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_SUB__: {
      genere__Z2EK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_MUL__: {
      genere__D5EK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_DIV__: {
      genere__NBFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_AND__: {
      genere__XDFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_SHIFT_R__: {
      genere__BGFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_SHIFT_L__: {
      genere__LIFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __PUT_TO__: {
      genere__VKFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __ITEM__: {
      genere__KMFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __SIZE_OF__: {
      genere__PMFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __CAST__: {
      genere__WMFK(__tmp__GSTK,buffer__JRTK);
    } break;
    case __CALL_SLOT__: {
      genere__MJKL(__tmp__GSTK,buffer__JRTK);
    } break;
    case __READ_SLOT__: {
      genere__NUNL(__tmp__GSTK,buffer__JRTK);
    } break;
    case __READ_GLOBAL__: {
      append__MOK(buffer__JRTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__GSTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
    } break;
    case __EXPR_NOT_LOGIC__: {
      genere__GZ0M(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_OR_LOGIC__: {
      genere__XVEO(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      genere__J2KO(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_AND_LOGIC__: {
      genere__4VEO(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      genere__R2KO(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_NEG__: {
      genere__CXJM(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_ADD__: {
      genere__VYML(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_NOT__: {
      genere__4JZM(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_MOD__: {
      genere__FWEO(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_SUP_EQ__: {
      genere__PCEP(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_INF__: {
      genere__LNRN(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_INF_EQ__: {
      genere__ZRRN(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_OR__: {
      genere__W0PN(__tmp__GSTK,buffer__JRTK);
    } break;
    case __EXPR_XOR__: {
      genere__YAUO(__tmp__GSTK,buffer__JRTK);
    } break;
    };
    add_last__YPK(buffer__JRTK,')');
    __tmp__ISTK=TRUE__;
  } else {
    __tmp__ISTK=FALSE__;
  };
  if ((! __tmp__ISTK)) {
    if ((((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)Self__IRTK->local__2RIJ)->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)Self__IRTK->local__2RIJ)->parent_variable__B2LC.type__125F)->flag__LTL &  16) !=  0)))) {
      __tmp__3STK=Self__IRTK->parent_write__X50I.value__HBEH;
      switch (((struct ___OBJ *)__tmp__3STK)->__id) {
      case __LIST__: {
        __tmp__4STK=static_type__GIQG(__tmp__3STK);
      } break;
      case __STRING_CST__: {
        __tmp__4STK=((__STRING_CST *)__tmp__3STK)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__4STK=((__EXTERNAL_C *)__tmp__3STK)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__4STK=((__PROTOTYPE_CST *)__tmp__3STK)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__4STK=((__INTEGER_CST *)__tmp__3STK)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__4STK=((__LOCAL *)((__READ_LOCAL *)__tmp__3STK)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__4STK=static_type__0N1H(__tmp__3STK);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__4STK=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__4STK=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__4STK=((__REAL_CST *)__tmp__3STK)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__4STK=((__CHARACTER_CST *)__tmp__3STK)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__4STK=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__4STK=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__4STK=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__4STK=static_type__MP1H(__tmp__3STK);
      } break;
      case __EXPR_MUL__: {
        __tmp__4STK=static_type__SP1H(__tmp__3STK);
      } break;
      case __EXPR_DIV__: {
        __tmp__4STK=static_type__XP1H(__tmp__3STK);
      } break;
      case __EXPR_AND__: {
        __tmp__4STK=static_type__2P1H(__tmp__3STK);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__4STK=static_type__BQ1H(__tmp__3STK);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__4STK=static_type__GQ1H(__tmp__3STK);
      } break;
      case __PUT_TO__: {
        __tmp__4STK=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__4STK=static_type__PQ1H(__tmp__3STK);
      } break;
      case __SIZE_OF__: {
        __tmp__4STK=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__4STK=((__CAST *)__tmp__3STK)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__4STK=static_type__GIKL(__tmp__3STK);
      } break;
      case __READ_SLOT__: {
        __tmp__4STK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__3STK)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__4STK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__3STK)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__4STK=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__4STK=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__4STK=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__4STK=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__4STK=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__4STK=static_type__Z2IM(__tmp__3STK);
      } break;
      case __EXPR_ADD__: {
        __tmp__4STK=static_type__IXML(__tmp__3STK);
      } break;
      case __EXPR_NOT__: {
        __tmp__4STK=static_type__BTXM(__tmp__3STK);
      } break;
      case __EXPR_MOD__: {
        __tmp__4STK=static_type__5LEO(__tmp__3STK);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__4STK=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__4STK=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__4STK=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__4STK=static_type__NOPN(__tmp__3STK);
      } break;
      case __EXPR_XOR__: {
        __tmp__4STK=static_type__XCSO(__tmp__3STK);
      } break;
      };
      if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__4STK)->flag__LTL &  1) !=  0))) {
        __tmp__LTTK=TRUE__;
      } else {
        __tmp__GTTK=Self__IRTK->parent_write__X50I.value__HBEH;
        switch (((struct ___OBJ *)__tmp__GTTK)->__id) {
        case __LIST__: {
          __tmp__HTTK=static_type__GIQG(__tmp__GTTK);
        } break;
        case __STRING_CST__: {
          __tmp__HTTK=((__STRING_CST *)__tmp__GTTK)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__HTTK=((__EXTERNAL_C *)__tmp__GTTK)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__HTTK=((__PROTOTYPE_CST *)__tmp__GTTK)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__HTTK=((__INTEGER_CST *)__tmp__GTTK)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__HTTK=((__LOCAL *)((__READ_LOCAL *)__tmp__GTTK)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__HTTK=static_type__0N1H(__tmp__GTTK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__HTTK=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__HTTK=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__HTTK=((__REAL_CST *)__tmp__GTTK)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__HTTK=((__CHARACTER_CST *)__tmp__GTTK)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__HTTK=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__HTTK=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__HTTK=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__HTTK=static_type__MP1H(__tmp__GTTK);
        } break;
        case __EXPR_MUL__: {
          __tmp__HTTK=static_type__SP1H(__tmp__GTTK);
        } break;
        case __EXPR_DIV__: {
          __tmp__HTTK=static_type__XP1H(__tmp__GTTK);
        } break;
        case __EXPR_AND__: {
          __tmp__HTTK=static_type__2P1H(__tmp__GTTK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__HTTK=static_type__BQ1H(__tmp__GTTK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__HTTK=static_type__GQ1H(__tmp__GTTK);
        } break;
        case __PUT_TO__: {
          __tmp__HTTK=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__HTTK=static_type__PQ1H(__tmp__GTTK);
        } break;
        case __SIZE_OF__: {
          __tmp__HTTK=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__HTTK=((__CAST *)__tmp__GTTK)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__HTTK=static_type__GIKL(__tmp__GTTK);
        } break;
        case __READ_SLOT__: {
          __tmp__HTTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__GTTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__HTTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__GTTK)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__HTTK=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__HTTK=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__HTTK=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__HTTK=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__HTTK=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__HTTK=static_type__Z2IM(__tmp__GTTK);
        } break;
        case __EXPR_ADD__: {
          __tmp__HTTK=static_type__IXML(__tmp__GTTK);
        } break;
        case __EXPR_NOT__: {
          __tmp__HTTK=static_type__BTXM(__tmp__GTTK);
        } break;
        case __EXPR_MOD__: {
          __tmp__HTTK=static_type__5LEO(__tmp__GTTK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__HTTK=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__HTTK=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__HTTK=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__HTTK=static_type__NOPN(__tmp__GTTK);
        } break;
        case __EXPR_XOR__: {
          __tmp__HTTK=static_type__XCSO(__tmp__GTTK);
        } break;
        };
        __tmp__LTTK=((__UINTEGER_8)(((__TYPE_FULL *)__tmp__HTTK)->flag__LTL &  16) !=  0);
      };
      __tmp__YTTK=__tmp__LTTK;
    } else {
      __tmp__YTTK=FALSE__;
    };
    if (__tmp__YTTK) {
      __tmp__STTK=Self__IRTK->parent_write__X50I.value__HBEH;
      switch (((struct ___OBJ *)__tmp__STTK)->__id) {
      case __LIST__: {
        __tmp__TTTK=static_type__GIQG(__tmp__STTK);
      } break;
      case __STRING_CST__: {
        __tmp__TTTK=((__STRING_CST *)__tmp__STTK)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__TTTK=((__EXTERNAL_C *)__tmp__STTK)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__TTTK=((__PROTOTYPE_CST *)__tmp__STTK)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__TTTK=((__INTEGER_CST *)__tmp__STTK)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__TTTK=((__LOCAL *)((__READ_LOCAL *)__tmp__STTK)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__TTTK=static_type__0N1H(__tmp__STTK);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__TTTK=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__TTTK=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__TTTK=((__REAL_CST *)__tmp__STTK)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__TTTK=((__CHARACTER_CST *)__tmp__STTK)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__TTTK=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__TTTK=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__TTTK=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__TTTK=static_type__MP1H(__tmp__STTK);
      } break;
      case __EXPR_MUL__: {
        __tmp__TTTK=static_type__SP1H(__tmp__STTK);
      } break;
      case __EXPR_DIV__: {
        __tmp__TTTK=static_type__XP1H(__tmp__STTK);
      } break;
      case __EXPR_AND__: {
        __tmp__TTTK=static_type__2P1H(__tmp__STTK);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__TTTK=static_type__BQ1H(__tmp__STTK);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__TTTK=static_type__GQ1H(__tmp__STTK);
      } break;
      case __PUT_TO__: {
        __tmp__TTTK=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__TTTK=static_type__PQ1H(__tmp__STTK);
      } break;
      case __SIZE_OF__: {
        __tmp__TTTK=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__TTTK=((__CAST *)__tmp__STTK)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__TTTK=static_type__GIKL(__tmp__STTK);
      } break;
      case __READ_SLOT__: {
        __tmp__TTTK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__STTK)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__TTTK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__STTK)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__TTTK=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__TTTK=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__TTTK=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__TTTK=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__TTTK=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__TTTK=static_type__Z2IM(__tmp__STTK);
      } break;
      case __EXPR_ADD__: {
        __tmp__TTTK=static_type__IXML(__tmp__STTK);
      } break;
      case __EXPR_NOT__: {
        __tmp__TTTK=static_type__BTXM(__tmp__STTK);
      } break;
      case __EXPR_MOD__: {
        __tmp__TTTK=static_type__5LEO(__tmp__STTK);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__TTTK=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__TTTK=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__TTTK=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__TTTK=static_type__NOPN(__tmp__STTK);
      } break;
      case __EXPR_XOR__: {
        __tmp__TTTK=static_type__XCSO(__tmp__STTK);
      } break;
      };
      __tmp__ZTTK=((void *)((__TYPE_FULL *)__tmp__TTTK)->parent_type__KTL != (void *)TYPE_NULL__);
    } else {
      __tmp__ZTTK=FALSE__;
    };
    if (__tmp__ZTTK) {
      append__MOK(buffer__JRTK,(&__string_404));
      __tmp__AUTK=Self__IRTK->parent_write__X50I.value__HBEH;
      switch (((struct ___OBJ *)__tmp__AUTK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__AUTK),buffer__JRTK);
        append__MOK(buffer__JRTK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__JRTK,((__REAL_CST *)__tmp__AUTK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__454P=((__CHARACTER_CST *)__tmp__AUTK);
        add_last__YPK(buffer__JRTK,'\'');
        append__MOK(buffer__JRTK,Self__454P->text__HO2H);
        add_last__YPK(buffer__JRTK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__AUTK,buffer__JRTK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__AUTK,buffer__JRTK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__AUTK,buffer__JRTK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__JRTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__AUTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__AUTK,buffer__JRTK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__AUTK,buffer__JRTK);
      } break;
      };
      add_last__YPK(buffer__JRTK,')');
    } else {
      __tmp__GUTK=Self__IRTK->parent_write__X50I.value__HBEH;
      switch (((struct ___OBJ *)__tmp__GUTK)->__id) {
      case __LIST__: {
        genere__SFEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __STRING_CST__: {
        genere__EGEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXTERNAL_C__: {
        genere__OJEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __PROTOTYPE_CST__: {
        genere__AMEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __INTEGER_CST__: {
        genere__EMEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __READ_LOCAL__: {
        genere__FNEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_MULTIPLE__: {
        display__UYFK(((__EXPR_MULTIPLE *)__tmp__GUTK),buffer__JRTK);
        append__MOK(buffer__JRTK,(&__string_270));
      } break;
      case __EXPR_EQUAL__: {
        genere__HOEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_NOT_EQUAL__: {
        genere__WSEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __REAL_CST__: {
        append__MOK(buffer__JRTK,((__REAL_CST *)__tmp__GUTK)->value__5N2H);
      } break;
      case __CHARACTER_CST__: {
        Self__JA5P=((__CHARACTER_CST *)__tmp__GUTK);
        add_last__YPK(buffer__JRTK,'\'');
        append__MOK(buffer__JRTK,Self__JA5P->text__HO2H);
        add_last__YPK(buffer__JRTK,'\'');
      } break;
      case __IS_EXPANDED__: {
        print__1ZE((&__string_271));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __GET_TYPE_ID__: {
        genere__QXEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_SUP__: {
        genere__KYEK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_SUB__: {
        genere__Z2EK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_MUL__: {
        genere__D5EK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_DIV__: {
        genere__NBFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_AND__: {
        genere__XDFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_SHIFT_R__: {
        genere__BGFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_SHIFT_L__: {
        genere__LIFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __PUT_TO__: {
        genere__VKFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __ITEM__: {
        genere__KMFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __SIZE_OF__: {
        genere__PMFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __CAST__: {
        genere__WMFK(__tmp__GUTK,buffer__JRTK);
      } break;
      case __CALL_SLOT__: {
        genere__MJKL(__tmp__GUTK,buffer__JRTK);
      } break;
      case __READ_SLOT__: {
        genere__NUNL(__tmp__GUTK,buffer__JRTK);
      } break;
      case __READ_GLOBAL__: {
        append__MOK(buffer__JRTK,((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__GUTK)->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      } break;
      case __EXPR_NOT_LOGIC__: {
        genere__GZ0M(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_OR_LOGIC__: {
        genere__XVEO(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        genere__J2KO(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_AND_LOGIC__: {
        genere__4VEO(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        genere__R2KO(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_NEG__: {
        genere__CXJM(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_ADD__: {
        genere__VYML(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_NOT__: {
        genere__4JZM(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_MOD__: {
        genere__FWEO(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_SUP_EQ__: {
        genere__PCEP(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_INF__: {
        genere__LNRN(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_INF_EQ__: {
        genere__ZRRN(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_OR__: {
        genere__W0PN(__tmp__GUTK,buffer__JRTK);
      } break;
      case __EXPR_XOR__: {
        genere__YAUO(__tmp__GUTK,buffer__JRTK);
      } break;
      };
    };
  };
}

static void add_var_size__5JLK(void *v__BKLK)
// ({NULLxLOCAL}) VoidNo recursive, No inlinable.
{
  __POSITION __tmp__VKLK;
  void *t__EKLK;
  __INTEGER j__DKLK,__tmp__MF1Q,__tmp__VF1Q;
  void *tab__CKLK;
  void **__tmp__CX5Q,**__tmp__DX5Q,**__tmp__EX5Q;
  if ((((__LOCAL *)v__BKLK)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '+')) {
    print__1ZE(((__LOCAL *)v__BKLK)->parent_variable__B2LC.intern_name__025F);
    print__1ZE((&__string_376));
    fputc((int)(((__LOCAL *)v__BKLK)->parent_variable__B2LC.parent_named__A2LC.style__LDGC),stdout);
    print__1ZE((&__string_377));
    __tmp__VKLK=((__LOCAL *)v__BKLK)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    put_error__text__0AH( 2,(&__string_378));
    put_position__ECH(__tmp__VKLK);
    send_error__2FH();
  };
  t__EKLK=((__LOCAL *)v__BKLK)->parent_variable__B2LC.type__125F;
  tab__CKLK=((void **)((__FAST_ARRAYoFAST_ARRAYoLOCALoo *)var_size__0SOG)->parent_arrayed_collection__ZSOG.storage__3K4G)[size__P2BJ(((__LOCAL *)v__BKLK)->parent_variable__B2LC.type__125F)];
  j__DKLK= 0;
  __tmp__MF1Q=((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__CX5Q=((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.storage__FXPG;
  while (((j__DKLK <= __tmp__MF1Q) && ((void *)((__LOCAL *)((void **)__tmp__CX5Q)[j__DKLK])->parent_variable__B2LC.type__125F != (void *)t__EKLK))) {
    j__DKLK=(__INTEGER)(j__DKLK +  1);
  };
  if ((j__DKLK > ((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.upper__TI4F)) {
    add_last__T2FH(tab__CKLK,v__BKLK);
  } else {
    __tmp__VF1Q=((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.upper__TI4F;
    __tmp__DX5Q=((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.storage__FXPG;
    __tmp__EX5Q=((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.storage__FXPG;
    while ((((j__DKLK <= __tmp__VF1Q) && ((void *)((void **)__tmp__DX5Q)[j__DKLK] != (void *)v__BKLK)) && ((void *)((__LOCAL *)((void **)__tmp__EX5Q)[j__DKLK])->parent_variable__B2LC.type__125F == (void *)t__EKLK))) {
      j__DKLK=(__INTEGER)(j__DKLK +  1);
    };
    if (((j__DKLK > ((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.upper__TI4F) || ((void *)((void **)((__FAST_ARRAYoLOCALo *)tab__CKLK)->parent_arrayed_collection__QI4F.storage__FXPG)[j__DKLK] != (void *)v__BKLK))) {
      add__to__DU5K(tab__CKLK,v__BKLK,j__DKLK);
    };
  };
}

static void remove_index__MD1G(__LIST *Self__ND1G,__INTEGER idx__OD1G)
// ({LIST},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__RD1G,__tmp__PK5G,i__QX2H;
  void *__tmp__PD1G;
  __FAST_ARRAYoINSTRo *Self__FK5G;
  void **__tmp__OK5G,**Self__5W2H;
  __tmp__PD1G=Self__ND1G->expr_list__JUOG;
  __tmp__RD1G=(__INTEGER)(idx__OD1G -  1);
  Self__FK5G=((__FAST_ARRAYoINSTRo *)__tmp__PD1G);
  __tmp__OK5G=Self__FK5G->parent_arrayed_collection__IUOG.storage__BM4G;
  __tmp__PK5G=Self__FK5G->parent_arrayed_collection__IUOG.upper__THQG;
  Self__5W2H=((void **)__tmp__OK5G);
  i__QX2H=__tmp__RD1G;
  while ((i__QX2H != __tmp__PK5G)) {
    Self__5W2H[i__QX2H]=Self__5W2H[(__INTEGER)(i__QX2H +  1)];
    i__QX2H=(__INTEGER)(i__QX2H +  1);
  };
  Self__FK5G->parent_arrayed_collection__IUOG.upper__THQG=(__INTEGER)(Self__FK5G->parent_arrayed_collection__IUOG.upper__THQG -  1);
}

static void add_last__W35F(__FAST_ARRAYoSLOT_DATAo *Self__X35F,void *element__Y35F)
// ({FAST_ARRAYoSLOT_DATAo},{NULLxSLOT_DATA}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__Z35F,__tmp__C55F,__tmp__U4PG,Self__AZ5G;
  __BOOLEAN __tmp__J45F;
  void **__tmp__B55F,**new__B4PG;
  new_capacity__Z35F= 0;
  if (((__INTEGER)(Self__X35F->parent_arrayed_collection__3K3F.upper__035F +  1) <= (__INTEGER)(Self__X35F->parent_arrayed_collection__3K3F.capacity__235F -  1))) {
    Self__X35F->parent_arrayed_collection__3K3F.upper__035F=(__INTEGER)(Self__X35F->parent_arrayed_collection__3K3F.upper__035F +  1);
    __tmp__J45F=TRUE__;
  } else {
    __tmp__J45F=FALSE__;
  };
  if ((! __tmp__J45F)) {
    if ((Self__X35F->parent_arrayed_collection__3K3F.capacity__235F ==  0)) {
      Self__X35F->parent_arrayed_collection__3K3F.storage__Y45F=create__R4JG( 2);
      Self__X35F->parent_arrayed_collection__3K3F.capacity__235F= 2;
      Self__X35F->parent_arrayed_collection__3K3F.upper__035F= 0;
    } else {
      new_capacity__Z35F=(__INTEGER)(Self__X35F->parent_arrayed_collection__3K3F.capacity__235F <<  1);
      __tmp__B55F=Self__X35F->parent_arrayed_collection__3K3F.storage__Y45F;
      __tmp__C55F=Self__X35F->parent_arrayed_collection__3K3F.capacity__235F;
      new__B4PG=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__B55F)),((__UINTEGER_32 )(__INTEGER)(__tmp__C55F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Z35F * ((__INTEGER )(sizeof(void *)))))));
      __tmp__U4PG=(__INTEGER)(new_capacity__Z35F -  1);
      Self__AZ5G=__tmp__C55F;
      while ((Self__AZ5G <= __tmp__U4PG)) {
        new__B4PG[Self__AZ5G]=NULL;
        Self__AZ5G=(__INTEGER)(Self__AZ5G +  1);
      };
      Self__X35F->parent_arrayed_collection__3K3F.storage__Y45F=new__B4PG;
      Self__X35F->parent_arrayed_collection__3K3F.capacity__235F=new_capacity__Z35F;
      Self__X35F->parent_arrayed_collection__3K3F.upper__035F=(__INTEGER)(Self__X35F->parent_arrayed_collection__3K3F.upper__035F +  1);
    };
  };
  ((void **)Self__X35F->parent_arrayed_collection__3K3F.storage__Y45F)[Self__X35F->parent_arrayed_collection__3K3F.upper__035F]=element__Y35F;
}

static void clear__to__K15F(void **Self__L15F,__INTEGER lower__M15F,__INTEGER upper__N15F)
// ({NATIVE_ARRAYoSLOTo},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__HMBG;
  Self__HMBG=lower__M15F;
  while ((Self__HMBG <= upper__N15F)) {
    Self__L15F[Self__HMBG]=NULL;
    Self__HMBG=(__INTEGER)(Self__HMBG +  1);
  };
}

static void read_escape_character__BH0E()
// () VoidNo recursive, No inlinable.
{
  __INTEGER val__EH0E;
  __POSITION pos__ZE5P,pos__IF5P,pos__VF5P,pos__XF5P;
  __BOOLEAN __tmp__RI0E,__tmp__EJ0E,__tmp__NM0E;
  __CHARACTER Self__EEIB;
  val__EH0E= 0;
  if (is_separator__4D3E(last_character__0OF())) {
    position__ZFD=(__INTEGER)(position__ZFD +  1);
    while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) || (! is_separator__4D3E(last_character__0OF()))))) {
      position__ZFD=(__INTEGER)(position__ZFD +  1);
    };
    if ((last_character__0OF() == '\\')) {
      remove_last__RLLB(string_tmp__RB, 1);
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      __tmp__RI0E=TRUE__;
    } else {
      __tmp__RI0E=FALSE__;
    };
    if ((! __tmp__RI0E)) {
      if ((last_character__0OF() != ((__CHARACTER )(( 0))))) {
        pos__ZE5P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_516));
        put_position__ECH(pos__ZE5P);
        send_error__2FH();
      };
    };
    __tmp__EJ0E=TRUE__;
  } else {
    __tmp__EJ0E=FALSE__;
  };
  if ((! __tmp__EJ0E)) {
    if ((last_character__0OF() != ((__CHARACTER )(( 0))))) {
      if ((((((((((((last_character__0OF() == 'a') || (last_character__0OF() == 'b')) || (last_character__0OF() == 'f')) || (last_character__0OF() == 'n')) || (last_character__0OF() == 'r')) || (last_character__0OF() == 't')) || (last_character__0OF() == 'v')) || (last_character__0OF() == '\\')) || (last_character__0OF() == '?')) || (last_character__0OF() == '\'')) || (last_character__0OF() == '\"'))) {
        add_last__YPK(string_tmp__RB,last_character__0OF());
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        __tmp__NM0E=TRUE__;
      } else {
        __tmp__NM0E=FALSE__;
      };
      if ((! __tmp__NM0E)) {
        Self__EEIB=last_character__0OF();
        if (((((__INTEGER_8 )Self__EEIB) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )Self__EEIB) <= ((__INTEGER_8 )'9')))) {
          if ((((last_character__0OF() == '0') && (position__ZFD < ((__STRING *)source__WFD)->count__VF)) && (! is_hexadecimal_digit__NLHD(((__CHARACTER *)((__STRING *)source__WFD)->storage__XNK)[(__INTEGER)((__INTEGER)(position__ZFD +  1) -  1)])))) {
            add_last__YPK(string_tmp__RB,last_character__0OF());
            position__ZFD=(__INTEGER)(position__ZFD +  1);
          } else {
            copy__BNK(string_tmp2__ADB,string_tmp__RB);
            read_integer__4MKC();
            copy__BNK(string_tmp__RB,string_tmp2__ADB);
            if ((last_integer__R1IC >  255)) {
              pos__IF5P=current_position__EJG();
              put_error__text__0AH( 0,(&__string_517));
              put_position__ECH(pos__IF5P);
              send_error__2FH();
            };
            val__EH0E=((__INTEGER )last_integer__R1IC);
            add_last__YPK(string_tmp__RB,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__EH0E >>  6)) + ((__INTEGER_8 )'0'))))));
            add_last__YPK(string_tmp__RB,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__EH0E - (__INTEGER)((__INTEGER)(val__EH0E >>  6) <<  6)) >>  3)) + ((__INTEGER_8 )'0'))))));
            add_last__YPK(string_tmp__RB,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__EH0E - (__INTEGER)((__INTEGER)(val__EH0E >>  3) <<  3))) + ((__INTEGER_8 )'0'))))));
            if ((last_character__0OF() == '\\')) {
              position__ZFD=(__INTEGER)(position__ZFD +  1);
            } else {
              pos__VF5P=current_position__EJG();
              put_error__text__0AH( 0,(&__string_518));
              put_position__ECH(pos__VF5P);
              send_error__2FH();
            };
          };
        } else {
          pos__XF5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_516));
          put_position__ECH(pos__XF5P);
          send_error__2FH();
        };
      };
      last_len_string__VLIB=(__INTEGER)(last_len_string__VLIB +  1);
    };
  };
}

static __CHARACTER read_cap_character__IPGC()
// () With resultNo recursive, No inlinable.
{
  __CHARACTER result__LPGC,char__MPGC;
  result__LPGC='\0';
  char__MPGC='\0';
  if ((read_space__UAF() && is_upper__HXFB(last_character__0OF()))) {
    char__MPGC=last_character__0OF();
    position__ZFD=(__INTEGER)(position__ZFD +  1);
    if (((is_upper__HXFB(last_character__0OF()) || is_digit__EWEB(last_character__0OF())) || (last_character__0OF() == '_'))) {
      position__ZFD=(__INTEGER)(position__ZFD -  1);
    } else {
      result__LPGC=char__MPGC;
    };
  };
  return(result__LPGC);
}

static void add_last__NRGC(__FAST_ARRAYoExpanded_CHARACTERo *Self__ORGC,__CHARACTER element__PRGC)
// ({FAST_ARRAYoExpanded_CHARACTERo},{CHARACTER}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__QRGC,old_nb_elts__QG1Q;
  __BOOLEAN __tmp__4RGC;
  __CHARACTER *Self__PG1Q,*new__SG1Q;
  new_capacity__QRGC= 0;
  if (((__INTEGER)(Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB +  1) <= (__INTEGER)(Self__ORGC->parent_arrayed_collection__IIM.capacity__JTJB -  1))) {
    Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB=(__INTEGER)(Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB +  1);
    __tmp__4RGC=TRUE__;
  } else {
    __tmp__4RGC=FALSE__;
  };
  if ((! __tmp__4RGC)) {
    if ((Self__ORGC->parent_arrayed_collection__IIM.capacity__JTJB ==  0)) {
      Self__ORGC->parent_arrayed_collection__IIM.storage__STJB=create__5UX( 2);
      Self__ORGC->parent_arrayed_collection__IIM.capacity__JTJB= 2;
      Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB= 0;
    } else {
      new_capacity__QRGC=(__INTEGER)(Self__ORGC->parent_arrayed_collection__IIM.capacity__JTJB <<  1);
      Self__PG1Q=((__CHARACTER *)Self__ORGC->parent_arrayed_collection__IIM.storage__STJB);
      old_nb_elts__QG1Q=Self__ORGC->parent_arrayed_collection__IIM.capacity__JTJB;
      new__SG1Q=((__CHARACTER *)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__PG1Q),((__UINTEGER_32 )old_nb_elts__QG1Q),((__UINTEGER_32 )new_capacity__QRGC)));
      clear__to__SCNC(new__SG1Q,old_nb_elts__QG1Q,(__INTEGER)(new_capacity__QRGC -  1));
      Self__ORGC->parent_arrayed_collection__IIM.storage__STJB=new__SG1Q;
      Self__ORGC->parent_arrayed_collection__IIM.capacity__JTJB=new_capacity__QRGC;
      Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB=(__INTEGER)(Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB +  1);
    };
  };
  ((__CHARACTER *)Self__ORGC->parent_arrayed_collection__IIM.storage__STJB)[Self__ORGC->parent_arrayed_collection__IIM.upper__WTJB]=element__PRGC;
}

static __BOOLEAN read_external__JWKC()
// () With resultNo recursive, No inlinable.
{
  __BOOLEAN result__MWKC;
  result__MWKC=FALSE__;
  if (((! read_space__UAF()) || (last_character__0OF() != '`'))) {
    result__MWKC=FALSE__;
  } else {
    position__ZFD=(__INTEGER)(position__ZFD +  1);
    ((__STRING *)string_tmp__RB)->count__VF= 0;
    while ((! ((last_character__0OF() == ((__CHARACTER )(( 0)))) | (last_character__0OF() == '`')))) {
      add_last__YPK(string_tmp__RB,last_character__0OF());
      if ((last_character__0OF() == '\\')) {
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        add_last__YPK(string_tmp__RB,last_character__0OF());
        if ((last_character__0OF() != ((__CHARACTER )(( 0))))) {
          position__ZFD=(__INTEGER)(position__ZFD +  1);
        };
      } else {
        position__ZFD=(__INTEGER)(position__ZFD +  1);
      };
    };
    if ((last_character__0OF() != ((__CHARACTER )(( 0))))) {
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      last_string__V1G=get__QEC(string_tmp__RB);
      result__MWKC=TRUE__;
    } else {
      result__MWKC=FALSE__;
    };
  };
  return(result__MWKC);
}

static void* read_expr_primary__EXIC(__PARSER *Self__FXIC)
// ({PARSER}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__S1IC;
  void *result__HXIC;
  void *type__IXIC;
  void *group_sav__NXIC,*lst__AHCD;
  void *arg__RXIC;
  void *result_id__SXIC,*__tmp__A1IC,*__tmp__D2IC,*__tmp__U2IC;
  void *__tmp__OAJC,*__tmp__WAJC;
  __POSITION pos__XH5P,pos__UI5P,__tmp__40IC,__tmp__Q1IC,pos__UJ5P;
  __POSITION pos__WJ5P,__tmp__C2IC,__tmp__T2IC,pos__IK5P,pos__KK5P;
  __POSITION pos__TK5P,__tmp__NAJC,__tmp__VAJC,pos__DL5P,pos__FL5P;
  __POSITION pos__HL5P,pos__JL5P;
  __INTEGER pos_old__4GKC,typ_id__1BHD,typ_id__ODHD,typ_id__AFHD;
  __INTEGER __tmp__V2IC,typ_id__RGHD,typ_id__PJHD,typ_id__YZMD;
  __INTEGER typ_id__K1MD;
  __ITM_REAL *result__VBHD,*Self__XC0D;
  __POINTER ptr__WBHD,ptr__JDHD,ptr__1EHD,ptr__MGHD,ptr__KJHD,ptr__TZMD;
  __POINTER ptr__F1MD;
  __UINTEGER_32 sz__YBHD,a__ZG1Q,new_size__XG1Q,t__3G1Q,a__5G1Q;
  __UINTEGER_32 sz__LDHD,a__EH1Q,new_size__CH1Q,t__IH1Q,a__KH1Q;
  __UINTEGER_32 sz__3EHD,a__PH1Q,new_size__NH1Q,t__TH1Q,a__VH1Q;
  __UINTEGER_32 sz__OGHD,a__0H1Q,new_size__YH1Q,t__4H1Q,a__AI1Q;
  __UINTEGER_32 sz__MJHD,a__FI1Q,new_size__DI1Q,t__JI1Q,a__LI1Q;
  __UINTEGER_32 sz__VZMD,a__QI1Q,new_size__OI1Q,t__UI1Q,a__WI1Q;
  __UINTEGER_32 sz__H1MD,a__1I1Q,new_size__ZI1Q,t__5I1Q,a__BJ1Q;
  __ITM_NUMBER *result__IDHD,*Self__2C0D;
  __ITM_CHARACTER *result__0EHD,*Self__BD0D;
  __ITM_STRING *result__LGHD,*Self__GD0D;
  __ITM_BLOCK *result__JJHD,*Self__SD0D;
  __ITM_EXTERNAL *result__SZMD,*Self__5I1D;
  __ITM_EXTERNAL_TYPE *result__E1MD,*Self__EJ1D;
  void *ltype__JXIC;
  __BOOLEAN __tmp__5XIC,__tmp__C0IC,result__RQJC,__tmp__R0IC;
  __BOOLEAN result__DRJC,__tmp__D1IC,result__3GKC,__tmp__V1IC;
  __BOOLEAN result__HSJC,__tmp__G2IC,result__3SKC,__tmp__Y2IC;
  __BOOLEAN result__LTJC,__tmp__V3IC,result__3TJC,__tmp__Z5IC;
  __BOOLEAN result__PUJC,__tmp__YAJC;
  result__HXIC=NULL;
  type__IXIC=NULL;
  ltype__JXIC=NULL;
  group_sav__NXIC=NULL;
  arg__RXIC=NULL;
  result_id__SXIC=NULL;
  if (read_word__NWH((&__string_57))) {
    result__HXIC=create__name__Q5JC(current_position__EJG(),last_string__V1G);
    __tmp__5XIC=TRUE__;
  } else {
    __tmp__5XIC=FALSE__;
  };
  if (__tmp__5XIC) {
    __tmp__C0IC=TRUE__;
  } else {
    result__RQJC=read_word__NWH((&__string_15));
    if (result__RQJC) {
      if ((last_character__0OF() == '_')) {
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        copy__BNK(string_tmp__RB,(&__string_15));
        add_last__YPK(string_tmp__RB,'_');
        while (is_digit__EWEB(last_character__0OF())) {
          add_last__YPK(string_tmp__RB,last_character__0OF());
          position__ZFD=(__INTEGER)(position__ZFD +  1);
        };
        if ((((__STRING *)string_tmp__RB)->count__VF ==  0)) {
          pos__XH5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_519));
          put_position__ECH(pos__XH5P);
          send_error__2FH();
        };
        result_id__SXIC=get__QEC(string_tmp__RB);
      } else {
        result_id__SXIC=(&__string_15);
      };
      result__HXIC=create__name__Q5JC(current_position__EJG(),result_id__SXIC);
    };
    __tmp__C0IC=result__RQJC;
  };
  if (__tmp__C0IC) {
    __tmp__R0IC=TRUE__;
  } else {
    type__IXIC=read_prototype__X5JC(Self__FXIC,NULL);
    result__DRJC=((void *)type__IXIC != (void *)NULL);
    if (result__DRJC) {
      result__HXIC=create__type__1GFC(current_position__EJG(),type__IXIC);
    };
    __tmp__R0IC=result__DRJC;
  };
  if (__tmp__R0IC) {
    __tmp__D1IC=TRUE__;
  } else {
    result__3GKC=FALSE__;
    pos_old__4GKC= 0;
    if ((read_space__UAF() && is_digit__EWEB(last_character__0OF()))) {
      ((__STRING *)string_tmp__RB)->count__VF= 0;
      add_last__YPK(string_tmp__RB,last_character__0OF());
      pos_old__4GKC=position__ZFD;
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      while ((is_digit__EWEB(last_character__0OF()) || (last_character__0OF() == '_'))) {
        if ((last_character__0OF() != '_')) {
          add_last__YPK(string_tmp__RB,last_character__0OF());
        };
        position__ZFD=(__INTEGER)(position__ZFD +  1);
      };
      if ((last_character__0OF() == '.')) {
        add_last__YPK(string_tmp__RB,'.');
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        if (is_digit__EWEB(last_character__0OF())) {
          result__3GKC=TRUE__;
          add_last__YPK(string_tmp__RB,last_character__0OF());
          position__ZFD=(__INTEGER)(position__ZFD +  1);
          while (is_digit__EWEB(last_character__0OF())) {
            add_last__YPK(string_tmp__RB,last_character__0OF());
            position__ZFD=(__INTEGER)(position__ZFD +  1);
          };
        };
        if ((last_character__0OF() == 'E')) {
          result__3GKC=TRUE__;
          add_last__YPK(string_tmp__RB,'E');
          position__ZFD=(__INTEGER)(position__ZFD +  1);
          if (((last_character__0OF() == '+') || (last_character__0OF() == '-'))) {
            add_last__YPK(string_tmp__RB,last_character__0OF());
            position__ZFD=(__INTEGER)(position__ZFD +  1);
          };
          if (is_digit__EWEB(last_character__0OF())) {
            add_last__YPK(string_tmp__RB,last_character__0OF());
            position__ZFD=(__INTEGER)(position__ZFD +  1);
            while (is_digit__EWEB(last_character__0OF())) {
              add_last__YPK(string_tmp__RB,last_character__0OF());
              position__ZFD=(__INTEGER)(position__ZFD +  1);
            };
          } else {
            pos__UI5P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_520));
            put_position__ECH(pos__UI5P);
            send_error__2FH();
          };
        };
      };
      if (result__3GKC) {
        last_real__50IC=get__QEC(string_tmp__RB);
      } else {
        position__ZFD=pos_old__4GKC;
      };
    };
    if (result__3GKC) {
      __tmp__40IC=current_position__EJG();
      __tmp__A1IC=last_real__50IC;
      result__VBHD=NULL;
      ptr__WBHD=((__POINTER )(NULL));
      typ_id__1BHD= 0;
      sz__YBHD=((__UINTEGER_32 )sizeof(__ITM_REAL));
      if ((sz__YBHD ==  0)) {
        result__VBHD=ITM_REAL__;
      } else {
        typ_id__1BHD=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__YBHD);
        if ((typ_id__1BHD == (__INTEGER)(-  1))) {
          a__ZG1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__XG1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__YBHD + a__ZG1Q) & (__UINTEGER_32)(~ a__ZG1Q));
          ptr__WBHD=micro_alloc__table__lab__BOI(new_size__XG1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XG1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__XG1Q);
        } else {
          t__3G1Q=((__UINTEGER_32 )typ_id__1BHD);
          a__5G1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__WBHD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__YBHD + a__5G1Q) & (__UINTEGER_32)(~ a__5G1Q)),((__POINTER )(&(table_type[(t__3G1Q)]))),(__UINTEGER_32)(t__3G1Q |  1));
        };
        result__VBHD=((__ITM_REAL *)ptr__WBHD);
        *(result__VBHD) = *(ITM_REAL__);
      };
      Self__XC0D=((__ITM_REAL *)result__VBHD);
      Self__XC0D->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM=__tmp__40IC;
      Self__XC0D->value__0C0D=__tmp__A1IC;
      result__HXIC=result__VBHD;
    };
    __tmp__D1IC=result__3GKC;
  };
  if (__tmp__D1IC) {
    __tmp__V1IC=TRUE__;
  } else {
    result__HSJC=read_integer__4MKC();
    if (result__HSJC) {
      __tmp__Q1IC=current_position__EJG();
      __tmp__S1IC=last_integer__R1IC;
      result__IDHD=NULL;
      ptr__JDHD=((__POINTER )(NULL));
      typ_id__ODHD= 0;
      sz__LDHD=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
      if ((sz__LDHD ==  0)) {
        result__IDHD=ITM_NUMBER__;
      } else {
        typ_id__ODHD=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__LDHD);
        if ((typ_id__ODHD == (__INTEGER)(-  1))) {
          a__EH1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__CH1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__LDHD + a__EH1Q) & (__UINTEGER_32)(~ a__EH1Q));
          ptr__JDHD=micro_alloc__table__lab__BOI(new_size__CH1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CH1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__CH1Q);
        } else {
          t__IH1Q=((__UINTEGER_32 )typ_id__ODHD);
          a__KH1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__JDHD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__LDHD + a__KH1Q) & (__UINTEGER_32)(~ a__KH1Q)),((__POINTER )(&(table_type[(t__IH1Q)]))),(__UINTEGER_32)(t__IH1Q |  1));
        };
        result__IDHD=((__ITM_NUMBER *)ptr__JDHD);
        *(result__IDHD) = *(ITM_NUMBER__);
      };
      Self__2C0D=((__ITM_NUMBER *)result__IDHD);
      Self__2C0D->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM=__tmp__Q1IC;
      Self__2C0D->value__5C0D=__tmp__S1IC;
      result__HXIC=result__IDHD;
    };
    __tmp__V1IC=result__HSJC;
  };
  if (__tmp__V1IC) {
    __tmp__G2IC=TRUE__;
  } else {
    result__3SKC=FALSE__;
    if ((read_space__UAF() && (last_character__0OF() == '\''))) {
      last_len_string__VLIB= 0;
      position__ZFD=(__INTEGER)(position__ZFD +  1);
      ((__STRING *)string_tmp__RB)->count__VF= 0;
      while ((! (((last_character__0OF() == ((__CHARACTER )(( 0)))) || (last_character__0OF() == '\n')) || (last_character__0OF() == '\'')))) {
        add_last__YPK(string_tmp__RB,last_character__0OF());
        if ((last_character__0OF() == '\\')) {
          position__ZFD=(__INTEGER)(position__ZFD +  1);
          read_escape_character__BH0E();
        } else {
          position__ZFD=(__INTEGER)(position__ZFD +  1);
          last_len_string__VLIB=(__INTEGER)(last_len_string__VLIB +  1);
        };
      };
      if ((last_character__0OF() == '\'')) {
        position__ZFD=(__INTEGER)(position__ZFD +  1);
        last_string__V1G=get__QEC(string_tmp__RB);
        if ((last_len_string__VLIB !=  1)) {
          position__ZFD=begin_position__SOF;
          pos__UJ5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_521));
          put_position__ECH(pos__UJ5P);
          send_error__2FH();
        };
        result__3SKC=TRUE__;
      } else {
        position__ZFD=begin_position__SOF;
        pos__WJ5P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_522));
        put_position__ECH(pos__WJ5P);
        send_error__2FH();
      };
    };
    if (result__3SKC) {
      __tmp__C2IC=current_position__EJG();
      __tmp__D2IC=last_string__V1G;
      result__0EHD=NULL;
      ptr__1EHD=((__POINTER )(NULL));
      typ_id__AFHD= 0;
      sz__3EHD=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
      if ((sz__3EHD ==  0)) {
        result__0EHD=ITM_CHARACTER__;
      } else {
        typ_id__AFHD=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__3EHD);
        if ((typ_id__AFHD == (__INTEGER)(-  1))) {
          a__PH1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__NH1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__3EHD + a__PH1Q) & (__UINTEGER_32)(~ a__PH1Q));
          ptr__1EHD=micro_alloc__table__lab__BOI(new_size__NH1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NH1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NH1Q);
        } else {
          t__TH1Q=((__UINTEGER_32 )typ_id__AFHD);
          a__VH1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__1EHD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__3EHD + a__VH1Q) & (__UINTEGER_32)(~ a__VH1Q)),((__POINTER )(&(table_type[(t__TH1Q)]))),(__UINTEGER_32)(t__TH1Q |  1));
        };
        result__0EHD=((__ITM_CHARACTER *)ptr__1EHD);
        *(result__0EHD) = *(ITM_CHARACTER__);
      };
      Self__BD0D=((__ITM_CHARACTER *)result__0EHD);
      Self__BD0D->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM=__tmp__C2IC;
      Self__BD0D->character__ED0D=__tmp__D2IC;
      result__HXIC=result__0EHD;
    };
    __tmp__G2IC=result__3SKC;
  };
  if (__tmp__G2IC) {
    __tmp__Y2IC=TRUE__;
  } else {
    result__LTJC=read_string__BLIB();
    if (result__LTJC) {
      __tmp__T2IC=current_position__EJG();
      __tmp__U2IC=last_string__V1G;
      __tmp__V2IC=last_len_string__VLIB;
      result__LGHD=NULL;
      ptr__MGHD=((__POINTER )(NULL));
      typ_id__RGHD= 0;
      sz__OGHD=((__UINTEGER_32 )sizeof(__ITM_STRING));
      if ((sz__OGHD ==  0)) {
        result__LGHD=ITM_STRING__;
      } else {
        typ_id__RGHD=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__OGHD);
        if ((typ_id__RGHD == (__INTEGER)(-  1))) {
          a__0H1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__YH1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__OGHD + a__0H1Q) & (__UINTEGER_32)(~ a__0H1Q));
          ptr__MGHD=micro_alloc__table__lab__BOI(new_size__YH1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YH1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__YH1Q);
        } else {
          t__4H1Q=((__UINTEGER_32 )typ_id__RGHD);
          a__AI1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__MGHD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__OGHD + a__AI1Q) & (__UINTEGER_32)(~ a__AI1Q)),((__POINTER )(&(table_type[(t__4H1Q)]))),(__UINTEGER_32)(t__4H1Q |  1));
        };
        result__LGHD=((__ITM_STRING *)ptr__MGHD);
        *(result__LGHD) = *(ITM_STRING__);
      };
      Self__GD0D=((__ITM_STRING *)result__LGHD);
      Self__GD0D->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM=__tmp__T2IC;
      fast_put__to__RJFF(dico_string__OD0D,__tmp__V2IC,__tmp__U2IC);
      Self__GD0D->string__QD0D=__tmp__U2IC;
      result__HXIC=result__LGHD;
    };
    __tmp__Y2IC=result__LTJC;
  };
  if (__tmp__Y2IC) {
    __tmp__V3IC=TRUE__;
  } else {
    result__3TJC=read_character__EQ3('(');
    if (result__3TJC) {
      group_sav__NXIC=last_group__KFEC;
      last_group__KFEC=create__JCFC(current_position__EJG());
      result__HXIC=last_group__KFEC;
      ((__ITM_LIST *)last_group__KFEC)->code__G5OC=read_group__Z5BD(Self__FXIC);
      if ((! read_character__EQ3(')'))) {
        pos__IK5P=current_position__EJG();
        put_error__text__0AH( 2,(&__string_443));
        put_position__ECH(pos__IK5P);
        send_error__2FH();
      };
      last_group__KFEC=group_sav__NXIC;
    };
    __tmp__V3IC=result__3TJC;
  };
  if (__tmp__V3IC) {
    __tmp__Z5IC=TRUE__;
  } else {
    result__PUJC=read_character__EQ3('{');
    if (result__PUJC) {
      group_sav__NXIC=last_group__KFEC;
      last_group__KFEC=create__JCFC(current_position__EJG());
      old_position__TMFC=position__ZFD;
      old_pos_cur__VMFC=pos_cur__2FD;
      old_pos_line__XMFC=pos_line__3FD;
      old_pos_col__ZMFC=pos_col__4FD;
      arg__RXIC=read_loc_arg__EDCD(Self__FXIC,TRUE__);
      if (((void *)arg__RXIC != (void *)NULL)) {
        if ((! read_character__EQ3(';'))) {
          pos__KK5P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_320));
          put_position__ECH(pos__KK5P);
          send_error__2FH();
        };
      } else {
        position__ZFD=old_position__TMFC;
        pos_cur__2FD=old_pos_cur__VMFC;
        pos_line__3FD=old_pos_line__XMFC;
        pos_col__4FD=old_pos_col__ZMFC;
      };
      lst__AHCD=last_group__KFEC;
      result__JJHD=NULL;
      ptr__KJHD=((__POINTER )(NULL));
      typ_id__PJHD= 0;
      sz__MJHD=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
      if ((sz__MJHD ==  0)) {
        result__JJHD=ITM_BLOCK__;
      } else {
        typ_id__PJHD=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MJHD);
        if ((typ_id__PJHD == (__INTEGER)(-  1))) {
          a__FI1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__DI1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__MJHD + a__FI1Q) & (__UINTEGER_32)(~ a__FI1Q));
          ptr__KJHD=micro_alloc__table__lab__BOI(new_size__DI1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DI1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__DI1Q);
        } else {
          t__JI1Q=((__UINTEGER_32 )typ_id__PJHD);
          a__LI1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__KJHD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MJHD + a__LI1Q) & (__UINTEGER_32)(~ a__LI1Q)),((__POINTER )(&(table_type[(t__JI1Q)]))),(__UINTEGER_32)(t__JI1Q |  1));
        };
        result__JJHD=((__ITM_BLOCK *)ptr__KJHD);
        *(result__JJHD) = *(ITM_BLOCK__);
      };
      Self__SD0D=((__ITM_BLOCK *)result__JJHD);
      Self__SD0D->list__VD0D=lst__AHCD;
      Self__SD0D->argument__WD0D=arg__RXIC;
      result__HXIC=create__type__1GFC(current_position__EJG(),result__JJHD);
      ((__ITM_LIST *)last_group__KFEC)->code__G5OC=read_group__Z5BD(Self__FXIC);
      if ((! read_character__EQ3('}'))) {
        pos__TK5P=current_position__EJG();
        put_error__text__0AH( 2,(&__string_523));
        put_position__ECH(pos__TK5P);
        send_error__2FH();
      };
      last_group__KFEC=group_sav__NXIC;
    };
    __tmp__Z5IC=result__PUJC;
  };
  if ((! __tmp__Z5IC)) {
    if (read_external__JWKC()) {
      if ((! read_character__EQ3(':'))) {
        __tmp__NAJC=current_position__EJG();
        __tmp__OAJC=last_string__V1G;
        result__SZMD=NULL;
        ptr__TZMD=((__POINTER )(NULL));
        typ_id__YZMD= 0;
        sz__VZMD=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
        if ((sz__VZMD ==  0)) {
          result__SZMD=ITM_EXTERNAL__;
        } else {
          typ_id__YZMD=-1;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__VZMD);
          if ((typ_id__YZMD == (__INTEGER)(-  1))) {
            a__QI1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__OI1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__VZMD + a__QI1Q) & (__UINTEGER_32)(~ a__QI1Q));
            ptr__TZMD=micro_alloc__table__lab__BOI(new_size__OI1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OI1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__OI1Q);
          } else {
            t__UI1Q=((__UINTEGER_32 )typ_id__YZMD);
            a__WI1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__TZMD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__VZMD + a__WI1Q) & (__UINTEGER_32)(~ a__WI1Q)),((__POINTER )(&(table_type[(t__UI1Q)]))),(__UINTEGER_32)(t__UI1Q |  1));
          };
          result__SZMD=((__ITM_EXTERNAL *)ptr__TZMD);
          *(result__SZMD) = *(ITM_EXTERNAL__);
        };
        Self__5I1D=((__ITM_EXTERNAL *)result__SZMD);
        Self__5I1D->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM=__tmp__NAJC;
        Self__5I1D->parent_itm_extern__MAJC.extern__CJ1D=__tmp__OAJC;
        result__HXIC=result__SZMD;
      } else {
        __tmp__VAJC=current_position__EJG();
        __tmp__WAJC=last_string__V1G;
        __tmp__YAJC=read_character__EQ3('(');
        result__E1MD=NULL;
        ptr__F1MD=((__POINTER )(NULL));
        typ_id__K1MD= 0;
        sz__H1MD=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
        if ((sz__H1MD ==  0)) {
          result__E1MD=ITM_EXTERNAL_TYPE__;
        } else {
          typ_id__K1MD=-1;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__H1MD);
          if ((typ_id__K1MD == (__INTEGER)(-  1))) {
            a__1I1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__ZI1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__H1MD + a__1I1Q) & (__UINTEGER_32)(~ a__1I1Q));
            ptr__F1MD=micro_alloc__table__lab__BOI(new_size__ZI1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZI1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__ZI1Q);
          } else {
            t__5I1Q=((__UINTEGER_32 )typ_id__K1MD);
            a__BJ1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__F1MD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__H1MD + a__BJ1Q) & (__UINTEGER_32)(~ a__BJ1Q)),((__POINTER )(&(table_type[(t__5I1Q)]))),(__UINTEGER_32)(t__5I1Q |  1));
          };
          result__E1MD=((__ITM_EXTERNAL_TYPE *)ptr__F1MD);
          *(result__E1MD) = *(ITM_EXTERNAL_TYPE__);
        };
        Self__EJ1D=((__ITM_EXTERNAL_TYPE *)result__E1MD);
        Self__EJ1D->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM=__tmp__VAJC;
        Self__EJ1D->parent_itm_extern__LXIC.extern__CJ1D=__tmp__WAJC;
        Self__EJ1D->is_persistant__ECJC=__tmp__YAJC;
        type__IXIC=read_type__YKLC(Self__FXIC,FALSE__);
        if (((void *)type__IXIC == (void *)NULL)) {
          pos__DL5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_429));
          put_position__ECH(pos__DL5P);
          send_error__2FH();
        };
        ((__ITM_EXTERNAL_TYPE *)result__E1MD)->type__WY0D=type__IXIC;
        if (read_character__EQ3('(')) {
          ltype__JXIC=read_type_list__BWAD(Self__FXIC,FALSE__);
          if (((void *)ltype__JXIC == (void *)NULL)) {
            pos__FL5P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_524));
            put_position__ECH(pos__FL5P);
            send_error__2FH();
          };
          if ((! read_character__EQ3(')'))) {
            pos__HL5P=current_position__EJG();
            put_error__text__0AH( 2,(&__string_443));
            put_position__ECH(pos__HL5P);
            send_error__2FH();
          };
          ((__ITM_EXTERNAL_TYPE *)result__E1MD)->type_list__TV1D=ltype__JXIC;
        };
        if ((result__E1MD->is_persistant__ECJC && (! read_character__EQ3(')')))) {
          pos__JL5P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_443));
          put_position__ECH(pos__JL5P);
          send_error__2FH();
        };
        result__HXIC=result__E1MD;
      };
    };
  };
  return(result__HXIC);
}

static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__FTRD(__INTEGER new_count__HTRD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__WWSD;
  __INTEGER typ_id__1WSD;
  __UINTEGER_32 sz__YWSD,a__GJ1Q,new_size__EJ1Q,t__KJ1Q,a__MJ1Q;
  __FAST_ARRAYoITM_ARGUMENTo *result__VWSD,*Self__OW2D;
  result__VWSD=NULL;
  ptr__WWSD=((__POINTER )(NULL));
  typ_id__1WSD= 0;
  sz__YWSD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
  if ((sz__YWSD ==  0)) {
    result__VWSD=FAST_ARRAYoITM_ARGUMENTo__;
  } else {
    typ_id__1WSD=__FAST_ARRAYoITM_ARGUMENTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__YWSD);
    if ((typ_id__1WSD == (__INTEGER)(-  1))) {
      a__GJ1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__EJ1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__YWSD + a__GJ1Q) & (__UINTEGER_32)(~ a__GJ1Q));
      ptr__WWSD=micro_alloc__table__lab__BOI(new_size__EJ1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EJ1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__EJ1Q);
    } else {
      t__KJ1Q=((__UINTEGER_32 )typ_id__1WSD);
      a__MJ1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__WWSD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__YWSD + a__MJ1Q) & (__UINTEGER_32)(~ a__MJ1Q)),((__POINTER )(&(table_type[(t__KJ1Q)]))),(__UINTEGER_32)(t__KJ1Q |  1));
    };
    result__VWSD=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__WWSD);
    *(result__VWSD) = *(FAST_ARRAYoITM_ARGUMENTo__);
  };
  Self__OW2D=((__FAST_ARRAYoITM_ARGUMENTo *)result__VWSD);
  if ((Self__OW2D->parent_arrayed_collection__5GJD.capacity__Y31D < new_count__HTRD)) {
    Self__OW2D->parent_arrayed_collection__5GJD.storage__U41D=create__VHUE(new_count__HTRD);
    Self__OW2D->parent_arrayed_collection__5GJD.capacity__Y31D=new_count__HTRD;
  };
  Self__OW2D->parent_arrayed_collection__5GJD.upper__W31D=(__INTEGER)(-  1);
  return(result__VWSD);
}

static void* new__B2GC()
// () With resultNo recursive, No inlinable.
{
  void *result__E2GC;
  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__X0ZC,*Self__N1ZC;
  result__E2GC=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K2GC)->parent_arrayed_collection__J2GC.upper__CSPC <  0)) {
    result__E2GC=create_with_capacity__4NOD( 16);
  } else {
    Self__X0ZC=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K2GC);
    result__E2GC=((void **)Self__X0ZC->parent_arrayed_collection__J2GC.storage__AUPC)[Self__X0ZC->parent_arrayed_collection__J2GC.upper__CSPC];
    Self__N1ZC=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K2GC);
    Self__N1ZC->parent_arrayed_collection__J2GC.upper__CSPC=(__INTEGER)(Self__N1ZC->parent_arrayed_collection__J2GC.upper__CSPC -  1);
  };
  return(result__E2GC);
}

static void add_last__4B1D(__FAST_ARRAYoSTRING_CONSTANTo *Self__5B1D,void *element__AC1D)
// ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__BC1D,__tmp__FD1D,__tmp__UAHF,Self__BZAG;
  __BOOLEAN __tmp__PC1D;
  void **__tmp__ED1D,**new__BAHF;
  new_capacity__BC1D= 0;
  if (((__INTEGER)(Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD +  1) <= (__INTEGER)(Self__5B1D->parent_arrayed_collection__VTFC.capacity__PRZD -  1))) {
    Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD=(__INTEGER)(Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD +  1);
    __tmp__PC1D=TRUE__;
  } else {
    __tmp__PC1D=FALSE__;
  };
  if ((! __tmp__PC1D)) {
    if ((Self__5B1D->parent_arrayed_collection__VTFC.capacity__PRZD ==  0)) {
      Self__5B1D->parent_arrayed_collection__VTFC.storage__FB0D=create__V0TE( 2);
      Self__5B1D->parent_arrayed_collection__VTFC.capacity__PRZD= 2;
      Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD= 0;
    } else {
      new_capacity__BC1D=(__INTEGER)(Self__5B1D->parent_arrayed_collection__VTFC.capacity__PRZD <<  1);
      __tmp__ED1D=Self__5B1D->parent_arrayed_collection__VTFC.storage__FB0D;
      __tmp__FD1D=Self__5B1D->parent_arrayed_collection__VTFC.capacity__PRZD;
      new__BAHF=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__ED1D)),((__UINTEGER_32 )(__INTEGER)(__tmp__FD1D * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BC1D * ((__INTEGER )(sizeof(void *)))))));
      __tmp__UAHF=(__INTEGER)(new_capacity__BC1D -  1);
      Self__BZAG=__tmp__FD1D;
      while ((Self__BZAG <= __tmp__UAHF)) {
        new__BAHF[Self__BZAG]=NULL;
        Self__BZAG=(__INTEGER)(Self__BZAG +  1);
      };
      Self__5B1D->parent_arrayed_collection__VTFC.storage__FB0D=new__BAHF;
      Self__5B1D->parent_arrayed_collection__VTFC.capacity__PRZD=new_capacity__BC1D;
      Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD=(__INTEGER)(Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD +  1);
    };
  };
  ((void **)Self__5B1D->parent_arrayed_collection__VTFC.storage__FB0D)[Self__5B1D->parent_arrayed_collection__VTFC.upper__RSSD]=element__AC1D;
}

static void free__XXZC(void *tmp__ZXZC)
// ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__LRBD,__tmp__PSBD,__tmp__YM2D,Self__YDJF;
  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__JRBD;
  __BOOLEAN __tmp__ZRBD;
  void **__tmp__OSBD,**new__FM2D;
  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__ZXZC)->parent_arrayed_collection__VTFC.upper__RSSD=(__INTEGER)(-  1);
  Self__JRBD=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K2GC);
  new_capacity__LRBD= 0;
  if (((__INTEGER)(Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC +  1) <= (__INTEGER)(Self__JRBD->parent_arrayed_collection__J2GC.capacity__VTPC -  1))) {
    Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC=(__INTEGER)(Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC +  1);
    __tmp__ZRBD=TRUE__;
  } else {
    __tmp__ZRBD=FALSE__;
  };
  if ((! __tmp__ZRBD)) {
    if ((Self__JRBD->parent_arrayed_collection__J2GC.capacity__VTPC ==  0)) {
      Self__JRBD->parent_arrayed_collection__J2GC.storage__AUPC=create__Z1BD( 2);
      Self__JRBD->parent_arrayed_collection__J2GC.capacity__VTPC= 2;
      Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC= 0;
    } else {
      new_capacity__LRBD=(__INTEGER)(Self__JRBD->parent_arrayed_collection__J2GC.capacity__VTPC <<  1);
      __tmp__OSBD=Self__JRBD->parent_arrayed_collection__J2GC.storage__AUPC;
      __tmp__PSBD=Self__JRBD->parent_arrayed_collection__J2GC.capacity__VTPC;
      new__FM2D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__OSBD)),((__UINTEGER_32 )(__INTEGER)(__tmp__PSBD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__LRBD * ((__INTEGER )(sizeof(void *)))))));
      __tmp__YM2D=(__INTEGER)(new_capacity__LRBD -  1);
      Self__YDJF=__tmp__PSBD;
      while ((Self__YDJF <= __tmp__YM2D)) {
        new__FM2D[Self__YDJF]=NULL;
        Self__YDJF=(__INTEGER)(Self__YDJF +  1);
      };
      Self__JRBD->parent_arrayed_collection__J2GC.storage__AUPC=new__FM2D;
      Self__JRBD->parent_arrayed_collection__J2GC.capacity__VTPC=new_capacity__LRBD;
      Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC=(__INTEGER)(Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC +  1);
    };
  };
  ((void **)Self__JRBD->parent_arrayed_collection__J2GC.storage__AUPC)[Self__JRBD->parent_arrayed_collection__J2GC.upper__CSPC]=tmp__ZXZC;
}

static void* alias__1XGD(void *tmp__3XGD)
// ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__C54F,i__ODTG,h__HS1D,idx__IS1D,idx__2D2E;
  __INTEGER new_capacity__3D2E,i__1D2E,typ_id__N1YE;
  __POINTER ptr__I1YE;
  __UINTEGER_32 sz__K1YE,a__BK1Q,new_size__5J1Q,t__FK1Q,a__HK1Q;
  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__3R0D,*Self__5R1D;
  void *result__RS0D,*result__5XGD,*e__AS1D;
  void *node__QS0D,*node__JS1D,*node1__5D2E,*node2__AE2E,*__tmp__ZT1D;
  __BOOLEAN __tmp__JT0D,result__A44F;
  __FAST_ARRAYoSTRING_CONSTANTo *Self__334F,*o__B44F,*__tmp__N44F;
  void **__tmp__344F,**__tmp__544F,**Self__0CTG;
  void **old_buckets__4D2E;
  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__H1YE;
  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__PUGF;
  Self__3R0D=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__DYGD);
  result__RS0D=NULL;
  node__QS0D=((void **)Self__3R0D->buckets__YS0D)[(__INTEGER)(hash_code__DRBE(tmp__3XGD) % Self__3R0D->capacity__TS0D)];
  until_do__LSBE:
  {
    if (((void *)node__QS0D == (void *)NULL)) {
      __tmp__JT0D=TRUE__;
    } else {
      Self__334F=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__QS0D)->item__ET0D);
      result__A44F=FALSE__;
      o__B44F=NULL;
      if (((void *)Self__334F == (void *)tmp__3XGD)) {
        result__A44F=TRUE__;
      } else {
        if (tmp__3XGD==NULL) {
          __tmp__N44F=NULL;
        } else {
          __tmp__N44F=((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__3XGD);
        };
        o__B44F=__tmp__N44F;
        if ((((void *)__tmp__N44F != (void *)NULL) && (Self__334F->parent_arrayed_collection__VTFC.upper__RSSD == __tmp__N44F->parent_arrayed_collection__VTFC.upper__RSSD))) {
          __tmp__344F=Self__334F->parent_arrayed_collection__VTFC.storage__FB0D;
          __tmp__544F=__tmp__N44F->parent_arrayed_collection__VTFC.storage__FB0D;
          __tmp__C54F=(__INTEGER)(Self__334F->parent_arrayed_collection__VTFC.upper__RSSD +  1);
          Self__0CTG=((void **)__tmp__344F);
          i__ODTG=(__INTEGER)(__tmp__C54F -  1);
          while (((i__ODTG >=  0) && ((void *)Self__0CTG[i__ODTG] == (void *)((void **)__tmp__544F)[i__ODTG]))) {
            i__ODTG=(__INTEGER)(i__ODTG -  1);
          };
          result__A44F=(i__ODTG <  0);
        };
      };
      __tmp__JT0D=result__A44F;
    };
    if ((! __tmp__JT0D)) {
      node__QS0D=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__QS0D)->next__QT0D;
      goto until_do__LSBE;
    };
  };
  if (((void *)node__QS0D != (void *)NULL)) {
    result__RS0D=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__QS0D)->item__ET0D;
  };
  result__5XGD=result__RS0D;
  if (((void *)result__RS0D == (void *)NULL)) {
    result__5XGD=create_with_capacity__4NOD((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__3XGD)->parent_arrayed_collection__VTFC.upper__RSSD +  1));
    copy__CR1D(result__5XGD,tmp__3XGD);
    Self__5R1D=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__DYGD);
    e__AS1D=result__5XGD;
    fast_has__10CE(Self__5R1D,result__5XGD);
    fast_has__10CE(Self__5R1D,result__5XGD);
    h__HS1D=hash_code__DRBE(result__5XGD);
    idx__IS1D=(__INTEGER)(h__HS1D % Self__5R1D->capacity__TS0D);
    node__JS1D=((void **)Self__5R1D->buckets__YS0D)[idx__IS1D];
    while ((! (((void *)node__JS1D == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__JS1D)->item__ET0D == (void *)e__AS1D)))) {
      node__JS1D=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__JS1D)->next__QT0D;
    };
    if (((void *)node__JS1D == (void *)NULL)) {
      if ((Self__5R1D->capacity__TS0D == Self__5R1D->count__MT1D)) {
        idx__2D2E= 0;
        node1__5D2E=NULL;
        node2__AE2E=NULL;
        new_capacity__3D2E=prime_number_ceiling__A4Q((__INTEGER)(Self__5R1D->capacity__TS0D +  1));
        old_buckets__4D2E=Self__5R1D->buckets__YS0D;
        Self__5R1D->buckets__YS0D=create__FSKE(new_capacity__3D2E);
        i__1D2E=(__INTEGER)(Self__5R1D->capacity__TS0D -  1);
        Self__5R1D->capacity__TS0D=new_capacity__3D2E;
        while ((i__1D2E >=  0)) {
          node1__5D2E=((void **)old_buckets__4D2E)[i__1D2E];
          while (((void *)node1__5D2E != (void *)NULL)) {
            node2__AE2E=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__5D2E)->next__QT0D;
            idx__2D2E=(__INTEGER)(hash_code__DRBE(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__5D2E)->item__ET0D) % Self__5R1D->capacity__TS0D);
            ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__5D2E)->next__QT0D=((void **)Self__5R1D->buckets__YS0D)[idx__2D2E];
            ((void **)Self__5R1D->buckets__YS0D)[idx__2D2E]=node1__5D2E;
            node1__5D2E=node2__AE2E;
          };
          i__1D2E=(__INTEGER)(i__1D2E -  1);
        };
        idx__IS1D=(__INTEGER)(h__HS1D % Self__5R1D->capacity__TS0D);
      };
      __tmp__ZT1D=((void **)Self__5R1D->buckets__YS0D)[idx__IS1D];
      result__H1YE=NULL;
      ptr__I1YE=((__POINTER )(NULL));
      typ_id__N1YE= 0;
      sz__K1YE=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
      if ((sz__K1YE ==  0)) {
        result__H1YE=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
      } else {
        typ_id__N1YE=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__K1YE);
        if ((typ_id__N1YE == (__INTEGER)(-  1))) {
          a__BK1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__5J1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__K1YE + a__BK1Q) & (__UINTEGER_32)(~ a__BK1Q));
          ptr__I1YE=micro_alloc__table__lab__BOI(new_size__5J1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5J1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__5J1Q);
        } else {
          t__FK1Q=((__UINTEGER_32 )typ_id__N1YE);
          a__HK1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__I1YE=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__K1YE + a__HK1Q) & (__UINTEGER_32)(~ a__HK1Q)),((__POINTER )(&(table_type[(t__FK1Q)]))),(__UINTEGER_32)(t__FK1Q |  1));
        };
        result__H1YE=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__I1YE);
        *(result__H1YE) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
      };
      Self__PUGF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__H1YE);
      Self__PUGF->item__ET0D=result__5XGD;
      Self__PUGF->next__QT0D=__tmp__ZT1D;
      node__JS1D=result__H1YE;
      ((void **)Self__5R1D->buckets__YS0D)[idx__IS1D]=result__H1YE;
      Self__5R1D->count__MT1D=(__INTEGER)(Self__5R1D->count__MT1D +  1);
    };
  };
  free__XXZC(tmp__3XGD);
  return(result__5XGD);
}

static void** create__VHUE(__INTEGER nb_elements__XHUE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__SHKF;
  void **Result__QSZE;
  Result__QSZE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__XHUE * ((__INTEGER )(sizeof(void *)))))));
  Self__SHKF=(__INTEGER)(nb_elements__XHUE -  1);
  while ((Self__SHKF >=  0)) {
    Result__QSZE[Self__SHKF]=NULL;
    Self__SHKF=(__INTEGER)(Self__SHKF -  1);
  };
  return(Result__QSZE);
}

static __BOOLEAN is_hexadecimal_digit__NLHD(__CHARACTER Self__OLHD)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__QLHD,__tmp__YLHD,__tmp__HMHD,result__D0KD;
  result__QLHD=FALSE__;
  if (is_digit__EWEB(Self__OLHD)) {
    result__QLHD=TRUE__;
    __tmp__YLHD=TRUE__;
  } else {
    __tmp__YLHD=FALSE__;
  };
  if (__tmp__YLHD) {
    __tmp__HMHD=TRUE__;
  } else {
    result__D0KD=(((__INTEGER_8 )Self__OLHD) >= ((__INTEGER_8 )'a'));
    if (result__D0KD) {
      result__QLHD=(((__INTEGER_8 )Self__OLHD) <= ((__INTEGER_8 )'f'));
    };
    __tmp__HMHD=result__D0KD;
  };
  if ((! __tmp__HMHD)) {
    if ((((__INTEGER_8 )Self__OLHD) >= ((__INTEGER_8 )'A'))) {
      result__QLHD=(((__INTEGER_8 )Self__OLHD) <= ((__INTEGER_8 )'F'));
    };
  };
  return(result__QLHD);
}

static __BOOLEAN is_separator__4D3E(__CHARACTER Self__5D3E)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  return((((((((Self__5D3E == ' ') || (Self__5D3E == '\t')) || (Self__5D3E == '\n')) || (Self__5D3E == '\r')) || (Self__5D3E == '\0')) || (Self__5D3E == '\f')) || (Self__5D3E == '\v')));
}

static void* read_prototype__X5JC(__PARSER *Self__Y5JC,void *style__Z5JC)
// ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *name__15JC;
  void *t__45JC,*result__55JC;
  __POSITION pos__NU5P,pos__PU5P,pos__RU5P,pos__TU5P,__tmp__2DKC;
  __POSITION __tmp__AFKC;
  void *genericity__25JC;
  __BOOLEAN continue__35JC;
  name__15JC=NULL;
  genericity__25JC=NULL;
  continue__35JC=FALSE__;
  t__45JC=NULL;
  result__55JC=NULL;
  if (read_cap_identifier__Y45()) {
    name__15JC=last_string__V1G;
    if (read_character__EQ3('[')) {
      if ((((__STRING_CONSTANT *)name__15JC)->count__XHB ==  1)) {
        pos__NU5P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_525));
        put_position__ECH(pos__NU5P);
        send_error__2FH();
      };
      genericity__25JC=new__JOC();
      do {
        t__45JC=read_type__YKLC(Self__Y5JC,FALSE__);
        if (((void *)t__45JC == (void *)NULL)) {
          pos__PU5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_526));
          put_position__ECH(pos__PU5P);
          send_error__2FH();
        };
        add_last__3VK(genericity__25JC,t__45JC);
        if (read_identifier__OLEB()) {
          continue__35JC=TRUE__;
          pos__RU5P=current_position__EJG();
          put_error__text__0AH( 2,(&__string_426));
          put_position__ECH(pos__RU5P);
          send_error__2FH();
        } else {
          continue__35JC=read_character__EQ3(',');
        };
      } while (continue__35JC);
      genericity__25JC=alias__EPC(genericity__25JC);
      result__55JC=get__style__with__1PC(name__15JC,style__Z5JC,genericity__25JC);
      if ((! read_character__EQ3(']'))) {
        pos__TU5P=current_position__EJG();
        put_error__text__0AH( 2,(&__string_427));
        put_position__ECH(pos__TU5P);
        send_error__2FH();
      };
    } else {
      if ((((__STRING_CONSTANT *)name__15JC)->count__XHB ==  1)) {
        if (((void *)style__Z5JC != (void *)NULL)) {
          copy__BNK(string_tmp__RB,(&__string_527));
          append__MOK(string_tmp__RB,style__Z5JC);
          append__MOK(string_tmp__RB,(&__string_528));
          __tmp__2DKC=current_position__EJG();
          put_error__text__0AH( 2,string_tmp__RB);
          put_position__ECH(__tmp__2DKC);
          send_error__2FH();
        };
        result__55JC=((void **)((__FAST_ARRAYoITM_TYPE_GENERIC_ELTo *)list__4SLC)->parent_arrayed_collection__3SLC.storage__FFQC)[((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)name__15JC)->storage__C5K)[ 0]) - ((__INTEGER_8 )'A')))];
      } else {
        if (((void *)style__Z5JC == (void *)NULL)) {
          result__55JC=get__5KC(name__15JC);
        } else {
          if (((void *)name__15JC == (void *)(&__string_1))) {
            copy__BNK(string_tmp__RB,(&__string_527));
            append__MOK(string_tmp__RB,style__Z5JC);
            append__MOK(string_tmp__RB,(&__string_528));
            __tmp__AFKC=current_position__EJG();
            put_error__text__0AH( 2,string_tmp__RB);
            put_position__ECH(__tmp__AFKC);
            send_error__2FH();
            result__55JC=ITM_TYPE_SELF__;
          } else {
            result__55JC=get__style__VLC(name__15JC,style__Z5JC);
          };
        };
      };
    };
  };
  return(result__55JC);
}

static __ITM_LIST* create__JCFC(__POSITION p__LCFC)
// ({POSITION}) With resultNo recursive, No inlinable.
{
  __ITM_LIST *result__ILFC;
  __POINTER ptr__JLFC;
  __INTEGER typ_id__OLFC;
  __UINTEGER_32 sz__LLFC,a__VK1Q,new_size__TK1Q,t__ZK1Q,a__1K1Q;
  result__ILFC=NULL;
  ptr__JLFC=((__POINTER )(NULL));
  typ_id__OLFC= 0;
  sz__LLFC=((__UINTEGER_32 )sizeof(__ITM_LIST));
  if ((sz__LLFC ==  0)) {
    result__ILFC=ITM_LIST__;
  } else {
    typ_id__OLFC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__LLFC);
    if ((typ_id__OLFC == (__INTEGER)(-  1))) {
      a__VK1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__TK1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__LLFC + a__VK1Q) & (__UINTEGER_32)(~ a__VK1Q));
      ptr__JLFC=micro_alloc__table__lab__BOI(new_size__TK1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TK1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__TK1Q);
    } else {
      t__ZK1Q=((__UINTEGER_32 )typ_id__OLFC);
      a__1K1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__JLFC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__LLFC + a__1K1Q) & (__UINTEGER_32)(~ a__1K1Q)),((__POINTER )(&(table_type[(t__ZK1Q)]))),(__UINTEGER_32)(t__ZK1Q |  1));
    };
    result__ILFC=((__ITM_LIST *)ptr__JLFC);
    *(result__ILFC) = *(ITM_LIST__);
  };
  ((__ITM_LIST *)result__ILFC)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM=p__LCFC;
  return(result__ILFC);
}

static void read_def_local__PCFC(__PARSER *Self__QCFC)
// ({PARSER}) VoidNo recursive, No inlinable.
{
  void *t__RVGC;
  __INTEGER beg__UVGC,typ_id__1PIC,Self__HD0C,limit_up__ID0C;
  __POSITION pos__BV5P,__tmp__AXGC,pos__KV5P,pos__XV5P,pos__ZV5P;
  void *__tmp__BXGC;
  __ITM_LOCAL *result__VPIC,*Self__1YPC;
  __POINTER ptr__WPIC;
  __UINTEGER_32 sz__YPIC,a__AL1Q,new_size__4K1Q,t__EL1Q,a__GL1Q;
  __CHARACTER styl__0CFC;
  void *local_list__YCFC,*static_list__ZCFC,*result__TVGC;
  __BOOLEAN mute__VVGC;
  void **__tmp__035Q;
  old_position__TMFC=position__ZFD;
  old_pos_cur__VMFC=pos_cur__2FD;
  old_pos_line__XMFC=pos_line__3FD;
  old_pos_col__ZMFC=pos_col__4FD;
  styl__0CFC=read_style__GDEC();
  local_list__YCFC=new__2MFC();
  static_list__ZCFC=new__2MFC();
  while ((styl__0CFC != ' ')) {
    t__RVGC=NULL;
    result__TVGC=NULL;
    beg__UVGC= 0;
    mute__VVGC=TRUE__;
    if (read_identifier__OLEB()) {
      result__TVGC=new__2MFC();
      beg__UVGC= 0;
      do {
        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__TVGC)->parent_arrayed_collection__WCFC.upper__3XGC +  1) !=  0) && (! read_identifier__OLEB())) && (! mute__VVGC))) {
          pos__BV5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_529));
          put_position__ECH(pos__BV5P);
          send_error__2FH();
        };
        __tmp__AXGC=current_position__EJG();
        __tmp__BXGC=last_string__V1G;
        result__VPIC=NULL;
        ptr__WPIC=((__POINTER )(NULL));
        typ_id__1PIC= 0;
        sz__YPIC=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
        if ((sz__YPIC ==  0)) {
          result__VPIC=ITM_LOCAL__;
        } else {
          typ_id__1PIC=__ITM_LOCAL__;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__YPIC);
          if ((typ_id__1PIC == (__INTEGER)(-  1))) {
            a__AL1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__4K1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__YPIC + a__AL1Q) & (__UINTEGER_32)(~ a__AL1Q));
            ptr__WPIC=micro_alloc__table__lab__BOI(new_size__4K1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4K1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__4K1Q);
          } else {
            t__EL1Q=((__UINTEGER_32 )typ_id__1PIC);
            a__GL1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__WPIC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__YPIC + a__GL1Q) & (__UINTEGER_32)(~ a__GL1Q)),((__POINTER )(&(table_type[(t__EL1Q)]))),(__UINTEGER_32)(t__EL1Q |  1));
          };
          result__VPIC=((__ITM_LOCAL *)ptr__WPIC);
          *(result__VPIC) = *(ITM_LOCAL__);
        };
        Self__1YPC=((__ITM_LOCAL *)result__VPIC);
        Self__1YPC->name__A0GC=__tmp__BXGC;
        Self__1YPC->parent_itm_object__RCFC.position__BJM=__tmp__AXGC;
        add_last__0VPC(result__TVGC,result__VPIC);
        if ((read_character__EQ3(':') && (last_character__0OF() != '='))) {
          mute__VVGC=FALSE__;
          t__RVGC=read_type__YKLC(Self__QCFC,TRUE__);
          if (((void *)t__RVGC == (void *)NULL)) {
            pos__KV5P=current_position__EJG();
            put_error__text__0AH( 0,(&__string_530));
            put_position__ECH(pos__KV5P);
            send_error__2FH();
          };
          Self__HD0C=beg__UVGC;
          limit_up__ID0C=((__FAST_ARRAYoITM_LOCALo *)result__TVGC)->parent_arrayed_collection__WCFC.upper__3XGC;
          __tmp__035Q=((__FAST_ARRAYoITM_LOCALo *)result__TVGC)->parent_arrayed_collection__WCFC.storage__GMPC;
          while ((Self__HD0C <= limit_up__ID0C)) {
            ((__ITM_LOCAL *)((void **)__tmp__035Q)[Self__HD0C])->type__K5EF=t__RVGC;
            Self__HD0C=(__INTEGER)(Self__HD0C +  1);
          };
          beg__UVGC=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__TVGC)->parent_arrayed_collection__WCFC.upper__3XGC +  1);
        };
      } while (read_character__EQ3(','));
      if ((beg__UVGC != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__TVGC)->parent_arrayed_collection__WCFC.upper__3XGC +  1))) {
        if (mute__VVGC) {
          free__3LGC(result__TVGC);
          result__TVGC=NULL;
        } else {
          pos__XV5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_530));
          put_position__ECH(pos__XV5P);
          send_error__2FH();
        };
      } else {
        result__TVGC=copy__QFGC(result__TVGC);
      };
    };
    if (((void *)result__TVGC != (void *)NULL)) {
      if ((styl__0CFC == '+')) {
        append_collection__5LEF(local_list__YCFC,result__TVGC);
      } else {
        append_collection__5LEF(static_list__ZCFC,result__TVGC);
      };
      if ((! read_character__EQ3(';'))) {
        pos__ZV5P=current_position__EJG();
        put_error__text__0AH( 2,(&__string_320));
        put_position__ECH(pos__ZV5P);
        send_error__2FH();
      };
      old_position__TMFC=position__ZFD;
      old_pos_cur__VMFC=pos_cur__2FD;
      old_pos_line__XMFC=pos_line__3FD;
      old_pos_col__ZMFC=pos_col__4FD;
      styl__0CFC=read_style__GDEC();
    } else {
      position__ZFD=old_position__TMFC;
      pos_cur__2FD=old_pos_cur__VMFC;
      pos_line__3FD=old_pos_line__XMFC;
      pos_col__4FD=old_pos_col__ZMFC;
      styl__0CFC=' ';
    };
  };
  if ((((__FAST_ARRAYoITM_LOCALo *)local_list__YCFC)->parent_arrayed_collection__WCFC.upper__3XGC <  0)) {
    free__3LGC(local_list__YCFC);
  } else {
    ((__ITM_LIST *)last_group__KFEC)->local_list__3HPC=copy__QFGC(local_list__YCFC);
  };
  if ((((__FAST_ARRAYoITM_LOCALo *)static_list__ZCFC)->parent_arrayed_collection__WCFC.upper__3XGC <  0)) {
    free__3LGC(static_list__ZCFC);
  } else {
    ((__ITM_LIST *)last_group__KFEC)->static_list__JIPC=copy__QFGC(static_list__ZCFC);
  };
}

static void* new__KFFC()
// () With resultNo recursive, No inlinable.
{
  void *result__NFFC;
  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__P3YC,*Self__F4YC;
  result__NFFC=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__TFFC)->parent_arrayed_collection__SFFC.upper__CAPC <  0)) {
    result__NFFC=create_with_capacity__GQFC( 16);
  } else {
    Self__P3YC=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__TFFC);
    result__NFFC=((void **)Self__P3YC->parent_arrayed_collection__SFFC.storage__SFPC)[Self__P3YC->parent_arrayed_collection__SFFC.upper__CAPC];
    Self__F4YC=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__TFFC);
    Self__F4YC->parent_arrayed_collection__SFFC.upper__CAPC=(__INTEGER)(Self__F4YC->parent_arrayed_collection__SFFC.upper__CAPC -  1);
  };
  return(result__NFFC);
}

static void add_last__I4PC(__FAST_ARRAYoITM_CODEo *Self__J4PC,void *element__K4PC)
// ({FAST_ARRAYoITM_CODEo},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGSxITM_RESULT}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__L4PC,__tmp__P5PC,__tmp__E00D,Self__Y0IF;
  __BOOLEAN __tmp__Z4PC;
  void **__tmp__O5PC,**new__RZ0D;
  new_capacity__L4PC= 0;
  if (((__INTEGER)(Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC +  1) <= (__INTEGER)(Self__J4PC->parent_arrayed_collection__AFEC.capacity__VBPC -  1))) {
    Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC=(__INTEGER)(Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC +  1);
    __tmp__Z4PC=TRUE__;
  } else {
    __tmp__Z4PC=FALSE__;
  };
  if ((! __tmp__Z4PC)) {
    if ((Self__J4PC->parent_arrayed_collection__AFEC.capacity__VBPC ==  0)) {
      Self__J4PC->parent_arrayed_collection__AFEC.storage__ACPC=create__UFBD( 2);
      Self__J4PC->parent_arrayed_collection__AFEC.capacity__VBPC= 2;
      Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC= 0;
    } else {
      new_capacity__L4PC=(__INTEGER)(Self__J4PC->parent_arrayed_collection__AFEC.capacity__VBPC <<  1);
      __tmp__O5PC=Self__J4PC->parent_arrayed_collection__AFEC.storage__ACPC;
      __tmp__P5PC=Self__J4PC->parent_arrayed_collection__AFEC.capacity__VBPC;
      new__RZ0D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__O5PC)),((__UINTEGER_32 )(__INTEGER)(__tmp__P5PC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__L4PC * ((__INTEGER )(sizeof(void *)))))));
      __tmp__E00D=(__INTEGER)(new_capacity__L4PC -  1);
      Self__Y0IF=__tmp__P5PC;
      while ((Self__Y0IF <= __tmp__E00D)) {
        new__RZ0D[Self__Y0IF]=NULL;
        Self__Y0IF=(__INTEGER)(Self__Y0IF +  1);
      };
      Self__J4PC->parent_arrayed_collection__AFEC.storage__ACPC=new__RZ0D;
      Self__J4PC->parent_arrayed_collection__AFEC.capacity__VBPC=new_capacity__L4PC;
      Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC=(__INTEGER)(Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC +  1);
    };
  };
  ((void **)Self__J4PC->parent_arrayed_collection__AFEC.storage__ACPC)[Self__J4PC->parent_arrayed_collection__AFEC.upper__ZAPC]=element__K4PC;
}

static __ITM_PROTOTYPE* create__type__1GFC(__POSITION p__3GFC,void *n__4GFC)
// ({POSITION},{NULLxITM_TYPE_SIMPLExITM_TYPE_STYLExITM_TYPE_GENERICxITM_TYPE_SELFxITM_BLOCKxITM_TYPE_GENERIC_ELT}) With resultNo recursive, No inlinable.
{
  __ITM_PROTOTYPE *result__4OFC,*Self__SAPC;
  __POINTER ptr__5OFC;
  __INTEGER typ_id__EPFC;
  __UINTEGER_32 sz__BPFC,a__LL1Q,new_size__JL1Q,t__PL1Q,a__RL1Q;
  result__4OFC=NULL;
  ptr__5OFC=((__POINTER )(NULL));
  typ_id__EPFC= 0;
  sz__BPFC=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
  if ((sz__BPFC ==  0)) {
    result__4OFC=ITM_PROTOTYPE__;
  } else {
    typ_id__EPFC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__BPFC);
    if ((typ_id__EPFC == (__INTEGER)(-  1))) {
      a__LL1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__JL1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__BPFC + a__LL1Q) & (__UINTEGER_32)(~ a__LL1Q));
      ptr__5OFC=micro_alloc__table__lab__BOI(new_size__JL1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JL1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__JL1Q);
    } else {
      t__PL1Q=((__UINTEGER_32 )typ_id__EPFC);
      a__RL1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__5OFC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__BPFC + a__RL1Q) & (__UINTEGER_32)(~ a__RL1Q)),((__POINTER )(&(table_type[(t__PL1Q)]))),(__UINTEGER_32)(t__PL1Q |  1));
    };
    result__4OFC=((__ITM_PROTOTYPE *)ptr__5OFC);
    *(result__4OFC) = *(ITM_PROTOTYPE__);
  };
  Self__SAPC=((__ITM_PROTOTYPE *)result__4OFC);
  Self__SAPC->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM=p__3GFC;
  Self__SAPC->type__VAPC=n__4GFC;
  return(result__4OFC);
}

static void* copy__CHFC(void *tmp__EHFC)
// ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
{
  __INTEGER new_capacity__MBPC,other_upper__LBPC,Self__J25D;
  void *result__GHFC;
  __FAST_ARRAYoITM_CODEo *Self__JBPC;
  void **__tmp__DCPC,**__tmp__FCPC,**Self__KPZD;
  result__GHFC=create_with_capacity__GQFC((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__EHFC)->parent_arrayed_collection__AFEC.upper__ZAPC +  1));
  Self__JBPC=((__FAST_ARRAYoITM_CODEo *)result__GHFC);
  new_capacity__MBPC= 0;
  other_upper__LBPC=((__FAST_ARRAYoITM_CODEo *)tmp__EHFC)->parent_arrayed_collection__AFEC.upper__ZAPC;
  if ((other_upper__LBPC >=  0)) {
    new_capacity__MBPC=(__INTEGER)(other_upper__LBPC +  1);
    if ((Self__JBPC->parent_arrayed_collection__AFEC.capacity__VBPC < new_capacity__MBPC)) {
      Self__JBPC->parent_arrayed_collection__AFEC.storage__ACPC=create__UFBD(new_capacity__MBPC);
      Self__JBPC->parent_arrayed_collection__AFEC.capacity__VBPC=new_capacity__MBPC;
    };
    __tmp__DCPC=Self__JBPC->parent_arrayed_collection__AFEC.storage__ACPC;
    __tmp__FCPC=((__FAST_ARRAYoITM_CODEo *)tmp__EHFC)->parent_arrayed_collection__AFEC.storage__ACPC;
    Self__KPZD=((void **)__tmp__DCPC);
    Self__J25D=other_upper__LBPC;
    while ((Self__J25D >=  0)) {
      Self__KPZD[Self__J25D]=((void **)__tmp__FCPC)[Self__J25D];
      Self__J25D=(__INTEGER)(Self__J25D -  1);
    };
  };
  Self__JBPC->parent_arrayed_collection__AFEC.upper__ZAPC=other_upper__LBPC;
  free__MQFC(tmp__EHFC);
  return(result__GHFC);
}

static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__4NOD(__INTEGER new_count__AOOD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__KQQD;
  __INTEGER typ_id__PQQD;
  __UINTEGER_32 sz__MQQD,a__WL1Q,new_size__UL1Q,t__0L1Q,a__2L1Q;
  __FAST_ARRAYoSTRING_CONSTANTo *result__JQQD,*Self__AN2D;
  result__JQQD=NULL;
  ptr__KQQD=((__POINTER )(NULL));
  typ_id__PQQD= 0;
  sz__MQQD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
  if ((sz__MQQD ==  0)) {
    result__JQQD=FAST_ARRAYoSTRING_CONSTANTo__;
  } else {
    typ_id__PQQD=__FAST_ARRAYoSTRING_CONSTANTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MQQD);
    if ((typ_id__PQQD == (__INTEGER)(-  1))) {
      a__WL1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__UL1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__MQQD + a__WL1Q) & (__UINTEGER_32)(~ a__WL1Q));
      ptr__KQQD=micro_alloc__table__lab__BOI(new_size__UL1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UL1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__UL1Q);
    } else {
      t__0L1Q=((__UINTEGER_32 )typ_id__PQQD);
      a__2L1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__KQQD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MQQD + a__2L1Q) & (__UINTEGER_32)(~ a__2L1Q)),((__POINTER )(&(table_type[(t__0L1Q)]))),(__UINTEGER_32)(t__0L1Q |  1));
    };
    result__JQQD=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__KQQD);
    *(result__JQQD) = *(FAST_ARRAYoSTRING_CONSTANTo__);
  };
  Self__AN2D=((__FAST_ARRAYoSTRING_CONSTANTo *)result__JQQD);
  if ((Self__AN2D->parent_arrayed_collection__VTFC.capacity__PRZD < new_count__AOOD)) {
    Self__AN2D->parent_arrayed_collection__VTFC.storage__FB0D=create__V0TE(new_count__AOOD);
    Self__AN2D->parent_arrayed_collection__VTFC.capacity__PRZD=new_count__AOOD;
  };
  Self__AN2D->parent_arrayed_collection__VTFC.upper__RSSD=(__INTEGER)(-  1);
  return(result__JQQD);
}

static void copy__CR1D(__FAST_ARRAYoSTRING_CONSTANTo *Self__DR1D,void *other__ER1D)
// ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__GR1D,other_upper__FR1D,Self__RRJF;
  void **__tmp__ZR1D,**__tmp__1R1D,**Self__5KGF;
  new_capacity__GR1D= 0;
  other_upper__FR1D=((__FAST_ARRAYoSTRING_CONSTANTo *)other__ER1D)->parent_arrayed_collection__VTFC.upper__RSSD;
  if ((other_upper__FR1D >=  0)) {
    new_capacity__GR1D=(__INTEGER)(other_upper__FR1D +  1);
    if ((Self__DR1D->parent_arrayed_collection__VTFC.capacity__PRZD < new_capacity__GR1D)) {
      Self__DR1D->parent_arrayed_collection__VTFC.storage__FB0D=create__V0TE(new_capacity__GR1D);
      Self__DR1D->parent_arrayed_collection__VTFC.capacity__PRZD=new_capacity__GR1D;
    };
    __tmp__ZR1D=Self__DR1D->parent_arrayed_collection__VTFC.storage__FB0D;
    __tmp__1R1D=((__FAST_ARRAYoSTRING_CONSTANTo *)other__ER1D)->parent_arrayed_collection__VTFC.storage__FB0D;
    Self__5KGF=((void **)__tmp__ZR1D);
    Self__RRJF=other_upper__FR1D;
    while ((Self__RRJF >=  0)) {
      Self__5KGF[Self__RRJF]=((void **)__tmp__1R1D)[Self__RRJF];
      Self__RRJF=(__INTEGER)(Self__RRJF -  1);
    };
  };
  Self__DR1D->parent_arrayed_collection__VTFC.upper__RSSD=other_upper__FR1D;
}

static __ITM_WRITE_VALUE* create__assign__with__AMQD(__POSITION p__CMQD,void *n__DMQD,void *v__EMQD)
// ({POSITION},{NULLxITM_LISTxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS},{NULLxITM_LISTxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS}) With resultNo recursive, No inlinable.
{
  __ITM_WRITE_VALUE *result__PZRD,*Self__DV2D;
  __POINTER ptr__QZRD;
  __INTEGER typ_id__VZRD;
  __UINTEGER_32 sz__SZRD,a__EM1Q,new_size__CM1Q,t__IM1Q,a__KM1Q;
  result__PZRD=NULL;
  ptr__QZRD=((__POINTER )(NULL));
  typ_id__VZRD= 0;
  sz__SZRD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
  if ((sz__SZRD ==  0)) {
    result__PZRD=ITM_WRITE_VALUE__;
  } else {
    typ_id__VZRD=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__SZRD);
    if ((typ_id__VZRD == (__INTEGER)(-  1))) {
      a__EM1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__CM1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__SZRD + a__EM1Q) & (__UINTEGER_32)(~ a__EM1Q));
      ptr__QZRD=micro_alloc__table__lab__BOI(new_size__CM1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CM1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__CM1Q);
    } else {
      t__IM1Q=((__UINTEGER_32 )typ_id__VZRD);
      a__KM1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__QZRD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__SZRD + a__KM1Q) & (__UINTEGER_32)(~ a__KM1Q)),((__POINTER )(&(table_type[(t__IM1Q)]))),(__UINTEGER_32)(t__IM1Q |  1));
    };
    result__PZRD=((__ITM_WRITE_VALUE *)ptr__QZRD);
    *(result__PZRD) = *(ITM_WRITE_VALUE__);
  };
  Self__DV2D=((__ITM_WRITE_VALUE *)result__PZRD);
  Self__DV2D->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM=p__CMQD;
  Self__DV2D->parent_itm_write__DYFC.assign__HV2D=n__DMQD;
  Self__DV2D->parent_itm_write__DYFC.value__IV2D=v__EMQD;
  return(result__PZRD);
}

static __ITM_WRITE_CAST* create__assign__with__SNQD(__POSITION p__UNQD,void *n__VNQD,void *v__WNQD)
// ({POSITION},{NULLxITM_LISTxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS},{NULLxITM_LISTxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS}) With resultNo recursive, No inlinable.
{
  __ITM_WRITE_CAST *result__R2RD,*Self__RV2D;
  __POINTER ptr__S2RD;
  __INTEGER typ_id__X2RD;
  __UINTEGER_32 sz__U2RD,a__PM1Q,new_size__NM1Q,t__TM1Q,a__VM1Q;
  result__R2RD=NULL;
  ptr__S2RD=((__POINTER )(NULL));
  typ_id__X2RD= 0;
  sz__U2RD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
  if ((sz__U2RD ==  0)) {
    result__R2RD=ITM_WRITE_CAST__;
  } else {
    typ_id__X2RD=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__U2RD);
    if ((typ_id__X2RD == (__INTEGER)(-  1))) {
      a__PM1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__NM1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__U2RD + a__PM1Q) & (__UINTEGER_32)(~ a__PM1Q));
      ptr__S2RD=micro_alloc__table__lab__BOI(new_size__NM1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NM1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NM1Q);
    } else {
      t__TM1Q=((__UINTEGER_32 )typ_id__X2RD);
      a__VM1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__S2RD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__U2RD + a__VM1Q) & (__UINTEGER_32)(~ a__VM1Q)),((__POINTER )(&(table_type[(t__TM1Q)]))),(__UINTEGER_32)(t__TM1Q |  1));
    };
    result__R2RD=((__ITM_WRITE_CAST *)ptr__S2RD);
    *(result__R2RD) = *(ITM_WRITE_CAST__);
  };
  Self__RV2D=((__ITM_WRITE_CAST *)result__R2RD);
  Self__RV2D->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM=p__UNQD;
  Self__RV2D->parent_itm_write__ZYFC.assign__HV2D=n__VNQD;
  Self__RV2D->parent_itm_write__ZYFC.value__IV2D=v__WNQD;
  return(result__R2RD);
}

static __ITM_READ* create__name__Q5JC(__POSITION p__S5JC,void *n__T5JC)
// ({POSITION},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  __ITM_READ *result__L2KC,*Self__Y2PC;
  __POINTER ptr__M2KC;
  __INTEGER typ_id__R2KC;
  __UINTEGER_32 sz__O2KC,a__0M1Q,new_size__YM1Q,t__4M1Q,a__AN1Q;
  result__L2KC=NULL;
  ptr__M2KC=((__POINTER )(NULL));
  typ_id__R2KC= 0;
  sz__O2KC=((__UINTEGER_32 )sizeof(__ITM_READ));
  if ((sz__O2KC ==  0)) {
    result__L2KC=ITM_READ__;
  } else {
    typ_id__R2KC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__O2KC);
    if ((typ_id__R2KC == (__INTEGER)(-  1))) {
      a__0M1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__YM1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__O2KC + a__0M1Q) & (__UINTEGER_32)(~ a__0M1Q));
      ptr__M2KC=micro_alloc__table__lab__BOI(new_size__YM1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YM1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__YM1Q);
    } else {
      t__4M1Q=((__UINTEGER_32 )typ_id__R2KC);
      a__AN1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__M2KC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__O2KC + a__AN1Q) & (__UINTEGER_32)(~ a__AN1Q)),((__POINTER )(&(table_type[(t__4M1Q)]))),(__UINTEGER_32)(t__4M1Q |  1));
    };
    result__L2KC=((__ITM_READ *)ptr__M2KC);
    *(result__L2KC) = *(ITM_READ__);
  };
  Self__Y2PC=((__ITM_READ *)result__L2KC);
  Self__Y2PC->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM=p__S5JC;
  Self__Y2PC->name__TVPC=n__T5JC;
  return(result__L2KC);
}

static void* read_expr_prefix__W4GC(__PARSER *Self__X4GC)
// ({PARSER}) With resultRecursive, No inlinable.
{
  void *result__Z4GC,*expr__04GC,*result__NHIC,*old_value__OHIC;
  void *result__IBIC;
  void *name__14GC;
  __POSITION pos__QZ5P,pos__UZ5P,p__5WIC,pos__3Z5P;
  __ITM_OLD *result__XOJC,*Self__LZPC;
  __POINTER ptr__YOJC;
  __INTEGER typ_id__3OJC;
  __UINTEGER_32 sz__0OJC,a__FN1Q,new_size__DN1Q,t__JN1Q,a__LN1Q;
  result__Z4GC=NULL;
  expr__04GC=NULL;
  name__14GC=NULL;
  if (read_operator__2IHC()) {
    name__14GC=operator_to_name__2YHC((&__string_85),last_string__V1G);
    expr__04GC=read_expr_prefix__W4GC(Self__X4GC);
    if (((void *)expr__04GC == (void *)NULL)) {
      pos__QZ5P=current_position__EJG();
      put_error__text__0AH( 0,(&__string_319));
      put_position__ECH(pos__QZ5P);
      send_error__2FH();
    };
    result__Z4GC=create__name__arg__3AIC(current_position__EJG(),name__14GC,expr__04GC);
  } else {
    result__NHIC=NULL;
    old_value__OHIC=NULL;
    if (read_word__NWH((&__string_12))) {
      old_value__OHIC=read_expr__NTFC(Self__X4GC);
      if (((void *)old_value__OHIC == (void *)NULL)) {
        pos__UZ5P=current_position__EJG();
        put_error__text__0AH( 0,(&__string_531));
        put_position__ECH(pos__UZ5P);
        send_error__2FH();
      };
      p__5WIC=current_position__EJG();
      result__XOJC=NULL;
      ptr__YOJC=((__POINTER )(NULL));
      typ_id__3OJC= 0;
      sz__0OJC=((__UINTEGER_32 )sizeof(__ITM_OLD));
      if ((sz__0OJC ==  0)) {
        result__XOJC=ITM_OLD__;
      } else {
        typ_id__3OJC=-1;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__0OJC);
        if ((typ_id__3OJC == (__INTEGER)(-  1))) {
          a__FN1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__DN1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__0OJC + a__FN1Q) & (__UINTEGER_32)(~ a__FN1Q));
          ptr__YOJC=micro_alloc__table__lab__BOI(new_size__DN1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DN1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__DN1Q);
        } else {
          t__JN1Q=((__UINTEGER_32 )typ_id__3OJC);
          a__LN1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__YOJC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__0OJC + a__LN1Q) & (__UINTEGER_32)(~ a__LN1Q)),((__POINTER )(&(table_type[(t__JN1Q)]))),(__UINTEGER_32)(t__JN1Q |  1));
        };
        result__XOJC=((__ITM_OLD *)ptr__YOJC);
        *(result__XOJC) = *(ITM_OLD__);
      };
      Self__LZPC=((__ITM_OLD *)result__XOJC);
      Self__LZPC->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM=p__5WIC;
      Self__LZPC->value__OZPC=old_value__OHIC;
      result__NHIC=result__XOJC;
    } else {
      result__NHIC=read_expr_primary__EXIC(Self__X4GC);
      if (((void *)result__NHIC == (void *)NULL)) {
        result__NHIC=read_send_msg__L0JC(Self__X4GC,NULL);
      };
    };
    result__IBIC=result__NHIC;
    if (((void *)result__NHIC != (void *)NULL)) {
      while (read_character__EQ3('.')) {
        result__IBIC=read_send_msg__L0JC(Self__X4GC,result__IBIC);
        if (((void *)result__IBIC == (void *)NULL)) {
          pos__3Z5P=current_position__EJG();
          put_error__text__0AH( 0,(&__string_532));
          put_position__ECH(pos__3Z5P);
          send_error__2FH();
        };
      };
    };
    result__Z4GC=result__IBIC;
  };
  return(result__Z4GC);
}

static void* new__1XZC()
// () With resultNo recursive, No inlinable.
{
  void *result__4XZC;
  __FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *Self__V0HE,*Self__L1HE;
  result__4XZC=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *)free_list__EYZC)->parent_arrayed_collection__DYZC.upper__YRZD <  0)) {
    result__4XZC=create_with_capacity__MLKD( 16);
  } else {
    Self__V0HE=((__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *)free_list__EYZC);
    result__4XZC=((void **)Self__V0HE->parent_arrayed_collection__DYZC.storage__5N0D)[Self__V0HE->parent_arrayed_collection__DYZC.upper__YRZD];
    Self__L1HE=((__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *)free_list__EYZC);
    Self__L1HE->parent_arrayed_collection__DYZC.upper__YRZD=(__INTEGER)(Self__L1HE->parent_arrayed_collection__DYZC.upper__YRZD -  1);
  };
  return(result__4XZC);
}

static __POSITION* create__WXSE(__INTEGER nb_elements__YXSE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__EYSE,Self__ECKF;
  __POSITION v__EUGF;
  __POSITION *Result__YQYE;
  Result__YQYE=((__POSITION *)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__YXSE * ((__INTEGER )(sizeof(void *)))))));
  __tmp__EYSE=(__INTEGER)(nb_elements__YXSE -  1);
  v__EUGF=((__POSITION ) 0);
  Self__ECKF=__tmp__EYSE;
  while ((Self__ECKF >=  0)) {
    Result__YQYE[Self__ECKF]=v__EUGF;
    Self__ECKF=(__INTEGER)(Self__ECKF -  1);
  };
  return(Result__YQYE);
}

static __ITM_READ_ARG2* create__name__args__BKLC(__POSITION p__DKLC,void *n__EKLC,void *a1__FKLC,void *a2__GKLC)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGSxITM_RESULT},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_READ_ARG2xITM_BINARYxITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGSxITM_RESULT}) With resultNo recursive, No inlinable.
{
  __ITM_READ_ARG2 *result__XNLC,*Self__BEQC;
  __POINTER ptr__YNLC;
  __INTEGER typ_id__3NLC;
  __UINTEGER_32 sz__0NLC,a__QN1Q,new_size__ON1Q,t__UN1Q,a__WN1Q;
  result__XNLC=NULL;
  ptr__YNLC=((__POINTER )(NULL));
  typ_id__3NLC= 0;
  sz__0NLC=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
  if ((sz__0NLC ==  0)) {
    result__XNLC=ITM_READ_ARG2__;
  } else {
    typ_id__3NLC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__0NLC);
    if ((typ_id__3NLC == (__INTEGER)(-  1))) {
      a__QN1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__ON1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__0NLC + a__QN1Q) & (__UINTEGER_32)(~ a__QN1Q));
      ptr__YNLC=micro_alloc__table__lab__BOI(new_size__ON1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ON1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__ON1Q);
    } else {
      t__UN1Q=((__UINTEGER_32 )typ_id__3NLC);
      a__WN1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__YNLC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__0NLC + a__WN1Q) & (__UINTEGER_32)(~ a__WN1Q)),((__POINTER )(&(table_type[(t__UN1Q)]))),(__UINTEGER_32)(t__UN1Q |  1));
    };
    result__XNLC=((__ITM_READ_ARG2 *)ptr__YNLC);
    *(result__XNLC) = *(ITM_READ_ARG2__);
  };
  Self__BEQC=((__ITM_READ_ARG2 *)result__XNLC);
  Self__BEQC->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM=p__DKLC;
  Self__BEQC->parent_itm_read__V4FC.name__TVPC=n__EKLC;
  Self__BEQC->arg_first__MEQC=a1__FKLC;
  Self__BEQC->arg_second__NEQC=a2__GKLC;
  return(result__XNLC);
}

static void free__MQFC(void *tmp__OQFC)
// ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__UEPC,__tmp__2FPC,__tmp__AL0D,Self__ISIF;
  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__SEPC;
  __BOOLEAN __tmp__DFPC;
  void **__tmp__1FPC,**new__NK0D;
  ((__FAST_ARRAYoITM_CODEo *)tmp__OQFC)->parent_arrayed_collection__AFEC.upper__ZAPC=(__INTEGER)(-  1);
  Self__SEPC=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__TFFC);
  new_capacity__UEPC= 0;
  if (((__INTEGER)(Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC +  1) <= (__INTEGER)(Self__SEPC->parent_arrayed_collection__SFFC.capacity__WEPC -  1))) {
    Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC=(__INTEGER)(Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC +  1);
    __tmp__DFPC=TRUE__;
  } else {
    __tmp__DFPC=FALSE__;
  };
  if ((! __tmp__DFPC)) {
    if ((Self__SEPC->parent_arrayed_collection__SFFC.capacity__WEPC ==  0)) {
      Self__SEPC->parent_arrayed_collection__SFFC.storage__SFPC=create__TIBD( 2);
      Self__SEPC->parent_arrayed_collection__SFFC.capacity__WEPC= 2;
      Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC= 0;
    } else {
      new_capacity__UEPC=(__INTEGER)(Self__SEPC->parent_arrayed_collection__SFFC.capacity__WEPC <<  1);
      __tmp__1FPC=Self__SEPC->parent_arrayed_collection__SFFC.storage__SFPC;
      __tmp__2FPC=Self__SEPC->parent_arrayed_collection__SFFC.capacity__WEPC;
      new__NK0D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__1FPC)),((__UINTEGER_32 )(__INTEGER)(__tmp__2FPC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UEPC * ((__INTEGER )(sizeof(void *)))))));
      __tmp__AL0D=(__INTEGER)(new_capacity__UEPC -  1);
      Self__ISIF=__tmp__2FPC;
      while ((Self__ISIF <= __tmp__AL0D)) {
        new__NK0D[Self__ISIF]=NULL;
        Self__ISIF=(__INTEGER)(Self__ISIF +  1);
      };
      Self__SEPC->parent_arrayed_collection__SFFC.storage__SFPC=new__NK0D;
      Self__SEPC->parent_arrayed_collection__SFFC.capacity__WEPC=new_capacity__UEPC;
      Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC=(__INTEGER)(Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC +  1);
    };
  };
  ((void **)Self__SEPC->parent_arrayed_collection__SFFC.storage__SFPC)[Self__SEPC->parent_arrayed_collection__SFFC.upper__CAPC]=tmp__OQFC;
}

static void free__XXGD(void *tmp__ZXGD)
// ({NULLxFAST_ARRAYoExpanded_POSITIONo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__KP0D,__tmp__OQ0D,__tmp__34GF,Self__CXAG;
  __FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *Self__IP0D;
  __BOOLEAN __tmp__YP0D;
  void **__tmp__NQ0D,**new__K4GF;
  ((__FAST_ARRAYoExpanded_POSITIONo *)tmp__ZXGD)->parent_arrayed_collection__1TFC.upper__VO0D=(__INTEGER)(-  1);
  Self__IP0D=((__FAST_ARRAYoFAST_ARRAYoExpanded_POSITIONoo *)free_list__EYZC);
  new_capacity__KP0D= 0;
  if (((__INTEGER)(Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD +  1) <= (__INTEGER)(Self__IP0D->parent_arrayed_collection__DYZC.capacity__UN0D -  1))) {
    Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD=(__INTEGER)(Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD +  1);
    __tmp__YP0D=TRUE__;
  } else {
    __tmp__YP0D=FALSE__;
  };
  if ((! __tmp__YP0D)) {
    if ((Self__IP0D->parent_arrayed_collection__DYZC.capacity__UN0D ==  0)) {
      Self__IP0D->parent_arrayed_collection__DYZC.storage__5N0D=create__GJSE( 2);
      Self__IP0D->parent_arrayed_collection__DYZC.capacity__UN0D= 2;
      Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD= 0;
    } else {
      new_capacity__KP0D=(__INTEGER)(Self__IP0D->parent_arrayed_collection__DYZC.capacity__UN0D <<  1);
      __tmp__NQ0D=Self__IP0D->parent_arrayed_collection__DYZC.storage__5N0D;
      __tmp__OQ0D=Self__IP0D->parent_arrayed_collection__DYZC.capacity__UN0D;
      new__K4GF=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__NQ0D)),((__UINTEGER_32 )(__INTEGER)(__tmp__OQ0D * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__KP0D * ((__INTEGER )(sizeof(void *)))))));
      __tmp__34GF=(__INTEGER)(new_capacity__KP0D -  1);
      Self__CXAG=__tmp__OQ0D;
      while ((Self__CXAG <= __tmp__34GF)) {
        new__K4GF[Self__CXAG]=NULL;
        Self__CXAG=(__INTEGER)(Self__CXAG +  1);
      };
      Self__IP0D->parent_arrayed_collection__DYZC.storage__5N0D=new__K4GF;
      Self__IP0D->parent_arrayed_collection__DYZC.capacity__UN0D=new_capacity__KP0D;
      Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD=(__INTEGER)(Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD +  1);
    };
  };
  ((void **)Self__IP0D->parent_arrayed_collection__DYZC.storage__5N0D)[Self__IP0D->parent_arrayed_collection__DYZC.upper__YRZD]=tmp__ZXGD;
}

static __FAST_ARRAYoExpanded_POSITIONo* create_with_capacity__MLKD(__INTEGER new_count__OLKD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__VSMD;
  __INTEGER typ_id__0SMD;
  __UINTEGER_32 sz__XSMD,a__HO1Q,new_size__FO1Q,t__LO1Q,a__NO1Q;
  __FAST_ARRAYoExpanded_POSITIONo *result__USMD,*Self__HH1D;
  result__USMD=NULL;
  ptr__VSMD=((__POINTER )(NULL));
  typ_id__0SMD= 0;
  sz__XSMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoExpanded_POSITIONo));
  if ((sz__XSMD ==  0)) {
    result__USMD=FAST_ARRAYoExpanded_POSITIONo__;
  } else {
    typ_id__0SMD=__FAST_ARRAYoExpanded_POSITIONo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__XSMD);
    if ((typ_id__0SMD == (__INTEGER)(-  1))) {
      a__HO1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__FO1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__XSMD + a__HO1Q) & (__UINTEGER_32)(~ a__HO1Q));
      ptr__VSMD=micro_alloc__table__lab__BOI(new_size__FO1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FO1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__FO1Q);
    } else {
      t__LO1Q=((__UINTEGER_32 )typ_id__0SMD);
      a__NO1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__VSMD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__XSMD + a__NO1Q) & (__UINTEGER_32)(~ a__NO1Q)),((__POINTER )(&(table_type[(t__LO1Q)]))),(__UINTEGER_32)(t__LO1Q |  1));
    };
    result__USMD=((__FAST_ARRAYoExpanded_POSITIONo *)ptr__VSMD);
    *(result__USMD) = *(FAST_ARRAYoExpanded_POSITIONo__);
  };
  Self__HH1D=((__FAST_ARRAYoExpanded_POSITIONo *)result__USMD);
  if ((Self__HH1D->parent_arrayed_collection__1TFC.capacity__BP0D < new_count__OLKD)) {
    Self__HH1D->parent_arrayed_collection__1TFC.storage__MA0D=create__WXSE(new_count__OLKD);
    Self__HH1D->parent_arrayed_collection__1TFC.capacity__BP0D=new_count__OLKD;
  };
  Self__HH1D->parent_arrayed_collection__1TFC.upper__VO0D=(__INTEGER)(-  1);
  return(result__USMD);
}

static void copy__0U0D(__FAST_ARRAYoExpanded_POSITIONo *Self__1U0D,void *other__2U0D)
// ({FAST_ARRAYoExpanded_POSITIONo},{NULLxFAST_ARRAYoExpanded_POSITIONo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__4U0D,other_upper__3U0D,Self__DPJF;
  __POSITION *__tmp__RV0D,*__tmp__TV0D,*Self__JJGF;
  new_capacity__4U0D= 0;
  other_upper__3U0D=((__FAST_ARRAYoExpanded_POSITIONo *)other__2U0D)->parent_arrayed_collection__1TFC.upper__VO0D;
  if ((other_upper__3U0D >=  0)) {
    new_capacity__4U0D=(__INTEGER)(other_upper__3U0D +  1);
    if ((Self__1U0D->parent_arrayed_collection__1TFC.capacity__BP0D < new_capacity__4U0D)) {
      Self__1U0D->parent_arrayed_collection__1TFC.storage__MA0D=create__WXSE(new_capacity__4U0D);
      Self__1U0D->parent_arrayed_collection__1TFC.capacity__BP0D=new_capacity__4U0D;
    };
    __tmp__RV0D=Self__1U0D->parent_arrayed_collection__1TFC.storage__MA0D;
    __tmp__TV0D=((__FAST_ARRAYoExpanded_POSITIONo *)other__2U0D)->parent_arrayed_collection__1TFC.storage__MA0D;
    Self__JJGF=((__POSITION *)__tmp__RV0D);
    Self__DPJF=other_upper__3U0D;
    while ((Self__DPJF >=  0)) {
      Self__JJGF[Self__DPJF]=((__POSITION *)__tmp__TV0D)[Self__DPJF];
      Self__DPJF=(__INTEGER)(Self__DPJF -  1);
    };
  };
  Self__1U0D->parent_arrayed_collection__1TFC.upper__VO0D=other_upper__3U0D;
}

static __BOOLEAN fast_has__5UNK(__HASHED_SEToTYPESo *Self__AVNK,void *e__BVNK)
// ({HASHED_SEToTYPESo},{NULLxTYPES}) With resultNo recursive, No inlinable.
{
  void *node__KVNK;
  node__KVNK=((void **)Self__AVNK->buckets__AJIK)[(__INTEGER)(hash_code__VTNK(e__BVNK) % Self__AVNK->capacity__1IIK)];
  while ((! (((void *)node__KVNK == (void *)NULL) || ((void *)((__HASHED_SET_NODEoTYPESo *)node__KVNK)->item__MJIK == (void *)e__BVNK)))) {
    node__KVNK=((__HASHED_SET_NODEoTYPESo *)node__KVNK)->next__YJIK;
  };
  return(((void *)node__KVNK != (void *)NULL));
}

static __INTEGER hash_code__VTNK(__TYPES *Self__WTNK)
// ({TYPES}) With resultNo recursive, No inlinable.
{
  __INTEGER result__YTNK,__tmp__CUNK,__tmp__EUNK;
  void *__tmp__DUNK;
  result__YTNK= 0;
  if ((Self__WTNK->upper__4LAG != (__INTEGER)(-  1))) {
    __tmp__CUNK=(__INTEGER)(Self__WTNK->upper__4LAG <<  8);
    __tmp__DUNK=((void **)Self__WTNK->storage__WWFJ)[Self__WTNK->upper__4LAG];
    switch (((struct ___OBJ *)__tmp__DUNK)->__id) {
    case __TYPE__: {
      __tmp__EUNK=((__TYPE *)__tmp__DUNK)->index__LJC;
    } break;
    case __TYPE_NULL__: {
      __tmp__EUNK=((__TYPE_NULL *)__tmp__DUNK)->parent_type__TIB.index__LJC;
    } break;
    case __TYPE_VOID__: {
      __tmp__EUNK=((__TYPE_VOID *)__tmp__DUNK)->parent_type__UIB.index__LJC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__EUNK=((__TYPE_CONTEXT *)__tmp__DUNK)->parent_type__VIB.index__LJC;
    } break;
    case __TYPE_ID__: {
      __tmp__EUNK=((__TYPE_ID *)__tmp__DUNK)->parent_type__WIB.index__LJC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__EUNK=((__TYPE_GENERIC *)__tmp__DUNK)->parent_type__T2IB.index__LJC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__EUNK=((__PROFIL_BLOCK *)__tmp__DUNK)->parent_type__HHAG.index__LJC;
    } break;
    };
    result__YTNK=(__INTEGER)(__tmp__CUNK + __tmp__EUNK);
  };
  return(result__YTNK);
}

static void** create__YBWI(__INTEGER nb_elements__0BWI)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__WBLJ;
  void **Result__3Z0I;
  Result__3Z0I=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__0BWI * ((__INTEGER )(sizeof(void *)))))));
  Self__WBLJ=(__INTEGER)(nb_elements__0BWI -  1);
  while ((Self__WBLJ >=  0)) {
    Result__3Z0I[Self__WBLJ]=NULL;
    Self__WBLJ=(__INTEGER)(Self__WBLJ -  1);
  };
  return(Result__3Z0I);
}

static void* write_direct__with__value__AIWI(__LOCAL *Self__BIWI,__POSITION p__CIWI,void *val__EIWI)
// ({LOCAL},{POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *tmp_type__HIWI;
  __WRITE_LOCAL *result__SIAJ,*Self__YRIJ;
  __POINTER ptr__TIAJ;
  __INTEGER typ_id__YIAJ;
  __UINTEGER_32 sz__VIAJ,a__1O1Q,new_size__ZO1Q,t__5O1Q,a__BP1Q;
  void *__tmp__CKWI;
  tmp_type__HIWI=NULL;
  result__SIAJ=NULL;
  ptr__TIAJ=((__POINTER )(NULL));
  typ_id__YIAJ= 0;
  sz__VIAJ=((__UINTEGER_32 )sizeof(__WRITE_LOCAL));
  if ((sz__VIAJ ==  0)) {
    result__SIAJ=WRITE_LOCAL__;
  } else {
    typ_id__YIAJ=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__VIAJ);
    if ((typ_id__YIAJ == (__INTEGER)(-  1))) {
      a__1O1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__ZO1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__VIAJ + a__1O1Q) & (__UINTEGER_32)(~ a__1O1Q));
      ptr__TIAJ=micro_alloc__table__lab__BOI(new_size__ZO1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZO1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__ZO1Q);
    } else {
      t__5O1Q=((__UINTEGER_32 )typ_id__YIAJ);
      a__BP1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__TIAJ=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__VIAJ + a__BP1Q) & (__UINTEGER_32)(~ a__BP1Q)),((__POINTER )(&(table_type[(t__5O1Q)]))),(__UINTEGER_32)(t__5O1Q |  1));
    };
    result__SIAJ=((__WRITE_LOCAL *)ptr__TIAJ);
    *(result__SIAJ) = *(WRITE_LOCAL__);
  };
  Self__YRIJ=((__WRITE_LOCAL *)result__SIAJ);
  Self__YRIJ->parent_write__X50I.parent_instr__H4OG.parent_itm_object__TE.position__BJM=p__CIWI;
  Self__YRIJ->local__2RIJ=Self__BIWI;
  Self__YRIJ->parent_write__X50I.value__HBEH=val__EIWI;
  if (((void *)Self__BIWI->parent_variable__B2LC.require_first__DAEH == (void *)NULL)) {
    Self__BIWI->parent_variable__B2LC.require_first__DAEH=result__SIAJ;
  } else {
    if (((void *)Self__BIWI->parent_variable__B2LC.require_list__UAEH == (void *)NULL)) {
      Self__BIWI->parent_variable__B2LC.require_list__UAEH=create_with_capacity__UIPH( 1);
    };
    add_last__JPDI(Self__BIWI->parent_variable__B2LC.require_list__UAEH,result__SIAJ);
  };
  if ((((! ((((__UINTEGER_8)(((__TYPE_FULL *)Self__BIWI->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0) && ((void *)((__TYPE_FULL *)Self__BIWI->parent_variable__B2LC.type__125F)->parent_type__KTL != (void *)type_boolean__VJB)) || ((void *)Self__BIWI->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57)))) && ((void *)result__SIAJ->parent_write__X50I.value__HBEH != (void *)NULL)) && (! is_executing_pass__Q5LC))) {
    tmp_type__HIWI=new__XWSG();
    if (((void *)Self__BIWI->parent_variable__B2LC.type_list__HKZD != (void *)NULL)) {
      union__IKHJ(tmp_type__HIWI,Self__BIWI->parent_variable__B2LC.type_list__HKZD);
    };
    __tmp__CKWI=result__SIAJ->parent_write__X50I.value__HBEH;
    switch (((struct ___OBJ *)__tmp__CKWI)->__id) {
    case __LIST__: {
      get_type__EYMJ(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __STRING_CST__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)((__STRING_CST *)__tmp__CKWI)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
    } break;
    case __EXTERNAL_C__: {
      get_type__ZHDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __PROTOTYPE_CST__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__CKWI)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __INTEGER_CST__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__CKWI)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
    } break;
    case __READ_LOCAL__: {
      get_type__AOFJ(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_MULTIPLE__: {
      print__1ZE((&__string_253));
      fputc((int)('\n'),stdout);
      exit(( 1));
    } break;
    case __EXPR_EQUAL__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_NOT_EQUAL__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __REAL_CST__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)((__REAL_CST *)__tmp__CKWI)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __CHARACTER_CST__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__CKWI)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
    } break;
    case __IS_EXPANDED__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __GET_TYPE_ID__: {
      add__R2EJ(tmp_type__HIWI,type_integer__3JB);
    } break;
    case __EXPR_SUP__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_SUB__: {
      get_type__ZJDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_MUL__: {
      get_type__3JDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_DIV__: {
      get_type__BKDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_AND__: {
      get_type__FKDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_SHIFT_R__: {
      get_type__JKDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_SHIFT_L__: {
      get_type__NKDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __PUT_TO__: {
      add__R2EJ(tmp_type__HIWI,TYPE_VOID__);
    } break;
    case __ITEM__: {
      get_type__UKDI(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __SIZE_OF__: {
      add__R2EJ(tmp_type__HIWI,type_integer__3JB);
    } break;
    case __CAST__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)((__CAST *)__tmp__CKWI)->static_type__SO1H)->parent_type__KTL);
    } break;
    case __CALL_SLOT__: {
      get_type__DAML(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __READ_SLOT__: {
      get_type__OD0K(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __READ_GLOBAL__: {
      get_type__ZJOL(((__READ_GLOBAL *)__tmp__CKWI)->global__RHJK,tmp_type__HIWI);
    } break;
    case __EXPR_NOT_LOGIC__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_OR_LOGIC__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_AND_LOGIC__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_NEG__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__CKWI)))->parent_type__KTL);
    } break;
    case __EXPR_ADD__: {
      get_type__YEOL(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_NOT__: {
      add__R2EJ(tmp_type__HIWI,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__CKWI)))->parent_type__KTL);
    } break;
    case __EXPR_MOD__: {
      get_type__FSEO(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_SUP_EQ__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_INF__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_INF_EQ__: {
      add__R2EJ(tmp_type__HIWI,type_true__FJB);
      add__R2EJ(tmp_type__HIWI,type_false__NJB);
    } break;
    case __EXPR_OR__: {
      get_type__CVPN(__tmp__CKWI,tmp_type__HIWI);
    } break;
    case __EXPR_XOR__: {
      get_type__FNTO(__tmp__CKWI,tmp_type__HIWI);
    } break;
    };
    Self__BIWI->parent_variable__B2LC.type_list__HKZD=update__JYMJ(tmp_type__HIWI,Self__BIWI->parent_variable__B2LC.type_list__HKZD);
  };
  ((__WRITE_LOCAL *)result__SIAJ)->parent_write__X50I.is_create__1BDI=TRUE__;
  return(result__SIAJ);
}

static void* get_alias__IX4N(__LOCAL *Self__JX4N)
// ({LOCAL}) With resultNo recursive, No inlinable.
{
  if (((void *)Self__JX4N->my_alias__PWAH == (void *)NULL)) {
    Self__JX4N->my_alias__PWAH=create__name__style__type__25JG(Self__JX4N->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM,Self__JX4N->parent_variable__B2LC.parent_named__A2LC.name__1QB,Self__JX4N->parent_variable__B2LC.parent_named__A2LC.style__LDGC,Self__JX4N->parent_variable__B2LC.type__125F);
    ((__LOCAL *)Self__JX4N->my_alias__PWAH)->parent_variable__B2LC.type_list__HKZD=Self__JX4N->parent_variable__B2LC.type_list__HKZD;
    add_last__T2FH(list_alias__ZLZN,Self__JX4N);
  };
  return(Self__JX4N->my_alias__PWAH);
}

static void push_intern__VCLH(__POSITION p__XCLH)
// ({POSITION}) VoidNo recursive, No inlinable.
{
  __CONTEXT *Self__V2NH;
  top__3GQC=(__INTEGER)(top__3GQC +  1);
  if ((top__3GQC > ((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.upper__IHQC)) {
    add_last__YUZD(stack__GHQC,clone__2RCD());
  };
  Self__V2NH=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
  Self__V2NH->local__CI4F=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
  Self__V2NH->result__FI4F=stack_result_lower__DI4F;
  Self__V2NH->list__HI4F=list_current__IF1;
  stack_result_lower__DI4F=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
  list_current__IF1=create__QCAG(p__XCLH);
  Self__V2NH->context_extern__B3NH=context_extern__1OLH;
  context_extern__1OLH=NULL;
}

static void to_run_base__KDLH(__ITM_LIST *Self__LDLH,__BOOLEAN last_out__MDLH)
// ({ITM_LIST},{TRUExFALSE}) VoidRecursive, No inlinable.
{
  __INTEGER stack_top__QDLH,__tmp__5DLH,Self__CESH,__tmp__XELH;
  __INTEGER Self__SESH,__tmp__KFLH,Self__43NH,j__YHJN;
  __ITM_LOCAL *Self__5WYH,*Self__QXYH;
  __POSITION pos__BXYH,__tmp__GXYH,__tmp__5XYH,__tmp__DYYH,__tmp__KJVQ;
  __POSITION __tmp__MJVQ,__tmp__UGAQ,__tmp__3GAQ,__tmp__XAOH;
  void *__tmp__HXYH,*__tmp__EYYH,*__tmp__D3YM,*__tmp__L3YM,*n__04NH;
  void *__tmp__3AOH;
  void *__tmp__IXYH,*__tmp__FYYH;
  void *__tmp__JXYH,*__tmp__GGAQ,*__tmp__GYYH,*__tmp__NGAQ,*__tmp__AGLH;
  __ITM_TYPE_STYLE *Self__FGAQ,*Self__MGAQ;
  void *result__EXYH,*result__SXYH,*var__Y4NH,*result__XHJN;
  void *proto__WXYH;
  void *slot__TXYH,*slot__02YM,*__tmp__E3YM,*__tmp__M3YM;
  void *__tmp__RFLH,*__tmp__MIFI,*Result__I5KD;
  void *__tmp__SFLH,*result__FFFI,*__tmp__OIFI,*__tmp__NGLH;
  void *__tmp__JFFI;
  void *__tmp__KFFI,*slot_code__GFFI;
  __SLOT_CODE *Self__Y2YM;
  void *contract__12YM;
  void *__tmp__C3YM,*__tmp__K3YM,*__tmp__C4YM;
  __ITM_LIST *Self__SY5Q;
  void *lst__TY5Q;
  __ITM_CHARACTER *Self__G0JQ,*Self__VGAQ,*Self__4GAQ;
  __ITM_STRING *Self__I0JQ,*Self__WGAQ,*Self__5GAQ;
  void *__tmp__NIFI,*__tmp__5FLH;
  void *larg__UXYH;
  __BOOLEAN __tmp__YXYH,__tmp__XJJN;
  __FAST_ARRAYoITM_CODEo *Self__H5KD;
  __FAST_ARRAYoLOCALo *Self__PP1Q,*Self__UP1Q;
  void **__tmp__VY5Q;
  stack_top__QDLH=(__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1);
  if (((void *)Self__LDLH->local_list__3HPC != (void *)NULL)) {
    __tmp__5DLH=((__FAST_ARRAYoITM_LOCALo *)Self__LDLH->local_list__3HPC)->parent_arrayed_collection__WCFC.upper__3XGC;
    Self__CESH= 0;
    while ((Self__CESH <= __tmp__5DLH)) {
      Self__5WYH=((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)Self__LDLH->local_list__3HPC)->parent_arrayed_collection__WCFC.storage__GMPC)[Self__CESH]);
      pos__BXYH=((__POSITION ) 0);
      last_position__GG1=Self__5WYH->parent_itm_object__RCFC.position__BJM;
      __tmp__GXYH=Self__5WYH->parent_itm_object__RCFC.position__BJM;
      __tmp__HXYH=Self__5WYH->name__A0GC;
      __tmp__IXYH=Self__5WYH->type__K5EF;
      switch (((struct ___OBJ *)__tmp__IXYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__IXYH)->to_run__2VK==0) {
          __tmp__JXYH=((__ITM_TYPE_SIMPLE *)__tmp__IXYH)->to_run__1VK;
        } else {
          __tmp__JXYH=to_run__XVK(__tmp__IXYH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__IXYH)->to_run__V1IB==0) {
          __tmp__JXYH=((__ITM_TYPE_STYLE *)__tmp__IXYH)->to_run__U1IB;
        } else {
          Self__FGAQ=((__ITM_TYPE_STYLE *)__tmp__IXYH);
          __tmp__GGAQ=get__XUN(Self__FGAQ);
          Self__FGAQ->to_run__U1IB=__tmp__GGAQ;
          Self__FGAQ->to_run__V1IB=0;
          __tmp__JXYH=__tmp__GGAQ;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__JXYH=to_run__W1IB(__tmp__IXYH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__JXYH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__JXYH=to_run__DKEF(__tmp__IXYH);
      } break;
      };
      result__EXYH=create__name__style__type__25JG(__tmp__GXYH,__tmp__HXYH,'+',__tmp__JXYH);
      last_position__GG1=pos__BXYH;
      add_last__T2FH(stack_local__RI4F,result__EXYH);
      init__SRFI(result__EXYH);
      Self__CESH=(__INTEGER)(Self__CESH +  1);
    };
  };
  if (((void *)Self__LDLH->static_list__JIPC != (void *)NULL)) {
    __tmp__XELH=((__FAST_ARRAYoITM_LOCALo *)Self__LDLH->static_list__JIPC)->parent_arrayed_collection__WCFC.upper__3XGC;
    Self__SESH= 0;
    while ((Self__SESH <= __tmp__XELH)) {
      Self__QXYH=((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)Self__LDLH->static_list__JIPC)->parent_arrayed_collection__WCFC.storage__GMPC)[Self__SESH]);
      larg__UXYH=NULL;
      switch (((struct ___OBJ *)Self__QXYH->type__K5EF)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__YXYH=FALSE__;
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__YXYH=FALSE__;
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__YXYH=FALSE__;
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__YXYH=TRUE__;
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__YXYH=FALSE__;
      } break;
      };
      if (__tmp__YXYH) {
        __tmp__5XYH=Self__QXYH->parent_itm_object__RCFC.position__BJM;
        put_error__text__0AH( 1,(&__string_533));
        put_position__ECH(__tmp__5XYH);
        send_error__2FH();
      };
      __tmp__DYYH=Self__QXYH->parent_itm_object__RCFC.position__BJM;
      __tmp__EYYH=Self__QXYH->name__A0GC;
      __tmp__FYYH=Self__QXYH->type__K5EF;
      switch (((struct ___OBJ *)__tmp__FYYH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        if (((__ITM_TYPE_SIMPLE *)__tmp__FYYH)->to_run__2VK==0) {
          __tmp__GYYH=((__ITM_TYPE_SIMPLE *)__tmp__FYYH)->to_run__1VK;
        } else {
          __tmp__GYYH=to_run__XVK(__tmp__FYYH);
        };
      } break;
      case __ITM_TYPE_STYLE__: {
        if (((__ITM_TYPE_STYLE *)__tmp__FYYH)->to_run__V1IB==0) {
          __tmp__GYYH=((__ITM_TYPE_STYLE *)__tmp__FYYH)->to_run__U1IB;
        } else {
          Self__MGAQ=((__ITM_TYPE_STYLE *)__tmp__FYYH);
          __tmp__NGAQ=get__XUN(Self__MGAQ);
          Self__MGAQ->to_run__U1IB=__tmp__NGAQ;
          Self__MGAQ->to_run__V1IB=0;
          __tmp__GYYH=__tmp__NGAQ;
        };
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__GYYH=to_run__W1IB(__tmp__FYYH);
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__GYYH=to_run__MPXD();
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__GYYH=to_run__DKEF(__tmp__FYYH);
      } break;
      };
      result__SXYH=create__name__style__type__25JG(__tmp__DYYH,__tmp__EYYH,'-',__tmp__GYYH);
      proto__WXYH=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__GQB)->parent_arrayed_collection__FQB.storage__D0M)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__QXYH->parent_itm_object__RCFC.position__BJM)) &  511)];
      slot__TXYH=((__PROTOTYPE *)proto__WXYH)->first_slot__5QMC;
      __tmp__KJVQ=Self__QXYH->parent_itm_object__RCFC.position__BJM;
      while ((((void *)slot__TXYH != (void *)NULL) && (((__ITM_SLOT *)slot__TXYH)->parent_named__XIM.parent_itm_object__PD.position__BJM != __tmp__KJVQ))) {
        slot__TXYH=((__ITM_SLOT *)slot__TXYH)->next__YRMC;
      };
      if (((void *)slot__TXYH == (void *)NULL)) {
        slot__TXYH=create__name__feature__WVTD(Self__QXYH->parent_itm_object__RCFC.position__BJM,((__LOCAL *)result__SXYH)->parent_variable__B2LC.intern_name__025F,get_name__DEJD((&__string_26)));
        ((__ITM_SLOT *)slot__TXYH)->parent_named__XIM.style__LDGC='-';
        set_type__GC2D(slot__TXYH,Self__QXYH->type__K5EF);
        larg__UXYH=new__Q0PD();
        add_last__S31D(larg__UXYH,create__name__type__AWSD(Self__QXYH->parent_itm_object__RCFC.position__BJM,(&__string_57),ITM_TYPE_SELF__));
        larg__UXYH=copy__FDQD(larg__UXYH);
        set_argument_list__QA2D(slot__TXYH,larg__UXYH);
        add_slot__3GQD(proto__WXYH,slot__TXYH);
      } else {
        ((__LOCAL *)result__SXYH)->parent_variable__B2LC.intern_name__025F=((__ITM_SLOT *)slot__TXYH)->parent_named__XIM.name__1QB;
      };
      add_last__T2FH(stack_local__RI4F,result__SXYH);
      Self__SESH=(__INTEGER)(Self__SESH +  1);
    };
  };
  __tmp__KFLH=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)Self__LDLH->code__G5OC)->parent_arrayed_collection__AFEC.upper__ZAPC -  1);
  Self__43NH= 0;
  while ((Self__43NH <= __tmp__KFLH)) {
    __tmp__RFLH=((void **)((__FAST_ARRAYoITM_CODEo *)Self__LDLH->code__G5OC)->parent_arrayed_collection__AFEC.storage__ACPC)[Self__43NH];
    switch (((struct ___OBJ *)__tmp__RFLH)->__id) {
    case __ITM_LIST__: {
      __tmp__SFLH=to_run_expr__D3IH(((__ITM_LIST *)__tmp__RFLH));
    } break;
    case __ITM_LDOTS__: {
      result__FFFI=NULL;
      __tmp__JFFI=((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL;
      if (__tmp__JFFI==NULL) {
        __tmp__KFFI=NULL;
      } else {
        __tmp__KFFI=((void *)__tmp__JFFI);
      };
      slot_code__GFFI=__tmp__KFFI;
      Self__Y2YM=((__SLOT_CODE *)__tmp__KFFI);
      slot__02YM=NULL;
      contract__12YM=NULL;
      if (Self__Y2YM->is_require__YNRL) {
        __tmp__C3YM=Self__Y2YM->last_type_contract__2NRL;
        __tmp__D3YM=((__ITM_SLOT *)((__SLOT *)Self__Y2YM->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
        switch (((struct ___OBJ *)__tmp__C3YM)->__id) {
        case __TYPE__: {
          __tmp__E3YM=search_require__AS4L(__tmp__C3YM,__tmp__D3YM);
        } break;
        case __TYPE_NULL__: {
          __tmp__E3YM=search_require__HU4L(__tmp__C3YM,__tmp__D3YM);
        } break;
        case __TYPE_VOID__: {
          __tmp__E3YM=search_require__OW4L(__tmp__C3YM,__tmp__D3YM);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__E3YM=search_require__VY4L(__tmp__C3YM,__tmp__D3YM);
        } break;
        case __TYPE_ID__: {
          __tmp__E3YM=search_require__204L(__tmp__C3YM,__tmp__D3YM);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__E3YM=search_require__D34L(__tmp__C3YM,__tmp__D3YM);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__E3YM=search_require__LUBN(__tmp__C3YM,__tmp__D3YM);
        } break;
        };
        slot__02YM=__tmp__E3YM;
      } else {
        __tmp__K3YM=Self__Y2YM->last_type_contract__2NRL;
        __tmp__L3YM=((__ITM_SLOT *)((__SLOT *)Self__Y2YM->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
        switch (((struct ___OBJ *)__tmp__K3YM)->__id) {
        case __TYPE__: {
          __tmp__M3YM=search_ensure__LA5L(__tmp__K3YM,__tmp__L3YM);
        } break;
        case __TYPE_NULL__: {
          __tmp__M3YM=search_ensure__SC5L(__tmp__K3YM,__tmp__L3YM);
        } break;
        case __TYPE_VOID__: {
          __tmp__M3YM=search_ensure__ZE5L(__tmp__K3YM,__tmp__L3YM);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__M3YM=search_ensure__AH5L(__tmp__K3YM,__tmp__L3YM);
        } break;
        case __TYPE_ID__: {
          __tmp__M3YM=search_ensure__HJ5L(__tmp__K3YM,__tmp__L3YM);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__M3YM=search_ensure__OL5L(__tmp__K3YM,__tmp__L3YM);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__M3YM=search_ensure__WXBN(__tmp__K3YM,__tmp__L3YM);
        } break;
        };
        slot__02YM=__tmp__M3YM;
      };
      if (((void *)slot__02YM != (void *)NULL)) {
        if (Self__Y2YM->is_require__YNRL) {
          contract__12YM=((__ITM_SLOT *)slot__02YM)->require__SB3D;
        } else {
          contract__12YM=((__ITM_SLOT *)slot__02YM)->ensure__WB3D;
        };
        switch (((struct ___OBJ *)Self__Y2YM->last_type_contract__2NRL)->__id) {
        case __TYPE__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        case __TYPE_NULL__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        case __TYPE_VOID__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        case __TYPE_ID__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__C4YM=last_type_contract__VORL;
        } break;
        };
        Self__Y2YM->last_type_contract__2NRL=__tmp__C4YM;
      };
      if (((void *)contract__12YM != (void *)NULL)) {
        Self__SY5Q=((__ITM_LIST *)contract__12YM);
        push_intern__VCLH(Self__SY5Q->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM);
        to_run_base__KDLH(Self__SY5Q,TRUE__);
        lst__TY5Q=list_current__IF1;
        pop_intern__CKLH();
        result__FFFI=lst__TY5Q;
      } else {
        result__FFFI=NOP__;
      };
      __tmp__SFLH=result__FFFI;
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__SFLH=to_run_expr__M3IH(((__ITM_PROTOTYPE *)__tmp__RFLH));
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__MJVQ=((__ITM_LIST_IDF *)__tmp__RFLH)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_328));
      put_position__ECH(__tmp__MJVQ);
      send_error__2FH();
      __tmp__SFLH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__SFLH=to_run_expr__UAJH(((__ITM_WRITE_VALUE *)__tmp__RFLH));
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__SFLH=to_run_expr__WDJH(((__ITM_WRITE_CAST *)__tmp__RFLH));
    } break;
    case __ITM_READ__: {
      __tmp__SFLH=to_run_expr__JGJH(((__ITM_READ *)__tmp__RFLH));
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__SFLH=to_run_expr__MHJH(((__ITM_WRITE_CODE *)__tmp__RFLH));
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__SFLH=to_run_expr__3IJH(((__ITM_READ_ARG2 *)__tmp__RFLH));
    } break;
    case __ITM_BINARY__: {
      __tmp__SFLH=to_run_expr__RMJH(((__ITM_BINARY *)__tmp__RFLH));
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__SFLH=to_run_expr__0XJH(((__ITM_READ_ARG1 *)__tmp__RFLH));
    } break;
    case __ITM_OLD__: {
      __tmp__SFLH=to_run_expr__5XJH(((__ITM_OLD *)__tmp__RFLH));
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__SFLH=to_run_expr__U1JH(((__ITM_EXTERNAL_TYPE *)__tmp__RFLH));
    } break;
    case __ITM_REAL__: {
      __tmp__SFLH=to_run_expr__J3JH(((__ITM_REAL *)__tmp__RFLH));
    } break;
    case __ITM_NUMBER__: {
      __tmp__SFLH=to_run_expr__T3JH(((__ITM_NUMBER *)__tmp__RFLH));
    } break;
    case __ITM_CHARACTER__: {
      Self__G0JQ=((__ITM_CHARACTER *)__tmp__RFLH);
      __tmp__SFLH=create__char__WTMH(Self__G0JQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__G0JQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__I0JQ=((__ITM_STRING *)__tmp__RFLH);
      __tmp__SFLH=create__text__AUMH(Self__I0JQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__I0JQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__SFLH=to_run_expr__J4JH(((__ITM_EXTERNAL *)__tmp__RFLH));
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__SFLH=to_run_expr__TIKH(((__ITM_READ_ARGS *)__tmp__RFLH));
    } break;
    case __ITM_RESULT__: {
      __tmp__MIFI=((__ITM_RESULT *)__tmp__RFLH)->value__H52D;
      switch (((struct ___OBJ *)__tmp__MIFI)->__id) {
      case __ITM_LIST__: {
        __tmp__NIFI=to_run_expr__D3IH(__tmp__MIFI);
      } break;
      case __ITM_PROTOTYPE__: {
        __tmp__NIFI=to_run_expr__M3IH(__tmp__MIFI);
      } break;
      case __ITM_LIST_IDF__: {
        __tmp__UGAQ=((__ITM_LIST_IDF *)__tmp__MIFI)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 1,(&__string_328));
        put_position__ECH(__tmp__UGAQ);
        send_error__2FH();
        __tmp__NIFI=NULL;
      } break;
      case __ITM_WRITE_VALUE__: {
        __tmp__NIFI=to_run_expr__UAJH(__tmp__MIFI);
      } break;
      case __ITM_WRITE_CAST__: {
        __tmp__NIFI=to_run_expr__WDJH(__tmp__MIFI);
      } break;
      case __ITM_READ__: {
        __tmp__NIFI=to_run_expr__JGJH(__tmp__MIFI);
      } break;
      case __ITM_WRITE_CODE__: {
        __tmp__NIFI=to_run_expr__MHJH(__tmp__MIFI);
      } break;
      case __ITM_READ_ARG2__: {
        __tmp__NIFI=to_run_expr__3IJH(__tmp__MIFI);
      } break;
      case __ITM_BINARY__: {
        __tmp__NIFI=to_run_expr__RMJH(__tmp__MIFI);
      } break;
      case __ITM_READ_ARG1__: {
        __tmp__NIFI=to_run_expr__0XJH(__tmp__MIFI);
      } break;
      case __ITM_OLD__: {
        __tmp__NIFI=to_run_expr__5XJH(__tmp__MIFI);
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        __tmp__NIFI=to_run_expr__U1JH(__tmp__MIFI);
      } break;
      case __ITM_REAL__: {
        __tmp__NIFI=to_run_expr__J3JH(__tmp__MIFI);
      } break;
      case __ITM_NUMBER__: {
        __tmp__NIFI=to_run_expr__T3JH(__tmp__MIFI);
      } break;
      case __ITM_CHARACTER__: {
        Self__VGAQ=((__ITM_CHARACTER *)__tmp__MIFI);
        __tmp__NIFI=create__char__WTMH(Self__VGAQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__VGAQ->character__ED0D);
      } break;
      case __ITM_STRING__: {
        Self__WGAQ=((__ITM_STRING *)__tmp__MIFI);
        __tmp__NIFI=create__text__AUMH(Self__WGAQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__WGAQ->string__QD0D);
      } break;
      case __ITM_EXTERNAL__: {
        __tmp__NIFI=to_run_expr__J4JH(__tmp__MIFI);
      } break;
      case __ITM_READ_ARGS__: {
        __tmp__NIFI=to_run_expr__TIKH(__tmp__MIFI);
      } break;
      };
      switch (((struct ___OBJ *)__tmp__NIFI)->__id) {
      case __LIST__: {
        __tmp__OIFI=put_result__Z0DN(__tmp__NIFI,FALSE__);
      } break;
      case __STRING_CST__: {
        __tmp__OIFI=put_result__HZKI(__tmp__NIFI,FALSE__);
      } break;
      case __EXTERNAL_C__: {
        __tmp__OIFI=put_result__X3KI(__tmp__NIFI,FALSE__);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__OIFI=put_result__ICLI(__tmp__NIFI,FALSE__);
      } break;
      case __INTEGER_CST__: {
        __tmp__OIFI=put_result__ZGLI(__tmp__NIFI,FALSE__);
      } break;
      case __READ_LOCAL__: {
        __tmp__OIFI=put_result__DYFJ(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__OIFI=put_result__JLLI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__OIFI=put_result__DMLI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__OIFI=put_result__UQLI(__tmp__NIFI,FALSE__);
      } break;
      case __REAL_CST__: {
        __tmp__OIFI=put_result__FVLI(__tmp__NIFI,FALSE__);
      } break;
      case __CHARACTER_CST__: {
        __tmp__OIFI=put_result__WZLI(__tmp__NIFI,FALSE__);
      } break;
      case __IS_EXPANDED__: {
        __tmp__OIFI=put_result__G4LI(__tmp__NIFI,FALSE__);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__OIFI=put_result__WCMI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_SUP__: {
        __tmp__OIFI=put_result__HHMI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_SUB__: {
        __tmp__OIFI=put_result__YLMI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_MUL__: {
        __tmp__OIFI=put_result__JQMI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_DIV__: {
        __tmp__OIFI=put_result__0UMI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_AND__: {
        __tmp__OIFI=put_result__LZMI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__OIFI=put_result__23MI(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__OIFI=put_result__NCNI(__tmp__NIFI,FALSE__);
      } break;
      case __PUT_TO__: {
        __tmp__OIFI=put_result__3GNI(__tmp__NIFI,FALSE__);
      } break;
      case __ITEM__: {
        __tmp__OIFI=put_result__NLNI(__tmp__NIFI,FALSE__);
      } break;
      case __SIZE_OF__: {
        __tmp__OIFI=put_result__3PNI(__tmp__NIFI,FALSE__);
      } break;
      case __CAST__: {
        __tmp__OIFI=put_result__NUNI(__tmp__NIFI,FALSE__);
      } break;
      case __CALL_SLOT__: {
        __tmp__OIFI=put_result__J5DN(__tmp__NIFI,FALSE__);
      } break;
      case __READ_SLOT__: {
        __tmp__OIFI=put_result__YCLL(__tmp__NIFI,FALSE__);
      } break;
      case __READ_GLOBAL__: {
        __tmp__OIFI=put_result__JHLL(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__OIFI=put_result__I13O(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__OIFI=put_result__WUJO(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__OIFI=put_result__3YSO(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__OIFI=put_result__HZJO(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__OIFI=put_result__P3SO(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_NEG__: {
        __tmp__OIFI=put_result__WLYM(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_ADD__: {
        __tmp__OIFI=put_result__HQYM(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_NOT__: {
        __tmp__OIFI=put_result__0DEN(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_MOD__: {
        __tmp__OIFI=put_result__Y3JO(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__OIFI=put_result__0ZIP(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_INF__: {
        __tmp__OIFI=put_result__Z53O(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__OIFI=put_result__KE4O(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_OR__: {
        __tmp__OIFI=put_result__0C0N(__tmp__NIFI,FALSE__);
      } break;
      case __EXPR_XOR__: {
        __tmp__OIFI=put_result__1I4O(__tmp__NIFI,FALSE__);
      } break;
      };
      __tmp__SFLH=__tmp__OIFI;
    } break;
    };
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,__tmp__SFLH);
    Self__43NH=(__INTEGER)(Self__43NH +  1);
  };
  if ((! (((__FAST_ARRAYoITM_CODEo *)Self__LDLH->code__G5OC)->parent_arrayed_collection__AFEC.upper__ZAPC <  0))) {
    Self__H5KD=((__FAST_ARRAYoITM_CODEo *)Self__LDLH->code__G5OC);
    Result__I5KD=((void **)Self__H5KD->parent_arrayed_collection__AFEC.storage__ACPC)[Self__H5KD->parent_arrayed_collection__AFEC.upper__ZAPC];
    switch (((struct ___OBJ *)Result__I5KD)->__id) {
    case __ITM_LIST__: {
      __tmp__5FLH=to_run_expr__D3IH(Result__I5KD);
    } break;
    case __ITM_LDOTS__: {
      __tmp__5FLH=to_run_expr__E0QH(Result__I5KD);
    } break;
    case __ITM_PROTOTYPE__: {
      __tmp__5FLH=to_run_expr__M3IH(Result__I5KD);
    } break;
    case __ITM_LIST_IDF__: {
      __tmp__3GAQ=((__ITM_LIST_IDF *)Result__I5KD)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,(&__string_328));
      put_position__ECH(__tmp__3GAQ);
      send_error__2FH();
      __tmp__5FLH=NULL;
    } break;
    case __ITM_WRITE_VALUE__: {
      __tmp__5FLH=to_run_expr__UAJH(Result__I5KD);
    } break;
    case __ITM_WRITE_CAST__: {
      __tmp__5FLH=to_run_expr__WDJH(Result__I5KD);
    } break;
    case __ITM_READ__: {
      __tmp__5FLH=to_run_expr__JGJH(Result__I5KD);
    } break;
    case __ITM_WRITE_CODE__: {
      __tmp__5FLH=to_run_expr__MHJH(Result__I5KD);
    } break;
    case __ITM_READ_ARG2__: {
      __tmp__5FLH=to_run_expr__3IJH(Result__I5KD);
    } break;
    case __ITM_BINARY__: {
      __tmp__5FLH=to_run_expr__RMJH(Result__I5KD);
    } break;
    case __ITM_READ_ARG1__: {
      __tmp__5FLH=to_run_expr__0XJH(Result__I5KD);
    } break;
    case __ITM_OLD__: {
      __tmp__5FLH=to_run_expr__5XJH(Result__I5KD);
    } break;
    case __ITM_EXTERNAL_TYPE__: {
      __tmp__5FLH=to_run_expr__U1JH(Result__I5KD);
    } break;
    case __ITM_REAL__: {
      __tmp__5FLH=to_run_expr__J3JH(Result__I5KD);
    } break;
    case __ITM_NUMBER__: {
      __tmp__5FLH=to_run_expr__T3JH(Result__I5KD);
    } break;
    case __ITM_CHARACTER__: {
      Self__4GAQ=((__ITM_CHARACTER *)Result__I5KD);
      __tmp__5FLH=create__char__WTMH(Self__4GAQ->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__4GAQ->character__ED0D);
    } break;
    case __ITM_STRING__: {
      Self__5GAQ=((__ITM_STRING *)Result__I5KD);
      __tmp__5FLH=create__text__AUMH(Self__5GAQ->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__5GAQ->string__QD0D);
    } break;
    case __ITM_EXTERNAL__: {
      __tmp__5FLH=to_run_expr__J4JH(Result__I5KD);
    } break;
    case __ITM_READ_ARGS__: {
      __tmp__5FLH=to_run_expr__TIKH(Result__I5KD);
    } break;
    case __ITM_RESULT__: {
      print__1ZE((&__string_460));
      fputc((int)('\n'),stdout);
      exit(( 1));
      __tmp__5FLH=NULL;
    } break;
    };
    switch (((struct ___OBJ *)__tmp__5FLH)->__id) {
    case __LIST__: {
      __tmp__AGLH=static_type__GIQG(__tmp__5FLH);
    } break;
    case __STRING_CST__: {
      __tmp__AGLH=((__STRING_CST *)__tmp__5FLH)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__AGLH=((__EXTERNAL_C *)__tmp__5FLH)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__AGLH=((__PROTOTYPE_CST *)__tmp__5FLH)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__AGLH=((__INTEGER_CST *)__tmp__5FLH)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__AGLH=((__LOCAL *)((__READ_LOCAL *)__tmp__5FLH)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__AGLH=static_type__0N1H(__tmp__5FLH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__AGLH=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__AGLH=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__AGLH=((__REAL_CST *)__tmp__5FLH)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__AGLH=((__CHARACTER_CST *)__tmp__5FLH)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__AGLH=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__AGLH=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__AGLH=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__AGLH=static_type__MP1H(__tmp__5FLH);
    } break;
    case __EXPR_MUL__: {
      __tmp__AGLH=static_type__SP1H(__tmp__5FLH);
    } break;
    case __EXPR_DIV__: {
      __tmp__AGLH=static_type__XP1H(__tmp__5FLH);
    } break;
    case __EXPR_AND__: {
      __tmp__AGLH=static_type__2P1H(__tmp__5FLH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__AGLH=static_type__BQ1H(__tmp__5FLH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__AGLH=static_type__GQ1H(__tmp__5FLH);
    } break;
    case __PUT_TO__: {
      __tmp__AGLH=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__AGLH=static_type__PQ1H(__tmp__5FLH);
    } break;
    case __SIZE_OF__: {
      __tmp__AGLH=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__AGLH=((__CAST *)__tmp__5FLH)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__AGLH=static_type__GIKL(__tmp__5FLH);
    } break;
    case __READ_SLOT__: {
      __tmp__AGLH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__5FLH)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__AGLH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__5FLH)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__AGLH=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__AGLH=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__AGLH=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__AGLH=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__AGLH=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__AGLH=static_type__Z2IM(__tmp__5FLH);
    } break;
    case __EXPR_ADD__: {
      __tmp__AGLH=static_type__IXML(__tmp__5FLH);
    } break;
    case __EXPR_NOT__: {
      __tmp__AGLH=static_type__BTXM(__tmp__5FLH);
    } break;
    case __EXPR_MOD__: {
      __tmp__AGLH=static_type__5LEO(__tmp__5FLH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__AGLH=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__AGLH=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__AGLH=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__AGLH=static_type__NOPN(__tmp__5FLH);
    } break;
    case __EXPR_XOR__: {
      __tmp__AGLH=static_type__XCSO(__tmp__5FLH);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__AGLH)->parent_type__KTL == (void *)TYPE_VOID__)) {
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,__tmp__5FLH);
    } else {
      switch (((struct ___OBJ *)__tmp__5FLH)->__id) {
      case __LIST__: {
        __tmp__NGLH=put_result__Z0DN(__tmp__5FLH,last_out__MDLH);
      } break;
      case __STRING_CST__: {
        __tmp__NGLH=put_result__HZKI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXTERNAL_C__: {
        __tmp__NGLH=put_result__X3KI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__NGLH=put_result__ICLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __INTEGER_CST__: {
        __tmp__NGLH=put_result__ZGLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __READ_LOCAL__: {
        __tmp__NGLH=put_result__DYFJ(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__NGLH=put_result__JLLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__NGLH=put_result__DMLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__NGLH=put_result__UQLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __REAL_CST__: {
        __tmp__NGLH=put_result__FVLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __CHARACTER_CST__: {
        __tmp__NGLH=put_result__WZLI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __IS_EXPANDED__: {
        __tmp__NGLH=put_result__G4LI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__NGLH=put_result__WCMI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_SUP__: {
        __tmp__NGLH=put_result__HHMI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_SUB__: {
        __tmp__NGLH=put_result__YLMI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_MUL__: {
        __tmp__NGLH=put_result__JQMI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_DIV__: {
        __tmp__NGLH=put_result__0UMI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_AND__: {
        __tmp__NGLH=put_result__LZMI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__NGLH=put_result__23MI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__NGLH=put_result__NCNI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __PUT_TO__: {
        __tmp__NGLH=put_result__3GNI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __ITEM__: {
        __tmp__NGLH=put_result__NLNI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __SIZE_OF__: {
        __tmp__NGLH=put_result__3PNI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __CAST__: {
        __tmp__NGLH=put_result__NUNI(__tmp__5FLH,last_out__MDLH);
      } break;
      case __CALL_SLOT__: {
        __tmp__NGLH=put_result__J5DN(__tmp__5FLH,last_out__MDLH);
      } break;
      case __READ_SLOT__: {
        __tmp__NGLH=put_result__YCLL(__tmp__5FLH,last_out__MDLH);
      } break;
      case __READ_GLOBAL__: {
        __tmp__NGLH=put_result__JHLL(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__NGLH=put_result__I13O(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__NGLH=put_result__WUJO(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__NGLH=put_result__3YSO(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__NGLH=put_result__HZJO(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__NGLH=put_result__P3SO(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_NEG__: {
        __tmp__NGLH=put_result__WLYM(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_ADD__: {
        __tmp__NGLH=put_result__HQYM(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_NOT__: {
        __tmp__NGLH=put_result__0DEN(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_MOD__: {
        __tmp__NGLH=put_result__Y3JO(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__NGLH=put_result__0ZIP(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_INF__: {
        __tmp__NGLH=put_result__Z53O(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__NGLH=put_result__KE4O(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_OR__: {
        __tmp__NGLH=put_result__0C0N(__tmp__5FLH,last_out__MDLH);
      } break;
      case __EXPR_XOR__: {
        __tmp__NGLH=put_result__1I4O(__tmp__5FLH,last_out__MDLH);
      } break;
      };
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,__tmp__NGLH);
      if ((! last_out__MDLH)) {
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__type__CLQC(Self__LDLH->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM,TYPE_VOID__->parent_type__UIB.default__AKC));
      };
    };
  };
  var__Y4NH=NULL;
  n__04NH=NULL;
  if (verify__JDAG) {
    while ((((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F >= stack_top__QDLH)) {
      Self__PP1Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F);
      var__Y4NH=((void **)Self__PP1Q->parent_arrayed_collection__QI4F.storage__FXPG)[Self__PP1Q->parent_arrayed_collection__QI4F.upper__TI4F];
      Self__UP1Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F);
      Self__UP1Q->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(Self__UP1Q->parent_arrayed_collection__QI4F.upper__TI4F -  1);
      n__04NH=((__LOCAL *)var__Y4NH)->parent_variable__B2LC.parent_named__A2LC.name__1QB;
      if ((((void *)n__04NH != (void *)(&__string_57)) && ((void *)n__04NH != (void *)(&__string_60)))) {
        if (((((__LOCAL *)var__Y4NH)->parent_variable__B2LC.ensure_count__QEAG ==  0) && (((__LOCAL *)var__Y4NH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != ' '))) {
          copy__BNK(string_tmp__RB,(&__string_249));
          append__MOK(string_tmp__RB,((__LOCAL *)var__Y4NH)->parent_variable__B2LC.parent_named__A2LC.name__1QB);
          append__MOK(string_tmp__RB,(&__string_250));
          __tmp__XAOH=((__LOCAL *)var__Y4NH)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
          put_error__text__0AH( 2,string_tmp__RB);
          put_position__ECH(__tmp__XAOH);
          send_error__2FH();
        };
        __tmp__3AOH=((__LOCAL *)var__Y4NH)->parent_variable__B2LC.parent_named__A2LC.name__1QB;
        result__XHJN=NULL;
        j__YHJN=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
        __tmp__VY5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
        while ((! ((j__YHJN < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__VY5Q)[j__YHJN])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)__tmp__3AOH)))) {
          j__YHJN=(__INTEGER)(j__YHJN -  1);
        };
        if ((j__YHJN >= stack_local_lower__AI4F)) {
          result__XHJN=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__YHJN];
          if (((j__YHJN < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__XHJN)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
            context_extern__1OLH=result__XHJN;
          };
          __tmp__XJJN=TRUE__;
        } else {
          __tmp__XJJN=FALSE__;
        };
        if ((! __tmp__XJJN)) {
          if (((void *)profil_first__4PQC != (void *)NULL)) {
            result__XHJN=lookup__LLJM(profil_first__4PQC,__tmp__3AOH);
            if ((((void *)result__XHJN != (void *)NULL) && ((void *)((__LOCAL *)result__XHJN)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
              context_extern__1OLH=result__XHJN;
            };
          };
        };
        if (((void *)result__XHJN != (void *)NULL)) {
          copy__BNK(string_tmp__RB,(&__string_251));
          append__MOK(string_tmp__RB,n__04NH);
          append__MOK(string_tmp__RB,(&__string_252));
          put_error__text__0AH( 2,string_tmp__RB);
          put_position__ECH(((__LOCAL *)result__XHJN)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
          put_position__ECH(((__LOCAL *)var__Y4NH)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
          send_error__2FH();
        };
      };
    };
  } else {
    remove_since__ERPG(stack_local__RI4F,stack_top__QDLH);
  };
}

static void pop_intern__CKLH()
// () VoidNo recursive, No inlinable.
{
  __CONTEXT *Self__PDOH;
  Self__PDOH=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
  list_current__IF1=Self__PDOH->list__HI4F;
  pop_stack_until__DDAG(Self__PDOH->local__CI4F);
  remove_since__ERPG(stack_result__WI4F,stack_result_lower__DI4F);
  stack_result_lower__DI4F=Self__PDOH->result__FI4F;
  if (((void *)context_extern__1OLH == (void *)NULL)) {
    context_extern__1OLH=Self__PDOH->context_extern__B3NH;
  };
  top__3GQC=(__INTEGER)(top__3GQC -  1);
}

static void add__30JI(void *p__50JI)
// ({PROFIL_SLOTxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__EZRI,__tmp__I0RI,__tmp__Z4BJ,Self__A3LJ;
  __INTEGER __tmp__D1JI;
  __FAST_ARRAYoPROFILo *Self__CZRI;
  __BOOLEAN __tmp__SZRI;
  void **__tmp__H0RI,**new__G4BJ;
  Self__CZRI=((__FAST_ARRAYoPROFILo *)profil_list__ENB);
  new_capacity__EZRI= 0;
  if (((__INTEGER)(Self__CZRI->parent_arrayed_collection__DNB.upper__KNB +  1) <= (__INTEGER)(Self__CZRI->parent_arrayed_collection__DNB.capacity__E1L -  1))) {
    Self__CZRI->parent_arrayed_collection__DNB.upper__KNB=(__INTEGER)(Self__CZRI->parent_arrayed_collection__DNB.upper__KNB +  1);
    __tmp__SZRI=TRUE__;
  } else {
    __tmp__SZRI=FALSE__;
  };
  if ((! __tmp__SZRI)) {
    if ((Self__CZRI->parent_arrayed_collection__DNB.capacity__E1L ==  0)) {
      Self__CZRI->parent_arrayed_collection__DNB.storage__P1L=create__IUSB( 2);
      Self__CZRI->parent_arrayed_collection__DNB.capacity__E1L= 2;
      Self__CZRI->parent_arrayed_collection__DNB.upper__KNB= 0;
    } else {
      new_capacity__EZRI=(__INTEGER)(Self__CZRI->parent_arrayed_collection__DNB.capacity__E1L <<  1);
      __tmp__H0RI=Self__CZRI->parent_arrayed_collection__DNB.storage__P1L;
      __tmp__I0RI=Self__CZRI->parent_arrayed_collection__DNB.capacity__E1L;
      new__G4BJ=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__H0RI)),((__UINTEGER_32 )(__INTEGER)(__tmp__I0RI * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EZRI * ((__INTEGER )(sizeof(void *)))))));
      __tmp__Z4BJ=(__INTEGER)(new_capacity__EZRI -  1);
      Self__A3LJ=__tmp__I0RI;
      while ((Self__A3LJ <= __tmp__Z4BJ)) {
        new__G4BJ[Self__A3LJ]=NULL;
        Self__A3LJ=(__INTEGER)(Self__A3LJ +  1);
      };
      Self__CZRI->parent_arrayed_collection__DNB.storage__P1L=new__G4BJ;
      Self__CZRI->parent_arrayed_collection__DNB.capacity__E1L=new_capacity__EZRI;
      Self__CZRI->parent_arrayed_collection__DNB.upper__KNB=(__INTEGER)(Self__CZRI->parent_arrayed_collection__DNB.upper__KNB +  1);
    };
  };
  ((void **)Self__CZRI->parent_arrayed_collection__DNB.storage__P1L)[Self__CZRI->parent_arrayed_collection__DNB.upper__KNB]=p__50JI;
  __tmp__D1JI=((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.upper__KNB;
  if (((struct ___OBJ *)p__50JI)->__id==__PROFIL_SLOT__) {
    ((__PROFIL_SLOT *)p__50JI)->parent_profil__51LC.life_index__01RI=__tmp__D1JI;
  } else {
    ((__PROFIL_BLOCK *)p__50JI)->parent_profil__GHAG.life_index__01RI=__tmp__D1JI;
  };
}

static __FAST_ARRAYoPROFIL_SLOTo* create_with_capacity__PKBG(__INTEGER new_count__RKBG)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__BOEG;
  __INTEGER typ_id__GOEG;
  __UINTEGER_32 sz__DOEG,a__QQ1Q,new_size__OQ1Q,t__UQ1Q,a__WQ1Q;
  __FAST_ARRAYoPROFIL_SLOTo *result__AOEG,*Self__QUPG;
  result__AOEG=NULL;
  ptr__BOEG=((__POINTER )(NULL));
  typ_id__GOEG= 0;
  sz__DOEG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROFIL_SLOTo));
  if ((sz__DOEG ==  0)) {
    result__AOEG=FAST_ARRAYoPROFIL_SLOTo__;
  } else {
    typ_id__GOEG=__FAST_ARRAYoPROFIL_SLOTo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__DOEG);
    if ((typ_id__GOEG == (__INTEGER)(-  1))) {
      a__QQ1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__OQ1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__DOEG + a__QQ1Q) & (__UINTEGER_32)(~ a__QQ1Q));
      ptr__BOEG=micro_alloc__table__lab__BOI(new_size__OQ1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OQ1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__OQ1Q);
    } else {
      t__UQ1Q=((__UINTEGER_32 )typ_id__GOEG);
      a__WQ1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__BOEG=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__DOEG + a__WQ1Q) & (__UINTEGER_32)(~ a__WQ1Q)),((__POINTER )(&(table_type[(t__UQ1Q)]))),(__UINTEGER_32)(t__UQ1Q |  1));
    };
    result__AOEG=((__FAST_ARRAYoPROFIL_SLOTo *)ptr__BOEG);
    *(result__AOEG) = *(FAST_ARRAYoPROFIL_SLOTo__);
  };
  Self__QUPG=((__FAST_ARRAYoPROFIL_SLOTo *)result__AOEG);
  if ((Self__QUPG->parent_arrayed_collection__H15F.capacity__ZUPG < new_count__RKBG)) {
    Self__QUPG->parent_arrayed_collection__H15F.storage__EVPG=create__0SWG(new_count__RKBG);
    Self__QUPG->parent_arrayed_collection__H15F.capacity__ZUPG=new_count__RKBG;
  };
  Self__QUPG->parent_arrayed_collection__H15F.upper__IVPG=(__INTEGER)(-  1);
  return(result__AOEG);
}

static void to_run__TLXI(__ITM_ARG *Self__ULXI,void *arg_lst__VLXI)
// ({ITM_ARG},{NULLxFAST_ARRAYoLOCALo}) VoidNo recursive, No inlinable.
{
  void *__tmp__YLXI;
  void *__tmp__ZLXI,*__tmp__WJAQ;
  __ITM_TYPE_STYLE *Self__VJAQ;
  __tmp__YLXI=Self__ULXI->type__432D;
  switch (((struct ___OBJ *)__tmp__YLXI)->__id) {
  case __ITM_TYPE_SIMPLE__: {
    if (((__ITM_TYPE_SIMPLE *)__tmp__YLXI)->to_run__2VK==0) {
      __tmp__ZLXI=((__ITM_TYPE_SIMPLE *)__tmp__YLXI)->to_run__1VK;
    } else {
      __tmp__ZLXI=to_run__XVK(__tmp__YLXI);
    };
  } break;
  case __ITM_TYPE_STYLE__: {
    if (((__ITM_TYPE_STYLE *)__tmp__YLXI)->to_run__V1IB==0) {
      __tmp__ZLXI=((__ITM_TYPE_STYLE *)__tmp__YLXI)->to_run__U1IB;
    } else {
      Self__VJAQ=((__ITM_TYPE_STYLE *)__tmp__YLXI);
      __tmp__WJAQ=get__XUN(Self__VJAQ);
      Self__VJAQ->to_run__U1IB=__tmp__WJAQ;
      Self__VJAQ->to_run__V1IB=0;
      __tmp__ZLXI=__tmp__WJAQ;
    };
  } break;
  case __ITM_TYPE_GENERIC__: {
    __tmp__ZLXI=to_run__W1IB(__tmp__YLXI);
  } break;
  case __ITM_TYPE_SELF__: {
    __tmp__ZLXI=to_run__MPXD();
  } break;
  case __ITM_TYPE_GENERIC_ELT__: {
    __tmp__ZLXI=to_run__DKEF(__tmp__YLXI);
  } break;
  };
  add_last__T2FH(arg_lst__VLXI,create__name__style__type__25JG(Self__ULXI->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM,Self__ULXI->name__332D,' ',__tmp__ZLXI));
}

static void to_run__3LXI(__ITM_ARGS *Self__4LXI,void *arg_lst__5LXI)
// ({ITM_ARGS},{NULLxFAST_ARRAYoLOCALo}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__HMXI,Self__M01I;
  void *__tmp__OMXI;
  void *__tmp__PMXI,*__tmp__2JAQ;
  __ITM_TYPE_STYLE *Self__1JAQ;
  __tmp__HMXI=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__4LXI->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD;
  Self__M01I= 0;
  while ((Self__M01I <= __tmp__HMXI)) {
    __tmp__OMXI=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__4LXI->type__GH3D)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__M01I];
    switch (((struct ___OBJ *)__tmp__OMXI)->__id) {
    case __ITM_TYPE_SIMPLE__: {
      if (((__ITM_TYPE_SIMPLE *)__tmp__OMXI)->to_run__2VK==0) {
        __tmp__PMXI=((__ITM_TYPE_SIMPLE *)__tmp__OMXI)->to_run__1VK;
      } else {
        __tmp__PMXI=to_run__XVK(__tmp__OMXI);
      };
    } break;
    case __ITM_TYPE_STYLE__: {
      if (((__ITM_TYPE_STYLE *)__tmp__OMXI)->to_run__V1IB==0) {
        __tmp__PMXI=((__ITM_TYPE_STYLE *)__tmp__OMXI)->to_run__U1IB;
      } else {
        Self__1JAQ=((__ITM_TYPE_STYLE *)__tmp__OMXI);
        __tmp__2JAQ=get__XUN(Self__1JAQ);
        Self__1JAQ->to_run__U1IB=__tmp__2JAQ;
        Self__1JAQ->to_run__V1IB=0;
        __tmp__PMXI=__tmp__2JAQ;
      };
    } break;
    case __ITM_TYPE_GENERIC__: {
      __tmp__PMXI=to_run__W1IB(__tmp__OMXI);
    } break;
    case __ITM_TYPE_SELF__: {
      __tmp__PMXI=to_run__MPXD();
    } break;
    case __ITM_TYPE_GENERIC_ELT__: {
      __tmp__PMXI=to_run__DKEF(__tmp__OMXI);
    } break;
    };
    add_last__T2FH(arg_lst__5LXI,create__name__style__type__25JG(Self__4LXI->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__4LXI->name__FH3D)->parent_arrayed_collection__VTFC.storage__FB0D)[Self__M01I],' ',__tmp__PMXI));
    Self__M01I=(__INTEGER)(Self__M01I +  1);
  };
}

static __INTEGER affect__with__index__in__BKUH(__ITM_WRITE_VALUE *Self__CKUH,void *idf__DKUH,void *val__EKUH,__INTEGER n__FKUH,void *lst__GKUH)
// ({ITM_WRITE_VALUE},{NULLxSTRING_CONSTANT},{NULLxEXPR_MULTIPLE},{INTEGER},{NULLxFAST_ARRAYoEXPRo}) With resultNo recursive, No inlinable.
{
  __INTEGER result__JKUH,Self__LA0H,limit_up__MA0H;
  void *slot__KKUH;
  void *typ_multi__LKUH,*__tmp__5LUH;
  __POSITION pos__N0JQ,pos__Q0JQ,pos__XOUH;
  void *loc__IKUH;
  void *__tmp__2LUH;
  void *__tmp__4LUH;
  void *lst_expr__MKUH;
  result__JKUH= 0;
  slot__KKUH=NULL;
  typ_multi__LKUH=NULL;
  lst_expr__MKUH=NULL;
  if ((n__FKUH > ((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)val__EKUH)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH)) {
    pos__N0JQ=Self__CKUH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_454));
    put_position__ECH(pos__N0JQ);
    send_error__2FH();
  };
  loc__IKUH=lookup__TJSH(idf__DKUH);
  if (((void *)loc__IKUH != (void *)NULL)) {
    add_last__XSEI(lst__GKUH,affect_local__with__PZVH(Self__CKUH,loc__IKUH,((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)val__EKUH)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[n__FKUH]));
    result__JKUH=(__INTEGER)(n__FKUH +  1);
  } else {
    slot__KKUH=get_slot__AP5G(to_run__MPXD(),idf__DKUH);
    if (((void *)slot__KKUH == (void *)NULL)) {
      copy__BNK(string_tmp__RB,(&__string_456));
      append__MOK(string_tmp__RB,idf__DKUH);
      append__MOK(string_tmp__RB,(&__string_457));
      append_name_in__FBYD(to_run__MPXD(),string_tmp__RB);
      add_last__YPK(string_tmp__RB,'.');
      pos__Q0JQ=Self__CKUH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,string_tmp__RB);
      put_position__ECH(pos__Q0JQ);
      send_error__2FH();
    };
    if (((struct ___OBJ *)slot__KKUH)->__id==__SLOT_DATA__) {
      __tmp__2LUH=((__SLOT *)((__SLOT_DATA *)slot__KKUH)->parent_slot__BJZD)->base_slot__P22F;
    } else {
      __tmp__2LUH=((__SLOT *)((__SLOT_CODE *)slot__KKUH)->parent_slot__Y22F)->base_slot__P22F;
    };
    __tmp__4LUH=((__ITM_SLOT *)__tmp__2LUH)->type__PD2D;
    if (__tmp__4LUH==NULL) {
      __tmp__5LUH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__4LUH)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        __tmp__5LUH=NULL;
      } break;
      case __ITM_TYPE_STYLE__: {
        __tmp__5LUH=NULL;
      } break;
      case __ITM_TYPE_GENERIC__: {
        __tmp__5LUH=NULL;
      } break;
      case __ITM_TYPE_SELF__: {
        __tmp__5LUH=NULL;
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        __tmp__5LUH=NULL;
      } break;
      case __ITM_TYPE_MULTI__: {
        __tmp__5LUH=((void *)__tmp__4LUH);
      } break;
      }
    };
    typ_multi__LKUH=__tmp__5LUH;
    if (((void *)__tmp__5LUH != (void *)NULL)) {
      result__JKUH=(__INTEGER)(n__FKUH + (__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__5LUH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1));
      if ((result__JKUH > (__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)val__EKUH)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH +  1))) {
        pos__XOUH=Self__CKUH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 1,(&__string_454));
        put_position__ECH(pos__XOUH);
        send_error__2FH();
      };
      lst_expr__MKUH=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__5LUH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1));
      Self__LA0H= 0;
      limit_up__MA0H=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__5LUH)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK;
      while ((Self__LA0H <= limit_up__MA0H)) {
        add_last__XSEI(lst_expr__MKUH,((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)val__EKUH)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[(__INTEGER)(n__FKUH + Self__LA0H)]);
        Self__LA0H=(__INTEGER)(Self__LA0H +  1);
      };
      add_last__XSEI(lst__GKUH,affect_slot__with__50VH(Self__CKUH,idf__DKUH,create__SUHH(lst_expr__MKUH)));
    } else {
      add_last__XSEI(lst__GKUH,affect_slot__with__50VH(Self__CKUH,idf__DKUH,((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)val__EKUH)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[n__FKUH]));
      result__JKUH=(__INTEGER)(n__FKUH +  1);
    };
  };
  return(result__JKUH);
}

static void* lookup__TJSH(void *n__VJSH)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__XJSH;
  __INTEGER j__YJSH;
  void **__tmp__WY5Q;
  __BOOLEAN __tmp__XLSH;
  result__XJSH=NULL;
  j__YJSH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__WY5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__YJSH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__WY5Q)[j__YJSH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__VJSH)))) {
    j__YJSH=(__INTEGER)(j__YJSH -  1);
  };
  if ((j__YJSH >= stack_local_lower__AI4F)) {
    result__XJSH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__YJSH];
    if (((j__YJSH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__XJSH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__XJSH;
    };
    __tmp__XLSH=TRUE__;
  } else {
    __tmp__XLSH=FALSE__;
  };
  if ((! __tmp__XLSH)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__XJSH=lookup__LLJM(profil_first__4PQC,n__VJSH);
      if ((((void *)result__XJSH != (void *)NULL) && ((void *)((__LOCAL *)result__XJSH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__XJSH;
      };
    };
  };
  return(result__XJSH);
}

static void* affect_local__with__PZVH(__ITM_WRITE_VALUE *Self__QZVH,void *loc__RZVH,void *v__SZVH)
// ({ITM_WRITE_VALUE},{NULLxLOCAL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *result__VZVH,*__tmp__X0VH;
  void *__tmp__V0VH;
  __POSITION __tmp__W0VH;
  result__VZVH=NULL;
  if ((((__LOCAL *)loc__RZVH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == '-')) {
    result__VZVH=affect_slot__with__50VH(Self__QZVH,((__LOCAL *)loc__RZVH)->parent_variable__B2LC.intern_name__025F,v__SZVH);
  } else {
    if ((((__LOCAL *)loc__RZVH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == ' ')) {
      put_error__text__0AH( 1,(&__string_459));
      put_position__ECH(((__LOCAL *)loc__RZVH)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
      put_position__ECH(Self__QZVH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM);
      send_error__2FH();
    };
    __tmp__V0VH=((__LOCAL *)loc__RZVH)->parent_variable__B2LC.type__125F;
    __tmp__W0VH=Self__QZVH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
    switch (((struct ___OBJ *)v__SZVH)->__id) {
    case __LIST__: {
      __tmp__X0VH=check_type__with__T5CN(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __STRING_CST__: {
      __tmp__X0VH=check_type__with__Q22H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXTERNAL_C__: {
      __tmp__X0VH=check_type__with__PF3H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__X0VH=check_type__with__OO3H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __INTEGER_CST__: {
      __tmp__X0VH=check_type__with__NX3H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __READ_LOCAL__: {
      __tmp__X0VH=check_type__with__LEFJ(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__X0VH=check_type__with__LA4H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__X0VH=check_type__with__KJ4H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__X0VH=check_type__with__JS4H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __REAL_CST__: {
      __tmp__X0VH=check_type__with__I14H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __CHARACTER_CST__: {
      __tmp__X0VH=check_type__with__HE5H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __IS_EXPANDED__: {
      __tmp__X0VH=check_type__with__FN5H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__X0VH=check_type__with__DW5H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_SUP__: {
      __tmp__X0VH=check_type__with__C55H(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_SUB__: {
      __tmp__X0VH=check_type__with__BIAI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_MUL__: {
      __tmp__X0VH=check_type__with__ARAI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_DIV__: {
      __tmp__X0VH=check_type__with__5ZAI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_AND__: {
      __tmp__X0VH=check_type__with__4CBI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__X0VH=check_type__with__3LBI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__X0VH=check_type__with__2UBI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __PUT_TO__: {
      __tmp__X0VH=check_type__with__03BI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __ITEM__: {
      __tmp__X0VH=check_type__with__YGCI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __SIZE_OF__: {
      __tmp__X0VH=check_type__with__WPCI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __CAST__: {
      __tmp__X0VH=check_type__with__UYCI(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __CALL_SLOT__: {
      __tmp__X0VH=check_type__with__RIDN(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __READ_SLOT__: {
      __tmp__X0VH=check_type__with__VPKL(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __READ_GLOBAL__: {
      __tmp__X0VH=check_type__with__UYKL(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__X0VH=check_type__with__IW2O(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__X0VH=check_type__with__AYIO(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__X0VH=check_type__with__IFSO(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__X0VH=check_type__with__5AJO(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__X0VH=check_type__with__IOSO(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_NEG__: {
      __tmp__X0VH=check_type__with__SVXM(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_ADD__: {
      __tmp__X0VH=check_type__with__R4XM(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_NOT__: {
      __tmp__X0VH=check_type__with__QRDN(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_MOD__: {
      __tmp__X0VH=check_type__with__4JJO(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__X0VH=check_type__with__SQIP(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_INF__: {
      __tmp__X0VH=check_type__with__H52O(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__X0VH=check_type__with__GI3O(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_OR__: {
      __tmp__X0VH=check_type__with__MZZN(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    case __EXPR_XOR__: {
      __tmp__X0VH=check_type__with__FR3O(v__SZVH,__tmp__V0VH,__tmp__W0VH);
    } break;
    };
    add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(loc__RZVH,Self__QZVH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM,__tmp__X0VH));
    result__VZVH=read__IC5G(loc__RZVH);
  };
  return(result__VZVH);
}

static void* affect_slot__with__50VH(__ITM_WRITE_VALUE *Self__A1VH,void *name__B1VH,void *v__C1VH)
// ({ITM_WRITE_VALUE},{NULLxSTRING_CONSTANT},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *new_val__M1VH,*rec__J1VH,*__tmp__22VH,*__tmp__G3VH;
  void *type__K1VH;
  void *__tmp__V1VH,*slot__F1VH;
  void *__tmp__51VH;
  __POSITION __tmp__D2VH,__tmp__B3VH,__tmp__J3VH,__tmp__V3VH;
  void *__tmp__J2VH,*em__L1VH;
  void *__tmp__K2VH;
  __INTEGER __tmp__V2VH,Self__KSZH;
  void *__tmp__A3VH,*__tmp__I3VH,*__tmp__U3VH;
  void *node__H1VH;
  void *lst__N1VH;
  void *__tmp__32VH;
  __FAST_ARRAYoEXPRo *Self__OS1Q;
  new_val__M1VH=NULL;
  lst__N1VH=NULL;
  rec__J1VH=read__IC5G(lookup__TJSH((&__string_57)));
  type__K1VH=((__TYPE_FULL *)((__LOCAL *)((__READ_LOCAL *)rec__J1VH)->local__ALZD)->parent_variable__B2LC.type__125F)->parent_type__KTL;
  switch (((struct ___OBJ *)type__K1VH)->__id) {
  case __TYPE__: {
    __tmp__V1VH=get_slot__U1BG(type__K1VH,name__B1VH);
  } break;
  case __TYPE_NULL__: {
    __tmp__V1VH=get_slot__K3BG(type__K1VH,name__B1VH);
  } break;
  case __TYPE_VOID__: {
    __tmp__V1VH=get_slot__A5BG(type__K1VH,name__B1VH);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__V1VH=get_slot__WACG(type__K1VH,name__B1VH);
  } break;
  case __TYPE_ID__: {
    __tmp__V1VH=get_slot__MCCG(type__K1VH,name__B1VH);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__V1VH=get_slot__CECG(type__K1VH,name__B1VH);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__V1VH=get_slot__VXEJ(name__B1VH);
  } break;
  };
  slot__F1VH=__tmp__V1VH;
  if (((void *)__tmp__V1VH == (void *)NULL)) {
    copy__BNK(string_tmp__RB,(&__string_456));
    append__MOK(string_tmp__RB,name__B1VH);
    append__MOK(string_tmp__RB,(&__string_457));
    switch (((struct ___OBJ *)type__K1VH)->__id) {
    case __TYPE__: {
      __tmp__51VH=((__PROTOTYPE *)((__TYPE *)type__K1VH)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__51VH=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__51VH=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__51VH=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__51VH=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__51VH=((__TYPE_GENERIC *)type__K1VH)->intern_name__FS2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__51VH=((__PROFIL_BLOCK *)type__K1VH)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    append__MOK(string_tmp__RB,__tmp__51VH);
    add_last__YPK(string_tmp__RB,'.');
    __tmp__D2VH=Self__A1VH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,string_tmp__RB);
    put_position__ECH(__tmp__D2VH);
    send_error__2FH();
  };
  if (v__C1VH==NULL) {
    __tmp__J2VH=NULL;
  } else {
    switch (((struct ___OBJ *)v__C1VH)->__id) {
    case __LIST__: {
      __tmp__J2VH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__J2VH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__J2VH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__J2VH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__J2VH=((void *)v__C1VH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__J2VH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__J2VH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__J2VH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__J2VH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__J2VH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__J2VH=NULL;
    } break;
    case __ITEM__: {
      __tmp__J2VH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__J2VH=NULL;
    } break;
    case __CAST__: {
      __tmp__J2VH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__J2VH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__J2VH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__J2VH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__J2VH=NULL;
    } break;
    }
  };
  em__L1VH=__tmp__J2VH;
  if (((struct ___OBJ *)__tmp__V1VH)->__id==__SLOT_DATA__) {
    __tmp__K2VH=slot_data__Z4TH(__tmp__V1VH);
  } else {
    __tmp__K2VH=slot_data__T5TH(__tmp__V1VH);
  };
  if (((void *)__tmp__J2VH != (void *)NULL)) {
    lst__N1VH=((__EXPR_MULTIPLE *)__tmp__J2VH)->expr_list__VFMH;
    __tmp__V2VH=(__INTEGER)(((__FAST_ARRAYoEXPRo *)lst__N1VH)->parent_arrayed_collection__42LC.upper__USSH -  1);
    Self__KSZH= 0;
    while ((Self__KSZH <= __tmp__V2VH)) {
      __tmp__22VH=((void **)((__FAST_ARRAYoEXPRo *)lst__N1VH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__KSZH];
      if (((struct ___OBJ *)slot__F1VH)->__id==__SLOT_DATA__) {
        __tmp__32VH=((__SLOT *)((__SLOT_DATA *)slot__F1VH)->parent_slot__BJZD)->slot_data_list__CL3F;
      } else {
        __tmp__32VH=((__SLOT *)((__SLOT_CODE *)slot__F1VH)->parent_slot__Y22F)->slot_data_list__CL3F;
      };
      __tmp__A3VH=((__SLOT_DATA *)((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__32VH)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__KSZH])->parent_variable__AJZD.type__125F;
      if (((struct ___OBJ *)slot__F1VH)->__id==__SLOT_DATA__) {
        __tmp__B3VH=((__SLOT_DATA *)slot__F1VH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      } else {
        __tmp__B3VH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot__F1VH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
      };
      new_val__M1VH=check__with__and__0SZH(__tmp__22VH,__tmp__A3VH,__tmp__B3VH);
      ((void **)((__FAST_ARRAYoEXPRo *)lst__N1VH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__KSZH]=new_val__M1VH;
      Self__KSZH=(__INTEGER)(Self__KSZH +  1);
    };
    Self__OS1Q=((__FAST_ARRAYoEXPRo *)lst__N1VH);
    __tmp__G3VH=((void **)Self__OS1Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__OS1Q->parent_arrayed_collection__42LC.upper__USSH];
    __tmp__I3VH=((__SLOT_DATA *)__tmp__K2VH)->parent_variable__AJZD.type__125F;
    if (((struct ___OBJ *)__tmp__V1VH)->__id==__SLOT_DATA__) {
      __tmp__J3VH=((__SLOT_DATA *)__tmp__V1VH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    } else {
      __tmp__J3VH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__V1VH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
    };
    new_val__M1VH=check__with__and__0SZH(__tmp__G3VH,__tmp__I3VH,__tmp__J3VH);
    ((void **)((__FAST_ARRAYoEXPRo *)lst__N1VH)->parent_arrayed_collection__42LC.storage__1SDI)[((__FAST_ARRAYoEXPRo *)lst__N1VH)->parent_arrayed_collection__42LC.upper__USSH]=new_val__M1VH;
    new_val__M1VH=__tmp__J2VH;
  } else {
    __tmp__U3VH=((__SLOT_DATA *)__tmp__K2VH)->parent_variable__AJZD.type__125F;
    if (((struct ___OBJ *)__tmp__V1VH)->__id==__SLOT_DATA__) {
      __tmp__V3VH=((__SLOT_DATA *)__tmp__V1VH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    } else {
      __tmp__V3VH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__V1VH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
    };
    new_val__M1VH=check__with__and__0SZH(v__C1VH,__tmp__U3VH,__tmp__V3VH);
  };
  node__H1VH=new_write__slot__receiver__value__ITUH(Self__A1VH->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM,__tmp__V1VH,rec__J1VH,new_val__M1VH);
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__H1VH);
  return(result_expr__PVDI(node__H1VH));
}

static void* lookup__0MLH(void *n__2MLH)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__4MLH;
  __INTEGER j__5MLH;
  void **__tmp__XY5Q;
  __BOOLEAN __tmp__5OLH;
  result__4MLH=NULL;
  j__5MLH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__XY5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__5MLH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__XY5Q)[j__5MLH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__2MLH)))) {
    j__5MLH=(__INTEGER)(j__5MLH -  1);
  };
  if ((j__5MLH >= stack_local_lower__AI4F)) {
    result__4MLH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__5MLH];
    if (((j__5MLH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__4MLH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__4MLH;
    };
    __tmp__5OLH=TRUE__;
  } else {
    __tmp__5OLH=FALSE__;
  };
  if ((! __tmp__5OLH)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__4MLH=lookup__LLJM(profil_first__4PQC,n__2MLH);
      if ((((void *)result__4MLH != (void *)NULL) && ((void *)((__LOCAL *)result__4MLH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__4MLH;
      };
    };
  };
  return(result__4MLH);
}

static __BOOLEAN affect_with__ZCHI(__TYPE_FULL *Self__0CHI,void *other__1CHI)
// ({TYPE_FULL},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  __TYPE_FULL *Self__U45Q;
  void *__tmp__IEHI,*__tmp__JEHI;
  __BOOLEAN result__3CHI,__tmp__WDHI,__tmp__KEHI,__tmp__NEHI;
  result__3CHI=FALSE__;
  Self__U45Q=((__TYPE_FULL *)other__1CHI);
  if ((((void *)Self__U45Q == (void *)Self__0CHI) || (((void *)Self__U45Q->parent_type__KTL == (void *)Self__0CHI->parent_type__KTL) && ((__UINTEGER_8)(Self__U45Q->flag__LTL &  15) == (__UINTEGER_8)(Self__0CHI->flag__LTL &  15))))) {
    result__3CHI=TRUE__;
  } else {
    if (((void *)other__1CHI != (void *)NULL)) {
      if (((__UINTEGER_8)(Self__0CHI->flag__LTL &  4) !=  0)) {
        result__3CHI=((void *)((__TYPE_FULL *)other__1CHI)->parent_type__KTL == (void *)TYPE_NULL__);
        __tmp__WDHI=TRUE__;
      } else {
        __tmp__WDHI=FALSE__;
      };
      if ((! __tmp__WDHI)) {
        if (((__UINTEGER_8)(Self__0CHI->flag__LTL &  1) !=  0)) {
          if (((__UINTEGER_8)(((__TYPE_FULL *)other__1CHI)->flag__LTL &  4) !=  0)) {
            __tmp__IEHI=Self__0CHI->parent_type__KTL;
            __tmp__JEHI=((__TYPE_FULL *)other__1CHI)->parent_type__KTL;
            switch (((struct ___OBJ *)__tmp__IEHI)->__id) {
            case __TYPE__: {
              __tmp__KEHI=((void *)((__TYPE *)__tmp__IEHI) == (void *)__tmp__JEHI);
            } break;
            case __TYPE_NULL__: {
              __tmp__KEHI=((void *)((__TYPE_NULL *)__tmp__IEHI) == (void *)__tmp__JEHI);
            } break;
            case __TYPE_VOID__: {
              __tmp__KEHI=((void *)((__TYPE_VOID *)__tmp__IEHI) == (void *)__tmp__JEHI);
            } break;
            case __TYPE_CONTEXT__: {
              __tmp__KEHI=((void *)((__TYPE_CONTEXT *)__tmp__IEHI) == (void *)__tmp__JEHI);
            } break;
            case __TYPE_ID__: {
              __tmp__KEHI=((void *)((__TYPE_ID *)__tmp__IEHI) == (void *)__tmp__JEHI);
            } break;
            case __TYPE_GENERIC__: {
              __tmp__KEHI=((void *)((__TYPE_GENERIC *)__tmp__IEHI) == (void *)__tmp__JEHI);
            } break;
            case __PROFIL_BLOCK__: {
              __tmp__KEHI=__infix_equal_equal__GSFJ(__tmp__IEHI,__tmp__JEHI);
            } break;
            };
            __tmp__NEHI=__tmp__KEHI;
          } else {
            __tmp__NEHI=FALSE__;
          };
          result__3CHI=((__tmp__NEHI || (((void *)Self__0CHI->parent_type__KTL == (void *)type_boolean__VJB) && is_sub_type__FW4J(other__1CHI,Self__0CHI))) || (((void *)Self__0CHI->parent_type__KTL == (void *)type_pointer__HLB) && ((void *)((__TYPE_FULL *)other__1CHI)->parent_type__KTL == (void *)TYPE_NULL__)));
        } else {
          result__3CHI=(((! ((__UINTEGER_8)(((__TYPE_FULL *)other__1CHI)->flag__LTL &  1) !=  0)) || ((void *)Self__0CHI->parent_type__KTL == (void *)type_block__BLB)) && is_sub_type__FW4J(other__1CHI,Self__0CHI));
        };
      };
    };
  };
  return(result__3CHI);
}

static void* affect_slot__with__5QSH(__ITM_WRITE_CAST *Self__ARSH,void *name__BRSH,void *v__CRSH)
// ({ITM_WRITE_CAST},{NULLxSTRING_CONSTANT},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *new_val__MRSH,*rec__JRSH,*__tmp__4SSH,*__tmp__ITSH;
  void *type__KRSH;
  void *__tmp__VRSH,*slot__FRSH;
  void *__tmp__5RSH;
  __POSITION __tmp__DSSH,__tmp__DTSH,__tmp__LTSH,__tmp__XTSH;
  void *__tmp__JSSH,*em__LRSH;
  void *__tmp__KSSH;
  __INTEGER __tmp__XSSH,Self__DLXH;
  void *__tmp__CTSH,*__tmp__KTSH,*__tmp__WTSH;
  void *node__HRSH;
  void *lst__NRSH;
  void *__tmp__5SSH;
  __FAST_ARRAYoEXPRo *Self__VT1Q;
  new_val__MRSH=NULL;
  lst__NRSH=NULL;
  rec__JRSH=read__IC5G(lookup__0MLH((&__string_57)));
  type__KRSH=((__TYPE_FULL *)((__LOCAL *)((__READ_LOCAL *)rec__JRSH)->local__ALZD)->parent_variable__B2LC.type__125F)->parent_type__KTL;
  switch (((struct ___OBJ *)type__KRSH)->__id) {
  case __TYPE__: {
    __tmp__VRSH=get_slot__U1BG(type__KRSH,name__BRSH);
  } break;
  case __TYPE_NULL__: {
    __tmp__VRSH=get_slot__K3BG(type__KRSH,name__BRSH);
  } break;
  case __TYPE_VOID__: {
    __tmp__VRSH=get_slot__A5BG(type__KRSH,name__BRSH);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__VRSH=get_slot__WACG(type__KRSH,name__BRSH);
  } break;
  case __TYPE_ID__: {
    __tmp__VRSH=get_slot__MCCG(type__KRSH,name__BRSH);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__VRSH=get_slot__CECG(type__KRSH,name__BRSH);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__VRSH=get_slot__VXEJ(name__BRSH);
  } break;
  };
  slot__FRSH=__tmp__VRSH;
  if (((void *)__tmp__VRSH == (void *)NULL)) {
    copy__BNK(string_tmp__RB,(&__string_456));
    append__MOK(string_tmp__RB,name__BRSH);
    append__MOK(string_tmp__RB,(&__string_457));
    switch (((struct ___OBJ *)type__KRSH)->__id) {
    case __TYPE__: {
      __tmp__5RSH=((__PROTOTYPE *)((__TYPE *)type__KRSH)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__5RSH=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__5RSH=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__5RSH=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__5RSH=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__5RSH=((__TYPE_GENERIC *)type__KRSH)->intern_name__FS2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__5RSH=((__PROFIL_BLOCK *)type__KRSH)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    append__MOK(string_tmp__RB,__tmp__5RSH);
    add_last__YPK(string_tmp__RB,'.');
    __tmp__DSSH=Self__ARSH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,string_tmp__RB);
    put_position__ECH(__tmp__DSSH);
    send_error__2FH();
  };
  if (v__CRSH==NULL) {
    __tmp__JSSH=NULL;
  } else {
    switch (((struct ___OBJ *)v__CRSH)->__id) {
    case __LIST__: {
      __tmp__JSSH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__JSSH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JSSH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__JSSH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JSSH=((void *)v__CRSH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JSSH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__JSSH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__JSSH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__JSSH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JSSH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__JSSH=NULL;
    } break;
    case __ITEM__: {
      __tmp__JSSH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__JSSH=NULL;
    } break;
    case __CAST__: {
      __tmp__JSSH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__JSSH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__JSSH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__JSSH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__JSSH=NULL;
    } break;
    }
  };
  em__LRSH=__tmp__JSSH;
  if (((struct ___OBJ *)__tmp__VRSH)->__id==__SLOT_DATA__) {
    __tmp__KSSH=slot_data__Z4TH(__tmp__VRSH);
  } else {
    __tmp__KSSH=slot_data__T5TH(__tmp__VRSH);
  };
  if (((void *)__tmp__JSSH != (void *)NULL)) {
    lst__NRSH=((__EXPR_MULTIPLE *)__tmp__JSSH)->expr_list__VFMH;
    __tmp__XSSH=(__INTEGER)(((__FAST_ARRAYoEXPRo *)lst__NRSH)->parent_arrayed_collection__42LC.upper__USSH -  1);
    Self__DLXH= 0;
    while ((Self__DLXH <= __tmp__XSSH)) {
      __tmp__4SSH=((void **)((__FAST_ARRAYoEXPRo *)lst__NRSH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__DLXH];
      if (((struct ___OBJ *)slot__FRSH)->__id==__SLOT_DATA__) {
        __tmp__5SSH=((__SLOT *)((__SLOT_DATA *)slot__FRSH)->parent_slot__BJZD)->slot_data_list__CL3F;
      } else {
        __tmp__5SSH=((__SLOT *)((__SLOT_CODE *)slot__FRSH)->parent_slot__Y22F)->slot_data_list__CL3F;
      };
      __tmp__CTSH=((__SLOT_DATA *)((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__5SSH)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__DLXH])->parent_variable__AJZD.type__125F;
      if (((struct ___OBJ *)slot__FRSH)->__id==__SLOT_DATA__) {
        __tmp__DTSH=((__SLOT_DATA *)slot__FRSH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      } else {
        __tmp__DTSH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)slot__FRSH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
      };
      new_val__MRSH=check__with__and__TLXH(__tmp__4SSH,__tmp__CTSH,__tmp__DTSH);
      ((void **)((__FAST_ARRAYoEXPRo *)lst__NRSH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__DLXH]=new_val__MRSH;
      Self__DLXH=(__INTEGER)(Self__DLXH +  1);
    };
    Self__VT1Q=((__FAST_ARRAYoEXPRo *)lst__NRSH);
    __tmp__ITSH=((void **)Self__VT1Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__VT1Q->parent_arrayed_collection__42LC.upper__USSH];
    __tmp__KTSH=((__SLOT_DATA *)__tmp__KSSH)->parent_variable__AJZD.type__125F;
    if (((struct ___OBJ *)__tmp__VRSH)->__id==__SLOT_DATA__) {
      __tmp__LTSH=((__SLOT_DATA *)__tmp__VRSH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    } else {
      __tmp__LTSH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__VRSH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
    };
    new_val__MRSH=check__with__and__TLXH(__tmp__ITSH,__tmp__KTSH,__tmp__LTSH);
    ((void **)((__FAST_ARRAYoEXPRo *)lst__NRSH)->parent_arrayed_collection__42LC.storage__1SDI)[((__FAST_ARRAYoEXPRo *)lst__NRSH)->parent_arrayed_collection__42LC.upper__USSH]=new_val__MRSH;
    new_val__MRSH=__tmp__JSSH;
  } else {
    __tmp__WTSH=((__SLOT_DATA *)__tmp__KSSH)->parent_variable__AJZD.type__125F;
    if (((struct ___OBJ *)__tmp__VRSH)->__id==__SLOT_DATA__) {
      __tmp__XTSH=((__SLOT_DATA *)__tmp__VRSH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    } else {
      __tmp__XTSH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__VRSH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
    };
    new_val__MRSH=check__with__and__TLXH(v__CRSH,__tmp__WTSH,__tmp__XTSH);
  };
  node__HRSH=new_write__slot__receiver__value__ITUH(Self__ARSH->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM,__tmp__VRSH,rec__JRSH,new_val__MRSH);
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,node__HRSH);
  return(result_expr__PVDI(node__HRSH));
}

static void* lookup__3RLH(void *n__5RLH)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *result__BSLH;
  __INTEGER j__CSLH;
  void **__tmp__YY5Q;
  __BOOLEAN __tmp__BULH;
  result__BSLH=NULL;
  j__CSLH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__YY5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__CSLH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__YY5Q)[j__CSLH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)n__5RLH)))) {
    j__CSLH=(__INTEGER)(j__CSLH -  1);
  };
  if ((j__CSLH >= stack_local_lower__AI4F)) {
    result__BSLH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__CSLH];
    if (((j__CSLH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__BSLH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__BSLH;
    };
    __tmp__BULH=TRUE__;
  } else {
    __tmp__BULH=FALSE__;
  };
  if ((! __tmp__BULH)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__BSLH=lookup__LLJM(profil_first__4PQC,n__5RLH);
      if ((((void *)result__BSLH != (void *)NULL) && ((void *)((__LOCAL *)result__BSLH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__BSLH;
      };
    };
  };
  return(result__BSLH);
}

static void* to_run_with__args__PKQH(__ITM_READ *Self__QKQH)
// ({ITM_READ}) With resultNo recursive, No inlinable.
{
  __POSITION pos_null__YKQH,pos__T0JQ,pos__TAWH,__tmp__OQQH,__tmp__UQQH;
  __POSITION __tmp__IRQH,__tmp__PXSH,__tmp__0UQH;
  void *itm_list__1KQH;
  void *itm_read__2KQH;
  void *slot_msg__4KQH,*__tmp__XNQH;
  void *base__ALQH;
  void *receiver__VKQH,*__tmp__YSQH,*__tmp__ZSQH,*__tmp__YVQH;
  void *__tmp__ZVQH;
  void *receiver_type__WKQH,*__tmp__ANQH,*__tmp__ROQH,*__tmp__SOQH;
  void *__tmp__WNQH;
  void *__tmp__JOQH,*__tmp__POQH,*__tmp__2OQH;
  void *__tmp__KPQH,*__tmp__AXSH,*__tmp__MXSH;
  void *__tmp__VQQH;
  void *em__CWSH,*em__XKQH;
  void *__tmp__CXSH,*__tmp__OXSH;
  __INTEGER __tmp__DXSH;
  __STRING_CST *Self__GOAQ,*Self__QOAQ;
  __PROTOTYPE_CST *Self__HOAQ,*Self__ROAQ;
  __INTEGER_CST *Self__IOAQ,*Self__SOAQ;
  __REAL_CST *Self__KOAQ,*Self__UOAQ;
  __CHARACTER_CST *Self__MOAQ,*Self__WOAQ;
  __IS_EXPANDED *Self__NOAQ,*Self__XOAQ;
  __BOOLEAN is_block_value__5KQH,__tmp__BNQH,__tmp__TOQH,__tmp__WOQH;
  __BOOLEAN __tmp__4SQH;
  void *args__UKQH;
  pos_null__YKQH=((__POSITION ) 0);
  itm_list__1KQH=NULL;
  itm_read__2KQH=NULL;
  slot_msg__4KQH=NULL;
  is_block_value__5KQH=FALSE__;
  base__ALQH=NULL;
  args__UKQH=new__50LH();
  receiver__VKQH=read__IC5G(lookup__3RLH((&__string_57)));
  receiver_type__WKQH=((__TYPE_FULL *)((__LOCAL *)((__READ_LOCAL *)receiver__VKQH)->local__ALZD)->parent_variable__B2LC.type__125F)->parent_type__KTL;
  if (((void *)receiver_type__WKQH == (void *)TYPE_VOID__)) {
    pos__T0JQ=Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
    put_error__text__0AH( 1,(&__string_463));
    put_position__ECH(pos__T0JQ);
    send_error__2FH();
  };
  __tmp__ANQH=type_block__BLB;
  switch (((struct ___OBJ *)receiver_type__WKQH)->__id) {
  case __TYPE__: {
    __tmp__BNQH=((void *)((__TYPE *)receiver_type__WKQH) == (void *)__tmp__ANQH);
  } break;
  case __TYPE_NULL__: {
    __tmp__BNQH=((void *)((__TYPE_NULL *)receiver_type__WKQH) == (void *)__tmp__ANQH);
  } break;
  case __TYPE_VOID__: {
    __tmp__BNQH=((void *)((__TYPE_VOID *)receiver_type__WKQH) == (void *)__tmp__ANQH);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__BNQH=((void *)((__TYPE_CONTEXT *)receiver_type__WKQH) == (void *)__tmp__ANQH);
  } break;
  case __TYPE_ID__: {
    __tmp__BNQH=((void *)((__TYPE_ID *)receiver_type__WKQH) == (void *)__tmp__ANQH);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__BNQH=((void *)((__TYPE_GENERIC *)receiver_type__WKQH) == (void *)__tmp__ANQH);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__BNQH=__infix_equal_equal__GSFJ(receiver_type__WKQH,__tmp__ANQH);
  } break;
  };
  if ((__tmp__BNQH && ((void *)Self__QKQH->name__TVPC == (void *)(&__string_79)))) {
    is_block_value__5KQH=TRUE__;
  } else {
    __tmp__WNQH=Self__QKQH->name__TVPC;
    switch (((struct ___OBJ *)receiver_type__WKQH)->__id) {
    case __TYPE__: {
      __tmp__XNQH=get_slot__U1BG(receiver_type__WKQH,__tmp__WNQH);
    } break;
    case __TYPE_NULL__: {
      __tmp__XNQH=get_slot__K3BG(receiver_type__WKQH,__tmp__WNQH);
    } break;
    case __TYPE_VOID__: {
      __tmp__XNQH=get_slot__A5BG(receiver_type__WKQH,__tmp__WNQH);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__XNQH=get_slot__WACG(receiver_type__WKQH,__tmp__WNQH);
    } break;
    case __TYPE_ID__: {
      __tmp__XNQH=get_slot__MCCG(receiver_type__WKQH,__tmp__WNQH);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__XNQH=get_slot__CECG(receiver_type__WKQH,__tmp__WNQH);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__XNQH=get_slot__VXEJ(__tmp__WNQH);
    } break;
    };
    slot_msg__4KQH=__tmp__XNQH;
    if (((void *)__tmp__XNQH == (void *)NULL)) {
      copy__BNK(string_tmp__RB,(&__string_456));
      append__MOK(string_tmp__RB,Self__QKQH->name__TVPC);
      append__MOK(string_tmp__RB,(&__string_464));
      switch (((struct ___OBJ *)receiver_type__WKQH)->__id) {
      case __TYPE__: {
        append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)receiver_type__WKQH)->prototype__RD)->parent_named__QD.name__1QB);
      } break;
      case __TYPE_NULL__: {
        append__MOK(string_tmp__RB,(&__string_59));
      } break;
      case __TYPE_VOID__: {
        append__MOK(string_tmp__RB,(&__string_2));
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(string_tmp__RB,(&__string_44));
      } break;
      case __TYPE_ID__: {
        append__MOK(string_tmp__RB,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        append__MOK(string_tmp__RB,((__TYPE_GENERIC *)receiver_type__WKQH)->name__2R2B);
      } break;
      case __PROFIL_BLOCK__: {
        append__MOK(string_tmp__RB,(&__string_39));
      } break;
      };
      append__MOK(string_tmp__RB,(&__string_465));
      pos__TAWH=Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
      put_error__text__0AH( 1,string_tmp__RB);
      put_position__ECH(pos__TAWH);
      send_error__2FH();
    };
    if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
      __tmp__JOQH=((__SLOT *)((__SLOT_DATA *)__tmp__XNQH)->parent_slot__BJZD)->slot_data_intern__1JZD;
    } else {
      __tmp__JOQH=((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->slot_data_intern__1JZD;
    };
    if (((void *)__tmp__JOQH != (void *)NULL)) {
      if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
        __tmp__POQH=((__SLOT *)((__SLOT_DATA *)__tmp__XNQH)->parent_slot__BJZD)->slot_data_intern__1JZD;
      } else {
        __tmp__POQH=((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->slot_data_intern__1JZD;
      };
      __tmp__ROQH=((__TYPE_FULL *)((__SLOT_DATA *)__tmp__POQH)->parent_variable__AJZD.type__125F)->parent_type__KTL;
      __tmp__SOQH=type_block__BLB;
      switch (((struct ___OBJ *)__tmp__ROQH)->__id) {
      case __TYPE__: {
        __tmp__TOQH=((void *)((__TYPE *)__tmp__ROQH) == (void *)__tmp__SOQH);
      } break;
      case __TYPE_NULL__: {
        __tmp__TOQH=((void *)((__TYPE_NULL *)__tmp__ROQH) == (void *)__tmp__SOQH);
      } break;
      case __TYPE_VOID__: {
        __tmp__TOQH=((void *)((__TYPE_VOID *)__tmp__ROQH) == (void *)__tmp__SOQH);
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__TOQH=((void *)((__TYPE_CONTEXT *)__tmp__ROQH) == (void *)__tmp__SOQH);
      } break;
      case __TYPE_ID__: {
        __tmp__TOQH=((void *)((__TYPE_ID *)__tmp__ROQH) == (void *)__tmp__SOQH);
      } break;
      case __TYPE_GENERIC__: {
        __tmp__TOQH=((void *)((__TYPE_GENERIC *)__tmp__ROQH) == (void *)__tmp__SOQH);
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__TOQH=__infix_equal_equal__GSFJ(__tmp__ROQH,__tmp__SOQH);
      } break;
      };
      __tmp__WOQH=__tmp__TOQH;
    } else {
      __tmp__WOQH=FALSE__;
    };
    if (__tmp__WOQH) {
      if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
        __tmp__2OQH=slot_data__Z4TH(__tmp__XNQH);
      } else {
        __tmp__2OQH=slot_data__T5TH(__tmp__XNQH);
      };
      init__C4OG(__tmp__2OQH);
    };
    if (verify__JDAG) {
      if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
        __tmp__KPQH=((__SLOT *)((__SLOT_DATA *)__tmp__XNQH)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__KPQH=((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->base_slot__P22F;
      };
      if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__KPQH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.upper__W31D +  1) !=  1)) {
        put_error__text__0AH( 1,(&__string_466));
        if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
          __tmp__OQQH=((__SLOT_DATA *)__tmp__XNQH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__OQQH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__OQQH);
        put_position__ECH(Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
        __tmp__UQQH=((__SLOT_DATA *)__tmp__XNQH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
      } else {
        __tmp__UQQH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
      };
      last_position__GG1=__tmp__UQQH;
      if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
        __tmp__VQQH=id_section__UG4F(__tmp__XNQH);
      } else {
        __tmp__VQQH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      if ((! access__with__2QMM(__tmp__VQQH,receiver_type__WKQH,((__TYPE_FULL *)to_run__MPXD())->parent_type__KTL))) {
        copy__BNK(string_tmp__RB,(&__string_467));
        append_name_in__FBYD(to_run__MPXD(),string_tmp__RB);
        append__MOK(string_tmp__RB,(&__string_468));
        put_error__text__0AH( 2,string_tmp__RB);
        if (((struct ___OBJ *)__tmp__XNQH)->__id==__SLOT_DATA__) {
          __tmp__IRQH=((__SLOT_DATA *)__tmp__XNQH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
        } else {
          __tmp__IRQH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__XNQH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
        };
        put_position__ECH(__tmp__IRQH);
        put_position__ECH(Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM);
        send_error__2FH();
      };
      last_position__GG1=pos_null__YKQH;
    };
  };
  em__CWSH=NULL;
  add_last__XSEI(args__UKQH,receiver__VKQH);
  if (verify__JDAG) {
    if ((! is_block_value__5KQH)) {
      if (((struct ___OBJ *)slot_msg__4KQH)->__id==__SLOT_DATA__) {
        __tmp__AXSH=((__SLOT *)((__SLOT_DATA *)slot_msg__4KQH)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__AXSH=((__SLOT *)((__SLOT_CODE *)slot_msg__4KQH)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__CXSH=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__AXSH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[ 0];
      if (((struct ___OBJ *)__tmp__CXSH)->__id==__ITM_ARG__) {
        __tmp__DXSH= 1;
      } else {
        __tmp__DXSH=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__CXSH)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
      };
      if ((__tmp__DXSH !=  1)) {
        put_error__text__0AH( 1,(&__string_334));
        if (((struct ___OBJ *)slot_msg__4KQH)->__id==__SLOT_DATA__) {
          __tmp__MXSH=((__SLOT *)((__SLOT_DATA *)slot_msg__4KQH)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__MXSH=((__SLOT *)((__SLOT_CODE *)slot_msg__4KQH)->parent_slot__Y22F)->base_slot__P22F;
        };
        __tmp__OXSH=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__MXSH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[ 0];
        if (((struct ___OBJ *)__tmp__OXSH)->__id==__ITM_ARG__) {
          __tmp__PXSH=((__ITM_ARG *)__tmp__OXSH)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
        } else {
          __tmp__PXSH=((__ITM_ARGS *)__tmp__OXSH)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
        };
        put_position__ECH(__tmp__PXSH);
        put_position__ECH(((__READ_LOCAL *)receiver__VKQH)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
        send_error__2FH();
      };
    };
  };
  em__XKQH=NULL;
  if (is_block_value__5KQH) {
    args__UKQH=copy__QGTH(args__UKQH);
    __tmp__YSQH=((void **)((__FAST_ARRAYoEXPRo *)args__UKQH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    switch (((struct ___OBJ *)__tmp__YSQH)->__id) {
    case __LIST__: {
      __tmp__ZSQH=my_copy__2HYM(__tmp__YSQH);
    } break;
    case __STRING_CST__: {
      Self__GOAQ=((__STRING_CST *)__tmp__YSQH);
      __tmp__ZSQH=create__text__AUMH(Self__GOAQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GOAQ->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZSQH=my_copy__2K2H(__tmp__YSQH);
    } break;
    case __PROTOTYPE_CST__: {
      Self__HOAQ=((__PROTOTYPE_CST *)__tmp__YSQH);
      __tmp__ZSQH=create__type__CLQC(Self__HOAQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HOAQ->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__IOAQ=((__INTEGER_CST *)__tmp__YSQH);
      __tmp__ZSQH=create__value__type__DNQC(Self__IOAQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IOAQ->value__PAZD,Self__IOAQ->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__ZSQH=my_copy__OAFJ(__tmp__YSQH);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZSQH=my_copy__KM2H(__tmp__YSQH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZSQH=my_copy__DN2H(__tmp__YSQH);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZSQH=my_copy__QN2H(__tmp__YSQH);
    } break;
    case __REAL_CST__: {
      Self__KOAQ=((__REAL_CST *)__tmp__YSQH);
      __tmp__ZSQH=create__value__type__1SMH(Self__KOAQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KOAQ->value__5N2H,Self__KOAQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__MOAQ=((__CHARACTER_CST *)__tmp__YSQH);
      __tmp__ZSQH=create__char__WTMH(Self__MOAQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MOAQ->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__NOAQ=((__IS_EXPANDED *)__tmp__YSQH);
      __tmp__ZSQH=create__receiver__WRWH(Self__NOAQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__NOAQ->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZSQH=my_copy__TO2H(__tmp__YSQH);
    } break;
    case __EXPR_SUP__: {
      __tmp__ZSQH=my_copy__2O2H(__tmp__YSQH);
    } break;
    case __EXPR_SUB__: {
      __tmp__ZSQH=my_copy__HP2H(__tmp__YSQH);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZSQH=my_copy__TP2H(__tmp__YSQH);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZSQH=my_copy__4P2H(__tmp__YSQH);
    } break;
    case __EXPR_AND__: {
      __tmp__ZSQH=my_copy__JQ2H(__tmp__YSQH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZSQH=my_copy__UQ2H(__tmp__YSQH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZSQH=my_copy__5Q2H(__tmp__YSQH);
    } break;
    case __PUT_TO__: {
      __tmp__ZSQH=my_copy__KR2H(__tmp__YSQH);
    } break;
    case __ITEM__: {
      __tmp__ZSQH=my_copy__1R2H(__tmp__YSQH);
    } break;
    case __SIZE_OF__: {
      __tmp__ZSQH=my_copy__HS2H(__tmp__YSQH);
    } break;
    case __CAST__: {
      __tmp__ZSQH=my_copy__QS2H(__tmp__YSQH);
    } break;
    case __CALL_SLOT__: {
      __tmp__ZSQH=my_copy__PIYM(__tmp__YSQH);
    } break;
    case __READ_SLOT__: {
      __tmp__ZSQH=my_copy__AVGK(__tmp__YSQH);
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZSQH=my_copy__NVGK(__tmp__YSQH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZSQH=my_copy__RFCN(__tmp__YSQH);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZSQH=my_copy__JMEO(__tmp__YSQH);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZSQH=my_copy__RTJO(__tmp__YSQH);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZSQH=my_copy__WMEO(__tmp__YSQH);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZSQH=my_copy__3TJO(__tmp__YSQH);
    } break;
    case __EXPR_NEG__: {
      __tmp__ZSQH=my_copy__YEJM(__tmp__YSQH);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZSQH=my_copy__YRLL(__tmp__YSQH);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZSQH=my_copy__GLYM(__tmp__YSQH);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZSQH=my_copy__BNEO(__tmp__YSQH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZSQH=my_copy__M3DP(__tmp__YSQH);
    } break;
    case __EXPR_INF__: {
      __tmp__ZSQH=my_copy__PBSN(__tmp__YSQH);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZSQH=my_copy__0BSN(__tmp__YSQH);
    } break;
    case __EXPR_OR__: {
      __tmp__ZSQH=my_copy__ZOPN(__tmp__YSQH);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZSQH=my_copy__CYSO(__tmp__YSQH);
    } break;
    };
    ((void **)((__FAST_ARRAYoEXPRo *)args__UKQH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__ZSQH;
    base__ALQH=new_block__receiver__with__1GTH(Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,receiver__VKQH,args__UKQH);
    __tmp__4SQH=TRUE__;
  } else {
    __tmp__4SQH=FALSE__;
  };
  if ((! __tmp__4SQH)) {
    if (((__INTEGER)(((__FAST_ARRAYoEXPRo *)args__UKQH)->parent_arrayed_collection__42LC.upper__USSH +  1) ==  1)) {
      if (((verify__JDAG & is_all_warning__2BB) && __infix_equal_equal__TKW(Self__QKQH->name__TVPC,(&__string_469)))) {
        copy__BNK(string_tmp__RB,(&__string_470));
        append__MOK(string_tmp__RB,((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB);
        append__MOK(string_tmp__RB,(&__string_471));
        append_name_in__FBYD(((__LOCAL *)((__READ_LOCAL *)receiver__VKQH)->local__ALZD)->parent_variable__B2LC.type__125F,string_tmp__RB);
        __tmp__0UQH=Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        put_error__text__0AH( 2,string_tmp__RB);
        put_position__ECH(__tmp__0UQH);
        send_error__2FH();
      };
      base__ALQH=new_read__slot__receiver__self__YLQC(Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__4KQH,receiver__VKQH,((void **)((__FAST_ARRAYoEXPRo *)args__UKQH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]);
      free__C4LH(args__UKQH);
    } else {
      __tmp__YVQH=((void **)((__FAST_ARRAYoEXPRo *)args__UKQH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
      switch (((struct ___OBJ *)__tmp__YVQH)->__id) {
      case __LIST__: {
        __tmp__ZVQH=my_copy__2HYM(__tmp__YVQH);
      } break;
      case __STRING_CST__: {
        Self__QOAQ=((__STRING_CST *)__tmp__YVQH);
        __tmp__ZVQH=create__text__AUMH(Self__QOAQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QOAQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__ZVQH=my_copy__2K2H(__tmp__YVQH);
      } break;
      case __PROTOTYPE_CST__: {
        Self__ROAQ=((__PROTOTYPE_CST *)__tmp__YVQH);
        __tmp__ZVQH=create__type__CLQC(Self__ROAQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ROAQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__SOAQ=((__INTEGER_CST *)__tmp__YVQH);
        __tmp__ZVQH=create__value__type__DNQC(Self__SOAQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SOAQ->value__PAZD,Self__SOAQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__ZVQH=my_copy__OAFJ(__tmp__YVQH);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ZVQH=my_copy__KM2H(__tmp__YVQH);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ZVQH=my_copy__DN2H(__tmp__YVQH);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ZVQH=my_copy__QN2H(__tmp__YVQH);
      } break;
      case __REAL_CST__: {
        Self__UOAQ=((__REAL_CST *)__tmp__YVQH);
        __tmp__ZVQH=create__value__type__1SMH(Self__UOAQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UOAQ->value__5N2H,Self__UOAQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__WOAQ=((__CHARACTER_CST *)__tmp__YVQH);
        __tmp__ZVQH=create__char__WTMH(Self__WOAQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WOAQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__XOAQ=((__IS_EXPANDED *)__tmp__YVQH);
        __tmp__ZVQH=create__receiver__WRWH(Self__XOAQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__XOAQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ZVQH=my_copy__TO2H(__tmp__YVQH);
      } break;
      case __EXPR_SUP__: {
        __tmp__ZVQH=my_copy__2O2H(__tmp__YVQH);
      } break;
      case __EXPR_SUB__: {
        __tmp__ZVQH=my_copy__HP2H(__tmp__YVQH);
      } break;
      case __EXPR_MUL__: {
        __tmp__ZVQH=my_copy__TP2H(__tmp__YVQH);
      } break;
      case __EXPR_DIV__: {
        __tmp__ZVQH=my_copy__4P2H(__tmp__YVQH);
      } break;
      case __EXPR_AND__: {
        __tmp__ZVQH=my_copy__JQ2H(__tmp__YVQH);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ZVQH=my_copy__UQ2H(__tmp__YVQH);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ZVQH=my_copy__5Q2H(__tmp__YVQH);
      } break;
      case __PUT_TO__: {
        __tmp__ZVQH=my_copy__KR2H(__tmp__YVQH);
      } break;
      case __ITEM__: {
        __tmp__ZVQH=my_copy__1R2H(__tmp__YVQH);
      } break;
      case __SIZE_OF__: {
        __tmp__ZVQH=my_copy__HS2H(__tmp__YVQH);
      } break;
      case __CAST__: {
        __tmp__ZVQH=my_copy__QS2H(__tmp__YVQH);
      } break;
      case __CALL_SLOT__: {
        __tmp__ZVQH=my_copy__PIYM(__tmp__YVQH);
      } break;
      case __READ_SLOT__: {
        __tmp__ZVQH=my_copy__AVGK(__tmp__YVQH);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ZVQH=my_copy__NVGK(__tmp__YVQH);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ZVQH=my_copy__RFCN(__tmp__YVQH);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ZVQH=my_copy__JMEO(__tmp__YVQH);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ZVQH=my_copy__RTJO(__tmp__YVQH);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ZVQH=my_copy__WMEO(__tmp__YVQH);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ZVQH=my_copy__3TJO(__tmp__YVQH);
      } break;
      case __EXPR_NEG__: {
        __tmp__ZVQH=my_copy__YEJM(__tmp__YVQH);
      } break;
      case __EXPR_ADD__: {
        __tmp__ZVQH=my_copy__YRLL(__tmp__YVQH);
      } break;
      case __EXPR_NOT__: {
        __tmp__ZVQH=my_copy__GLYM(__tmp__YVQH);
      } break;
      case __EXPR_MOD__: {
        __tmp__ZVQH=my_copy__BNEO(__tmp__YVQH);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ZVQH=my_copy__M3DP(__tmp__YVQH);
      } break;
      case __EXPR_INF__: {
        __tmp__ZVQH=my_copy__PBSN(__tmp__YVQH);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ZVQH=my_copy__0BSN(__tmp__YVQH);
      } break;
      case __EXPR_OR__: {
        __tmp__ZVQH=my_copy__ZOPN(__tmp__YVQH);
      } break;
      case __EXPR_XOR__: {
        __tmp__ZVQH=my_copy__CYSO(__tmp__YVQH);
      } break;
      };
      ((void **)((__FAST_ARRAYoEXPRo *)args__UKQH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0]=__tmp__ZVQH;
      args__UKQH=copy__QGTH(args__UKQH);
      base__ALQH=new_read__slot__receiver__with__YOWH(Self__QKQH->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM,slot_msg__4KQH,receiver__VKQH,args__UKQH);
    };
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,base__ALQH);
  return(result_expr__PVDI(base__ALQH));
}

static void* to_run_expr__E0QH(__ITM_LDOTS *Self__F0QH)
// ({ITM_LDOTS}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__I0QH;
  __tmp__I0QH=Self__F0QH->parent_itm_constant__5FEC.parent_itm_object__X1CC.position__BJM;
  put_error__text__0AH( 2,(&__string_534));
  put_position__ECH(__tmp__I0QH);
  send_error__2FH();
  print__1ZE((&__string_460));
  fputc((int)('\n'),stdout);
  exit(( 1));
  return(NULL);
}

static __BOOLEAN is_sub_type__FW4J(__TYPE_FULL *Self__GW4J,void *other__HW4J)
// ({TYPE_FULL},{NULLxTYPE_FULL}) With resultNo recursive, No inlinable.
{
  void *__tmp__JW4J,*__tmp__LW4J;
  __BOOLEAN __tmp__MW4J;
  __tmp__JW4J=Self__GW4J->parent_type__KTL;
  __tmp__LW4J=((__TYPE_FULL *)other__HW4J)->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__JW4J)->__id) {
  case __TYPE__: {
    __tmp__MW4J=is_sub_type__5I3I(__tmp__JW4J,__tmp__LW4J);
  } break;
  case __TYPE_NULL__: {
    __tmp__MW4J=TRUE__;
  } break;
  case __TYPE_VOID__: {
    __tmp__MW4J=FALSE__;
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__MW4J=is_sub_type__CK3I(__tmp__JW4J,__tmp__LW4J);
  } break;
  case __TYPE_ID__: {
    __tmp__MW4J=is_sub_type__3K3I(__tmp__LW4J);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__MW4J=is_sub_type__DL3I(__tmp__JW4J,__tmp__LW4J);
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__MW4J=__infix_equal_equal__GSFJ(((__PROFIL_BLOCK *)__tmp__JW4J),__tmp__LW4J);
  } break;
  };
  return(__tmp__MW4J);
}

static __EXPR_EQUAL* create__with__and__TWUH(__POSITION p__VWUH,void *l__WWUH,void *r__XWUH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_EQUAL *result__ZFWH,*Self__YJFI;
  __POINTER ptr__0FWH;
  __INTEGER typ_id__5FWH;
  __UINTEGER_32 sz__2FWH,a__SV1Q,new_size__QV1Q,t__WV1Q,a__YV1Q;
  result__ZFWH=NULL;
  ptr__0FWH=((__POINTER )(NULL));
  typ_id__5FWH= 0;
  sz__2FWH=((__UINTEGER_32 )sizeof(__EXPR_EQUAL));
  if ((sz__2FWH ==  0)) {
    result__ZFWH=EXPR_EQUAL__;
  } else {
    typ_id__5FWH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__2FWH);
    if ((typ_id__5FWH == (__INTEGER)(-  1))) {
      a__SV1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__QV1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__2FWH + a__SV1Q) & (__UINTEGER_32)(~ a__SV1Q));
      ptr__0FWH=micro_alloc__table__lab__BOI(new_size__QV1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QV1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__QV1Q);
    } else {
      t__WV1Q=((__UINTEGER_32 )typ_id__5FWH);
      a__YV1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__0FWH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__2FWH + a__YV1Q) & (__UINTEGER_32)(~ a__YV1Q)),((__POINTER )(&(table_type[(t__WV1Q)]))),(__UINTEGER_32)(t__WV1Q |  1));
    };
    result__ZFWH=((__EXPR_EQUAL *)ptr__0FWH);
    *(result__ZFWH) = *(EXPR_EQUAL__);
  };
  Self__YJFI=((__EXPR_EQUAL *)result__ZFWH);
  Self__YJFI->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__VWUH;
  Self__YJFI->parent_expr_binary_cmp__1LJH.left__HN2H=l__WWUH;
  Self__YJFI->parent_expr_binary_cmp__1LJH.right__LN2H=r__XWUH;
  return(result__ZFWH);
}

static __EXPR_NOT_EQUAL* create__with__and__AXUH(__POSITION p__CXUH,void *l__DXUH,void *r__EXUH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_NOT_EQUAL *result__LHWH,*Self__4JFI;
  __POINTER ptr__MHWH;
  __INTEGER typ_id__RHWH;
  __UINTEGER_32 sz__OHWH,a__3V1Q,new_size__1V1Q,t__BW1Q,a__DW1Q;
  result__LHWH=NULL;
  ptr__MHWH=((__POINTER )(NULL));
  typ_id__RHWH= 0;
  sz__OHWH=((__UINTEGER_32 )sizeof(__EXPR_NOT_EQUAL));
  if ((sz__OHWH ==  0)) {
    result__LHWH=EXPR_NOT_EQUAL__;
  } else {
    typ_id__RHWH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__OHWH);
    if ((typ_id__RHWH == (__INTEGER)(-  1))) {
      a__3V1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__1V1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__OHWH + a__3V1Q) & (__UINTEGER_32)(~ a__3V1Q));
      ptr__MHWH=micro_alloc__table__lab__BOI(new_size__1V1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1V1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__1V1Q);
    } else {
      t__BW1Q=((__UINTEGER_32 )typ_id__RHWH);
      a__DW1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__MHWH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__OHWH + a__DW1Q) & (__UINTEGER_32)(~ a__DW1Q)),((__POINTER )(&(table_type[(t__BW1Q)]))),(__UINTEGER_32)(t__BW1Q |  1));
    };
    result__LHWH=((__EXPR_NOT_EQUAL *)ptr__MHWH);
    *(result__LHWH) = *(EXPR_NOT_EQUAL__);
  };
  Self__4JFI=((__EXPR_NOT_EQUAL *)result__LHWH);
  Self__4JFI->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__CXUH;
  Self__4JFI->parent_expr_binary_cmp__DMJH.left__HN2H=l__DXUH;
  Self__4JFI->parent_expr_binary_cmp__DMJH.right__LN2H=r__EXUH;
  return(result__LHWH);
}

static void* new__50LH()
// () With resultNo recursive, No inlinable.
{
  void *result__C1LH;
  __FAST_ARRAYoFAST_ARRAYoEXPRoo *Self__PARI,*Self__FBRI;
  result__C1LH=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoEXPRoo *)free_list__I1LH)->parent_arrayed_collection__H1LH.upper__FXDI <  0)) {
    result__C1LH=create_with_capacity__3THH( 16);
  } else {
    Self__PARI=((__FAST_ARRAYoFAST_ARRAYoEXPRoo *)free_list__I1LH);
    result__C1LH=((void **)Self__PARI->parent_arrayed_collection__H1LH.storage__4ZDI)[Self__PARI->parent_arrayed_collection__H1LH.upper__FXDI];
    Self__FBRI=((__FAST_ARRAYoFAST_ARRAYoEXPRoo *)free_list__I1LH);
    Self__FBRI->parent_arrayed_collection__H1LH.upper__FXDI=(__INTEGER)(Self__FBRI->parent_arrayed_collection__H1LH.upper__FXDI -  1);
  };
  return(result__C1LH);
}

static void* lookup__R23I()
// () With resultNo recursive, No inlinable.
{
  void *result__V23I;
  __INTEGER j__W23I;
  void **__tmp__0Y5Q;
  __BOOLEAN __tmp__V43I;
  result__V23I=NULL;
  j__W23I=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__0Y5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__W23I < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__0Y5Q)[j__W23I])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
    j__W23I=(__INTEGER)(j__W23I -  1);
  };
  if ((j__W23I >= stack_local_lower__AI4F)) {
    result__V23I=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__W23I];
    if (((j__W23I < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__V23I)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__V23I;
    };
    __tmp__V43I=TRUE__;
  } else {
    __tmp__V43I=FALSE__;
  };
  if ((! __tmp__V43I)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__V23I=lookup__LLJM(profil_first__4PQC,(&__string_57));
      if ((((void *)result__V23I != (void *)NULL) && ((void *)((__LOCAL *)result__V23I)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__V23I;
      };
    };
  };
  return(result__V23I);
}

static __BOOLEAN search_parent__UJWH(__PROTOTYPE *Self__VJWH,void *n__WJWH)
// ({PROTOTYPE},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  void *slot__YJWH;
  __SECTION_ *Self__V0JQ;
  __BOOLEAN result__ZJWH,__tmp__IKWH;
  result__ZJWH=FALSE__;
  slot__YJWH=Self__VJWH->first_slot__5QMC;
  while_do__QUXH:
  {
    if (((void *)slot__YJWH != (void *)NULL)) {
      Self__V0JQ=((__SECTION_ *)((__ITM_SLOT *)slot__YJWH)->id_section__EACC);
      __tmp__IKWH=(((void *)Self__V0JQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__V0JQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__IKWH=FALSE__;
    };
    result__ZJWH=__tmp__IKWH;
    if ((__tmp__IKWH && ((void *)((__ITM_SLOT *)slot__YJWH)->parent_named__XIM.name__1QB != (void *)n__WJWH))) {
      slot__YJWH=((__ITM_SLOT *)slot__YJWH)->next__YRMC;
      goto while_do__QUXH;
    };
  };
  return(result__ZJWH);
}

static __BOOLEAN access__with__2QMM(__SECTION_ *Self__3QMM,void *me__4QMM,void *client__5QMM)
// ({SECTION_},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  __INTEGER j__CRMM,__tmp__UXXN,idx__LLYN,result__QXXN,i__RRWN;
  void *ts__DRMM,*__tmp__CUMM;
  void *__tmp__QSMM,*__tmp__WSMM;
  __STRING *Self__NXXN,*Self__FQWN;
  __STRING_CONSTANT *Self__NRWN;
  void *__tmp__BUMM;
  void *__tmp__DUMM;
  __BOOLEAN result__BRMM,__tmp__DSMM,__tmp__1SMM,result__COFN;
  __BOOLEAN result__QRWN,__tmp__FUMM;
  __CHARACTER *__tmp__RXXN,*Self__5KYN,*__tmp__ZW1Q,*__tmp__1Y5Q;
  result__BRMM=FALSE__;
  j__CRMM= 0;
  ts__DRMM=NULL;
  if (((((void *)me__4QMM == (void *)client__5QMM) || ((void *)Self__3QMM->name__1I0D == (void *)(&__string_27))) || ((void *)Self__3QMM->name__1I0D == (void *)(&__string_30)))) {
    result__BRMM=TRUE__;
    __tmp__DSMM=TRUE__;
  } else {
    __tmp__DSMM=FALSE__;
  };
  if (__tmp__DSMM) {
    __tmp__1SMM=TRUE__;
  } else {
    result__COFN=((void *)Self__3QMM->name__1I0D == (void *)(&__string_29));
    if (result__COFN) {
      switch (((struct ___OBJ *)me__4QMM)->__id) {
      case __TYPE__: {
        __tmp__QSMM=((__TYPE *)me__4QMM)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__QSMM=((__TYPE_NULL *)me__4QMM)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__QSMM=((__TYPE_VOID *)me__4QMM)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__QSMM=((__TYPE_CONTEXT *)me__4QMM)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__QSMM=((__TYPE_ID *)me__4QMM)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__QSMM=((__TYPE_GENERIC *)me__4QMM)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__QSMM=prototype__IMEJ();
      } break;
      };
      copy__BNK(string_tmp__RB,((__PROTOTYPE *)__tmp__QSMM)->filename__4QB);
      Self__NXXN=((__STRING *)string_tmp__RB);
      __tmp__RXXN=Self__NXXN->storage__XNK;
      __tmp__UXXN=(__INTEGER)(Self__NXXN->count__VF -  1);
      Self__5KYN=((__CHARACTER *)__tmp__RXXN);
      idx__LLYN=__tmp__UXXN;
      while ((! ((idx__LLYN <  0) || ('/' == Self__5KYN[idx__LLYN])))) {
        idx__LLYN=(__INTEGER)(idx__LLYN -  1);
      };
      result__QXXN=(__INTEGER)( 1 + idx__LLYN);
      j__CRMM=result__QXXN;
      Self__FQWN=((__STRING *)string_tmp__RB);
      if ((result__QXXN < Self__FQWN->count__VF)) {
        remove_last__RLLB(Self__FQWN,(__INTEGER)(Self__FQWN->count__VF - result__QXXN));
      };
      switch (((struct ___OBJ *)client__5QMM)->__id) {
      case __TYPE__: {
        __tmp__WSMM=((__TYPE *)client__5QMM)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__WSMM=((__TYPE_NULL *)client__5QMM)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__WSMM=((__TYPE_VOID *)client__5QMM)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__WSMM=((__TYPE_CONTEXT *)client__5QMM)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__WSMM=((__TYPE_ID *)client__5QMM)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__WSMM=((__TYPE_GENERIC *)client__5QMM)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__WSMM=prototype__IMEJ();
      } break;
      };
      Self__NRWN=((__STRING_CONSTANT *)((__PROTOTYPE *)__tmp__WSMM)->filename__4QB);
      result__QRWN=FALSE__;
      i__RRWN= 0;
      if ((((__STRING *)string_tmp__RB)->count__VF <= Self__NRWN->count__XHB)) {
        i__RRWN=((__STRING *)string_tmp__RB)->count__VF;
        __tmp__ZW1Q=Self__NRWN->storage__C5K;
        __tmp__1Y5Q=((__STRING *)string_tmp__RB)->storage__XNK;
        while ((! ((i__RRWN ==  0) || (((__CHARACTER *)__tmp__ZW1Q)[(__INTEGER)(i__RRWN -  1)] != ((__CHARACTER *)__tmp__1Y5Q)[(__INTEGER)(i__RRWN -  1)])))) {
          i__RRWN=(__INTEGER)(i__RRWN -  1);
        };
        result__QRWN=(i__RRWN ==  0);
      };
      result__BRMM=result__QRWN;
    };
    __tmp__1SMM=result__COFN;
  };
  if ((! __tmp__1SMM)) {
    if (((void *)Self__3QMM->type_list__JY1D != (void *)NULL)) {
      j__CRMM= 0;
      while (((j__CRMM <= ((__FAST_ARRAYoITM_TYPE_MONOo *)Self__3QMM->type_list__JY1D)->parent_arrayed_collection__PIB.upper__BWK) && (! result__BRMM))) {
        __tmp__BUMM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__3QMM->type_list__JY1D)->parent_arrayed_collection__PIB.storage__5WK)[j__CRMM];
        if (__tmp__BUMM==NULL) {
          __tmp__CUMM=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__BUMM)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            __tmp__CUMM=((void *)__tmp__BUMM);
          } break;
          case __ITM_TYPE_STYLE__: {
            __tmp__CUMM=((void *)__tmp__BUMM);
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__CUMM=((void *)__tmp__BUMM);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__CUMM=((void *)__tmp__BUMM);
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__CUMM=NULL;
          } break;
          }
        };
        ts__DRMM=__tmp__CUMM;
        switch (((struct ___OBJ *)__tmp__CUMM)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          __tmp__DUMM=((__ITM_TYPE_SIMPLE *)__tmp__CUMM)->name__UMC;
        } break;
        case __ITM_TYPE_STYLE__: {
          __tmp__DUMM=((__ITM_TYPE_STYLE *)__tmp__CUMM)->parent_itm_type_simple__3IB.name__UMC;
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__DUMM=((__ITM_TYPE_GENERIC *)__tmp__CUMM)->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC;
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__DUMM=((__ITM_TYPE_SELF *)__tmp__CUMM)->parent_itm_type_simple__5KD.name__UMC;
        } break;
        };
        switch (((struct ___OBJ *)client__5QMM)->__id) {
        case __TYPE__: {
          __tmp__FUMM=is_sub_type_with_name__F35N(client__5QMM,__tmp__DUMM);
        } break;
        case __TYPE_NULL__: {
          __tmp__FUMM=is_sub_type_with_name__O55N(client__5QMM,__tmp__DUMM);
        } break;
        case __TYPE_VOID__: {
          __tmp__FUMM=is_sub_type_with_name__XBAO(client__5QMM,__tmp__DUMM);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__FUMM=is_sub_type_with_name__AEAO(client__5QMM,__tmp__DUMM);
        } break;
        case __TYPE_ID__: {
          __tmp__FUMM=is_sub_type_with_name__JGAO(client__5QMM,__tmp__DUMM);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__FUMM=is_sub_type_with_name__SIAO(client__5QMM,__tmp__DUMM);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__FUMM=is_sub_type_with_name__1KAO(client__5QMM,__tmp__DUMM);
        } break;
        };
        result__BRMM=__tmp__FUMM;
        j__CRMM=(__INTEGER)(j__CRMM +  1);
      };
    };
  };
  return(result__BRMM);
}

static void add_arg__to__in__for__block__ELWI(void *e__GLWI,__INTEGER idx__HLWI,void *args__ILWI,void *slot__JLWI,__BOOLEAN is_block_value__KLWI)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{INTEGER},{NULLxFAST_ARRAYoEXPRo},{NULLxSLOT_DATAxSLOT_CODE},{TRUExFALSE}) VoidNo recursive, No inlinable.
{
  __INTEGER count__MLWI,__tmp__MMWI;
  void *__tmp__OLWI,*em__LLWI;
  void *__tmp__JMWI,*__tmp__VMWI;
  void *__tmp__LMWI,*__tmp__XMWI;
  __POSITION __tmp__YMWI,__tmp__ZMWI,__tmp__SNWI;
  __BOOLEAN __tmp__5MWI;
  count__MLWI= 0;
  if (e__GLWI==NULL) {
    __tmp__OLWI=NULL;
  } else {
    switch (((struct ___OBJ *)e__GLWI)->__id) {
    case __LIST__: {
      __tmp__OLWI=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OLWI=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OLWI=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__OLWI=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OLWI=((void *)e__GLWI);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OLWI=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__OLWI=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OLWI=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OLWI=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OLWI=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__OLWI=NULL;
    } break;
    case __ITEM__: {
      __tmp__OLWI=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__OLWI=NULL;
    } break;
    case __CAST__: {
      __tmp__OLWI=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__OLWI=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__OLWI=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__OLWI=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__OLWI=NULL;
    } break;
    }
  };
  em__LLWI=__tmp__OLWI;
  if (((void *)__tmp__OLWI != (void *)NULL)) {
    count__MLWI=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__OLWI)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH +  1);
    append_collection__53EI(args__ILWI,((__EXPR_MULTIPLE *)__tmp__OLWI)->expr_list__VFMH);
  } else {
    count__MLWI= 1;
    add_last__XSEI(args__ILWI,e__GLWI);
  };
  if (verify__JDAG) {
    if ((! is_block_value__KLWI)) {
      if (((struct ___OBJ *)slot__JLWI)->__id==__SLOT_DATA__) {
        __tmp__JMWI=((__SLOT *)((__SLOT_DATA *)slot__JLWI)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__JMWI=((__SLOT *)((__SLOT_CODE *)slot__JLWI)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__LMWI=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__JMWI)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[idx__HLWI];
      if (((struct ___OBJ *)__tmp__LMWI)->__id==__ITM_ARG__) {
        __tmp__MMWI= 1;
      } else {
        __tmp__MMWI=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__LMWI)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
      };
      if ((__tmp__MMWI != count__MLWI)) {
        put_error__text__0AH( 1,(&__string_334));
        if (((struct ___OBJ *)slot__JLWI)->__id==__SLOT_DATA__) {
          __tmp__VMWI=((__SLOT *)((__SLOT_DATA *)slot__JLWI)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__VMWI=((__SLOT *)((__SLOT_CODE *)slot__JLWI)->parent_slot__Y22F)->base_slot__P22F;
        };
        __tmp__XMWI=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__VMWI)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[idx__HLWI];
        if (((struct ___OBJ *)__tmp__XMWI)->__id==__ITM_ARG__) {
          __tmp__YMWI=((__ITM_ARG *)__tmp__XMWI)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
        } else {
          __tmp__YMWI=((__ITM_ARGS *)__tmp__XMWI)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
        };
        put_position__ECH(__tmp__YMWI);
        switch (((struct ___OBJ *)e__GLWI)->__id) {
        case __LIST__: {
          __tmp__ZMWI=((__LIST *)e__GLWI)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__ZMWI=((__STRING_CST *)e__GLWI)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZMWI=((__EXTERNAL_C *)e__GLWI)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__ZMWI=((__PROTOTYPE_CST *)e__GLWI)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__ZMWI=((__INTEGER_CST *)e__GLWI)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__ZMWI=((__READ_LOCAL *)e__GLWI)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZMWI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZMWI=((__EXPR_EQUAL *)e__GLWI)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZMWI=((__EXPR_NOT_EQUAL *)e__GLWI)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__ZMWI=((__REAL_CST *)e__GLWI)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__ZMWI=((__CHARACTER_CST *)e__GLWI)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__ZMWI=((__IS_EXPANDED *)e__GLWI)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZMWI=((__GET_TYPE_ID *)e__GLWI)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__ZMWI=((__EXPR_SUP *)e__GLWI)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__ZMWI=((__EXPR_SUB *)e__GLWI)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__ZMWI=((__EXPR_MUL *)e__GLWI)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__ZMWI=((__EXPR_DIV *)e__GLWI)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__ZMWI=((__EXPR_AND *)e__GLWI)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZMWI=((__EXPR_SHIFT_R *)e__GLWI)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZMWI=((__EXPR_SHIFT_L *)e__GLWI)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__ZMWI=((__PUT_TO *)e__GLWI)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__ZMWI=((__ITEM *)e__GLWI)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__ZMWI=((__SIZE_OF *)e__GLWI)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__ZMWI=((__CAST *)e__GLWI)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__ZMWI=((__CALL_SLOT *)e__GLWI)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__ZMWI=((__READ_SLOT *)e__GLWI)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZMWI=((__READ_GLOBAL *)e__GLWI)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZMWI=((__EXPR_NOT_LOGIC *)e__GLWI)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZMWI=((__EXPR_OR_LOGIC *)e__GLWI)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZMWI=((__EXPR_OR_OR_LOGIC *)e__GLWI)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZMWI=((__EXPR_AND_LOGIC *)e__GLWI)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZMWI=((__EXPR_AND_AND_LOGIC *)e__GLWI)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__ZMWI=((__EXPR_NEG *)e__GLWI)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__ZMWI=((__EXPR_ADD *)e__GLWI)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__ZMWI=((__EXPR_NOT *)e__GLWI)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__ZMWI=((__EXPR_MOD *)e__GLWI)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZMWI=((__EXPR_SUP_EQ *)e__GLWI)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__ZMWI=((__EXPR_INF *)e__GLWI)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZMWI=((__EXPR_INF_EQ *)e__GLWI)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__ZMWI=((__EXPR_OR *)e__GLWI)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__ZMWI=((__EXPR_XOR *)e__GLWI)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        put_position__ECH(__tmp__ZMWI);
        send_error__2FH();
      };
      __tmp__5MWI=TRUE__;
    } else {
      __tmp__5MWI=FALSE__;
    };
    if ((! __tmp__5MWI)) {
      if (((idx__HLWI ==  0) && (count__MLWI !=  1))) {
        switch (((struct ___OBJ *)e__GLWI)->__id) {
        case __LIST__: {
          __tmp__SNWI=((__LIST *)e__GLWI)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__SNWI=((__STRING_CST *)e__GLWI)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__SNWI=((__EXTERNAL_C *)e__GLWI)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__SNWI=((__PROTOTYPE_CST *)e__GLWI)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__SNWI=((__INTEGER_CST *)e__GLWI)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__SNWI=((__READ_LOCAL *)e__GLWI)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__SNWI=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__SNWI=((__EXPR_EQUAL *)e__GLWI)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__SNWI=((__EXPR_NOT_EQUAL *)e__GLWI)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__SNWI=((__REAL_CST *)e__GLWI)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__SNWI=((__CHARACTER_CST *)e__GLWI)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__SNWI=((__IS_EXPANDED *)e__GLWI)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__SNWI=((__GET_TYPE_ID *)e__GLWI)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__SNWI=((__EXPR_SUP *)e__GLWI)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__SNWI=((__EXPR_SUB *)e__GLWI)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__SNWI=((__EXPR_MUL *)e__GLWI)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__SNWI=((__EXPR_DIV *)e__GLWI)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__SNWI=((__EXPR_AND *)e__GLWI)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__SNWI=((__EXPR_SHIFT_R *)e__GLWI)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__SNWI=((__EXPR_SHIFT_L *)e__GLWI)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__SNWI=((__PUT_TO *)e__GLWI)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__SNWI=((__ITEM *)e__GLWI)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__SNWI=((__SIZE_OF *)e__GLWI)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__SNWI=((__CAST *)e__GLWI)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__SNWI=((__CALL_SLOT *)e__GLWI)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__SNWI=((__READ_SLOT *)e__GLWI)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__SNWI=((__READ_GLOBAL *)e__GLWI)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__SNWI=((__EXPR_NOT_LOGIC *)e__GLWI)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__SNWI=((__EXPR_OR_LOGIC *)e__GLWI)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__SNWI=((__EXPR_OR_OR_LOGIC *)e__GLWI)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__SNWI=((__EXPR_AND_LOGIC *)e__GLWI)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__SNWI=((__EXPR_AND_AND_LOGIC *)e__GLWI)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__SNWI=((__EXPR_NEG *)e__GLWI)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__SNWI=((__EXPR_ADD *)e__GLWI)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__SNWI=((__EXPR_NOT *)e__GLWI)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__SNWI=((__EXPR_MOD *)e__GLWI)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__SNWI=((__EXPR_SUP_EQ *)e__GLWI)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__SNWI=((__EXPR_INF *)e__GLWI)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__SNWI=((__EXPR_INF_EQ *)e__GLWI)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__SNWI=((__EXPR_OR *)e__GLWI)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__SNWI=((__EXPR_XOR *)e__GLWI)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        put_error__text__0AH( 1,(&__string_474));
        put_position__ECH(__tmp__SNWI);
        send_error__2FH();
      };
    };
  };
}

static void* copy__QGTH(void *tmp__SGTH)
// ({NULLxFAST_ARRAYoEXPRo}) With resultNo recursive, No inlinable.
{
  __INTEGER new_capacity__E5EI,other_upper__D5EI,Self__L1KJ;
  void *result__UGTH;
  __FAST_ARRAYoEXPRo *Self__B5EI;
  void **__tmp__X5EI,**__tmp__Z5EI,**Self__VOHJ;
  result__UGTH=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoEXPRo *)tmp__SGTH)->parent_arrayed_collection__42LC.upper__USSH +  1));
  Self__B5EI=((__FAST_ARRAYoEXPRo *)result__UGTH);
  new_capacity__E5EI= 0;
  other_upper__D5EI=((__FAST_ARRAYoEXPRo *)tmp__SGTH)->parent_arrayed_collection__42LC.upper__USSH;
  if ((other_upper__D5EI >=  0)) {
    new_capacity__E5EI=(__INTEGER)(other_upper__D5EI +  1);
    if ((Self__B5EI->parent_arrayed_collection__42LC.capacity__QSDI < new_capacity__E5EI)) {
      Self__B5EI->parent_arrayed_collection__42LC.storage__1SDI=create__YBWI(new_capacity__E5EI);
      Self__B5EI->parent_arrayed_collection__42LC.capacity__QSDI=new_capacity__E5EI;
    };
    __tmp__X5EI=Self__B5EI->parent_arrayed_collection__42LC.storage__1SDI;
    __tmp__Z5EI=((__FAST_ARRAYoEXPRo *)tmp__SGTH)->parent_arrayed_collection__42LC.storage__1SDI;
    Self__VOHJ=((void **)__tmp__X5EI);
    Self__L1KJ=other_upper__D5EI;
    while ((Self__L1KJ >=  0)) {
      Self__VOHJ[Self__L1KJ]=((void **)__tmp__Z5EI)[Self__L1KJ];
      Self__L1KJ=(__INTEGER)(Self__L1KJ -  1);
    };
  };
  Self__B5EI->parent_arrayed_collection__42LC.upper__USSH=other_upper__D5EI;
  free__C4LH(tmp__SGTH);
  return(result__UGTH);
}

static void* new_block__receiver__with__1GTH(__POSITION p__3GTH,void *e__4GTH,void *larg__5GTH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxFAST_ARRAYoEXPRo}) With resultNo recursive, No inlinable.
{
  void *block_model__HHTH,*__tmp__HITH,*__tmp__YITH;
  void *lst_typ__EHTH;
  __TYPES_TMP *Self__WYGJ;
  __INTEGER __tmp__0YGJ,Self__CUKJ,Self__A2UH,limit_up__B2UH;
  __INTEGER typ_id__ZMWH,__tmp__U2GK,Self__ORUK;
  void *__tmp__EITH,*__tmp__YJTH;
  void *__tmp__GITH,*__tmp__XITH;
  __POSITION pos__IHTH;
  void *__tmp__VJTH,*__tmp__ZJTH,*result__B2GK;
  void *__tmp__JKTH;
  void *__tmp__KKTH;
  void *__tmp__LKTH,*loc__D2GK;
  __DTA_BLOCK *result__TMWH,*Self__YKFI;
  __POINTER ptr__UMWH;
  __UINTEGER_32 sz__WMWH,a__PY1Q,new_size__NY1Q,t__TY1Q,a__VY1Q;
  __PROFIL_BLOCK *Self__51GK;
  void *result__DHTH;
  void **__tmp__XX1Q,**__tmp__YX1Q;
  void *lst_typ_f__FHTH;
  void *lst__C2GK;
  __BOOLEAN __tmp__K3GK;
  block_model__HHTH=NULL;
  lst_typ__EHTH=new__XWSG();
  switch (((struct ___OBJ *)e__4GTH)->__id) {
  case __LIST__: {
    get_type__EYMJ(e__4GTH,lst_typ__EHTH);
  } break;
  case __STRING_CST__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)((__STRING_CST *)e__4GTH)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)((__PROTOTYPE_CST *)e__4GTH)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)((__INTEGER_CST *)e__4GTH)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)((__REAL_CST *)e__4GTH)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)((__CHARACTER_CST *)e__4GTH)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(lst_typ__EHTH,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __PUT_TO__: {
    add__R2EJ(lst_typ__EHTH,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(e__4GTH,lst_typ__EHTH);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(lst_typ__EHTH,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)((__CAST *)e__4GTH)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(e__4GTH,lst_typ__EHTH);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(e__4GTH,lst_typ__EHTH);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)e__4GTH)->global__RHJK,lst_typ__EHTH);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)e__4GTH)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(lst_typ__EHTH,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)e__4GTH)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(lst_typ__EHTH,type_true__FJB);
    add__R2EJ(lst_typ__EHTH,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(e__4GTH,lst_typ__EHTH);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(e__4GTH,lst_typ__EHTH);
  } break;
  };
  if (((((__TYPES_TMP *)lst_typ__EHTH)->parent_types__W25F.upper__4LAG != (__INTEGER)(-  1)) && ((void *)((void **)((__TYPES_TMP *)lst_typ__EHTH)->parent_types__W25F.storage__WWFJ)[ 0] == (void *)TYPE_NULL__))) {
    Self__WYGJ=((__TYPES_TMP *)lst_typ__EHTH);
    __tmp__0YGJ=Self__WYGJ->parent_types__W25F.upper__4LAG;
    Self__CUKJ= 1;
    __tmp__XX1Q=Self__WYGJ->parent_types__W25F.storage__WWFJ;
    __tmp__YX1Q=Self__WYGJ->parent_types__W25F.storage__WWFJ;
    while ((Self__CUKJ <= __tmp__0YGJ)) {
      ((void **)__tmp__XX1Q)[(__INTEGER)(Self__CUKJ -  1)]=((void **)__tmp__YX1Q)[Self__CUKJ];
      Self__CUKJ=(__INTEGER)(Self__CUKJ +  1);
    };
    Self__WYGJ->parent_types__W25F.upper__4LAG=(__INTEGER)(Self__WYGJ->parent_types__W25F.upper__4LAG -  1);
  };
  if ((((__TYPES_TMP *)lst_typ__EHTH)->parent_types__W25F.upper__4LAG == (__INTEGER)(-  1))) {
    switch (((struct ___OBJ *)e__4GTH)->__id) {
    case __LIST__: {
      __tmp__EITH=static_type__GIQG(e__4GTH);
    } break;
    case __STRING_CST__: {
      __tmp__EITH=((__STRING_CST *)e__4GTH)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__EITH=((__EXTERNAL_C *)e__4GTH)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__EITH=((__PROTOTYPE_CST *)e__4GTH)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__EITH=((__INTEGER_CST *)e__4GTH)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__EITH=((__LOCAL *)((__READ_LOCAL *)e__4GTH)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__EITH=static_type__0N1H(e__4GTH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__EITH=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__EITH=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__EITH=((__REAL_CST *)e__4GTH)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__EITH=((__CHARACTER_CST *)e__4GTH)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__EITH=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__EITH=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__EITH=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__EITH=static_type__MP1H(e__4GTH);
    } break;
    case __EXPR_MUL__: {
      __tmp__EITH=static_type__SP1H(e__4GTH);
    } break;
    case __EXPR_DIV__: {
      __tmp__EITH=static_type__XP1H(e__4GTH);
    } break;
    case __EXPR_AND__: {
      __tmp__EITH=static_type__2P1H(e__4GTH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__EITH=static_type__BQ1H(e__4GTH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__EITH=static_type__GQ1H(e__4GTH);
    } break;
    case __PUT_TO__: {
      __tmp__EITH=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__EITH=static_type__PQ1H(e__4GTH);
    } break;
    case __SIZE_OF__: {
      __tmp__EITH=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__EITH=((__CAST *)e__4GTH)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__EITH=static_type__GIKL(e__4GTH);
    } break;
    case __READ_SLOT__: {
      __tmp__EITH=((__SLOT_DATA *)((__READ_SLOT *)e__4GTH)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__EITH=((__SLOT_DATA *)((__READ_GLOBAL *)e__4GTH)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__EITH=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__EITH=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__EITH=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__EITH=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__EITH=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__EITH=static_type__Z2IM(e__4GTH);
    } break;
    case __EXPR_ADD__: {
      __tmp__EITH=static_type__IXML(e__4GTH);
    } break;
    case __EXPR_NOT__: {
      __tmp__EITH=static_type__BTXM(e__4GTH);
    } break;
    case __EXPR_MOD__: {
      __tmp__EITH=static_type__5LEO(e__4GTH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__EITH=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__EITH=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__EITH=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__EITH=static_type__NOPN(e__4GTH);
    } break;
    case __EXPR_XOR__: {
      __tmp__EITH=static_type__XCSO(e__4GTH);
    } break;
    };
    __tmp__GITH=((__TYPE_FULL *)__tmp__EITH)->parent_type__KTL;
    if (__tmp__GITH==NULL) {
      __tmp__HITH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__GITH)->__id) {
      case __TYPE__: {
        __tmp__HITH=NULL;
      } break;
      case __TYPE_NULL__: {
        __tmp__HITH=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__HITH=NULL;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__HITH=NULL;
      } break;
      case __TYPE_ID__: {
        __tmp__HITH=NULL;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__HITH=NULL;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__HITH=((void *)__tmp__GITH);
      } break;
      }
    };
    block_model__HHTH=__tmp__HITH;
    if (((void *)__tmp__HITH == (void *)NULL)) {
      put_error__text__0AH( 1,(&__string_535));
      put_position__ECH(p__3GTH);
      send_error__2FH();
    };
  } else {
    __tmp__XITH=((void **)((__TYPES_TMP *)lst_typ__EHTH)->parent_types__W25F.storage__WWFJ)[ 0];
    if (__tmp__XITH==NULL) {
      __tmp__YITH=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__XITH)->__id) {
      case __TYPE__: {
        __tmp__YITH=NULL;
      } break;
      case __TYPE_NULL__: {
        __tmp__YITH=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__YITH=NULL;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__YITH=NULL;
      } break;
      case __TYPE_ID__: {
        __tmp__YITH=NULL;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__YITH=NULL;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__YITH=((void *)__tmp__XITH);
      } break;
      }
    };
    block_model__HHTH=__tmp__YITH;
  };
  free__OOFJ(lst_typ__EHTH);
  lst_typ_f__FHTH=((__PROFIL_BLOCK *)block_model__HHTH)->parent_profil__GHAG.argument_list__N5JH;
  pos__IHTH=((__LIST *)((__PROFIL_BLOCK *)block_model__HHTH)->parent_profil__GHAG.code__HZJH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
  if (((__INTEGER)(((__FAST_ARRAYoLOCALo *)lst_typ_f__FHTH)->parent_arrayed_collection__QI4F.upper__TI4F +  1) != (__INTEGER)(((__FAST_ARRAYoEXPRo *)larg__5GTH)->parent_arrayed_collection__42LC.upper__USSH +  1))) {
    put_error__text__0AH( 1,(&__string_536));
    put_position__ECH(pos__IHTH);
    put_position__ECH(p__3GTH);
    send_error__2FH();
  };
  Self__A2UH= 1;
  limit_up__B2UH=((__FAST_ARRAYoEXPRo *)larg__5GTH)->parent_arrayed_collection__42LC.upper__USSH;
  while ((Self__A2UH <= limit_up__B2UH)) {
    __tmp__VJTH=((void **)((__FAST_ARRAYoEXPRo *)larg__5GTH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__A2UH];
    __tmp__YJTH=((__LOCAL *)((void **)((__FAST_ARRAYoLOCALo *)lst_typ_f__FHTH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__A2UH])->parent_variable__B2LC.type__125F;
    switch (((struct ___OBJ *)__tmp__VJTH)->__id) {
    case __LIST__: {
      __tmp__ZJTH=check_type__with__T5CN(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __STRING_CST__: {
      __tmp__ZJTH=check_type__with__Q22H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZJTH=check_type__with__PF3H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZJTH=check_type__with__OO3H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __INTEGER_CST__: {
      __tmp__ZJTH=check_type__with__NX3H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __READ_LOCAL__: {
      __tmp__ZJTH=check_type__with__LEFJ(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZJTH=check_type__with__LA4H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZJTH=check_type__with__KJ4H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZJTH=check_type__with__JS4H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __REAL_CST__: {
      __tmp__ZJTH=check_type__with__I14H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZJTH=check_type__with__HE5H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZJTH=check_type__with__FN5H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZJTH=check_type__with__DW5H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_SUP__: {
      __tmp__ZJTH=check_type__with__C55H(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_SUB__: {
      __tmp__ZJTH=check_type__with__BIAI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZJTH=check_type__with__ARAI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZJTH=check_type__with__5ZAI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_AND__: {
      __tmp__ZJTH=check_type__with__4CBI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZJTH=check_type__with__3LBI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZJTH=check_type__with__2UBI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __PUT_TO__: {
      __tmp__ZJTH=check_type__with__03BI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __ITEM__: {
      __tmp__ZJTH=check_type__with__YGCI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __SIZE_OF__: {
      __tmp__ZJTH=check_type__with__WPCI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __CAST__: {
      __tmp__ZJTH=check_type__with__UYCI(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __CALL_SLOT__: {
      __tmp__ZJTH=check_type__with__RIDN(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __READ_SLOT__: {
      __tmp__ZJTH=check_type__with__VPKL(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZJTH=check_type__with__UYKL(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZJTH=check_type__with__IW2O(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZJTH=check_type__with__AYIO(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZJTH=check_type__with__IFSO(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZJTH=check_type__with__5AJO(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZJTH=check_type__with__IOSO(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_NEG__: {
      __tmp__ZJTH=check_type__with__SVXM(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZJTH=check_type__with__R4XM(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZJTH=check_type__with__QRDN(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZJTH=check_type__with__4JJO(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZJTH=check_type__with__SQIP(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_INF__: {
      __tmp__ZJTH=check_type__with__H52O(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZJTH=check_type__with__GI3O(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_OR__: {
      __tmp__ZJTH=check_type__with__MZZN(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZJTH=check_type__with__FR3O(__tmp__VJTH,__tmp__YJTH,pos__IHTH);
    } break;
    };
    ((void **)((__FAST_ARRAYoEXPRo *)larg__5GTH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__A2UH]=__tmp__ZJTH;
    Self__A2UH=(__INTEGER)(Self__A2UH +  1);
  };
  if ((debug_level_option__3C !=  0)) {
    if (((void *)profil_second__3PQC == (void *)NULL)) {
      print__1ZE((&__string_537));
      fputc((int)('\n'),stdout);
      exit(( 1));
    };
    __tmp__JKTH=list_current__IF1;
    __tmp__KKTH=profil_second__3PQC;
    if (((struct ___OBJ *)__tmp__KKTH)->__id==__PROFIL_SLOT__) {
      __tmp__LKTH=((__PROFIL_SLOT *)__tmp__KKTH)->parent_profil__51LC.context__0M0G;
    } else {
      __tmp__LKTH=((__PROFIL_BLOCK *)__tmp__KKTH)->parent_profil__GHAG.context__0M0G;
    };
    add_last__AL4G(((__LIST *)__tmp__JKTH)->expr_list__JUOG,create__context__first__20EG(PUSH__,p__3GTH,__tmp__LKTH,FALSE__));
  };
  DTA_BLOCK__->context__52UH=profil_second__3PQC;
  result__TMWH=NULL;
  ptr__UMWH=((__POINTER )(NULL));
  typ_id__ZMWH= 0;
  sz__WMWH=((__UINTEGER_32 )sizeof(__DTA_BLOCK));
  if ((sz__WMWH ==  0)) {
    result__TMWH=DTA_BLOCK__;
  } else {
    typ_id__ZMWH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__WMWH);
    if ((typ_id__ZMWH == (__INTEGER)(-  1))) {
      a__PY1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__NY1Q=(__UINTEGER_32)((__UINTEGER_32)(sz__WMWH + a__PY1Q) & (__UINTEGER_32)(~ a__PY1Q));
      ptr__UMWH=micro_alloc__table__lab__BOI(new_size__NY1Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NY1Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NY1Q);
    } else {
      t__TY1Q=((__UINTEGER_32 )typ_id__ZMWH);
      a__VY1Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__UMWH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__WMWH + a__VY1Q) & (__UINTEGER_32)(~ a__VY1Q)),((__POINTER )(&(table_type[(t__TY1Q)]))),(__UINTEGER_32)(t__TY1Q |  1));
    };
    result__TMWH=((__DTA_BLOCK *)ptr__UMWH);
    *(result__TMWH) = *(DTA_BLOCK__);
  };
  Self__YKFI=((__DTA_BLOCK *)result__TMWH);
  Self__YKFI->argument_list__2KFI=larg__5GTH;
  Self__51GK=((__PROFIL_BLOCK *)block_model__HHTH);
  result__B2GK=NULL;
  lst__C2GK=NULL;
  loc__D2GK=NULL;
  if (((void *)Self__51GK->parent_profil__GHAG.result_list__SA2H != (void *)NULL)) {
    lst__C2GK=create_with_capacity__3THH((__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)Self__51GK->parent_profil__GHAG.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F +  1) +  1));
    __tmp__U2GK=((__FAST_ARRAYoLOCALo *)Self__51GK->parent_profil__GHAG.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F;
    Self__ORUK= 0;
    while ((Self__ORUK <= __tmp__U2GK)) {
      loc__D2GK=((void **)((__FAST_ARRAYoLOCALo *)Self__51GK->parent_profil__GHAG.result_list__SA2H)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__ORUK];
      add_last__XSEI(lst__C2GK,get_temporary_expr__RCUG(((__LOCAL *)loc__D2GK)->parent_variable__B2LC.type__125F,((__LOCAL *)loc__D2GK)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
      Self__ORUK=(__INTEGER)(Self__ORUK +  1);
    };
    loc__D2GK=Self__51GK->parent_profil__GHAG.result_last__XGKH;
    add_last__XSEI(lst__C2GK,get_temporary_expr__RCUG(((__LOCAL *)loc__D2GK)->parent_variable__B2LC.type__125F,((__LOCAL *)loc__D2GK)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
    result__B2GK=create__SUHH(lst__C2GK);
    __tmp__K3GK=TRUE__;
  } else {
    __tmp__K3GK=FALSE__;
  };
  if ((! __tmp__K3GK)) {
    if (((void *)Self__51GK->parent_profil__GHAG.result_last__XGKH != (void *)NULL)) {
      loc__D2GK=Self__51GK->parent_profil__GHAG.result_last__XGKH;
      result__B2GK=get_temporary_expr__RCUG(((__LOCAL *)loc__D2GK)->parent_variable__B2LC.type__125F,((__LOCAL *)loc__D2GK)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
    } else {
      result__B2GK=create__type__CLQC(((__LIST *)Self__51GK->parent_profil__GHAG.code__HZJH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,TYPE_VOID__->parent_type__UIB.default__AKC);
    };
  };
  Self__YKFI->result_expr__341H=result__B2GK;
  result__DHTH=create__with__GWUC(e__4GTH,result__TMWH);
  add_last__I4YD(node_list__PMQC,result__DHTH);
  return(result__DHTH);
}

static void free__C4LH(void *tmp__E4LH)
// ({NULLxFAST_ARRAYoEXPRo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__AZDI,__tmp__I0DI,__tmp__PIIJ,Self__14MK;
  __FAST_ARRAYoFAST_ARRAYoEXPRoo *Self__4YDI;
  __BOOLEAN __tmp__PZDI;
  void **__tmp__H0DI,**new__2HIJ;
  ((__FAST_ARRAYoEXPRo *)tmp__E4LH)->parent_arrayed_collection__42LC.upper__USSH=(__INTEGER)(-  1);
  Self__4YDI=((__FAST_ARRAYoFAST_ARRAYoEXPRoo *)free_list__I1LH);
  new_capacity__AZDI= 0;
  if (((__INTEGER)(Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI +  1) <= (__INTEGER)(Self__4YDI->parent_arrayed_collection__H1LH.capacity__CZDI -  1))) {
    Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI=(__INTEGER)(Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI +  1);
    __tmp__PZDI=TRUE__;
  } else {
    __tmp__PZDI=FALSE__;
  };
  if ((! __tmp__PZDI)) {
    if ((Self__4YDI->parent_arrayed_collection__H1LH.capacity__CZDI ==  0)) {
      Self__4YDI->parent_arrayed_collection__H1LH.storage__4ZDI=create__WXXI( 2);
      Self__4YDI->parent_arrayed_collection__H1LH.capacity__CZDI= 2;
      Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI= 0;
    } else {
      new_capacity__AZDI=(__INTEGER)(Self__4YDI->parent_arrayed_collection__H1LH.capacity__CZDI <<  1);
      __tmp__H0DI=Self__4YDI->parent_arrayed_collection__H1LH.storage__4ZDI;
      __tmp__I0DI=Self__4YDI->parent_arrayed_collection__H1LH.capacity__CZDI;
      new__2HIJ=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__H0DI)),((__UINTEGER_32 )(__INTEGER)(__tmp__I0DI * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__AZDI * ((__INTEGER )(sizeof(void *)))))));
      __tmp__PIIJ=(__INTEGER)(new_capacity__AZDI -  1);
      Self__14MK=__tmp__I0DI;
      while ((Self__14MK <= __tmp__PIIJ)) {
        new__2HIJ[Self__14MK]=NULL;
        Self__14MK=(__INTEGER)(Self__14MK +  1);
      };
      Self__4YDI->parent_arrayed_collection__H1LH.storage__4ZDI=new__2HIJ;
      Self__4YDI->parent_arrayed_collection__H1LH.capacity__CZDI=new_capacity__AZDI;
      Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI=(__INTEGER)(Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI +  1);
    };
  };
  ((void **)Self__4YDI->parent_arrayed_collection__H1LH.storage__4ZDI)[Self__4YDI->parent_arrayed_collection__H1LH.upper__FXDI]=tmp__E4LH;
}

static void* new_read__slot__receiver__with__YOWH(__POSITION p__0OWH,void *s__1OWH,void *rec__2OWH,void *larg__3OWH)
// ({POSITION},{NULLxSLOT_DATAxSLOT_CODE},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxFAST_ARRAYoEXPRo}) With resultRecursive, No inlinable.
{
  void *old_self__CPWH,*__tmp__IPWH,*result__Y5FJ,*__tmp__XAGJ;
  void *__tmp__UPWH,*result__SBGJ,*__tmp__RCGJ;
  void *__tmp__HPWH,*__tmp__VPWH,*__tmp__YPWH,*__tmp__WTFI;
  __INTEGER Self__FWXH,limit_up__GWXH,idx__S5FJ,n__W5FJ,i__V5FJ;
  __INTEGER __tmp__MAGJ,__tmp__WAGJ,idx__MBGJ,n__QBGJ,i__PBGJ;
  __INTEGER __tmp__GCGJ,__tmp__QCGJ,typ_id__C5YH;
  __SLOT_DATA *Self__R5FJ;
  void *__tmp__IBGJ,*__tmp__CDGJ;
  void *__tmp__LAGJ,*__tmp__UAGJ,*__tmp__FCGJ,*__tmp__OCGJ;
  __SLOT_CODE *Self__LBGJ;
  __POSITION __tmp__WPWH;
  __DTA_RD_ARGS *result__24YH,*Self__PTFI;
  __POINTER ptr__34YH;
  __UINTEGER_32 sz__54YH,a__F01Q,new_size__D01Q,t__J01Q,a__L01Q;
  void *__tmp__VTFI;
  void *result__FPWH;
  void *lst__U5FJ,*lst__OBGJ;
  old_self__CPWH=run_value__FMQC;
  __tmp__HPWH=((void **)((__FAST_ARRAYoEXPRo *)larg__3OWH)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
  switch (((struct ___OBJ *)__tmp__HPWH)->__id) {
  case __LIST__: {
    __tmp__IPWH=static_type__GIQG(__tmp__HPWH);
  } break;
  case __STRING_CST__: {
    __tmp__IPWH=((__STRING_CST *)__tmp__HPWH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__IPWH=((__EXTERNAL_C *)__tmp__HPWH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__IPWH=((__PROTOTYPE_CST *)__tmp__HPWH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__IPWH=((__INTEGER_CST *)__tmp__HPWH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__IPWH=((__LOCAL *)((__READ_LOCAL *)__tmp__HPWH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IPWH=static_type__0N1H(__tmp__HPWH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IPWH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IPWH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__IPWH=((__REAL_CST *)__tmp__HPWH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__IPWH=((__CHARACTER_CST *)__tmp__HPWH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__IPWH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IPWH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__IPWH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__IPWH=static_type__MP1H(__tmp__HPWH);
  } break;
  case __EXPR_MUL__: {
    __tmp__IPWH=static_type__SP1H(__tmp__HPWH);
  } break;
  case __EXPR_DIV__: {
    __tmp__IPWH=static_type__XP1H(__tmp__HPWH);
  } break;
  case __EXPR_AND__: {
    __tmp__IPWH=static_type__2P1H(__tmp__HPWH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IPWH=static_type__BQ1H(__tmp__HPWH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IPWH=static_type__GQ1H(__tmp__HPWH);
  } break;
  case __PUT_TO__: {
    __tmp__IPWH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__IPWH=static_type__PQ1H(__tmp__HPWH);
  } break;
  case __SIZE_OF__: {
    __tmp__IPWH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__IPWH=((__CAST *)__tmp__HPWH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__IPWH=static_type__GIKL(__tmp__HPWH);
  } break;
  case __READ_SLOT__: {
    __tmp__IPWH=((__SLOT_DATA *)((__READ_SLOT *)__tmp__HPWH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__IPWH=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__HPWH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IPWH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IPWH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IPWH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IPWH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IPWH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__IPWH=static_type__Z2IM(__tmp__HPWH);
  } break;
  case __EXPR_ADD__: {
    __tmp__IPWH=static_type__IXML(__tmp__HPWH);
  } break;
  case __EXPR_NOT__: {
    __tmp__IPWH=static_type__BTXM(__tmp__HPWH);
  } break;
  case __EXPR_MOD__: {
    __tmp__IPWH=static_type__5LEO(__tmp__HPWH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IPWH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__IPWH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IPWH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__IPWH=static_type__NOPN(__tmp__HPWH);
  } break;
  case __EXPR_XOR__: {
    __tmp__IPWH=static_type__XCSO(__tmp__HPWH);
  } break;
  };
  run_value__FMQC=__tmp__IPWH;
  to_strict__LE5D(__tmp__IPWH);
  Self__FWXH= 1;
  limit_up__GWXH=((__FAST_ARRAYoEXPRo *)larg__3OWH)->parent_arrayed_collection__42LC.upper__USSH;
  while ((Self__FWXH <= limit_up__GWXH)) {
    if (((struct ___OBJ *)s__1OWH)->__id==__SLOT_DATA__) {
      Self__R5FJ=((__SLOT_DATA *)s__1OWH);
      idx__S5FJ=Self__FWXH;
      __tmp__IBGJ=self_up__LKEF;
      n__W5FJ= 0;
      result__Y5FJ=NULL;
      self_up__LKEF=receiver_type__R12G(Self__R5FJ);
      lst__U5FJ=((__ITM_SLOT *)((__SLOT *)Self__R5FJ->parent_slot__BJZD)->base_slot__P22F)->argument_list__BC2D;
      i__V5FJ= 0;
      do {
        __tmp__LAGJ=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)lst__U5FJ)->parent_arrayed_collection__5GJD.storage__U41D)[i__V5FJ];
        if (((struct ___OBJ *)__tmp__LAGJ)->__id==__ITM_ARG__) {
          __tmp__MAGJ= 1;
        } else {
          __tmp__MAGJ=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__LAGJ)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
        };
        if (((__INTEGER)(n__W5FJ + __tmp__MAGJ) > idx__S5FJ)) {
          __tmp__UAGJ=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)lst__U5FJ)->parent_arrayed_collection__5GJD.storage__U41D)[i__V5FJ];
          __tmp__WAGJ=(__INTEGER)(idx__S5FJ - n__W5FJ);
          if (((struct ___OBJ *)__tmp__UAGJ)->__id==__ITM_ARG__) {
            __tmp__XAGJ=get_type__252J(__tmp__UAGJ);
          } else {
            __tmp__XAGJ=get_type__IA3J(__tmp__UAGJ,__tmp__WAGJ);
          };
          result__Y5FJ=__tmp__XAGJ;
        } else {
          n__W5FJ=(__INTEGER)(n__W5FJ + __tmp__MAGJ);
        };
        i__V5FJ=(__INTEGER)(i__V5FJ +  1);
      } while (((void *)result__Y5FJ == (void *)NULL));
      self_up__LKEF=__tmp__IBGJ;
      __tmp__UPWH=result__Y5FJ;
    } else {
      Self__LBGJ=((__SLOT_CODE *)s__1OWH);
      idx__MBGJ=Self__FWXH;
      __tmp__CDGJ=self_up__LKEF;
      n__QBGJ= 0;
      result__SBGJ=NULL;
      self_up__LKEF=((__SLOT *)Self__LBGJ->parent_slot__Y22F)->receiver_type__Q22F;
      lst__OBGJ=((__ITM_SLOT *)((__SLOT *)Self__LBGJ->parent_slot__Y22F)->base_slot__P22F)->argument_list__BC2D;
      i__PBGJ= 0;
      do {
        __tmp__FCGJ=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)lst__OBGJ)->parent_arrayed_collection__5GJD.storage__U41D)[i__PBGJ];
        if (((struct ___OBJ *)__tmp__FCGJ)->__id==__ITM_ARG__) {
          __tmp__GCGJ= 1;
        } else {
          __tmp__GCGJ=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__FCGJ)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
        };
        if (((__INTEGER)(n__QBGJ + __tmp__GCGJ) > idx__MBGJ)) {
          __tmp__OCGJ=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)lst__OBGJ)->parent_arrayed_collection__5GJD.storage__U41D)[i__PBGJ];
          __tmp__QCGJ=(__INTEGER)(idx__MBGJ - n__QBGJ);
          if (((struct ___OBJ *)__tmp__OCGJ)->__id==__ITM_ARG__) {
            __tmp__RCGJ=get_type__252J(__tmp__OCGJ);
          } else {
            __tmp__RCGJ=get_type__IA3J(__tmp__OCGJ,__tmp__QCGJ);
          };
          result__SBGJ=__tmp__RCGJ;
        } else {
          n__QBGJ=(__INTEGER)(n__QBGJ + __tmp__GCGJ);
        };
        i__PBGJ=(__INTEGER)(i__PBGJ +  1);
      } while (((void *)result__SBGJ == (void *)NULL));
      self_up__LKEF=__tmp__CDGJ;
      __tmp__UPWH=result__SBGJ;
    };
    __tmp__VPWH=((void **)((__FAST_ARRAYoEXPRo *)larg__3OWH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__FWXH];
    if (((struct ___OBJ *)s__1OWH)->__id==__SLOT_DATA__) {
      __tmp__WPWH=((__SLOT_DATA *)s__1OWH)->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    } else {
      __tmp__WPWH=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)s__1OWH)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
    };
    switch (((struct ___OBJ *)__tmp__VPWH)->__id) {
    case __LIST__: {
      __tmp__YPWH=check_type__with__T5CN(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __STRING_CST__: {
      __tmp__YPWH=check_type__with__Q22H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXTERNAL_C__: {
      __tmp__YPWH=check_type__with__PF3H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YPWH=check_type__with__OO3H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __INTEGER_CST__: {
      __tmp__YPWH=check_type__with__NX3H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __READ_LOCAL__: {
      __tmp__YPWH=check_type__with__LEFJ(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YPWH=check_type__with__LA4H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YPWH=check_type__with__KJ4H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YPWH=check_type__with__JS4H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __REAL_CST__: {
      __tmp__YPWH=check_type__with__I14H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __CHARACTER_CST__: {
      __tmp__YPWH=check_type__with__HE5H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __IS_EXPANDED__: {
      __tmp__YPWH=check_type__with__FN5H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YPWH=check_type__with__DW5H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_SUP__: {
      __tmp__YPWH=check_type__with__C55H(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_SUB__: {
      __tmp__YPWH=check_type__with__BIAI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_MUL__: {
      __tmp__YPWH=check_type__with__ARAI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_DIV__: {
      __tmp__YPWH=check_type__with__5ZAI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_AND__: {
      __tmp__YPWH=check_type__with__4CBI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YPWH=check_type__with__3LBI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YPWH=check_type__with__2UBI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __PUT_TO__: {
      __tmp__YPWH=check_type__with__03BI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __ITEM__: {
      __tmp__YPWH=check_type__with__YGCI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __SIZE_OF__: {
      __tmp__YPWH=check_type__with__WPCI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __CAST__: {
      __tmp__YPWH=check_type__with__UYCI(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __CALL_SLOT__: {
      __tmp__YPWH=check_type__with__RIDN(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __READ_SLOT__: {
      __tmp__YPWH=check_type__with__VPKL(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __READ_GLOBAL__: {
      __tmp__YPWH=check_type__with__UYKL(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YPWH=check_type__with__IW2O(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YPWH=check_type__with__AYIO(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YPWH=check_type__with__IFSO(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YPWH=check_type__with__5AJO(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YPWH=check_type__with__IOSO(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_NEG__: {
      __tmp__YPWH=check_type__with__SVXM(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_ADD__: {
      __tmp__YPWH=check_type__with__R4XM(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_NOT__: {
      __tmp__YPWH=check_type__with__QRDN(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_MOD__: {
      __tmp__YPWH=check_type__with__4JJO(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YPWH=check_type__with__SQIP(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_INF__: {
      __tmp__YPWH=check_type__with__H52O(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YPWH=check_type__with__GI3O(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_OR__: {
      __tmp__YPWH=check_type__with__MZZN(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    case __EXPR_XOR__: {
      __tmp__YPWH=check_type__with__FR3O(__tmp__VPWH,__tmp__UPWH,__tmp__WPWH);
    } break;
    };
    ((void **)((__FAST_ARRAYoEXPRo *)larg__3OWH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__FWXH]=__tmp__YPWH;
    Self__FWXH=(__INTEGER)(Self__FWXH +  1);
  };
  result__24YH=NULL;
  ptr__34YH=((__POINTER )(NULL));
  typ_id__C5YH= 0;
  sz__54YH=((__UINTEGER_32 )sizeof(__DTA_RD_ARGS));
  if ((sz__54YH ==  0)) {
    result__24YH=DTA_RD_ARGS__;
  } else {
    typ_id__C5YH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__54YH);
    if ((typ_id__C5YH == (__INTEGER)(-  1))) {
      a__F01Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__D01Q=(__UINTEGER_32)((__UINTEGER_32)(sz__54YH + a__F01Q) & (__UINTEGER_32)(~ a__F01Q));
      ptr__34YH=micro_alloc__table__lab__BOI(new_size__D01Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D01Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__D01Q);
    } else {
      t__J01Q=((__UINTEGER_32 )typ_id__C5YH);
      a__L01Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__34YH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__54YH + a__L01Q) & (__UINTEGER_32)(~ a__L01Q)),((__POINTER )(&(table_type[(t__J01Q)]))),(__UINTEGER_32)(t__J01Q |  1));
    };
    result__24YH=((__DTA_RD_ARGS *)ptr__34YH);
    *(result__24YH) = *(DTA_RD_ARGS__);
  };
  Self__PTFI=((__DTA_RD_ARGS *)result__24YH);
  Self__PTFI->parent_dta__5OWH.parent_itm_object__5LQC.position__BJM=p__0OWH;
  Self__PTFI->parent_dta__5OWH.context__OJZD=profil_second__3PQC;
  Self__PTFI->parent_dta__5OWH.slot__PJZD=s__1OWH;
  Self__PTFI->argument_list__UTFI=larg__3OWH;
  __tmp__VTFI=Self__PTFI->parent_dta__5OWH.slot__PJZD;
  if (((struct ___OBJ *)__tmp__VTFI)->__id==__SLOT_DATA__) {
    __tmp__WTFI=get_expr_result__RUOG(__tmp__VTFI);
  } else {
    __tmp__WTFI=get_expr_result__QXOG(__tmp__VTFI);
  };
  Self__PTFI->parent_dta__5OWH.result_expr__RJZD=__tmp__WTFI;
  result__FPWH=create__with__GWUC(rec__2OWH,result__24YH);
  run_value__FMQC=old_self__CPWH;
  add_last__I4YD(node_list__PMQC,result__FPWH);
  return(result__FPWH);
}

static void error_slot__name__in__list__0G2I(__POSITION p__2G2I,void *s__3G2I,void *t__4G2I,void *st__5G2I)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK},{NULLxTYPES_TMP}) VoidNo recursive, No inlinable.
{
  void *__tmp__EH2I;
  __INTEGER __tmp__LH2I,Self__JC5I;
  void *__tmp__RH2I,*__tmp__VH2I;
  __TYPES_TMP *Self__T01Q;
  copy__BNK(string_tmp__RB,(&__string_538));
  append__MOK(string_tmp__RB,s__3G2I);
  append__MOK(string_tmp__RB,(&__string_539));
  switch (((struct ___OBJ *)t__4G2I)->__id) {
  case __TYPE__: {
    __tmp__EH2I=((__PROTOTYPE *)((__TYPE *)t__4G2I)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__EH2I=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__EH2I=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__EH2I=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__EH2I=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__EH2I=((__TYPE_GENERIC *)t__4G2I)->intern_name__FS2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__EH2I=((__PROFIL_BLOCK *)t__4G2I)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  append__MOK(string_tmp__RB,__tmp__EH2I);
  append__MOK(string_tmp__RB,(&__string_540));
  __tmp__LH2I=(__INTEGER)(((__TYPES_TMP *)st__5G2I)->parent_types__W25F.upper__4LAG -  1);
  Self__JC5I= 0;
  while ((Self__JC5I <= __tmp__LH2I)) {
    __tmp__RH2I=((void **)((__TYPES_TMP *)st__5G2I)->parent_types__W25F.storage__WWFJ)[Self__JC5I];
    switch (((struct ___OBJ *)__tmp__RH2I)->__id) {
    case __TYPE__: {
      append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)__tmp__RH2I)->prototype__RD)->parent_named__QD.name__1QB);
    } break;
    case __TYPE_NULL__: {
      append__MOK(string_tmp__RB,(&__string_59));
    } break;
    case __TYPE_VOID__: {
      append__MOK(string_tmp__RB,(&__string_2));
    } break;
    case __TYPE_CONTEXT__: {
      append__MOK(string_tmp__RB,(&__string_44));
    } break;
    case __TYPE_ID__: {
      append__MOK(string_tmp__RB,(&__string_46));
    } break;
    case __TYPE_GENERIC__: {
      append__MOK(string_tmp__RB,((__TYPE_GENERIC *)__tmp__RH2I)->name__2R2B);
    } break;
    case __PROFIL_BLOCK__: {
      append__MOK(string_tmp__RB,(&__string_39));
    } break;
    };
    add_last__YPK(string_tmp__RB,' ');
    Self__JC5I=(__INTEGER)(Self__JC5I +  1);
  };
  Self__T01Q=((__TYPES_TMP *)st__5G2I);
  __tmp__VH2I=((void **)Self__T01Q->parent_types__W25F.storage__WWFJ)[Self__T01Q->parent_types__W25F.upper__4LAG];
  switch (((struct ___OBJ *)__tmp__VH2I)->__id) {
  case __TYPE__: {
    append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)__tmp__VH2I)->prototype__RD)->parent_named__QD.name__1QB);
  } break;
  case __TYPE_NULL__: {
    append__MOK(string_tmp__RB,(&__string_59));
  } break;
  case __TYPE_VOID__: {
    append__MOK(string_tmp__RB,(&__string_2));
  } break;
  case __TYPE_CONTEXT__: {
    append__MOK(string_tmp__RB,(&__string_44));
  } break;
  case __TYPE_ID__: {
    append__MOK(string_tmp__RB,(&__string_46));
  } break;
  case __TYPE_GENERIC__: {
    append__MOK(string_tmp__RB,((__TYPE_GENERIC *)__tmp__VH2I)->name__2R2B);
  } break;
  case __PROFIL_BLOCK__: {
    append__MOK(string_tmp__RB,(&__string_39));
  } break;
  };
  add_last__YPK(string_tmp__RB,')');
  put_error__text__0AH( 1,string_tmp__RB);
  put_position__ECH(p__2G2I);
  send_error__2FH();
}

static __INTEGER priority__BVDJ(__ITM_SLOT *Self__CVDJ)
// ({ITM_SLOT}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__OCEJ,result__QCEJ;
  Self__OCEJ=Self__CVDJ->priority_and_level__NHUE;
  result__QCEJ= 0;
  if ((Self__OCEJ <  0)) {
    result__QCEJ=(__INTEGER)(- Self__OCEJ);
  } else {
    result__QCEJ=Self__OCEJ;
  };
  return(result__QCEJ);
}

static void* associativity__YGEJ(__ITM_SLOT *Self__ZGEJ)
// ({ITM_SLOT}) With resultNo recursive, No inlinable.
{
  void *result__1GEJ;
  result__1GEJ=NULL;
  if ((Self__ZGEJ->priority_and_level__NHUE >=  0)) {
    result__1GEJ=(&__string_10);
  } else {
    result__1GEJ=(&__string_9);
  };
  return(result__1GEJ);
}

static void* lookup__3ATH()
// () With resultNo recursive, No inlinable.
{
  void *result__BBTH;
  __INTEGER j__CBTH;
  void **__tmp__2Y5Q;
  __BOOLEAN __tmp__BDTH;
  result__BBTH=NULL;
  j__CBTH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__2Y5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__CBTH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__2Y5Q)[j__CBTH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
    j__CBTH=(__INTEGER)(j__CBTH -  1);
  };
  if ((j__CBTH >= stack_local_lower__AI4F)) {
    result__BBTH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__CBTH];
    if (((j__CBTH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__BBTH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__BBTH;
    };
    __tmp__BDTH=TRUE__;
  } else {
    __tmp__BDTH=FALSE__;
  };
  if ((! __tmp__BDTH)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__BBTH=lookup__LLJM(profil_first__4PQC,(&__string_57));
      if ((((void *)result__BBTH != (void *)NULL) && ((void *)((__LOCAL *)result__BBTH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__BBTH;
      };
    };
  };
  return(result__BBTH);
}

static void append_collection__53EI(__FAST_ARRAYoEXPRo *Self__A4EI,void *other__B4EI)
// ({FAST_ARRAYoEXPRo},{NULLxFAST_ARRAYoEXPRo}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__L4EI,Self__VWKI;
  __tmp__L4EI=((__FAST_ARRAYoEXPRo *)other__B4EI)->parent_arrayed_collection__42LC.upper__USSH;
  Self__VWKI= 0;
  while ((Self__VWKI <= __tmp__L4EI)) {
    add_last__XSEI(Self__A4EI,((void **)((__FAST_ARRAYoEXPRo *)other__B4EI)->parent_arrayed_collection__42LC.storage__1SDI)[Self__VWKI]);
    Self__VWKI=(__INTEGER)(Self__VWKI +  1);
  };
}

static void add_first__PPCM(__LIST *Self__QPCM,void *i__RPCM)
// ({LIST},{NULLxLISTxSTRING_CSTxPUSHxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxSWITCHxNODE_TYPExREAD_LOCALxEXPR_MULTIPLExNODE_STYLExWRITE_GLOBALxWRITE_SLOTxEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxNOPxREAD_SLOTxWRITE_LOCALxREAD_GLOBALxEXPR_NOT_LOGICxLOOPxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxLOOP_ENDxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) VoidNo recursive, No inlinable.
{
  void *tmp__WEHM;
  __FAST_ARRAYoINSTRo *Self__SVDM;
  Self__SVDM=((__FAST_ARRAYoINSTRo *)Self__QPCM->expr_list__JUOG);
  add_last__AL4G(Self__SVDM,i__RPCM);
  if ((Self__SVDM->parent_arrayed_collection__IUOG.upper__THQG !=  0)) {
    if ((Self__SVDM->parent_arrayed_collection__IUOG.upper__THQG ==  1)) {
      tmp__WEHM=((void **)Self__SVDM->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
      ((void **)Self__SVDM->parent_arrayed_collection__IUOG.storage__BM4G)[ 0]=((void **)Self__SVDM->parent_arrayed_collection__IUOG.storage__BM4G)[ 1];
      ((void **)Self__SVDM->parent_arrayed_collection__IUOG.storage__BM4G)[ 1]=tmp__WEHM;
    } else {
      move__to__by__ZAFH(Self__SVDM, 0,(__INTEGER)(Self__SVDM->parent_arrayed_collection__IUOG.upper__THQG -  1));
      ((void **)Self__SVDM->parent_arrayed_collection__IUOG.storage__BM4G)[ 0]=i__RPCM;
    };
  };
}

static __INTEGER index_of__since__AVOH(__STRING *Self__BVOH,__INTEGER start_index__DVOH)
// ({STRING},{INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER result__FVOH,__tmp__511Q;
  __CHARACTER *__tmp__A21Q;
  result__FVOH=start_index__DVOH;
  __tmp__511Q=Self__BVOH->count__VF;
  __tmp__A21Q=Self__BVOH->storage__XNK;
  while ((! ((result__FVOH > __tmp__511Q) || ('@' == ((__CHARACTER *)__tmp__A21Q)[(__INTEGER)(result__FVOH -  1)])))) {
    result__FVOH=(__INTEGER)(result__FVOH +  1);
  };
  return(result__FVOH);
}

static __BOOLEAN is_letter_or_digit__TBCJ(__CHARACTER Self__UBCJ)
// ({CHARACTER}) With resultNo recursive, No inlinable.
{
  __BOOLEAN result__KUCJ,__tmp__UUCJ;
  result__KUCJ=FALSE__;
  if ((((__INTEGER_8 )Self__UBCJ) >= ((__INTEGER_8 )'a'))) {
    result__KUCJ=(((__INTEGER_8 )Self__UBCJ) <= ((__INTEGER_8 )'z'));
    __tmp__UUCJ=TRUE__;
  } else {
    __tmp__UUCJ=FALSE__;
  };
  if ((! __tmp__UUCJ)) {
    if ((((__INTEGER_8 )Self__UBCJ) >= ((__INTEGER_8 )'A'))) {
      result__KUCJ=(((__INTEGER_8 )Self__UBCJ) <= ((__INTEGER_8 )'Z'));
    };
  };
  return((result__KUCJ || is_digit__EWEB(Self__UBCJ)));
}

static __GET_TYPE_ID* create__receiver__HSWH(__POSITION p__JSWH,void *e__KSWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __GET_TYPE_ID *result__L2XH,*Self__5NFI;
  __POINTER ptr__M2XH;
  __INTEGER typ_id__R2XH;
  __UINTEGER_32 sz__O2XH,a__G21Q,new_size__E21Q,t__K21Q,a__M21Q;
  result__L2XH=NULL;
  ptr__M2XH=((__POINTER )(NULL));
  typ_id__R2XH= 0;
  sz__O2XH=((__UINTEGER_32 )sizeof(__GET_TYPE_ID));
  if ((sz__O2XH ==  0)) {
    result__L2XH=GET_TYPE_ID__;
  } else {
    typ_id__R2XH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__O2XH);
    if ((typ_id__R2XH == (__INTEGER)(-  1))) {
      a__G21Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__E21Q=(__UINTEGER_32)((__UINTEGER_32)(sz__O2XH + a__G21Q) & (__UINTEGER_32)(~ a__G21Q));
      ptr__M2XH=micro_alloc__table__lab__BOI(new_size__E21Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E21Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__E21Q);
    } else {
      t__K21Q=((__UINTEGER_32 )typ_id__R2XH);
      a__M21Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__M2XH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__O2XH + a__M21Q) & (__UINTEGER_32)(~ a__M21Q)),((__POINTER )(&(table_type[(t__K21Q)]))),(__UINTEGER_32)(t__K21Q |  1));
    };
    result__L2XH=((__GET_TYPE_ID *)ptr__M2XH);
    *(result__L2XH) = *(GET_TYPE_ID__);
  };
  Self__5NFI=((__GET_TYPE_ID *)result__L2XH);
  Self__5NFI->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__JSWH;
  Self__5NFI->receiver__XO2H=e__KSWH;
  return(result__L2XH);
}

static __EXPR_SUP* create__with__and__BTWH(__POSITION p__DTWH,void *l__ETWH,void *r__FTWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_SUP *result__33XH,*Self__EOFI;
  __POINTER ptr__43XH;
  __INTEGER typ_id__D4XH;
  __UINTEGER_32 sz__A4XH,a__R21Q,new_size__P21Q,t__V21Q,a__X21Q;
  result__33XH=NULL;
  ptr__43XH=((__POINTER )(NULL));
  typ_id__D4XH= 0;
  sz__A4XH=((__UINTEGER_32 )sizeof(__EXPR_SUP));
  if ((sz__A4XH ==  0)) {
    result__33XH=EXPR_SUP__;
  } else {
    typ_id__D4XH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__A4XH);
    if ((typ_id__D4XH == (__INTEGER)(-  1))) {
      a__R21Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__P21Q=(__UINTEGER_32)((__UINTEGER_32)(sz__A4XH + a__R21Q) & (__UINTEGER_32)(~ a__R21Q));
      ptr__43XH=micro_alloc__table__lab__BOI(new_size__P21Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P21Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__P21Q);
    } else {
      t__V21Q=((__UINTEGER_32 )typ_id__D4XH);
      a__X21Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__43XH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__A4XH + a__X21Q) & (__UINTEGER_32)(~ a__X21Q)),((__POINTER )(&(table_type[(t__V21Q)]))),(__UINTEGER_32)(t__V21Q |  1));
    };
    result__33XH=((__EXPR_SUP *)ptr__43XH);
    *(result__33XH) = *(EXPR_SUP__);
  };
  Self__EOFI=((__EXPR_SUP *)result__33XH);
  Self__EOFI->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__DTWH;
  Self__EOFI->parent_expr_binary_cmp__TAKH.left__HN2H=l__ETWH;
  Self__EOFI->parent_expr_binary_cmp__TAKH.right__LN2H=r__FTWH;
  return(result__33XH);
}

static __EXPR_SUB* create__with__and__2TWH(__POSITION p__4TWH,void *l__5TWH,void *r__AUWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_SUB *result__Q5XH,*Self__KOFI;
  __POINTER ptr__R5XH;
  __INTEGER typ_id__W5XH;
  __UINTEGER_32 sz__T5XH,a__221Q,new_size__021Q,t__A31Q,a__C31Q;
  result__Q5XH=NULL;
  ptr__R5XH=((__POINTER )(NULL));
  typ_id__W5XH= 0;
  sz__T5XH=((__UINTEGER_32 )sizeof(__EXPR_SUB));
  if ((sz__T5XH ==  0)) {
    result__Q5XH=EXPR_SUB__;
  } else {
    typ_id__W5XH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__T5XH);
    if ((typ_id__W5XH == (__INTEGER)(-  1))) {
      a__221Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__021Q=(__UINTEGER_32)((__UINTEGER_32)(sz__T5XH + a__221Q) & (__UINTEGER_32)(~ a__221Q));
      ptr__R5XH=micro_alloc__table__lab__BOI(new_size__021Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__021Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__021Q);
    } else {
      t__A31Q=((__UINTEGER_32 )typ_id__W5XH);
      a__C31Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__R5XH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__T5XH + a__C31Q) & (__UINTEGER_32)(~ a__C31Q)),((__POINTER )(&(table_type[(t__A31Q)]))),(__UINTEGER_32)(t__A31Q |  1));
    };
    result__Q5XH=((__EXPR_SUB *)ptr__R5XH);
    *(result__Q5XH) = *(EXPR_SUB__);
  };
  Self__KOFI=((__EXPR_SUB *)result__Q5XH);
  Self__KOFI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__4TWH;
  Self__KOFI->parent_expr_binary__HBKH.left__PP1H=l__5TWH;
  Self__KOFI->parent_expr_binary__HBKH.right__OP2H=r__AUWH;
  return(result__Q5XH);
}

static __EXPR_MUL* create__with__and__XUWH(__POSITION p__ZUWH,void *l__0UWH,void *r__1UWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_MUL *result__CBYH,*Self__QOFI;
  __POINTER ptr__DBYH;
  __INTEGER typ_id__IBYH;
  __UINTEGER_32 sz__FBYH,a__H31Q,new_size__F31Q,t__L31Q,a__N31Q;
  result__CBYH=NULL;
  ptr__DBYH=((__POINTER )(NULL));
  typ_id__IBYH= 0;
  sz__FBYH=((__UINTEGER_32 )sizeof(__EXPR_MUL));
  if ((sz__FBYH ==  0)) {
    result__CBYH=EXPR_MUL__;
  } else {
    typ_id__IBYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__FBYH);
    if ((typ_id__IBYH == (__INTEGER)(-  1))) {
      a__H31Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__F31Q=(__UINTEGER_32)((__UINTEGER_32)(sz__FBYH + a__H31Q) & (__UINTEGER_32)(~ a__H31Q));
      ptr__DBYH=micro_alloc__table__lab__BOI(new_size__F31Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F31Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__F31Q);
    } else {
      t__L31Q=((__UINTEGER_32 )typ_id__IBYH);
      a__N31Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__DBYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__FBYH + a__N31Q) & (__UINTEGER_32)(~ a__N31Q)),((__POINTER )(&(table_type[(t__L31Q)]))),(__UINTEGER_32)(t__L31Q |  1));
    };
    result__CBYH=((__EXPR_MUL *)ptr__DBYH);
    *(result__CBYH) = *(EXPR_MUL__);
  };
  Self__QOFI=((__EXPR_MUL *)result__CBYH);
  Self__QOFI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__ZUWH;
  Self__QOFI->parent_expr_binary__0BKH.left__PP1H=l__0UWH;
  Self__QOFI->parent_expr_binary__0BKH.right__OP2H=r__1UWH;
  return(result__CBYH);
}

static __EXPR_DIV* create__with__and__SVWH(__POSITION p__UVWH,void *l__VVWH,void *r__WVWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_DIV *result__UCYH,*Self__WOFI;
  __POINTER ptr__VCYH;
  __INTEGER typ_id__0CYH;
  __UINTEGER_32 sz__XCYH,a__S31Q,new_size__Q31Q,t__W31Q,a__Y31Q;
  result__UCYH=NULL;
  ptr__VCYH=((__POINTER )(NULL));
  typ_id__0CYH= 0;
  sz__XCYH=((__UINTEGER_32 )sizeof(__EXPR_DIV));
  if ((sz__XCYH ==  0)) {
    result__UCYH=EXPR_DIV__;
  } else {
    typ_id__0CYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__XCYH);
    if ((typ_id__0CYH == (__INTEGER)(-  1))) {
      a__S31Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__Q31Q=(__UINTEGER_32)((__UINTEGER_32)(sz__XCYH + a__S31Q) & (__UINTEGER_32)(~ a__S31Q));
      ptr__VCYH=micro_alloc__table__lab__BOI(new_size__Q31Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q31Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__Q31Q);
    } else {
      t__W31Q=((__UINTEGER_32 )typ_id__0CYH);
      a__Y31Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__VCYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__XCYH + a__Y31Q) & (__UINTEGER_32)(~ a__Y31Q)),((__POINTER )(&(table_type[(t__W31Q)]))),(__UINTEGER_32)(t__W31Q |  1));
    };
    result__UCYH=((__EXPR_DIV *)ptr__VCYH);
    *(result__UCYH) = *(EXPR_DIV__);
  };
  Self__WOFI=((__EXPR_DIV *)result__UCYH);
  Self__WOFI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__UVWH;
  Self__WOFI->parent_expr_binary__NCKH.left__PP1H=l__VVWH;
  Self__WOFI->parent_expr_binary__NCKH.right__OP2H=r__WVWH;
  return(result__UCYH);
}

static __EXPR_AND* create__with__and__NWWH(__POSITION p__PWWH,void *l__QWWH,void *r__RWWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_AND *result__GEYH,*Self__2OFI;
  __POINTER ptr__HEYH;
  __INTEGER typ_id__MEYH;
  __UINTEGER_32 sz__JEYH,a__331Q,new_size__131Q,t__B41Q,a__D41Q;
  result__GEYH=NULL;
  ptr__HEYH=((__POINTER )(NULL));
  typ_id__MEYH= 0;
  sz__JEYH=((__UINTEGER_32 )sizeof(__EXPR_AND));
  if ((sz__JEYH ==  0)) {
    result__GEYH=EXPR_AND__;
  } else {
    typ_id__MEYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__JEYH);
    if ((typ_id__MEYH == (__INTEGER)(-  1))) {
      a__331Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__131Q=(__UINTEGER_32)((__UINTEGER_32)(sz__JEYH + a__331Q) & (__UINTEGER_32)(~ a__331Q));
      ptr__HEYH=micro_alloc__table__lab__BOI(new_size__131Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__131Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__131Q);
    } else {
      t__B41Q=((__UINTEGER_32 )typ_id__MEYH);
      a__D41Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__HEYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__JEYH + a__D41Q) & (__UINTEGER_32)(~ a__D41Q)),((__POINTER )(&(table_type[(t__B41Q)]))),(__UINTEGER_32)(t__B41Q |  1));
    };
    result__GEYH=((__EXPR_AND *)ptr__HEYH);
    *(result__GEYH) = *(EXPR_AND__);
  };
  Self__2OFI=((__EXPR_AND *)result__GEYH);
  Self__2OFI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__PWWH;
  Self__2OFI->parent_expr_binary__ADKH.left__PP1H=l__QWWH;
  Self__2OFI->parent_expr_binary__ADKH.right__OP2H=r__RWWH;
  return(result__GEYH);
}

static __EXPR_SHIFT_R* create__with__and__IXWH(__POSITION p__KXWH,void *l__LXWH,void *r__MXWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_SHIFT_R *result__YFYH,*Self__CPFI;
  __POINTER ptr__ZFYH;
  __INTEGER typ_id__4FYH;
  __UINTEGER_32 sz__1FYH,a__I41Q,new_size__G41Q,t__M41Q,a__O41Q;
  result__YFYH=NULL;
  ptr__ZFYH=((__POINTER )(NULL));
  typ_id__4FYH= 0;
  sz__1FYH=((__UINTEGER_32 )sizeof(__EXPR_SHIFT_R));
  if ((sz__1FYH ==  0)) {
    result__YFYH=EXPR_SHIFT_R__;
  } else {
    typ_id__4FYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__1FYH);
    if ((typ_id__4FYH == (__INTEGER)(-  1))) {
      a__I41Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__G41Q=(__UINTEGER_32)((__UINTEGER_32)(sz__1FYH + a__I41Q) & (__UINTEGER_32)(~ a__I41Q));
      ptr__ZFYH=micro_alloc__table__lab__BOI(new_size__G41Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G41Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__G41Q);
    } else {
      t__M41Q=((__UINTEGER_32 )typ_id__4FYH);
      a__O41Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__ZFYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__1FYH + a__O41Q) & (__UINTEGER_32)(~ a__O41Q)),((__POINTER )(&(table_type[(t__M41Q)]))),(__UINTEGER_32)(t__M41Q |  1));
    };
    result__YFYH=((__EXPR_SHIFT_R *)ptr__ZFYH);
    *(result__YFYH) = *(EXPR_SHIFT_R__);
  };
  Self__CPFI=((__EXPR_SHIFT_R *)result__YFYH);
  Self__CPFI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__KXWH;
  Self__CPFI->parent_expr_binary__TDKH.left__PP1H=l__LXWH;
  Self__CPFI->parent_expr_binary__TDKH.right__OP2H=r__MXWH;
  return(result__YFYH);
}

static __EXPR_SHIFT_L* create__with__and__DYWH(__POSITION p__FYWH,void *l__GYWH,void *r__HYWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_SHIFT_L *result__KHYH,*Self__IPFI;
  __POINTER ptr__LHYH;
  __INTEGER typ_id__QHYH;
  __UINTEGER_32 sz__NHYH,a__T41Q,new_size__R41Q,t__X41Q,a__Z41Q;
  result__KHYH=NULL;
  ptr__LHYH=((__POINTER )(NULL));
  typ_id__QHYH= 0;
  sz__NHYH=((__UINTEGER_32 )sizeof(__EXPR_SHIFT_L));
  if ((sz__NHYH ==  0)) {
    result__KHYH=EXPR_SHIFT_L__;
  } else {
    typ_id__QHYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__NHYH);
    if ((typ_id__QHYH == (__INTEGER)(-  1))) {
      a__T41Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__R41Q=(__UINTEGER_32)((__UINTEGER_32)(sz__NHYH + a__T41Q) & (__UINTEGER_32)(~ a__T41Q));
      ptr__LHYH=micro_alloc__table__lab__BOI(new_size__R41Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__R41Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__R41Q);
    } else {
      t__X41Q=((__UINTEGER_32 )typ_id__QHYH);
      a__Z41Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__LHYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__NHYH + a__Z41Q) & (__UINTEGER_32)(~ a__Z41Q)),((__POINTER )(&(table_type[(t__X41Q)]))),(__UINTEGER_32)(t__X41Q |  1));
    };
    result__KHYH=((__EXPR_SHIFT_L *)ptr__LHYH);
    *(result__KHYH) = *(EXPR_SHIFT_L__);
  };
  Self__IPFI=((__EXPR_SHIFT_L *)result__KHYH);
  Self__IPFI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__FYWH;
  Self__IPFI->parent_expr_binary__GEKH.left__PP1H=l__GYWH;
  Self__IPFI->parent_expr_binary__GEKH.right__OP2H=r__HYWH;
  return(result__KHYH);
}

static __PUT_TO* create__base__index__value__DZWH(__POSITION p__FZWH,void *rec__GZWH,void *idx__HZWH,void *v__IZWH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __PUT_TO *result__2IYH,*Self__NPFI;
  __POINTER ptr__3IYH,ptr__PGAN;
  __INTEGER typ_id__CJYH,typ_id__UGAN,new_capacity__TSFN,__tmp__1TFN;
  __INTEGER __tmp__4YSN,Self__4Q4N;
  __UINTEGER_32 sz__5IYH,a__441Q,new_size__241Q,t__C51Q,a__E51Q;
  __UINTEGER_32 sz__RGAN,a__M51Q,new_size__K51Q,t__Q51Q,a__S51Q;
  void *__tmp__VPFI,*first_type__TPFI;
  void *__tmp__XPFI;
  void *__tmp__YPFI,*type_generic__SPFI;
  __TYPE_GENERIC *Self__IAZM;
  __FAST_ARRAYoPUT_TOo *result__OGAN,*Self__0JGN,*Self__RSFN;
  __BOOLEAN __tmp__CTFN;
  void **__tmp__0TFN,**new__LYSN;
  result__2IYH=NULL;
  ptr__3IYH=((__POINTER )(NULL));
  typ_id__CJYH= 0;
  sz__5IYH=((__UINTEGER_32 )sizeof(__PUT_TO));
  if ((sz__5IYH ==  0)) {
    result__2IYH=PUT_TO__;
  } else {
    typ_id__CJYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__5IYH);
    if ((typ_id__CJYH == (__INTEGER)(-  1))) {
      a__441Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__241Q=(__UINTEGER_32)((__UINTEGER_32)(sz__5IYH + a__441Q) & (__UINTEGER_32)(~ a__441Q));
      ptr__3IYH=micro_alloc__table__lab__BOI(new_size__241Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__241Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__241Q);
    } else {
      t__C51Q=((__UINTEGER_32 )typ_id__CJYH);
      a__E51Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__3IYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__5IYH + a__E51Q) & (__UINTEGER_32)(~ a__E51Q)),((__POINTER )(&(table_type[(t__C51Q)]))),(__UINTEGER_32)(t__C51Q |  1));
    };
    result__2IYH=((__PUT_TO *)ptr__3IYH);
    *(result__2IYH) = *(PUT_TO__);
  };
  Self__NPFI=((__PUT_TO *)result__2IYH);
  Self__NPFI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__FZWH;
  Self__NPFI->receiver__OR2H=rec__GZWH;
  Self__NPFI->index__SR2H=idx__HZWH;
  Self__NPFI->value__WR2H=v__IZWH;
  switch (((struct ___OBJ *)rec__GZWH)->__id) {
  case __LIST__: {
    __tmp__VPFI=static_type__GIQG(rec__GZWH);
  } break;
  case __STRING_CST__: {
    __tmp__VPFI=((__STRING_CST *)rec__GZWH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__VPFI=((__EXTERNAL_C *)rec__GZWH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__VPFI=((__PROTOTYPE_CST *)rec__GZWH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__VPFI=((__INTEGER_CST *)rec__GZWH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__VPFI=((__LOCAL *)((__READ_LOCAL *)rec__GZWH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__VPFI=static_type__0N1H(rec__GZWH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__VPFI=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__VPFI=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__VPFI=((__REAL_CST *)rec__GZWH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__VPFI=((__CHARACTER_CST *)rec__GZWH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__VPFI=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__VPFI=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__VPFI=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__VPFI=static_type__MP1H(rec__GZWH);
  } break;
  case __EXPR_MUL__: {
    __tmp__VPFI=static_type__SP1H(rec__GZWH);
  } break;
  case __EXPR_DIV__: {
    __tmp__VPFI=static_type__XP1H(rec__GZWH);
  } break;
  case __EXPR_AND__: {
    __tmp__VPFI=static_type__2P1H(rec__GZWH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__VPFI=static_type__BQ1H(rec__GZWH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__VPFI=static_type__GQ1H(rec__GZWH);
  } break;
  case __PUT_TO__: {
    __tmp__VPFI=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__VPFI=static_type__PQ1H(rec__GZWH);
  } break;
  case __SIZE_OF__: {
    __tmp__VPFI=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__VPFI=((__CAST *)rec__GZWH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__VPFI=static_type__GIKL(rec__GZWH);
  } break;
  case __READ_SLOT__: {
    __tmp__VPFI=((__SLOT_DATA *)((__READ_SLOT *)rec__GZWH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__VPFI=((__SLOT_DATA *)((__READ_GLOBAL *)rec__GZWH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__VPFI=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__VPFI=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__VPFI=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__VPFI=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__VPFI=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__VPFI=static_type__Z2IM(rec__GZWH);
  } break;
  case __EXPR_ADD__: {
    __tmp__VPFI=static_type__IXML(rec__GZWH);
  } break;
  case __EXPR_NOT__: {
    __tmp__VPFI=static_type__BTXM(rec__GZWH);
  } break;
  case __EXPR_MOD__: {
    __tmp__VPFI=static_type__5LEO(rec__GZWH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__VPFI=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__VPFI=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__VPFI=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__VPFI=static_type__NOPN(rec__GZWH);
  } break;
  case __EXPR_XOR__: {
    __tmp__VPFI=static_type__XCSO(rec__GZWH);
  } break;
  };
  __tmp__XPFI=((__TYPE_FULL *)__tmp__VPFI)->parent_type__KTL;
  if (__tmp__XPFI==NULL) {
    __tmp__YPFI=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__XPFI)->__id) {
    case __TYPE__: {
      __tmp__YPFI=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__YPFI=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__YPFI=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__YPFI=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__YPFI=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__YPFI=((void *)__tmp__XPFI);
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__YPFI=NULL;
    } break;
    }
  };
  type_generic__SPFI=__tmp__YPFI;
  first_type__TPFI=((void **)((__FAST_ARRAYoTYPE_FULLo *)((__TYPE_GENERIC *)__tmp__YPFI)->generic_list__3R2B)->parent_arrayed_collection__UUCB.storage__LZMB)[ 0];
  if (((! ((__UINTEGER_8)(((__TYPE_FULL *)first_type__TPFI)->flag__LTL &  1) !=  0)) || ((void *)((__TYPE_FULL *)first_type__TPFI)->parent_type__KTL == (void *)type_boolean__VJB))) {
    Self__IAZM=((__TYPE_GENERIC *)__tmp__YPFI);
    if (((void *)Self__IAZM->put_to_list__F1YM == (void *)NULL)) {
      result__OGAN=NULL;
      ptr__PGAN=((__POINTER )(NULL));
      typ_id__UGAN= 0;
      sz__RGAN=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPUT_TOo));
      if ((sz__RGAN ==  0)) {
        result__OGAN=FAST_ARRAYoPUT_TOo__;
      } else {
        typ_id__UGAN=__FAST_ARRAYoPUT_TOo__;
        clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__RGAN);
        if ((typ_id__UGAN == (__INTEGER)(-  1))) {
          a__M51Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          new_size__K51Q=(__UINTEGER_32)((__UINTEGER_32)(sz__RGAN + a__M51Q) & (__UINTEGER_32)(~ a__M51Q));
          ptr__PGAN=micro_alloc__table__lab__BOI(new_size__K51Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K51Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__K51Q);
        } else {
          t__Q51Q=((__UINTEGER_32 )typ_id__UGAN);
          a__S51Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
          ptr__PGAN=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__RGAN + a__S51Q) & (__UINTEGER_32)(~ a__S51Q)),((__POINTER )(&(table_type[(t__Q51Q)]))),(__UINTEGER_32)(t__Q51Q |  1));
        };
        result__OGAN=((__FAST_ARRAYoPUT_TOo *)ptr__PGAN);
        *(result__OGAN) = *(FAST_ARRAYoPUT_TOo__);
      };
      Self__0JGN=((__FAST_ARRAYoPUT_TOo *)result__OGAN);
      if ((Self__0JGN->parent_arrayed_collection__E1YM.capacity__VSFN <  16)) {
        Self__0JGN->parent_arrayed_collection__E1YM.storage__RTFN=create__F3KN( 16);
        Self__0JGN->parent_arrayed_collection__E1YM.capacity__VSFN= 16;
      };
      Self__0JGN->parent_arrayed_collection__E1YM.upper__01YM=(__INTEGER)(-  1);
      Self__IAZM->put_to_list__F1YM=result__OGAN;
    };
    Self__RSFN=((__FAST_ARRAYoPUT_TOo *)Self__IAZM->put_to_list__F1YM);
    new_capacity__TSFN= 0;
    if (((__INTEGER)(Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM +  1) <= (__INTEGER)(Self__RSFN->parent_arrayed_collection__E1YM.capacity__VSFN -  1))) {
      Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM=(__INTEGER)(Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM +  1);
      __tmp__CTFN=TRUE__;
    } else {
      __tmp__CTFN=FALSE__;
    };
    if ((! __tmp__CTFN)) {
      if ((Self__RSFN->parent_arrayed_collection__E1YM.capacity__VSFN ==  0)) {
        Self__RSFN->parent_arrayed_collection__E1YM.storage__RTFN=create__F3KN( 2);
        Self__RSFN->parent_arrayed_collection__E1YM.capacity__VSFN= 2;
        Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM= 0;
      } else {
        new_capacity__TSFN=(__INTEGER)(Self__RSFN->parent_arrayed_collection__E1YM.capacity__VSFN <<  1);
        __tmp__0TFN=Self__RSFN->parent_arrayed_collection__E1YM.storage__RTFN;
        __tmp__1TFN=Self__RSFN->parent_arrayed_collection__E1YM.capacity__VSFN;
        new__LYSN=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__0TFN)),((__UINTEGER_32 )(__INTEGER)(__tmp__1TFN * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__TSFN * ((__INTEGER )(sizeof(void *)))))));
        __tmp__4YSN=(__INTEGER)(new_capacity__TSFN -  1);
        Self__4Q4N=__tmp__1TFN;
        while ((Self__4Q4N <= __tmp__4YSN)) {
          new__LYSN[Self__4Q4N]=NULL;
          Self__4Q4N=(__INTEGER)(Self__4Q4N +  1);
        };
        Self__RSFN->parent_arrayed_collection__E1YM.storage__RTFN=new__LYSN;
        Self__RSFN->parent_arrayed_collection__E1YM.capacity__VSFN=new_capacity__TSFN;
        Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM=(__INTEGER)(Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM +  1);
      };
    };
    ((void **)Self__RSFN->parent_arrayed_collection__E1YM.storage__RTFN)[Self__RSFN->parent_arrayed_collection__E1YM.upper__01YM]=Self__NPFI;
  };
  return(result__2IYH);
}

static __ITEM* create__base__index__3ZWH(__POSITION p__5ZWH,void *rec__A0WH,void *idx__B0WH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __ITEM *result__OKYH,*Self__PQFI;
  __POINTER ptr__PKYH;
  __INTEGER typ_id__UKYH;
  __UINTEGER_32 sz__RKYH,a__X51Q,new_size__V51Q,t__151Q,a__351Q;
  result__OKYH=NULL;
  ptr__PKYH=((__POINTER )(NULL));
  typ_id__UKYH= 0;
  sz__RKYH=((__UINTEGER_32 )sizeof(__ITEM));
  if ((sz__RKYH ==  0)) {
    result__OKYH=ITEM__;
  } else {
    typ_id__UKYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__RKYH);
    if ((typ_id__UKYH == (__INTEGER)(-  1))) {
      a__X51Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__V51Q=(__UINTEGER_32)((__UINTEGER_32)(sz__RKYH + a__X51Q) & (__UINTEGER_32)(~ a__X51Q));
      ptr__PKYH=micro_alloc__table__lab__BOI(new_size__V51Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V51Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__V51Q);
    } else {
      t__151Q=((__UINTEGER_32 )typ_id__UKYH);
      a__351Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__PKYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__RKYH + a__351Q) & (__UINTEGER_32)(~ a__351Q)),((__POINTER )(&(table_type[(t__151Q)]))),(__UINTEGER_32)(t__151Q |  1));
    };
    result__OKYH=((__ITEM *)ptr__PKYH);
    *(result__OKYH) = *(ITEM__);
  };
  Self__PQFI=((__ITEM *)result__OKYH);
  Self__PQFI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__5ZWH;
  Self__PQFI->receiver__TQ1H=rec__A0WH;
  Self__PQFI->index__CS2H=idx__B0WH;
  return(result__OKYH);
}

static __SIZE_OF* create__receiver__A1WH(__POSITION p__C1WH,void *e__D1WH)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __SIZE_OF *result__AMYH,*Self__UQFI;
  __POINTER ptr__BMYH;
  __INTEGER typ_id__GMYH;
  __UINTEGER_32 sz__DMYH,a__CA2Q,new_size__AA2Q,t__GA2Q,a__IA2Q;
  result__AMYH=NULL;
  ptr__BMYH=((__POINTER )(NULL));
  typ_id__GMYH= 0;
  sz__DMYH=((__UINTEGER_32 )sizeof(__SIZE_OF));
  if ((sz__DMYH ==  0)) {
    result__AMYH=SIZE_OF__;
  } else {
    typ_id__GMYH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__DMYH);
    if ((typ_id__GMYH == (__INTEGER)(-  1))) {
      a__CA2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__AA2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__DMYH + a__CA2Q) & (__UINTEGER_32)(~ a__CA2Q));
      ptr__BMYH=micro_alloc__table__lab__BOI(new_size__AA2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AA2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__AA2Q);
    } else {
      t__GA2Q=((__UINTEGER_32 )typ_id__GMYH);
      a__IA2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__BMYH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__DMYH + a__IA2Q) & (__UINTEGER_32)(~ a__IA2Q)),((__POINTER )(&(table_type[(t__GA2Q)]))),(__UINTEGER_32)(t__GA2Q |  1));
    };
    result__AMYH=((__SIZE_OF *)ptr__BMYH);
    *(result__AMYH) = *(SIZE_OF__);
  };
  Self__UQFI=((__SIZE_OF *)result__AMYH);
  Self__UQFI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__C1WH;
  Self__UQFI->receiver__LS2H=e__D1WH;
  return(result__AMYH);
}

static void* lookup__SSTH()
// () With resultNo recursive, No inlinable.
{
  void *result__WSTH;
  __INTEGER j__XSTH;
  void **__tmp__DZ5Q;
  __BOOLEAN __tmp__WUTH;
  result__WSTH=NULL;
  j__XSTH=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.upper__TI4F;
  __tmp__DZ5Q=((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG;
  while ((! ((j__XSTH < stack_local_lower__AI4F) || ((void *)((__LOCAL *)((void **)__tmp__DZ5Q)[j__XSTH])->parent_variable__B2LC.parent_named__A2LC.name__1QB == (void *)(&__string_57))))) {
    j__XSTH=(__INTEGER)(j__XSTH -  1);
  };
  if ((j__XSTH >= stack_local_lower__AI4F)) {
    result__WSTH=((void **)((__FAST_ARRAYoLOCALo *)stack_local__RI4F)->parent_arrayed_collection__QI4F.storage__FXPG)[j__XSTH];
    if (((j__XSTH < ((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC])->local__CI4F) && (((__LOCAL *)result__WSTH)->parent_variable__B2LC.parent_named__A2LC.style__LDGC != '-'))) {
      context_extern__1OLH=result__WSTH;
    };
    __tmp__WUTH=TRUE__;
  } else {
    __tmp__WUTH=FALSE__;
  };
  if ((! __tmp__WUTH)) {
    if (((void *)profil_first__4PQC != (void *)NULL)) {
      result__WSTH=lookup__LLJM(profil_first__4PQC,(&__string_57));
      if ((((void *)result__WSTH != (void *)NULL) && ((void *)((__LOCAL *)result__WSTH)->parent_variable__B2LC.parent_named__A2LC.name__1QB != (void *)(&__string_57)))) {
        context_extern__1OLH=result__WSTH;
      };
    };
  };
  return(result__WSTH);
}

static void add_arg__to__in__for__block__R3OH(void *e__T3OH,__INTEGER idx__U3OH,void *args__V3OH,void *slot__W3OH,__BOOLEAN is_block_value__X3OH)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{INTEGER},{NULLxFAST_ARRAYoEXPRo},{NULLxSLOT_DATAxSLOT_CODE},{TRUExFALSE}) VoidNo recursive, No inlinable.
{
  __INTEGER count__Z3OH,__tmp__Z4OH;
  void *__tmp__13OH,*em__Y3OH;
  void *__tmp__W4OH,*__tmp__C5OH;
  void *__tmp__Y4OH,*__tmp__E5OH;
  __POSITION __tmp__F5OH,__tmp__G5OH,__tmp__55OH;
  __BOOLEAN __tmp__M5OH;
  count__Z3OH= 0;
  if (e__T3OH==NULL) {
    __tmp__13OH=NULL;
  } else {
    switch (((struct ___OBJ *)e__T3OH)->__id) {
    case __LIST__: {
      __tmp__13OH=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__13OH=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__13OH=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__13OH=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__13OH=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__13OH=((void *)e__T3OH);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__13OH=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__13OH=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__13OH=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__13OH=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__13OH=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__13OH=NULL;
    } break;
    case __ITEM__: {
      __tmp__13OH=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__13OH=NULL;
    } break;
    case __CAST__: {
      __tmp__13OH=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__13OH=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__13OH=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__13OH=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__13OH=NULL;
    } break;
    }
  };
  em__Y3OH=__tmp__13OH;
  if (((void *)__tmp__13OH != (void *)NULL)) {
    count__Z3OH=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__13OH)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH +  1);
    append_collection__53EI(args__V3OH,((__EXPR_MULTIPLE *)__tmp__13OH)->expr_list__VFMH);
  } else {
    count__Z3OH= 1;
    add_last__XSEI(args__V3OH,e__T3OH);
  };
  if (verify__JDAG) {
    if ((! is_block_value__X3OH)) {
      if (((struct ___OBJ *)slot__W3OH)->__id==__SLOT_DATA__) {
        __tmp__W4OH=((__SLOT *)((__SLOT_DATA *)slot__W3OH)->parent_slot__BJZD)->base_slot__P22F;
      } else {
        __tmp__W4OH=((__SLOT *)((__SLOT_CODE *)slot__W3OH)->parent_slot__Y22F)->base_slot__P22F;
      };
      __tmp__Y4OH=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__W4OH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[idx__U3OH];
      if (((struct ___OBJ *)__tmp__Y4OH)->__id==__ITM_ARG__) {
        __tmp__Z4OH= 1;
      } else {
        __tmp__Z4OH=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__Y4OH)->name__FH3D)->parent_arrayed_collection__VTFC.upper__RSSD +  1);
      };
      if ((__tmp__Z4OH != count__Z3OH)) {
        put_error__text__0AH( 1,(&__string_334));
        if (((struct ___OBJ *)slot__W3OH)->__id==__SLOT_DATA__) {
          __tmp__C5OH=((__SLOT *)((__SLOT_DATA *)slot__W3OH)->parent_slot__BJZD)->base_slot__P22F;
        } else {
          __tmp__C5OH=((__SLOT *)((__SLOT_CODE *)slot__W3OH)->parent_slot__Y22F)->base_slot__P22F;
        };
        __tmp__E5OH=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)((__ITM_SLOT *)__tmp__C5OH)->argument_list__BC2D)->parent_arrayed_collection__5GJD.storage__U41D)[idx__U3OH];
        if (((struct ___OBJ *)__tmp__E5OH)->__id==__ITM_ARG__) {
          __tmp__F5OH=((__ITM_ARG *)__tmp__E5OH)->parent_itm_argument__QECD.parent_itm_code__QXIC.position__BJM;
        } else {
          __tmp__F5OH=((__ITM_ARGS *)__tmp__E5OH)->parent_itm_argument__ZUSD.parent_itm_code__QXIC.position__BJM;
        };
        put_position__ECH(__tmp__F5OH);
        switch (((struct ___OBJ *)e__T3OH)->__id) {
        case __LIST__: {
          __tmp__G5OH=((__LIST *)e__T3OH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__G5OH=((__STRING_CST *)e__T3OH)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__G5OH=((__EXTERNAL_C *)e__T3OH)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__G5OH=((__PROTOTYPE_CST *)e__T3OH)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__G5OH=((__INTEGER_CST *)e__T3OH)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__G5OH=((__READ_LOCAL *)e__T3OH)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__G5OH=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__G5OH=((__EXPR_EQUAL *)e__T3OH)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__G5OH=((__EXPR_NOT_EQUAL *)e__T3OH)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__G5OH=((__REAL_CST *)e__T3OH)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__G5OH=((__CHARACTER_CST *)e__T3OH)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__G5OH=((__IS_EXPANDED *)e__T3OH)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__G5OH=((__GET_TYPE_ID *)e__T3OH)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__G5OH=((__EXPR_SUP *)e__T3OH)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__G5OH=((__EXPR_SUB *)e__T3OH)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__G5OH=((__EXPR_MUL *)e__T3OH)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__G5OH=((__EXPR_DIV *)e__T3OH)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__G5OH=((__EXPR_AND *)e__T3OH)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__G5OH=((__EXPR_SHIFT_R *)e__T3OH)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__G5OH=((__EXPR_SHIFT_L *)e__T3OH)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__G5OH=((__PUT_TO *)e__T3OH)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__G5OH=((__ITEM *)e__T3OH)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__G5OH=((__SIZE_OF *)e__T3OH)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__G5OH=((__CAST *)e__T3OH)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__G5OH=((__CALL_SLOT *)e__T3OH)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__G5OH=((__READ_SLOT *)e__T3OH)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__G5OH=((__READ_GLOBAL *)e__T3OH)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__G5OH=((__EXPR_NOT_LOGIC *)e__T3OH)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__G5OH=((__EXPR_OR_LOGIC *)e__T3OH)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__G5OH=((__EXPR_OR_OR_LOGIC *)e__T3OH)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__G5OH=((__EXPR_AND_LOGIC *)e__T3OH)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__G5OH=((__EXPR_AND_AND_LOGIC *)e__T3OH)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__G5OH=((__EXPR_NEG *)e__T3OH)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__G5OH=((__EXPR_ADD *)e__T3OH)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__G5OH=((__EXPR_NOT *)e__T3OH)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__G5OH=((__EXPR_MOD *)e__T3OH)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__G5OH=((__EXPR_SUP_EQ *)e__T3OH)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__G5OH=((__EXPR_INF *)e__T3OH)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__G5OH=((__EXPR_INF_EQ *)e__T3OH)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__G5OH=((__EXPR_OR *)e__T3OH)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__G5OH=((__EXPR_XOR *)e__T3OH)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        put_position__ECH(__tmp__G5OH);
        send_error__2FH();
      };
      __tmp__M5OH=TRUE__;
    } else {
      __tmp__M5OH=FALSE__;
    };
    if ((! __tmp__M5OH)) {
      if (((idx__U3OH ==  0) && (count__Z3OH !=  1))) {
        switch (((struct ___OBJ *)e__T3OH)->__id) {
        case __LIST__: {
          __tmp__55OH=((__LIST *)e__T3OH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __STRING_CST__: {
          __tmp__55OH=((__STRING_CST *)e__T3OH)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXTERNAL_C__: {
          __tmp__55OH=((__EXTERNAL_C *)e__T3OH)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__55OH=((__PROTOTYPE_CST *)e__T3OH)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __INTEGER_CST__: {
          __tmp__55OH=((__INTEGER_CST *)e__T3OH)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_LOCAL__: {
          __tmp__55OH=((__READ_LOCAL *)e__T3OH)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__55OH=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__55OH=((__EXPR_EQUAL *)e__T3OH)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__55OH=((__EXPR_NOT_EQUAL *)e__T3OH)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __REAL_CST__: {
          __tmp__55OH=((__REAL_CST *)e__T3OH)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CHARACTER_CST__: {
          __tmp__55OH=((__CHARACTER_CST *)e__T3OH)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __IS_EXPANDED__: {
          __tmp__55OH=((__IS_EXPANDED *)e__T3OH)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__55OH=((__GET_TYPE_ID *)e__T3OH)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP__: {
          __tmp__55OH=((__EXPR_SUP *)e__T3OH)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUB__: {
          __tmp__55OH=((__EXPR_SUB *)e__T3OH)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MUL__: {
          __tmp__55OH=((__EXPR_MUL *)e__T3OH)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_DIV__: {
          __tmp__55OH=((__EXPR_DIV *)e__T3OH)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND__: {
          __tmp__55OH=((__EXPR_AND *)e__T3OH)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__55OH=((__EXPR_SHIFT_R *)e__T3OH)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__55OH=((__EXPR_SHIFT_L *)e__T3OH)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __PUT_TO__: {
          __tmp__55OH=((__PUT_TO *)e__T3OH)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __ITEM__: {
          __tmp__55OH=((__ITEM *)e__T3OH)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __SIZE_OF__: {
          __tmp__55OH=((__SIZE_OF *)e__T3OH)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CAST__: {
          __tmp__55OH=((__CAST *)e__T3OH)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __CALL_SLOT__: {
          __tmp__55OH=((__CALL_SLOT *)e__T3OH)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_SLOT__: {
          __tmp__55OH=((__READ_SLOT *)e__T3OH)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __READ_GLOBAL__: {
          __tmp__55OH=((__READ_GLOBAL *)e__T3OH)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__55OH=((__EXPR_NOT_LOGIC *)e__T3OH)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__55OH=((__EXPR_OR_LOGIC *)e__T3OH)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__55OH=((__EXPR_OR_OR_LOGIC *)e__T3OH)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__55OH=((__EXPR_AND_LOGIC *)e__T3OH)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__55OH=((__EXPR_AND_AND_LOGIC *)e__T3OH)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NEG__: {
          __tmp__55OH=((__EXPR_NEG *)e__T3OH)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_ADD__: {
          __tmp__55OH=((__EXPR_ADD *)e__T3OH)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_NOT__: {
          __tmp__55OH=((__EXPR_NOT *)e__T3OH)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_MOD__: {
          __tmp__55OH=((__EXPR_MOD *)e__T3OH)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__55OH=((__EXPR_SUP_EQ *)e__T3OH)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF__: {
          __tmp__55OH=((__EXPR_INF *)e__T3OH)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__55OH=((__EXPR_INF_EQ *)e__T3OH)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_OR__: {
          __tmp__55OH=((__EXPR_OR *)e__T3OH)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        case __EXPR_XOR__: {
          __tmp__55OH=((__EXPR_XOR *)e__T3OH)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        } break;
        };
        put_error__text__0AH( 1,(&__string_474));
        put_position__ECH(__tmp__55OH);
        send_error__2FH();
      };
    };
  };
}

static __BOOLEAN is_cast__to__in__ZD0I(__TYPE_FULL *Self__0D0I,void *n__1D0I,void *t__2D0I,void *lst__3D0I)
// ({TYPE_FULL},{STRING_CONSTANT},{NULLxTYPE_FULL},{NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
{
  __INTEGER j__5D0I;
  void *old_self_up__BE0I;
  void *__tmp__VE0I,*__tmp__KF0I;
  void *__tmp__WE0I,*__tmp__M3EQ;
  __ITM_TYPE_STYLE *Self__L3EQ;
  __BOOLEAN result__AE0I,__tmp__ZE0I;
  j__5D0I= 0;
  result__AE0I=FALSE__;
  old_self_up__BE0I=NULL;
  if (((void *)lst__3D0I != (void *)NULL)) {
    old_self_up__BE0I=self_up__LKEF;
    self_up__LKEF=Self__0D0I->parent_type__KTL;
    j__5D0I= 0;
    while_do__INBJ:
    {
      if ((j__5D0I <= ((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3D0I)->parent_arrayed_collection__PIB.upper__BWK)) {
        __tmp__VE0I=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3D0I)->parent_arrayed_collection__PIB.storage__5WK)[j__5D0I];
        switch (((struct ___OBJ *)__tmp__VE0I)->__id) {
        case __ITM_TYPE_SIMPLE__: {
          if (((__ITM_TYPE_SIMPLE *)__tmp__VE0I)->to_run__2VK==0) {
            __tmp__WE0I=((__ITM_TYPE_SIMPLE *)__tmp__VE0I)->to_run__1VK;
          } else {
            __tmp__WE0I=to_run__XVK(__tmp__VE0I);
          };
        } break;
        case __ITM_TYPE_STYLE__: {
          if (((__ITM_TYPE_STYLE *)__tmp__VE0I)->to_run__V1IB==0) {
            __tmp__WE0I=((__ITM_TYPE_STYLE *)__tmp__VE0I)->to_run__U1IB;
          } else {
            Self__L3EQ=((__ITM_TYPE_STYLE *)__tmp__VE0I);
            __tmp__M3EQ=get__XUN(Self__L3EQ);
            Self__L3EQ->to_run__U1IB=__tmp__M3EQ;
            Self__L3EQ->to_run__V1IB=0;
            __tmp__WE0I=__tmp__M3EQ;
          };
        } break;
        case __ITM_TYPE_GENERIC__: {
          __tmp__WE0I=to_run__W1IB(__tmp__VE0I);
        } break;
        case __ITM_TYPE_SELF__: {
          __tmp__WE0I=to_run__MPXD();
        } break;
        case __ITM_TYPE_GENERIC_ELT__: {
          __tmp__WE0I=to_run__DKEF(__tmp__VE0I);
        } break;
        };
        __tmp__ZE0I=((void *)__tmp__WE0I != (void *)t__2D0I);
      } else {
        __tmp__ZE0I=FALSE__;
      };
      if (__tmp__ZE0I) {
        j__5D0I=(__INTEGER)(j__5D0I +  1);
        goto while_do__INBJ;
      };
    };
    self_up__LKEF=old_self_up__BE0I;
    if ((j__5D0I <= ((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3D0I)->parent_arrayed_collection__PIB.upper__BWK)) {
      result__AE0I=TRUE__;
      copy__BNK(last_cast_name__L42H,n__1D0I);
      __tmp__KF0I=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3D0I)->parent_arrayed_collection__PIB.storage__5WK)[j__5D0I];
      switch (((struct ___OBJ *)__tmp__KF0I)->__id) {
      case __ITM_TYPE_SIMPLE__: {
        append_cast_name_in__Y1CJ(__tmp__KF0I,last_cast_name__L42H);
      } break;
      case __ITM_TYPE_STYLE__: {
        append_cast_name_in__L2CJ(__tmp__KF0I,last_cast_name__L42H);
      } break;
      case __ITM_TYPE_GENERIC__: {
        append_cast_name_in__42CJ(__tmp__KF0I,last_cast_name__L42H);
      } break;
      case __ITM_TYPE_SELF__: {
        append_cast_name_in__T3CJ(__tmp__KF0I,last_cast_name__L42H);
      } break;
      case __ITM_TYPE_GENERIC_ELT__: {
        add_last__YPK(last_cast_name__L42H,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )'a') + ((__INTEGER_8 )((__ITM_TYPE_GENERIC_ELT *)__tmp__KF0I)->index__0E0D))))));
      } break;
      };
    };
  };
  return(result__AE0I);
}

static void init__SRFI(__LOCAL *Self__TRFI)
// ({LOCAL}) VoidNo recursive, No inlinable.
{
  void *int__WRFI,*__tmp__FSFI;
  void *val__URFI,*__tmp__VSFI;
  void *__tmp__1RFI;
  void *__tmp__2RFI;
  __INTEGER_CST *Self__JB2Q;
  void *__tmp__TSFI;
  __POSITION __tmp__USFI;
  int__WRFI=NULL;
  val__URFI=default_value__U1IH(Self__TRFI->parent_variable__B2LC.type__125F,Self__TRFI->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
  __tmp__1RFI=((__TYPE_FULL *)Self__TRFI->parent_variable__B2LC.type__125F)->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__1RFI)->__id) {
  case __TYPE__: {
    __tmp__2RFI=((__PROTOTYPE *)((__TYPE *)__tmp__1RFI)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__2RFI=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__2RFI=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__2RFI=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__2RFI=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__2RFI=((__TYPE_GENERIC *)__tmp__1RFI)->name__2R2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__2RFI=((__PROFIL_BLOCK *)__tmp__1RFI)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  if (is_integer__M4NI(__tmp__2RFI)) {
    if (val__URFI==NULL) {
      __tmp__FSFI=NULL;
    } else {
      switch (((struct ___OBJ *)val__URFI)->__id) {
      case __LIST__: {
        __tmp__FSFI=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__FSFI=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__FSFI=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__FSFI=((void *)val__URFI);
      } break;
      case __READ_LOCAL__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__FSFI=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__FSFI=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__FSFI=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__FSFI=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__FSFI=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__FSFI=NULL;
      } break;
      case __ITEM__: {
        __tmp__FSFI=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__FSFI=NULL;
      } break;
      case __CAST__: {
        __tmp__FSFI=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__FSFI=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__FSFI=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__FSFI=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__FSFI=NULL;
      } break;
      }
    };
    int__WRFI=__tmp__FSFI;
    if (((void *)__tmp__FSFI != (void *)NULL)) {
      Self__JB2Q=((__INTEGER_CST *)__tmp__FSFI);
      Self__JB2Q->parent_constant__P3LC.static_type__F4YD=Self__TRFI->parent_variable__B2LC.type__125F;
      check_type__RI5D(Self__JB2Q);
    };
  } else {
    __tmp__TSFI=Self__TRFI->parent_variable__B2LC.type__125F;
    __tmp__USFI=Self__TRFI->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
    switch (((struct ___OBJ *)val__URFI)->__id) {
    case __LIST__: {
      __tmp__VSFI=check_type__with__T5CN(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __STRING_CST__: {
      __tmp__VSFI=check_type__with__Q22H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXTERNAL_C__: {
      __tmp__VSFI=check_type__with__PF3H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VSFI=check_type__with__OO3H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __INTEGER_CST__: {
      __tmp__VSFI=check_type__with__NX3H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __READ_LOCAL__: {
      __tmp__VSFI=check_type__with__LEFJ(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VSFI=check_type__with__LA4H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VSFI=check_type__with__KJ4H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VSFI=check_type__with__JS4H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __REAL_CST__: {
      __tmp__VSFI=check_type__with__I14H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __CHARACTER_CST__: {
      __tmp__VSFI=check_type__with__HE5H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __IS_EXPANDED__: {
      __tmp__VSFI=check_type__with__FN5H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VSFI=check_type__with__DW5H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_SUP__: {
      __tmp__VSFI=check_type__with__C55H(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_SUB__: {
      __tmp__VSFI=check_type__with__BIAI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_MUL__: {
      __tmp__VSFI=check_type__with__ARAI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_DIV__: {
      __tmp__VSFI=check_type__with__5ZAI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_AND__: {
      __tmp__VSFI=check_type__with__4CBI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VSFI=check_type__with__3LBI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VSFI=check_type__with__2UBI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __PUT_TO__: {
      __tmp__VSFI=check_type__with__03BI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __ITEM__: {
      __tmp__VSFI=check_type__with__YGCI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __SIZE_OF__: {
      __tmp__VSFI=check_type__with__WPCI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __CAST__: {
      __tmp__VSFI=check_type__with__UYCI(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __CALL_SLOT__: {
      __tmp__VSFI=check_type__with__RIDN(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __READ_SLOT__: {
      __tmp__VSFI=check_type__with__VPKL(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __READ_GLOBAL__: {
      __tmp__VSFI=check_type__with__UYKL(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VSFI=check_type__with__IW2O(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VSFI=check_type__with__AYIO(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VSFI=check_type__with__IFSO(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VSFI=check_type__with__5AJO(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VSFI=check_type__with__IOSO(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_NEG__: {
      __tmp__VSFI=check_type__with__SVXM(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_ADD__: {
      __tmp__VSFI=check_type__with__R4XM(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_NOT__: {
      __tmp__VSFI=check_type__with__QRDN(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_MOD__: {
      __tmp__VSFI=check_type__with__4JJO(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VSFI=check_type__with__SQIP(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_INF__: {
      __tmp__VSFI=check_type__with__H52O(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VSFI=check_type__with__GI3O(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_OR__: {
      __tmp__VSFI=check_type__with__MZZN(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    case __EXPR_XOR__: {
      __tmp__VSFI=check_type__with__FR3O(val__URFI,__tmp__TSFI,__tmp__USFI);
    } break;
    };
    val__URFI=__tmp__VSFI;
  };
  add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,write__value__T5FH(Self__TRFI,Self__TRFI->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM,val__URFI));
}

static __WRITE_GLOBAL* my_copy__ILBN(__WRITE_GLOBAL *Self__JLBN)
// ({WRITE_GLOBAL}) With resultNo recursive, No inlinable.
{
  void *__tmp__NLBN,*__tmp__OLBN;
  __STRING_CST *Self__LDBQ;
  __PROTOTYPE_CST *Self__MDBQ;
  __INTEGER_CST *Self__NDBQ;
  __REAL_CST *Self__PDBQ;
  __CHARACTER_CST *Self__RDBQ;
  __IS_EXPANDED *Self__SDBQ;
  void *__tmp__SLBN;
  __WRITE_GLOBAL *__tmp__TLBN,*result__MLBN;
  __tmp__NLBN=Self__JLBN->parent_write__QBGH.value__HBEH;
  switch (((struct ___OBJ *)__tmp__NLBN)->__id) {
  case __LIST__: {
    __tmp__OLBN=my_copy__2HYM(__tmp__NLBN);
  } break;
  case __STRING_CST__: {
    Self__LDBQ=((__STRING_CST *)__tmp__NLBN);
    __tmp__OLBN=create__text__AUMH(Self__LDBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LDBQ->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__OLBN=my_copy__2K2H(__tmp__NLBN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__MDBQ=((__PROTOTYPE_CST *)__tmp__NLBN);
    __tmp__OLBN=create__type__CLQC(Self__MDBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MDBQ->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__NDBQ=((__INTEGER_CST *)__tmp__NLBN);
    __tmp__OLBN=create__value__type__DNQC(Self__NDBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NDBQ->value__PAZD,Self__NDBQ->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__OLBN=my_copy__OAFJ(__tmp__NLBN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__OLBN=my_copy__KM2H(__tmp__NLBN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__OLBN=my_copy__DN2H(__tmp__NLBN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__OLBN=my_copy__QN2H(__tmp__NLBN);
  } break;
  case __REAL_CST__: {
    Self__PDBQ=((__REAL_CST *)__tmp__NLBN);
    __tmp__OLBN=create__value__type__1SMH(Self__PDBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PDBQ->value__5N2H,Self__PDBQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__RDBQ=((__CHARACTER_CST *)__tmp__NLBN);
    __tmp__OLBN=create__char__WTMH(Self__RDBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RDBQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__SDBQ=((__IS_EXPANDED *)__tmp__NLBN);
    __tmp__OLBN=create__receiver__WRWH(Self__SDBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__SDBQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__OLBN=my_copy__TO2H(__tmp__NLBN);
  } break;
  case __EXPR_SUP__: {
    __tmp__OLBN=my_copy__2O2H(__tmp__NLBN);
  } break;
  case __EXPR_SUB__: {
    __tmp__OLBN=my_copy__HP2H(__tmp__NLBN);
  } break;
  case __EXPR_MUL__: {
    __tmp__OLBN=my_copy__TP2H(__tmp__NLBN);
  } break;
  case __EXPR_DIV__: {
    __tmp__OLBN=my_copy__4P2H(__tmp__NLBN);
  } break;
  case __EXPR_AND__: {
    __tmp__OLBN=my_copy__JQ2H(__tmp__NLBN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__OLBN=my_copy__UQ2H(__tmp__NLBN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__OLBN=my_copy__5Q2H(__tmp__NLBN);
  } break;
  case __PUT_TO__: {
    __tmp__OLBN=my_copy__KR2H(__tmp__NLBN);
  } break;
  case __ITEM__: {
    __tmp__OLBN=my_copy__1R2H(__tmp__NLBN);
  } break;
  case __SIZE_OF__: {
    __tmp__OLBN=my_copy__HS2H(__tmp__NLBN);
  } break;
  case __CAST__: {
    __tmp__OLBN=my_copy__QS2H(__tmp__NLBN);
  } break;
  case __CALL_SLOT__: {
    __tmp__OLBN=my_copy__PIYM(__tmp__NLBN);
  } break;
  case __READ_SLOT__: {
    __tmp__OLBN=my_copy__AVGK(__tmp__NLBN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__OLBN=my_copy__NVGK(__tmp__NLBN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__OLBN=my_copy__RFCN(__tmp__NLBN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__OLBN=my_copy__JMEO(__tmp__NLBN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__OLBN=my_copy__RTJO(__tmp__NLBN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__OLBN=my_copy__WMEO(__tmp__NLBN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__OLBN=my_copy__3TJO(__tmp__NLBN);
  } break;
  case __EXPR_NEG__: {
    __tmp__OLBN=my_copy__YEJM(__tmp__NLBN);
  } break;
  case __EXPR_ADD__: {
    __tmp__OLBN=my_copy__YRLL(__tmp__NLBN);
  } break;
  case __EXPR_NOT__: {
    __tmp__OLBN=my_copy__GLYM(__tmp__NLBN);
  } break;
  case __EXPR_MOD__: {
    __tmp__OLBN=my_copy__BNEO(__tmp__NLBN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__OLBN=my_copy__M3DP(__tmp__NLBN);
  } break;
  case __EXPR_INF__: {
    __tmp__OLBN=my_copy__PBSN(__tmp__NLBN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__OLBN=my_copy__0BSN(__tmp__NLBN);
  } break;
  case __EXPR_OR__: {
    __tmp__OLBN=my_copy__ZOPN(__tmp__NLBN);
  } break;
  case __EXPR_XOR__: {
    __tmp__OLBN=my_copy__CYSO(__tmp__NLBN);
  } break;
  };
  __tmp__SLBN=write_direct__with__value__05DH(((__SLOT_DATA *)Self__JLBN->global__4U1H),Self__JLBN->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM,NULL,__tmp__OLBN);
  if (__tmp__SLBN==NULL) {
    __tmp__TLBN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__SLBN)->__id) {
    case __WRITE_GLOBAL__: {
      __tmp__TLBN=((__WRITE_GLOBAL *)__tmp__SLBN);
    } break;
    case __WRITE_SLOT__: {
      __tmp__TLBN=NULL;
    } break;
    }
  };
  result__MLBN=__tmp__TLBN;
  return(__tmp__TLBN);
}

static __WRITE_SLOT* my_copy__ULBN(__WRITE_SLOT *Self__VLBN)
// ({WRITE_SLOT}) With resultNo recursive, No inlinable.
{
  void *__tmp__ZLBN,*__tmp__0LBN,*__tmp__3LBN,*__tmp__4LBN;
  __STRING_CST *Self__0DBQ,*Self__CEBQ;
  __PROTOTYPE_CST *Self__1DBQ,*Self__DEBQ;
  __INTEGER_CST *Self__2DBQ,*Self__EEBQ;
  __REAL_CST *Self__4DBQ,*Self__GEBQ;
  __CHARACTER_CST *Self__AEBQ,*Self__IEBQ;
  __IS_EXPANDED *Self__BEBQ,*Self__JEBQ;
  void *__tmp__1LBN;
  __POSITION __tmp__2LBN;
  void *__tmp__BMBN;
  __WRITE_SLOT *__tmp__CMBN,*result__YLBN;
  __tmp__ZLBN=Self__VLBN->parent_write__3BGH.value__HBEH;
  switch (((struct ___OBJ *)__tmp__ZLBN)->__id) {
  case __LIST__: {
    __tmp__0LBN=my_copy__2HYM(__tmp__ZLBN);
  } break;
  case __STRING_CST__: {
    Self__0DBQ=((__STRING_CST *)__tmp__ZLBN);
    __tmp__0LBN=create__text__AUMH(Self__0DBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0DBQ->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__0LBN=my_copy__2K2H(__tmp__ZLBN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__1DBQ=((__PROTOTYPE_CST *)__tmp__ZLBN);
    __tmp__0LBN=create__type__CLQC(Self__1DBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1DBQ->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__2DBQ=((__INTEGER_CST *)__tmp__ZLBN);
    __tmp__0LBN=create__value__type__DNQC(Self__2DBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2DBQ->value__PAZD,Self__2DBQ->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__0LBN=my_copy__OAFJ(__tmp__ZLBN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__0LBN=my_copy__KM2H(__tmp__ZLBN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__0LBN=my_copy__DN2H(__tmp__ZLBN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__0LBN=my_copy__QN2H(__tmp__ZLBN);
  } break;
  case __REAL_CST__: {
    Self__4DBQ=((__REAL_CST *)__tmp__ZLBN);
    __tmp__0LBN=create__value__type__1SMH(Self__4DBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4DBQ->value__5N2H,Self__4DBQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__AEBQ=((__CHARACTER_CST *)__tmp__ZLBN);
    __tmp__0LBN=create__char__WTMH(Self__AEBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__AEBQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__BEBQ=((__IS_EXPANDED *)__tmp__ZLBN);
    __tmp__0LBN=create__receiver__WRWH(Self__BEBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__BEBQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__0LBN=my_copy__TO2H(__tmp__ZLBN);
  } break;
  case __EXPR_SUP__: {
    __tmp__0LBN=my_copy__2O2H(__tmp__ZLBN);
  } break;
  case __EXPR_SUB__: {
    __tmp__0LBN=my_copy__HP2H(__tmp__ZLBN);
  } break;
  case __EXPR_MUL__: {
    __tmp__0LBN=my_copy__TP2H(__tmp__ZLBN);
  } break;
  case __EXPR_DIV__: {
    __tmp__0LBN=my_copy__4P2H(__tmp__ZLBN);
  } break;
  case __EXPR_AND__: {
    __tmp__0LBN=my_copy__JQ2H(__tmp__ZLBN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__0LBN=my_copy__UQ2H(__tmp__ZLBN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__0LBN=my_copy__5Q2H(__tmp__ZLBN);
  } break;
  case __PUT_TO__: {
    __tmp__0LBN=my_copy__KR2H(__tmp__ZLBN);
  } break;
  case __ITEM__: {
    __tmp__0LBN=my_copy__1R2H(__tmp__ZLBN);
  } break;
  case __SIZE_OF__: {
    __tmp__0LBN=my_copy__HS2H(__tmp__ZLBN);
  } break;
  case __CAST__: {
    __tmp__0LBN=my_copy__QS2H(__tmp__ZLBN);
  } break;
  case __CALL_SLOT__: {
    __tmp__0LBN=my_copy__PIYM(__tmp__ZLBN);
  } break;
  case __READ_SLOT__: {
    __tmp__0LBN=my_copy__AVGK(__tmp__ZLBN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__0LBN=my_copy__NVGK(__tmp__ZLBN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__0LBN=my_copy__RFCN(__tmp__ZLBN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__0LBN=my_copy__JMEO(__tmp__ZLBN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__0LBN=my_copy__RTJO(__tmp__ZLBN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__0LBN=my_copy__WMEO(__tmp__ZLBN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__0LBN=my_copy__3TJO(__tmp__ZLBN);
  } break;
  case __EXPR_NEG__: {
    __tmp__0LBN=my_copy__YEJM(__tmp__ZLBN);
  } break;
  case __EXPR_ADD__: {
    __tmp__0LBN=my_copy__YRLL(__tmp__ZLBN);
  } break;
  case __EXPR_NOT__: {
    __tmp__0LBN=my_copy__GLYM(__tmp__ZLBN);
  } break;
  case __EXPR_MOD__: {
    __tmp__0LBN=my_copy__BNEO(__tmp__ZLBN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__0LBN=my_copy__M3DP(__tmp__ZLBN);
  } break;
  case __EXPR_INF__: {
    __tmp__0LBN=my_copy__PBSN(__tmp__ZLBN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__0LBN=my_copy__0BSN(__tmp__ZLBN);
  } break;
  case __EXPR_OR__: {
    __tmp__0LBN=my_copy__ZOPN(__tmp__ZLBN);
  } break;
  case __EXPR_XOR__: {
    __tmp__0LBN=my_copy__CYSO(__tmp__ZLBN);
  } break;
  };
  __tmp__1LBN=Self__VLBN->slot__5T1H;
  __tmp__2LBN=Self__VLBN->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
  __tmp__3LBN=Self__VLBN->receiver__HU1H;
  switch (((struct ___OBJ *)__tmp__3LBN)->__id) {
  case __LIST__: {
    __tmp__4LBN=my_copy__2HYM(__tmp__3LBN);
  } break;
  case __STRING_CST__: {
    Self__CEBQ=((__STRING_CST *)__tmp__3LBN);
    __tmp__4LBN=create__text__AUMH(Self__CEBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CEBQ->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__4LBN=my_copy__2K2H(__tmp__3LBN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__DEBQ=((__PROTOTYPE_CST *)__tmp__3LBN);
    __tmp__4LBN=create__type__CLQC(Self__DEBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DEBQ->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__EEBQ=((__INTEGER_CST *)__tmp__3LBN);
    __tmp__4LBN=create__value__type__DNQC(Self__EEBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EEBQ->value__PAZD,Self__EEBQ->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__4LBN=my_copy__OAFJ(__tmp__3LBN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4LBN=my_copy__KM2H(__tmp__3LBN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4LBN=my_copy__DN2H(__tmp__3LBN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4LBN=my_copy__QN2H(__tmp__3LBN);
  } break;
  case __REAL_CST__: {
    Self__GEBQ=((__REAL_CST *)__tmp__3LBN);
    __tmp__4LBN=create__value__type__1SMH(Self__GEBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GEBQ->value__5N2H,Self__GEBQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__IEBQ=((__CHARACTER_CST *)__tmp__3LBN);
    __tmp__4LBN=create__char__WTMH(Self__IEBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__IEBQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__JEBQ=((__IS_EXPANDED *)__tmp__3LBN);
    __tmp__4LBN=create__receiver__WRWH(Self__JEBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__JEBQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__4LBN=my_copy__TO2H(__tmp__3LBN);
  } break;
  case __EXPR_SUP__: {
    __tmp__4LBN=my_copy__2O2H(__tmp__3LBN);
  } break;
  case __EXPR_SUB__: {
    __tmp__4LBN=my_copy__HP2H(__tmp__3LBN);
  } break;
  case __EXPR_MUL__: {
    __tmp__4LBN=my_copy__TP2H(__tmp__3LBN);
  } break;
  case __EXPR_DIV__: {
    __tmp__4LBN=my_copy__4P2H(__tmp__3LBN);
  } break;
  case __EXPR_AND__: {
    __tmp__4LBN=my_copy__JQ2H(__tmp__3LBN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4LBN=my_copy__UQ2H(__tmp__3LBN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4LBN=my_copy__5Q2H(__tmp__3LBN);
  } break;
  case __PUT_TO__: {
    __tmp__4LBN=my_copy__KR2H(__tmp__3LBN);
  } break;
  case __ITEM__: {
    __tmp__4LBN=my_copy__1R2H(__tmp__3LBN);
  } break;
  case __SIZE_OF__: {
    __tmp__4LBN=my_copy__HS2H(__tmp__3LBN);
  } break;
  case __CAST__: {
    __tmp__4LBN=my_copy__QS2H(__tmp__3LBN);
  } break;
  case __CALL_SLOT__: {
    __tmp__4LBN=my_copy__PIYM(__tmp__3LBN);
  } break;
  case __READ_SLOT__: {
    __tmp__4LBN=my_copy__AVGK(__tmp__3LBN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__4LBN=my_copy__NVGK(__tmp__3LBN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4LBN=my_copy__RFCN(__tmp__3LBN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4LBN=my_copy__JMEO(__tmp__3LBN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4LBN=my_copy__RTJO(__tmp__3LBN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4LBN=my_copy__WMEO(__tmp__3LBN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4LBN=my_copy__3TJO(__tmp__3LBN);
  } break;
  case __EXPR_NEG__: {
    __tmp__4LBN=my_copy__YEJM(__tmp__3LBN);
  } break;
  case __EXPR_ADD__: {
    __tmp__4LBN=my_copy__YRLL(__tmp__3LBN);
  } break;
  case __EXPR_NOT__: {
    __tmp__4LBN=my_copy__GLYM(__tmp__3LBN);
  } break;
  case __EXPR_MOD__: {
    __tmp__4LBN=my_copy__BNEO(__tmp__3LBN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4LBN=my_copy__M3DP(__tmp__3LBN);
  } break;
  case __EXPR_INF__: {
    __tmp__4LBN=my_copy__PBSN(__tmp__3LBN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4LBN=my_copy__0BSN(__tmp__3LBN);
  } break;
  case __EXPR_OR__: {
    __tmp__4LBN=my_copy__ZOPN(__tmp__3LBN);
  } break;
  case __EXPR_XOR__: {
    __tmp__4LBN=my_copy__CYSO(__tmp__3LBN);
  } break;
  };
  __tmp__BMBN=write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__1LBN),__tmp__2LBN,__tmp__4LBN,__tmp__0LBN);
  if (__tmp__BMBN==NULL) {
    __tmp__CMBN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__BMBN)->__id) {
    case __WRITE_GLOBAL__: {
      __tmp__CMBN=NULL;
    } break;
    case __WRITE_SLOT__: {
      __tmp__CMBN=((__WRITE_SLOT *)__tmp__BMBN);
    } break;
    }
  };
  result__YLBN=__tmp__CMBN;
  return(__tmp__CMBN);
}

static __WRITE_LOCAL* my_copy__GMBN(__WRITE_LOCAL *Self__HMBN)
// ({WRITE_LOCAL}) With resultNo recursive, No inlinable.
{
  void *__tmp__LMBN,*__tmp__MMBN;
  __STRING_CST *Self__OEBQ;
  __PROTOTYPE_CST *Self__PEBQ;
  __INTEGER_CST *Self__QEBQ;
  __REAL_CST *Self__SEBQ;
  __CHARACTER_CST *Self__UEBQ;
  __IS_EXPANDED *Self__VEBQ;
  void *__tmp__QMBN;
  __WRITE_LOCAL *__tmp__RMBN,*result__KMBN;
  __tmp__LMBN=Self__HMBN->parent_write__X50I.value__HBEH;
  switch (((struct ___OBJ *)__tmp__LMBN)->__id) {
  case __LIST__: {
    __tmp__MMBN=my_copy__2HYM(__tmp__LMBN);
  } break;
  case __STRING_CST__: {
    Self__OEBQ=((__STRING_CST *)__tmp__LMBN);
    __tmp__MMBN=create__text__AUMH(Self__OEBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OEBQ->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__MMBN=my_copy__2K2H(__tmp__LMBN);
  } break;
  case __PROTOTYPE_CST__: {
    Self__PEBQ=((__PROTOTYPE_CST *)__tmp__LMBN);
    __tmp__MMBN=create__type__CLQC(Self__PEBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PEBQ->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__QEBQ=((__INTEGER_CST *)__tmp__LMBN);
    __tmp__MMBN=create__value__type__DNQC(Self__QEBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QEBQ->value__PAZD,Self__QEBQ->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__MMBN=my_copy__OAFJ(__tmp__LMBN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MMBN=my_copy__KM2H(__tmp__LMBN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MMBN=my_copy__DN2H(__tmp__LMBN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MMBN=my_copy__QN2H(__tmp__LMBN);
  } break;
  case __REAL_CST__: {
    Self__SEBQ=((__REAL_CST *)__tmp__LMBN);
    __tmp__MMBN=create__value__type__1SMH(Self__SEBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SEBQ->value__5N2H,Self__SEBQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__UEBQ=((__CHARACTER_CST *)__tmp__LMBN);
    __tmp__MMBN=create__char__WTMH(Self__UEBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UEBQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__VEBQ=((__IS_EXPANDED *)__tmp__LMBN);
    __tmp__MMBN=create__receiver__WRWH(Self__VEBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__VEBQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__MMBN=my_copy__TO2H(__tmp__LMBN);
  } break;
  case __EXPR_SUP__: {
    __tmp__MMBN=my_copy__2O2H(__tmp__LMBN);
  } break;
  case __EXPR_SUB__: {
    __tmp__MMBN=my_copy__HP2H(__tmp__LMBN);
  } break;
  case __EXPR_MUL__: {
    __tmp__MMBN=my_copy__TP2H(__tmp__LMBN);
  } break;
  case __EXPR_DIV__: {
    __tmp__MMBN=my_copy__4P2H(__tmp__LMBN);
  } break;
  case __EXPR_AND__: {
    __tmp__MMBN=my_copy__JQ2H(__tmp__LMBN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MMBN=my_copy__UQ2H(__tmp__LMBN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MMBN=my_copy__5Q2H(__tmp__LMBN);
  } break;
  case __PUT_TO__: {
    __tmp__MMBN=my_copy__KR2H(__tmp__LMBN);
  } break;
  case __ITEM__: {
    __tmp__MMBN=my_copy__1R2H(__tmp__LMBN);
  } break;
  case __SIZE_OF__: {
    __tmp__MMBN=my_copy__HS2H(__tmp__LMBN);
  } break;
  case __CAST__: {
    __tmp__MMBN=my_copy__QS2H(__tmp__LMBN);
  } break;
  case __CALL_SLOT__: {
    __tmp__MMBN=my_copy__PIYM(__tmp__LMBN);
  } break;
  case __READ_SLOT__: {
    __tmp__MMBN=my_copy__AVGK(__tmp__LMBN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__MMBN=my_copy__NVGK(__tmp__LMBN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MMBN=my_copy__RFCN(__tmp__LMBN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MMBN=my_copy__JMEO(__tmp__LMBN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MMBN=my_copy__RTJO(__tmp__LMBN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MMBN=my_copy__WMEO(__tmp__LMBN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MMBN=my_copy__3TJO(__tmp__LMBN);
  } break;
  case __EXPR_NEG__: {
    __tmp__MMBN=my_copy__YEJM(__tmp__LMBN);
  } break;
  case __EXPR_ADD__: {
    __tmp__MMBN=my_copy__YRLL(__tmp__LMBN);
  } break;
  case __EXPR_NOT__: {
    __tmp__MMBN=my_copy__GLYM(__tmp__LMBN);
  } break;
  case __EXPR_MOD__: {
    __tmp__MMBN=my_copy__BNEO(__tmp__LMBN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MMBN=my_copy__M3DP(__tmp__LMBN);
  } break;
  case __EXPR_INF__: {
    __tmp__MMBN=my_copy__PBSN(__tmp__LMBN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MMBN=my_copy__0BSN(__tmp__LMBN);
  } break;
  case __EXPR_OR__: {
    __tmp__MMBN=my_copy__ZOPN(__tmp__LMBN);
  } break;
  case __EXPR_XOR__: {
    __tmp__MMBN=my_copy__CYSO(__tmp__LMBN);
  } break;
  };
  __tmp__QMBN=write__value__T5FH(Self__HMBN->local__2RIJ,Self__HMBN->parent_write__X50I.parent_instr__H4OG.parent_itm_object__TE.position__BJM,__tmp__MMBN);
  if (__tmp__QMBN==NULL) {
    __tmp__RMBN=NULL;
  } else {
    __tmp__RMBN=((__WRITE_LOCAL *)__tmp__QMBN);
  };
  result__KMBN=__tmp__RMBN;
  return(__tmp__RMBN);
}

static __LOOP* create__name__body__UHAM(__POSITION p__WHAM,void *lab__XHAM,void *lst__YHAM)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxLIST}) With resultNo recursive, No inlinable.
{
  __LOOP *result__I0BM,*Self__5HLM;
  __POINTER ptr__J0BM;
  __INTEGER typ_id__O0BM;
  __UINTEGER_32 sz__L0BM,a__NB2Q,new_size__LB2Q,t__RB2Q,a__TB2Q;
  result__I0BM=NULL;
  ptr__J0BM=((__POINTER )(NULL));
  typ_id__O0BM= 0;
  sz__L0BM=((__UINTEGER_32 )sizeof(__LOOP));
  if ((sz__L0BM ==  0)) {
    result__I0BM=LOOP__;
  } else {
    typ_id__O0BM=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__L0BM);
    if ((typ_id__O0BM == (__INTEGER)(-  1))) {
      a__NB2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__LB2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__L0BM + a__NB2Q) & (__UINTEGER_32)(~ a__NB2Q));
      ptr__J0BM=micro_alloc__table__lab__BOI(new_size__LB2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LB2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LB2Q);
    } else {
      t__RB2Q=((__UINTEGER_32 )typ_id__O0BM);
      a__TB2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__J0BM=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__L0BM + a__TB2Q) & (__UINTEGER_32)(~ a__TB2Q)),((__POINTER )(&(table_type[(t__RB2Q)]))),(__UINTEGER_32)(t__RB2Q |  1));
    };
    result__I0BM=((__LOOP *)ptr__J0BM);
    *(result__I0BM) = *(LOOP__);
  };
  Self__5HLM=((__LOOP *)result__I0BM);
  Self__5HLM->parent_instr__QKAL.parent_itm_object__TE.position__BJM=p__WHAM;
  Self__5HLM->name__DILM=lab__XHAM;
  Self__5HLM->body__5ALM=lst__YHAM;
  return(result__I0BM);
}

static __LOOP_END* create__loop__CJHM(__POSITION p__EJHM,void *l__FJHM)
// ({POSITION},{NULLxLOOP}) With resultNo recursive, No inlinable.
{
  __LOOP_END *result__S0HM,*Self__2WLM;
  __POINTER ptr__T0HM;
  __INTEGER typ_id__Y0HM;
  __UINTEGER_32 sz__V0HM,a__YB2Q,new_size__WB2Q,t__2B2Q,a__4B2Q;
  __LOOP *Self__0JMM;
  result__S0HM=NULL;
  ptr__T0HM=((__POINTER )(NULL));
  typ_id__Y0HM= 0;
  sz__V0HM=((__UINTEGER_32 )sizeof(__LOOP_END));
  if ((sz__V0HM ==  0)) {
    result__S0HM=LOOP_END__;
  } else {
    typ_id__Y0HM=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__V0HM);
    if ((typ_id__Y0HM == (__INTEGER)(-  1))) {
      a__YB2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__WB2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__V0HM + a__YB2Q) & (__UINTEGER_32)(~ a__YB2Q));
      ptr__T0HM=micro_alloc__table__lab__BOI(new_size__WB2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WB2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__WB2Q);
    } else {
      t__2B2Q=((__UINTEGER_32 )typ_id__Y0HM);
      a__4B2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__T0HM=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__V0HM + a__4B2Q) & (__UINTEGER_32)(~ a__4B2Q)),((__POINTER )(&(table_type[(t__2B2Q)]))),(__UINTEGER_32)(t__2B2Q |  1));
    };
    result__S0HM=((__LOOP_END *)ptr__T0HM);
    *(result__S0HM) = *(LOOP_END__);
  };
  Self__2WLM=((__LOOP_END *)result__S0HM);
  Self__2WLM->parent_instr__G12L.parent_itm_object__TE.position__BJM=p__EJHM;
  Self__2WLM->loop__5WLM=l__FJHM;
  Self__0JMM=((__LOOP *)l__FJHM);
  Self__0JMM->link_count__YALM=(__INTEGER)(Self__0JMM->link_count__YALM +  1);
  return(result__S0HM);
}

static __CALL_SLOT* clone__EBZI(__CALL_SLOT *Self__FBZI)
// ({CALL_SLOT}) With resultNo recursive, No inlinable.
{
  __CALL_SLOT *result__HBZI;
  __POINTER ptr__IBZI;
  __INTEGER typ_id__NBZI;
  __UINTEGER_32 sz__KBZI,a__HC2Q,new_size__FC2Q,t__LC2Q,a__NC2Q;
  result__HBZI=NULL;
  ptr__IBZI=((__POINTER )(NULL));
  typ_id__NBZI= 0;
  sz__KBZI=((__UINTEGER_32 )sizeof(__CALL_SLOT));
  if ((sz__KBZI ==  0)) {
    result__HBZI=Self__FBZI;
  } else {
    typ_id__NBZI=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__KBZI);
    if ((typ_id__NBZI == (__INTEGER)(-  1))) {
      a__HC2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__FC2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__KBZI + a__HC2Q) & (__UINTEGER_32)(~ a__HC2Q));
      ptr__IBZI=micro_alloc__table__lab__BOI(new_size__FC2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FC2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__FC2Q);
    } else {
      t__LC2Q=((__UINTEGER_32 )typ_id__NBZI);
      a__NC2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__IBZI=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__KBZI + a__NC2Q) & (__UINTEGER_32)(~ a__NC2Q)),((__POINTER )(&(table_type[(t__LC2Q)]))),(__UINTEGER_32)(t__LC2Q |  1));
    };
    result__HBZI=((__CALL_SLOT *)ptr__IBZI);
    *(result__HBZI) = *(Self__FBZI);
  };
  return(result__HBZI);
}

static void link__DALJ(__PROFIL_BLOCK *Self__EALJ)
// ({PROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__B00J,Self__VR3J;
  void *__tmp__MALJ,*__tmp__NALJ;
  __LINKED_LISToNODE_TYPEo *Self__WZ0J;
  if ((Self__EALJ->parent_profil__GHAG.link_count__FALJ ==  0)) {
    __tmp__MALJ=node_list__PMQC;
    __tmp__NALJ=Self__EALJ->node_list__OJEI;
    Self__WZ0J=((__LINKED_LISToNODE_TYPEo *)__tmp__MALJ);
    __tmp__B00J=((__LINKED_LISToNODE_TYPEo *)__tmp__NALJ)->parent_linked_collection__OMQC.upper__ZCID;
    Self__VR3J= 1;
    while ((Self__VR3J <= __tmp__B00J)) {
      add_last__I4YD(Self__WZ0J,item__00SE(__tmp__NALJ,Self__VR3J));
      Self__VR3J=(__INTEGER)(Self__VR3J +  1);
    };
  };
  Self__EALJ->parent_profil__GHAG.link_count__FALJ=(__INTEGER)(Self__EALJ->parent_profil__GHAG.link_count__FALJ +  1);
}

static __EXPR_NOT_LOGIC* create__with__BQNM(__POSITION p__DQNM,void *r__EQNM)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_NOT_LOGIC *result__VYQM,*Self__5X0M;
  __POINTER ptr__WYQM;
  __INTEGER typ_id__1YQM;
  __UINTEGER_32 sz__YYQM,a__TC2Q,new_size__RC2Q,t__XC2Q,a__ZC2Q;
  result__VYQM=NULL;
  ptr__WYQM=((__POINTER )(NULL));
  typ_id__1YQM= 0;
  sz__YYQM=((__UINTEGER_32 )sizeof(__EXPR_NOT_LOGIC));
  if ((sz__YYQM ==  0)) {
    result__VYQM=EXPR_NOT_LOGIC__;
  } else {
    typ_id__1YQM=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__YYQM);
    if ((typ_id__1YQM == (__INTEGER)(-  1))) {
      a__TC2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__RC2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__YYQM + a__TC2Q) & (__UINTEGER_32)(~ a__TC2Q));
      ptr__WYQM=micro_alloc__table__lab__BOI(new_size__RC2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RC2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__RC2Q);
    } else {
      t__XC2Q=((__UINTEGER_32 )typ_id__1YQM);
      a__ZC2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__WYQM=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__YYQM + a__ZC2Q) & (__UINTEGER_32)(~ a__ZC2Q)),((__POINTER )(&(table_type[(t__XC2Q)]))),(__UINTEGER_32)(t__XC2Q |  1));
    };
    result__VYQM=((__EXPR_NOT_LOGIC *)ptr__WYQM);
    *(result__VYQM) = *(EXPR_NOT_LOGIC__);
  };
  Self__5X0M=((__EXPR_NOT_LOGIC *)result__VYQM);
  Self__5X0M->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=p__DQNM;
  Self__5X0M->parent_expr_unary_logic__0EUK.right__AQZM=r__EQNM;
  return(result__VYQM);
}

static __EXPR_OR_LOGIC* create__with__and__2TDO(__POSITION p__4TDO,void *l__5TDO,void *r__AUDO)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_OR_LOGIC *result__BZDO,*Self__OSGO;
  __POINTER ptr__CZDO;
  __INTEGER typ_id__HZDO;
  __UINTEGER_32 sz__EZDO,a__4C2Q,new_size__2C2Q,t__CD2Q,a__ED2Q;
  result__BZDO=NULL;
  ptr__CZDO=((__POINTER )(NULL));
  typ_id__HZDO= 0;
  sz__EZDO=((__UINTEGER_32 )sizeof(__EXPR_OR_LOGIC));
  if ((sz__EZDO ==  0)) {
    result__BZDO=EXPR_OR_LOGIC__;
  } else {
    typ_id__HZDO=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__EZDO);
    if ((typ_id__HZDO == (__INTEGER)(-  1))) {
      a__4C2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__2C2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__EZDO + a__4C2Q) & (__UINTEGER_32)(~ a__4C2Q));
      ptr__CZDO=micro_alloc__table__lab__BOI(new_size__2C2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2C2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__2C2Q);
    } else {
      t__CD2Q=((__UINTEGER_32 )typ_id__HZDO);
      a__ED2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__CZDO=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__EZDO + a__ED2Q) & (__UINTEGER_32)(~ a__ED2Q)),((__POINTER )(&(table_type[(t__CD2Q)]))),(__UINTEGER_32)(t__CD2Q |  1));
    };
    result__BZDO=((__EXPR_OR_LOGIC *)ptr__CZDO);
    *(result__BZDO) = *(EXPR_OR_LOGIC__);
  };
  Self__OSGO=((__EXPR_OR_LOGIC *)result__BZDO);
  Self__OSGO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=p__4TDO;
  Self__OSGO->parent_expr_binary_logic__WHCL.left__NMEO=l__5TDO;
  Self__OSGO->parent_expr_binary_logic__WHCL.right__RMEO=r__AUDO;
  return(result__BZDO);
}

static __EXPR_OR_OR_LOGIC* create__with__and__0BIO(__POSITION p__2BIO,void *l__3BIO,void *r__4BIO)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_OR_OR_LOGIC *result__XGIO,*Self__UEOO;
  __POINTER ptr__YGIO;
  __INTEGER typ_id__3GIO;
  __UINTEGER_32 sz__0GIO,a__JD2Q,new_size__HD2Q,t__ND2Q,a__PD2Q;
  result__XGIO=NULL;
  ptr__YGIO=((__POINTER )(NULL));
  typ_id__3GIO= 0;
  sz__0GIO=((__UINTEGER_32 )sizeof(__EXPR_OR_OR_LOGIC));
  if ((sz__0GIO ==  0)) {
    result__XGIO=EXPR_OR_OR_LOGIC__;
  } else {
    typ_id__3GIO=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__0GIO);
    if ((typ_id__3GIO == (__INTEGER)(-  1))) {
      a__JD2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__HD2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__0GIO + a__JD2Q) & (__UINTEGER_32)(~ a__JD2Q));
      ptr__YGIO=micro_alloc__table__lab__BOI(new_size__HD2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HD2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HD2Q);
    } else {
      t__ND2Q=((__UINTEGER_32 )typ_id__3GIO);
      a__PD2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__YGIO=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__0GIO + a__PD2Q) & (__UINTEGER_32)(~ a__PD2Q)),((__POINTER )(&(table_type[(t__ND2Q)]))),(__UINTEGER_32)(t__ND2Q |  1));
    };
    result__XGIO=((__EXPR_OR_OR_LOGIC *)ptr__YGIO);
    *(result__XGIO) = *(EXPR_OR_OR_LOGIC__);
  };
  Self__UEOO=((__EXPR_OR_OR_LOGIC *)result__XGIO);
  Self__UEOO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=p__2BIO;
  Self__UEOO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO=l__3BIO;
  Self__UEOO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO=r__4BIO;
  return(result__XGIO);
}

static __EXPR_AND_LOGIC* create__with__and__B3DO(__POSITION p__D3DO,void *l__E3DO,void *r__F3DO)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_AND_LOGIC *result__HFEO,*Self__XSGO;
  __POINTER ptr__IFEO;
  __INTEGER typ_id__NFEO;
  __UINTEGER_32 sz__KFEO,a__UD2Q,new_size__SD2Q,t__YD2Q,a__0D2Q;
  result__HFEO=NULL;
  ptr__IFEO=((__POINTER )(NULL));
  typ_id__NFEO= 0;
  sz__KFEO=((__UINTEGER_32 )sizeof(__EXPR_AND_LOGIC));
  if ((sz__KFEO ==  0)) {
    result__HFEO=EXPR_AND_LOGIC__;
  } else {
    typ_id__NFEO=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__KFEO);
    if ((typ_id__NFEO == (__INTEGER)(-  1))) {
      a__UD2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__SD2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__KFEO + a__UD2Q) & (__UINTEGER_32)(~ a__UD2Q));
      ptr__IFEO=micro_alloc__table__lab__BOI(new_size__SD2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SD2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__SD2Q);
    } else {
      t__YD2Q=((__UINTEGER_32 )typ_id__NFEO);
      a__0D2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__IFEO=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__KFEO + a__0D2Q) & (__UINTEGER_32)(~ a__0D2Q)),((__POINTER )(&(table_type[(t__YD2Q)]))),(__UINTEGER_32)(t__YD2Q |  1));
    };
    result__HFEO=((__EXPR_AND_LOGIC *)ptr__IFEO);
    *(result__HFEO) = *(EXPR_AND_LOGIC__);
  };
  Self__XSGO=((__EXPR_AND_LOGIC *)result__HFEO);
  Self__XSGO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=p__D3DO;
  Self__XSGO->parent_expr_binary_logic__WJCL.left__NMEO=l__E3DO;
  Self__XSGO->parent_expr_binary_logic__WJCL.right__RMEO=r__F3DO;
  return(result__HFEO);
}

static __EXPR_AND_AND_LOGIC* create__with__and__MCIO(__POSITION p__OCIO,void *l__PCIO,void *r__QCIO)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_AND_AND_LOGIC *result__KIIO,*Self__1EOO;
  __POINTER ptr__LIIO;
  __INTEGER typ_id__QIIO;
  __UINTEGER_32 sz__NIIO,a__5D2Q,new_size__3D2Q,t__DE2Q,a__FE2Q;
  result__KIIO=NULL;
  ptr__LIIO=((__POINTER )(NULL));
  typ_id__QIIO= 0;
  sz__NIIO=((__UINTEGER_32 )sizeof(__EXPR_AND_AND_LOGIC));
  if ((sz__NIIO ==  0)) {
    result__KIIO=EXPR_AND_AND_LOGIC__;
  } else {
    typ_id__QIIO=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__NIIO);
    if ((typ_id__QIIO == (__INTEGER)(-  1))) {
      a__5D2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__3D2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__NIIO + a__5D2Q) & (__UINTEGER_32)(~ a__5D2Q));
      ptr__LIIO=micro_alloc__table__lab__BOI(new_size__3D2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3D2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__3D2Q);
    } else {
      t__DE2Q=((__UINTEGER_32 )typ_id__QIIO);
      a__FE2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__LIIO=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__NIIO + a__FE2Q) & (__UINTEGER_32)(~ a__FE2Q)),((__POINTER )(&(table_type[(t__DE2Q)]))),(__UINTEGER_32)(t__DE2Q |  1));
    };
    result__KIIO=((__EXPR_AND_AND_LOGIC *)ptr__LIIO);
    *(result__KIIO) = *(EXPR_AND_AND_LOGIC__);
  };
  Self__1EOO=((__EXPR_AND_AND_LOGIC *)result__KIIO);
  Self__1EOO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=p__OCIO;
  Self__1EOO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO=l__PCIO;
  Self__1EOO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO=r__QCIO;
  return(result__KIIO);
}

static __EXPR_NEG* create__with__2RBM(__POSITION p__4RBM,void *r__5RBM)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_NEG *result__SSCM,*Self__UKLM;
  __POINTER ptr__TSCM;
  __INTEGER typ_id__YSCM;
  __UINTEGER_32 sz__VSCM,a__KE2Q,new_size__IE2Q,t__OE2Q,a__QE2Q;
  result__SSCM=NULL;
  ptr__TSCM=((__POINTER )(NULL));
  typ_id__YSCM= 0;
  sz__VSCM=((__UINTEGER_32 )sizeof(__EXPR_NEG));
  if ((sz__VSCM ==  0)) {
    result__SSCM=EXPR_NEG__;
  } else {
    typ_id__YSCM=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__VSCM);
    if ((typ_id__YSCM == (__INTEGER)(-  1))) {
      a__KE2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__IE2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__VSCM + a__KE2Q) & (__UINTEGER_32)(~ a__KE2Q));
      ptr__TSCM=micro_alloc__table__lab__BOI(new_size__IE2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IE2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__IE2Q);
    } else {
      t__OE2Q=((__UINTEGER_32 )typ_id__YSCM);
      a__QE2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__TSCM=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__VSCM + a__QE2Q) & (__UINTEGER_32)(~ a__QE2Q)),((__POINTER )(&(table_type[(t__OE2Q)]))),(__UINTEGER_32)(t__OE2Q |  1));
    };
    result__SSCM=((__EXPR_NEG *)ptr__TSCM);
    *(result__SSCM) = *(EXPR_NEG__);
  };
  Self__UKLM=((__EXPR_NEG *)result__SSCM);
  Self__UKLM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=p__4RBM;
  Self__UKLM->parent_expr_unary__JZDL.right__XZDL=r__5RBM;
  return(result__SSCM);
}

static __EXPR_ADD* create__with__and__TUHL(__POSITION p__VUHL,void *l__WUHL,void *r__XUHL)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_ADD *result__LJIL,*Self__TNPL;
  __POINTER ptr__MJIL;
  __INTEGER typ_id__RJIL;
  __UINTEGER_32 sz__OJIL,a__VE2Q,new_size__TE2Q,t__ZE2Q,a__1E2Q;
  result__LJIL=NULL;
  ptr__MJIL=((__POINTER )(NULL));
  typ_id__RJIL= 0;
  sz__OJIL=((__UINTEGER_32 )sizeof(__EXPR_ADD));
  if ((sz__OJIL ==  0)) {
    result__LJIL=EXPR_ADD__;
  } else {
    typ_id__RJIL=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__OJIL);
    if ((typ_id__RJIL == (__INTEGER)(-  1))) {
      a__VE2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__TE2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__OJIL + a__VE2Q) & (__UINTEGER_32)(~ a__VE2Q));
      ptr__MJIL=micro_alloc__table__lab__BOI(new_size__TE2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TE2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__TE2Q);
    } else {
      t__ZE2Q=((__UINTEGER_32 )typ_id__RJIL);
      a__1E2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__MJIL=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__OJIL + a__1E2Q) & (__UINTEGER_32)(~ a__1E2Q)),((__POINTER )(&(table_type[(t__ZE2Q)]))),(__UINTEGER_32)(t__ZE2Q |  1));
    };
    result__LJIL=((__EXPR_ADD *)ptr__MJIL);
    *(result__LJIL) = *(EXPR_ADD__);
  };
  Self__TNPL=((__EXPR_ADD *)result__LJIL);
  Self__TNPL->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__VUHL;
  Self__TNPL->parent_expr_binary__UZDL.left__PP1H=l__WUHL;
  Self__TNPL->parent_expr_binary__UZDL.right__OP2H=r__XUHL;
  return(result__LJIL);
}

static __EXPR_NOT* create__with__0YVM(__POSITION p__2YVM,void *r__3YVM)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_NOT *result__ZPWM,*Self__S20M;
  __POINTER ptr__0PWM;
  __INTEGER typ_id__5PWM;
  __UINTEGER_32 sz__2PWM,a__AF2Q,new_size__4E2Q,t__EF2Q,a__GF2Q;
  result__ZPWM=NULL;
  ptr__0PWM=((__POINTER )(NULL));
  typ_id__5PWM= 0;
  sz__2PWM=((__UINTEGER_32 )sizeof(__EXPR_NOT));
  if ((sz__2PWM ==  0)) {
    result__ZPWM=EXPR_NOT__;
  } else {
    typ_id__5PWM=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__2PWM);
    if ((typ_id__5PWM == (__INTEGER)(-  1))) {
      a__AF2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__4E2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__2PWM + a__AF2Q) & (__UINTEGER_32)(~ a__AF2Q));
      ptr__0PWM=micro_alloc__table__lab__BOI(new_size__4E2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4E2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__4E2Q);
    } else {
      t__EF2Q=((__UINTEGER_32 )typ_id__5PWM);
      a__GF2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__0PWM=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__2PWM + a__GF2Q) & (__UINTEGER_32)(~ a__GF2Q)),((__POINTER )(&(table_type[(t__EF2Q)]))),(__UINTEGER_32)(t__EF2Q |  1));
    };
    result__ZPWM=((__EXPR_NOT *)ptr__0PWM);
    *(result__ZPWM) = *(EXPR_NOT__);
  };
  Self__S20M=((__EXPR_NOT *)result__ZPWM);
  Self__S20M->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=p__2YVM;
  Self__S20M->parent_expr_unary__M5VL.right__XZDL=r__3YVM;
  return(result__ZPWM);
}

static __EXPR_MOD* create__with__and__ZCCO(__POSITION p__1CCO,void *l__2CCO,void *r__3CCO)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_MOD *result__FSCO,*Self__SRGO;
  __POINTER ptr__GSCO;
  __INTEGER typ_id__LSCO;
  __UINTEGER_32 sz__ISCO,a__LF2Q,new_size__JF2Q,t__PF2Q,a__RF2Q;
  result__FSCO=NULL;
  ptr__GSCO=((__POINTER )(NULL));
  typ_id__LSCO= 0;
  sz__ISCO=((__UINTEGER_32 )sizeof(__EXPR_MOD));
  if ((sz__ISCO ==  0)) {
    result__FSCO=EXPR_MOD__;
  } else {
    typ_id__LSCO=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__ISCO);
    if ((typ_id__LSCO == (__INTEGER)(-  1))) {
      a__LF2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__JF2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__ISCO + a__LF2Q) & (__UINTEGER_32)(~ a__LF2Q));
      ptr__GSCO=micro_alloc__table__lab__BOI(new_size__JF2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JF2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__JF2Q);
    } else {
      t__PF2Q=((__UINTEGER_32 )typ_id__LSCO);
      a__RF2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__GSCO=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__ISCO + a__RF2Q) & (__UINTEGER_32)(~ a__RF2Q)),((__POINTER )(&(table_type[(t__PF2Q)]))),(__UINTEGER_32)(t__PF2Q |  1));
    };
    result__FSCO=((__EXPR_MOD *)ptr__GSCO);
    *(result__FSCO) = *(EXPR_MOD__);
  };
  Self__SRGO=((__EXPR_MOD *)result__FSCO);
  Self__SRGO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__1CCO;
  Self__SRGO->parent_expr_binary__PDWL.left__PP1H=l__2CCO;
  Self__SRGO->parent_expr_binary__PDWL.right__OP2H=r__3CCO;
  return(result__FSCO);
}

static __EXPR_SUP_EQ* create__with__and__4LAP(__POSITION p__AMAP,void *l__BMAP,void *r__CMAP)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_SUP_EQ *result__INBP,*Self__HIFP;
  __POINTER ptr__JNBP;
  __INTEGER typ_id__ONBP;
  __UINTEGER_32 sz__LNBP,a__WF2Q,new_size__UF2Q,t__0F2Q,a__2F2Q;
  result__INBP=NULL;
  ptr__JNBP=((__POINTER )(NULL));
  typ_id__ONBP= 0;
  sz__LNBP=((__UINTEGER_32 )sizeof(__EXPR_SUP_EQ));
  if ((sz__LNBP ==  0)) {
    result__INBP=EXPR_SUP_EQ__;
  } else {
    typ_id__ONBP=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__LNBP);
    if ((typ_id__ONBP == (__INTEGER)(-  1))) {
      a__WF2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__UF2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__LNBP + a__WF2Q) & (__UINTEGER_32)(~ a__WF2Q));
      ptr__JNBP=micro_alloc__table__lab__BOI(new_size__UF2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UF2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__UF2Q);
    } else {
      t__0F2Q=((__UINTEGER_32 )typ_id__ONBP);
      a__2F2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__JNBP=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__LNBP + a__2F2Q) & (__UINTEGER_32)(~ a__2F2Q)),((__POINTER )(&(table_type[(t__0F2Q)]))),(__UINTEGER_32)(t__0F2Q |  1));
    };
    result__INBP=((__EXPR_SUP_EQ *)ptr__JNBP);
    *(result__INBP) = *(EXPR_SUP_EQ__);
  };
  Self__HIFP=((__EXPR_SUP_EQ *)result__INBP);
  Self__HIFP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__AMAP;
  Self__HIFP->parent_expr_binary_cmp__EP1M.left__HN2H=l__BMAP;
  Self__HIFP->parent_expr_binary_cmp__EP1M.right__LN2H=r__CMAP;
  return(result__INBP);
}

static __EXPR_INF* create__with__and__LOKN(__POSITION p__NOKN,void *l__OOKN,void *r__POKN)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_INF *result__4YMN,*Self__2USN;
  __POINTER ptr__5YMN;
  __INTEGER typ_id__EZMN;
  __UINTEGER_32 sz__BZMN,a__BG2Q,new_size__5F2Q,t__FG2Q,a__HG2Q;
  result__4YMN=NULL;
  ptr__5YMN=((__POINTER )(NULL));
  typ_id__EZMN= 0;
  sz__BZMN=((__UINTEGER_32 )sizeof(__EXPR_INF));
  if ((sz__BZMN ==  0)) {
    result__4YMN=EXPR_INF__;
  } else {
    typ_id__EZMN=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__BZMN);
    if ((typ_id__EZMN == (__INTEGER)(-  1))) {
      a__BG2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__5F2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__BZMN + a__BG2Q) & (__UINTEGER_32)(~ a__BG2Q));
      ptr__5YMN=micro_alloc__table__lab__BOI(new_size__5F2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5F2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__5F2Q);
    } else {
      t__FG2Q=((__UINTEGER_32 )typ_id__EZMN);
      a__HG2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__5YMN=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__BZMN + a__HG2Q) & (__UINTEGER_32)(~ a__HG2Q)),((__POINTER )(&(table_type[(t__FG2Q)]))),(__UINTEGER_32)(t__FG2Q |  1));
    };
    result__4YMN=((__EXPR_INF *)ptr__5YMN);
    *(result__4YMN) = *(EXPR_INF__);
  };
  Self__2USN=((__EXPR_INF *)result__4YMN);
  Self__2USN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__NOKN;
  Self__2USN->parent_expr_binary_cmp__WQ1M.left__HN2H=l__OOKN;
  Self__2USN->parent_expr_binary_cmp__WQ1M.right__LN2H=r__POKN;
  return(result__4YMN);
}

static __EXPR_INF_EQ* create__with__and__1OKN(__POSITION p__3OKN,void *l__4OKN,void *r__5OKN)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_INF_EQ *result__Q0MN,*Self__CVSN;
  __POINTER ptr__R0MN;
  __INTEGER typ_id__W0MN;
  __UINTEGER_32 sz__T0MN,a__MG2Q,new_size__KG2Q,t__QG2Q,a__SG2Q;
  result__Q0MN=NULL;
  ptr__R0MN=((__POINTER )(NULL));
  typ_id__W0MN= 0;
  sz__T0MN=((__UINTEGER_32 )sizeof(__EXPR_INF_EQ));
  if ((sz__T0MN ==  0)) {
    result__Q0MN=EXPR_INF_EQ__;
  } else {
    typ_id__W0MN=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__T0MN);
    if ((typ_id__W0MN == (__INTEGER)(-  1))) {
      a__MG2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__KG2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__T0MN + a__MG2Q) & (__UINTEGER_32)(~ a__MG2Q));
      ptr__R0MN=micro_alloc__table__lab__BOI(new_size__KG2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KG2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__KG2Q);
    } else {
      t__QG2Q=((__UINTEGER_32 )typ_id__W0MN);
      a__SG2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__R0MN=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__T0MN + a__SG2Q) & (__UINTEGER_32)(~ a__SG2Q)),((__POINTER )(&(table_type[(t__QG2Q)]))),(__UINTEGER_32)(t__QG2Q |  1));
    };
    result__Q0MN=((__EXPR_INF_EQ *)ptr__R0MN);
    *(result__Q0MN) = *(EXPR_INF_EQ__);
  };
  Self__CVSN=((__EXPR_INF_EQ *)result__Q0MN);
  Self__CVSN->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__3OKN;
  Self__CVSN->parent_expr_binary_cmp__MR1M.left__HN2H=l__4OKN;
  Self__CVSN->parent_expr_binary_cmp__MR1M.right__LN2H=r__5OKN;
  return(result__Q0MN);
}

static __EXPR_OR* create__with__and__UNJN(__POSITION p__WNJN,void *l__XNJN,void *r__YNJN)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_OR *result__J4KN,*Self__XOSN;
  __POINTER ptr__K4KN;
  __INTEGER typ_id__P4KN;
  __UINTEGER_32 sz__M4KN,a__XG2Q,new_size__VG2Q,t__1G2Q,a__3G2Q;
  result__J4KN=NULL;
  ptr__K4KN=((__POINTER )(NULL));
  typ_id__P4KN= 0;
  sz__M4KN=((__UINTEGER_32 )sizeof(__EXPR_OR));
  if ((sz__M4KN ==  0)) {
    result__J4KN=EXPR_OR__;
  } else {
    typ_id__P4KN=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__M4KN);
    if ((typ_id__P4KN == (__INTEGER)(-  1))) {
      a__XG2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__VG2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__M4KN + a__XG2Q) & (__UINTEGER_32)(~ a__XG2Q));
      ptr__K4KN=micro_alloc__table__lab__BOI(new_size__VG2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VG2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__VG2Q);
    } else {
      t__1G2Q=((__UINTEGER_32 )typ_id__P4KN);
      a__3G2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__K4KN=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__M4KN + a__3G2Q) & (__UINTEGER_32)(~ a__3G2Q)),((__POINTER )(&(table_type[(t__1G2Q)]))),(__UINTEGER_32)(t__1G2Q |  1));
    };
    result__J4KN=((__EXPR_OR *)ptr__K4KN);
    *(result__J4KN) = *(EXPR_OR__);
  };
  Self__XOSN=((__EXPR_OR *)result__J4KN);
  Self__XOSN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__WNJN;
  Self__XOSN->parent_expr_binary__ET1M.left__PP1H=l__XNJN;
  Self__XOSN->parent_expr_binary__ET1M.right__OP2H=r__YNJN;
  return(result__J4KN);
}

static __EXPR_XOR* create__with__and__D5PO(__POSITION p__F5PO,void *l__G5PO,void *r__H5PO)
// ({POSITION},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __EXPR_XOR *result__EZQO,*Self__N0XO;
  __POINTER ptr__FZQO;
  __INTEGER typ_id__KZQO;
  __UINTEGER_32 sz__HZQO,a__CH2Q,new_size__AH2Q,t__GH2Q,a__IH2Q;
  result__EZQO=NULL;
  ptr__FZQO=((__POINTER )(NULL));
  typ_id__KZQO= 0;
  sz__HZQO=((__UINTEGER_32 )sizeof(__EXPR_XOR));
  if ((sz__HZQO ==  0)) {
    result__EZQO=EXPR_XOR__;
  } else {
    typ_id__KZQO=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__HZQO);
    if ((typ_id__KZQO == (__INTEGER)(-  1))) {
      a__CH2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__AH2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__HZQO + a__CH2Q) & (__UINTEGER_32)(~ a__CH2Q));
      ptr__FZQO=micro_alloc__table__lab__BOI(new_size__AH2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AH2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__AH2Q);
    } else {
      t__GH2Q=((__UINTEGER_32 )typ_id__KZQO);
      a__IH2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__FZQO=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__HZQO + a__IH2Q) & (__UINTEGER_32)(~ a__IH2Q)),((__POINTER )(&(table_type[(t__GH2Q)]))),(__UINTEGER_32)(t__GH2Q |  1));
    };
    result__EZQO=((__EXPR_XOR *)ptr__FZQO);
    *(result__EZQO) = *(EXPR_XOR__);
  };
  Self__N0XO=((__EXPR_XOR *)result__EZQO);
  Self__N0XO->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=p__F5PO;
  Self__N0XO->parent_expr_binary__UA5N.left__PP1H=l__G5PO;
  Self__N0XO->parent_expr_binary__UA5N.right__OP2H=r__H5PO;
  return(result__EZQO);
}

static void** create__Q5YK(__INTEGER nb_elements__S5YK)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__CVRL;
  void **Result__X21K;
  Result__X21K=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__S5YK * ((__INTEGER )(sizeof(void *)))))));
  Self__CVRL=(__INTEGER)(nb_elements__S5YK -  1);
  while ((Self__CVRL >=  0)) {
    Result__X21K[Self__CVRL]=NULL;
    Self__CVRL=(__INTEGER)(Self__CVRL -  1);
  };
  return(Result__X21K);
}

static void** create__SVXI(__INTEGER nb_elements__UVXI)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__OELJ;
  void **Result__X41I;
  Result__X41I=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__UVXI * ((__INTEGER )(sizeof(void *)))))));
  Self__OELJ=(__INTEGER)(nb_elements__UVXI -  1);
  while ((Self__OELJ >=  0)) {
    Result__X41I[Self__OELJ]=NULL;
    Self__OELJ=(__INTEGER)(Self__OELJ -  1);
  };
  return(Result__X41I);
}

static void unlink__ZVQL(__PROFIL_SLOT *Self__0VQL)
// ({PROFIL_SLOT}) VoidNo recursive, No inlinable.
{
  Self__0VQL->parent_profil__51LC.link_count__FALJ=(__INTEGER)(Self__0VQL->parent_profil__51LC.link_count__FALJ -  1);
  if (((Self__0VQL->parent_profil__51LC.link_count__FALJ ==  0) && (Self__0VQL->parent_profil__51LC.life_index__01RI != (__INTEGER)(-  1)))) {
    unset_life__UXBM(Self__0VQL);
  };
}

static void unlink__XWQL(__PROFIL_BLOCK *Self__YWQL)
// ({PROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  Self__YWQL->parent_profil__GHAG.link_count__FALJ=(__INTEGER)(Self__YWQL->parent_profil__GHAG.link_count__FALJ -  1);
  if (((Self__YWQL->parent_profil__GHAG.link_count__FALJ ==  0) && (Self__YWQL->parent_profil__GHAG.life_index__01RI != (__INTEGER)(-  1)))) {
    unset_life__UXBM(Self__YWQL);
  };
}

static void* read_direct__with__4AVI(__LOCAL *Self__5AVI)
// ({LOCAL}) With resultNo recursive, No inlinable.
{
  __POSITION __tmp__EBVI;
  __READ_LOCAL *result__U55I,*Self__MRIJ;
  __POINTER ptr__V55I;
  __INTEGER typ_id__055I;
  __UINTEGER_32 sz__X55I,a__OH2Q,new_size__MH2Q,t__SH2Q,a__UH2Q;
  __tmp__EBVI=Self__5AVI->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM;
  result__U55I=NULL;
  ptr__V55I=((__POINTER )(NULL));
  typ_id__055I= 0;
  sz__X55I=((__UINTEGER_32 )sizeof(__READ_LOCAL));
  if ((sz__X55I ==  0)) {
    result__U55I=READ_LOCAL__;
  } else {
    typ_id__055I=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__X55I);
    if ((typ_id__055I == (__INTEGER)(-  1))) {
      a__OH2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__MH2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__X55I + a__OH2Q) & (__UINTEGER_32)(~ a__OH2Q));
      ptr__V55I=micro_alloc__table__lab__BOI(new_size__MH2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MH2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__MH2Q);
    } else {
      t__SH2Q=((__UINTEGER_32 )typ_id__055I);
      a__UH2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__V55I=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__X55I + a__UH2Q) & (__UINTEGER_32)(~ a__UH2Q)),((__POINTER )(&(table_type[(t__SH2Q)]))),(__UINTEGER_32)(t__SH2Q |  1));
    };
    result__U55I=((__READ_LOCAL *)ptr__V55I);
    *(result__U55I) = *(READ_LOCAL__);
  };
  Self__MRIJ=((__READ_LOCAL *)result__U55I);
  Self__MRIJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EBVI;
  Self__MRIJ->local__ALZD=Self__5AVI;
  Self__5AVI->parent_variable__B2LC.ensure_count__QEAG=(__INTEGER)(Self__5AVI->parent_variable__B2LC.ensure_count__QEAG +  1);
  return(result__U55I);
}

static void** realloc__with__0QZG(void **Self__1QZG,__INTEGER old_nb_elts__2QZG,__INTEGER new_nb_elts__3QZG)
// ({NATIVE_ARRAYoTYPEo},{INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__GSZG,Self__BZAH;
  void **new__TRZG;
  new__TRZG=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )Self__1QZG),((__UINTEGER_32 )(__INTEGER)(old_nb_elts__2QZG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_nb_elts__3QZG * ((__INTEGER )(sizeof(void *)))))));
  __tmp__GSZG=(__INTEGER)(new_nb_elts__3QZG -  1);
  Self__BZAH=old_nb_elts__2QZG;
  while ((Self__BZAH <= __tmp__GSZG)) {
    new__TRZG[Self__BZAH]=NULL;
    Self__BZAH=(__INTEGER)(Self__BZAH +  1);
  };
  return(new__TRZG);
}

static void** create__FZUJ(__INTEGER nb_elements__HZUJ)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__0ONK;
  void **Result__1BZJ;
  Result__1BZJ=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__HZUJ * ((__INTEGER )(sizeof(void *)))))));
  Self__0ONK=(__INTEGER)(nb_elements__HZUJ -  1);
  while ((Self__0ONK >=  0)) {
    Result__1BZJ[Self__0ONK]=NULL;
    Self__0ONK=(__INTEGER)(Self__0ONK -  1);
  };
  return(Result__1BZJ);
}

static void* call_for__1S2J(__NODE_STYLE *Self__2S2J,void *t__3S2J)
// ({NODE_STYLE},{NULLxTYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_IDxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  void *call__BT2J;
  void *em__CT2J,*__tmp__3V2J,*__tmp__C02J;
  void *rd__DT2J,*__tmp__PW2J,*__tmp__CX2J,*__tmp__KX2J,*__tmp__U02J;
  void *__tmp__H12J,*__tmp__P12J;
  void *ctext__NT2J,*__tmp__NZ2J,*loc__3KJK,*loc__53NL,*__tmp__402J;
  void *result__5S2J,*lst__LZ5Q,*lst__Y54L;
  void *__tmp__RT2J,*typ__AT2J;
  __INTEGER idx__JT2J,__tmp__IU2J,Self__S3CK,__tmp__HW2J,Self__RRDK;
  __INTEGER __tmp__GBDK,Self__RNSK,i__2KJK,j__1KJK,idx_result__C4NL;
  __INTEGER __tmp__C5NL,Self__GMRL,__tmp__DAOL,Self__CAOM,__tmp__OBOL;
  __INTEGER Self__H1AM,nb_result_list__T1UL,nb_result_slot__U1UL;
  __INTEGER __tmp__M02J,Self__MSDK;
  void *__tmp__YT2J,*__tmp__0T2J,*__tmp__FU2J,*__tmp__OU2J,*__tmp__ZW2J;
  void *__tmp__YX2J;
  void *__tmp__ZT2J;
  void *__tmp__UU2J,*__tmp__LV2J,*__tmp__MV2J,*__tmp__2V2J,*__tmp__OW2J;
  void *__tmp__YW2J,*__tmp__BX2J,*__tmp__JX2J,*__tmp__DY2J,*__tmp__EY2J;
  void *__tmp__X5CK,*__tmp__Y5CK,*__tmp__55CK,*__tmp__AADK,*__tmp__HADK;
  void *__tmp__IADK,*__tmp__PADK,*__tmp__QADK,*__tmp__NBDK,*__tmp__OBDK;
  void *__tmp__OY2J,*__tmp__FMJK,*__tmp__QMJK,*__tmp__2RJK,*__tmp__U3UL;
  void *__tmp__34UL,*__tmp__S5UL,*__tmp__GAVL,*__tmp__1AVL,*__tmp__QBVL;
  void *__tmp__ECVL,*__tmp__ZCVL,*__tmp__KHVL,*__tmp__5HVL,*__tmp__YZ2J;
  void *__tmp__B02J,*__tmp__T02J,*__tmp__G12J,*__tmp__O12J;
  void *__tmp__VU2J,*__tmp__PY2J,*typ__4KJK,*__tmp__GMJK,*other__X45Q;
  void *other__Z45Q,*__tmp__3RJK,*other__G2OI,*typ__A4NL,*__tmp__VBOL;
  void *__tmp__AYBQ,*__tmp__3BOL,*__tmp__JYBQ,*__tmp__HCOL,*__tmp__LYBQ;
  void *__tmp__ZZ2J;
  __STRING_CST *Self__SRBQ,*Self__MSBQ,*Self__USBQ,*Self__2SBQ;
  __STRING_CST *Self__ETBQ,*Self__MTBQ,*Self__WTBQ;
  __PROTOTYPE_CST *Self__TRBQ,*Self__NSBQ,*Self__VSBQ,*Self__3SBQ;
  __PROTOTYPE_CST *Self__FTBQ,*Self__NTBQ,*Self__XTBQ;
  __INTEGER_CST *Self__URBQ,*Self__OSBQ,*Self__WSBQ,*Self__4SBQ;
  __INTEGER_CST *Self__GTBQ,*Self__OTBQ,*Self__YTBQ;
  __REAL_CST *Self__WRBQ,*Self__QSBQ,*Self__YSBQ,*Self__ATBQ,*Self__ITBQ;
  __REAL_CST *Self__QTBQ,*Self__0TBQ;
  __CHARACTER_CST *Self__YRBQ,*Self__SSBQ,*Self__0SBQ,*Self__CTBQ;
  __CHARACTER_CST *Self__KTBQ,*Self__STBQ,*Self__2TBQ;
  __IS_EXPANDED *Self__ZRBQ,*Self__TSBQ,*Self__1SBQ,*Self__DTBQ;
  __IS_EXPANDED *Self__LTBQ,*Self__TTBQ,*Self__3TBQ;
  void *__tmp__WW2J,*__tmp__MX2J,*__tmp__102J,*__tmp__X12J;
  __SLOT_DATA *Self__5UBK;
  void *result__CVBK,*__tmp__ZX2J,*result__XVBK;
  __SLOT_CODE *Self__UVBK,*Self__UKJK,*Self__TNRL;
  __SECTION_ *Self__10JQ;
  void *__tmp__CY2J,*__tmp__LY2J,*__tmp__4Y2J,*__tmp__LZ2J;
  __DTA_RD *Self__T5CK;
  __DTA_WR_CODE *Self__DADK;
  __DTA_WR_VALUE *Self__LADK;
  __DTA_RD_ARGS *Self__TADK;
  void *__tmp__5Y2J,*__tmp__MZ2J,*__tmp__202J;
  void *__tmp__5UJK,*__tmp__ULJK,*__tmp__VLJK,*__tmp__HMJK,*__tmp__IMJK;
  void *__tmp__5MJK,*__tmp__NNJK,*__tmp__CORL,*__tmp__WORL,*__tmp__OPRL;
  void *__tmp__BQRL;
  void *result__YKJK,*pro__0KJK;
  void *typ_block__5KJK,*__tmp__ANJK,*__tmp__ONJK;
  void *typ_list__ALJK;
  __TYPE_FULL *Self__W45Q,*Self__Y45Q,*Self__F2OI;
  __POSITION __tmp__NUJK,__tmp__D3UL,__tmp__XYBQ,__tmp__MOEQ;
  __POSITION __tmp__B12J,__tmp__Y12J;
  __PROFIL_SLOT *Self__03NL;
  void *type_multiple__D4NL,*__tmp__CBOL;
  void *type_mono__E4NL,*__tmp__UBOL,*__tmp__2BOL,*__tmp__GCOL;
  void *__tmp__I5NL;
  void *__tmp__BBOL,*__tmp__FCOL;
  __ITM_TYPE_STYLE *Self__5XBQ,*Self__IYBQ,*Self__KYBQ;
  void *instr__XNRL,*i__M3UL,*__tmp__V3UL,*i__V4UL,*__tmp__44UL,*i__K5UL;
  void *__tmp__T5UL,*i__45UL,*__tmp__HAVL,*i__TAVL,*__tmp__2AVL,*i__IBVL;
  void *__tmp__RBVL,*i__2BVL,*__tmp__FCVL,*i__RCVL,*__tmp__0CVL,*i__FDVL;
  void *i__0DVL,*i__PEVL,*i__EFVL,*i__ZFVL,*i__NGVL,*i__CHVL;
  void *__tmp__LHVL,*i__XHVL,*__tmp__AIVL;
  void *contract__VNRL;
  void *__tmp__DORL,*__tmp__PPRL;
  void *__tmp__EORL,*__tmp__QPRL;
  __ITM_LIST *Self__KZ5Q,*Self__S1UL,*Self__W54L;
  void *__tmp__FPRL;
  __ITM_PROTOTYPE *Self__L3UL;
  __ITM_LIST_IDF *Self__53UL;
  __ITM_WRITE_VALUE *Self__U4UL;
  __ITM_WRITE_CAST *Self__J5UL;
  __ITM_READ *Self__35UL;
  __ITM_WRITE_CODE *Self__SAVL;
  __ITM_READ_ARG2 *Self__HBVL;
  __ITM_BINARY *Self__1BVL;
  __ITM_READ_ARG1 *Self__QCVL;
  __ITM_OLD *Self__EDVL;
  __ITM_EXTERNAL_TYPE *Self__ZDVL;
  __ITM_REAL *Self__OEVL;
  __ITM_NUMBER *Self__DFVL;
  __ITM_CHARACTER *Self__YFVL;
  __ITM_STRING *Self__MGVL;
  __ITM_EXTERNAL *Self__BHVL;
  __ITM_READ_ARGS *Self__WHVL;
  __CONTEXT *Self__A0BQ;
  void *__tmp__C12J,*__tmp__Z12J;
  void *new_larg__GT2J,*result__V5CK,*__tmp__MY2J,*result__35CK;
  void *result__FADK,*result__NADK,*result__VADK,*args__VKJK;
  void *__tmp__1T2J,*__tmp__GU2J,*__tmp__PU2J,*__tmp__0W2J;
  __FAST_ARRAYoEXPRo *Self__II2Q,*Self__OK2Q;
  void *res_lst__ZKJK,*result__F4NL;
  void *pro_list__BLJK;
  __BOOLEAN is_new__CLJK,__tmp__1LJK,__tmp__WLJK,__tmp__4LJK;
  __BOOLEAN __tmp__JMJK,__tmp__BPJK,__tmp__EPJK,__tmp__ARJK,__tmp__ETJK;
  __BOOLEAN __tmp__2UJK;
  void *item_lst__B4NL;
  void *__tmp__J5NL,*__tmp__302J;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__4J2Q;
  call__BT2J=NULL;
  em__CT2J=NULL;
  rd__DT2J=NULL;
  new_larg__GT2J=NULL;
  ctext__NT2J=NULL;
  result__5S2J=create__QCAG(position__V54J(Self__2S2J));
  if (t__3S2J==NULL) {
    __tmp__RT2J=NULL;
  } else {
    switch (((struct ___OBJ *)t__3S2J)->__id) {
    case __TYPE__: {
      __tmp__RT2J=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__RT2J=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__RT2J=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__RT2J=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__RT2J=((void *)t__3S2J);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__RT2J=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__RT2J=NULL;
    } break;
    }
  };
  typ__AT2J=__tmp__RT2J;
  idx__JT2J=((__TYPE_ID *)__tmp__RT2J)->parent_type__WIB.index__LJC;
  if ((idx__JT2J ==  0)) {
    __tmp__YT2J=Self__2S2J->slot__GO5G;
    if (((struct ___OBJ *)__tmp__YT2J)->__id==__SLOT_DATA__) {
      __tmp__ZT2J=slot_data__Z4TH(__tmp__YT2J);
    } else {
      __tmp__ZT2J=slot_data__T5TH(__tmp__YT2J);
    };
    init__C4OG(__tmp__ZT2J);
    __tmp__0T2J=Self__2S2J->slot__GO5G;
    if (((struct ___OBJ *)__tmp__0T2J)->__id==__SLOT_DATA__) {
      __tmp__1T2J=((__SLOT *)((__SLOT_DATA *)__tmp__0T2J)->parent_slot__BJZD)->slot_data_list__CL3F;
    } else {
      __tmp__1T2J=((__SLOT *)((__SLOT_CODE *)__tmp__0T2J)->parent_slot__Y22F)->slot_data_list__CL3F;
    };
    if (((void *)__tmp__1T2J != (void *)NULL)) {
      if (((struct ___OBJ *)Self__2S2J->slot__GO5G)->__id==__SLOT_DATA__) {
      };
      __tmp__FU2J=Self__2S2J->slot__GO5G;
      if (((struct ___OBJ *)__tmp__FU2J)->__id==__SLOT_DATA__) {
        __tmp__GU2J=((__SLOT *)((__SLOT_DATA *)__tmp__FU2J)->parent_slot__BJZD)->slot_data_list__CL3F;
      } else {
        __tmp__GU2J=((__SLOT *)((__SLOT_CODE *)__tmp__FU2J)->parent_slot__Y22F)->slot_data_list__CL3F;
      };
      __tmp__IU2J=((__FAST_ARRAYoSLOT_DATAo *)__tmp__GU2J)->parent_arrayed_collection__3K3F.upper__035F;
      Self__S3CK= 0;
      while ((Self__S3CK <= __tmp__IU2J)) {
        __tmp__OU2J=Self__2S2J->slot__GO5G;
        if (((struct ___OBJ *)__tmp__OU2J)->__id==__SLOT_DATA__) {
          __tmp__PU2J=((__SLOT *)((__SLOT_DATA *)__tmp__OU2J)->parent_slot__BJZD)->slot_data_list__CL3F;
        } else {
          __tmp__PU2J=((__SLOT *)((__SLOT_CODE *)__tmp__OU2J)->parent_slot__Y22F)->slot_data_list__CL3F;
        };
        init__C4OG(((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__PU2J)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__S3CK]);
        Self__S3CK=(__INTEGER)(Self__S3CK +  1);
      };
    };
    __tmp__UU2J=Self__2S2J->result_expr__HO5G;
    switch (((struct ___OBJ *)__tmp__UU2J)->__id) {
    case __LIST__: {
      __tmp__VU2J=static_type__GIQG(__tmp__UU2J);
    } break;
    case __STRING_CST__: {
      __tmp__VU2J=((__STRING_CST *)__tmp__UU2J)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VU2J=((__EXTERNAL_C *)__tmp__UU2J)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VU2J=((__PROTOTYPE_CST *)__tmp__UU2J)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__VU2J=((__INTEGER_CST *)__tmp__UU2J)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__VU2J=((__LOCAL *)((__READ_LOCAL *)__tmp__UU2J)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VU2J=static_type__0N1H(__tmp__UU2J);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VU2J=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VU2J=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__VU2J=((__REAL_CST *)__tmp__UU2J)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VU2J=((__CHARACTER_CST *)__tmp__UU2J)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VU2J=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VU2J=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__VU2J=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__VU2J=static_type__MP1H(__tmp__UU2J);
    } break;
    case __EXPR_MUL__: {
      __tmp__VU2J=static_type__SP1H(__tmp__UU2J);
    } break;
    case __EXPR_DIV__: {
      __tmp__VU2J=static_type__XP1H(__tmp__UU2J);
    } break;
    case __EXPR_AND__: {
      __tmp__VU2J=static_type__2P1H(__tmp__UU2J);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VU2J=static_type__BQ1H(__tmp__UU2J);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VU2J=static_type__GQ1H(__tmp__UU2J);
    } break;
    case __PUT_TO__: {
      __tmp__VU2J=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__VU2J=static_type__PQ1H(__tmp__UU2J);
    } break;
    case __SIZE_OF__: {
      __tmp__VU2J=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__VU2J=((__CAST *)__tmp__UU2J)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__VU2J=static_type__GIKL(__tmp__UU2J);
    } break;
    case __READ_SLOT__: {
      __tmp__VU2J=((__SLOT_DATA *)((__READ_SLOT *)__tmp__UU2J)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VU2J=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__UU2J)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VU2J=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VU2J=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VU2J=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VU2J=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VU2J=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__VU2J=static_type__Z2IM(__tmp__UU2J);
    } break;
    case __EXPR_ADD__: {
      __tmp__VU2J=static_type__IXML(__tmp__UU2J);
    } break;
    case __EXPR_NOT__: {
      __tmp__VU2J=static_type__BTXM(__tmp__UU2J);
    } break;
    case __EXPR_MOD__: {
      __tmp__VU2J=static_type__5LEO(__tmp__UU2J);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VU2J=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__VU2J=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VU2J=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__VU2J=static_type__NOPN(__tmp__UU2J);
    } break;
    case __EXPR_XOR__: {
      __tmp__VU2J=static_type__XCSO(__tmp__UU2J);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__VU2J)->parent_type__KTL == (void *)TYPE_VOID__)) {
      if ((((__SLOT_DATA *)__tmp__ZT2J)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) {
        position__V54J(Self__2S2J);
        add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,read__with__FYKJ(((__SLOT_DATA *)__tmp__ZT2J),NULL));
      } else {
        position__V54J(Self__2S2J);
        __tmp__LV2J=Self__2S2J->parent_node__OP0G.expr__KLZD;
        switch (((struct ___OBJ *)__tmp__LV2J)->__id) {
        case __LIST__: {
          __tmp__MV2J=my_copy__2HYM(__tmp__LV2J);
        } break;
        case __STRING_CST__: {
          Self__SRBQ=((__STRING_CST *)__tmp__LV2J);
          __tmp__MV2J=create__text__AUMH(Self__SRBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SRBQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__MV2J=my_copy__2K2H(__tmp__LV2J);
        } break;
        case __PROTOTYPE_CST__: {
          Self__TRBQ=((__PROTOTYPE_CST *)__tmp__LV2J);
          __tmp__MV2J=create__type__CLQC(Self__TRBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__TRBQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__URBQ=((__INTEGER_CST *)__tmp__LV2J);
          __tmp__MV2J=create__value__type__DNQC(Self__URBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__URBQ->value__PAZD,Self__URBQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__MV2J=my_copy__OAFJ(__tmp__LV2J);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__MV2J=my_copy__KM2H(__tmp__LV2J);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__MV2J=my_copy__DN2H(__tmp__LV2J);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__MV2J=my_copy__QN2H(__tmp__LV2J);
        } break;
        case __REAL_CST__: {
          Self__WRBQ=((__REAL_CST *)__tmp__LV2J);
          __tmp__MV2J=create__value__type__1SMH(Self__WRBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WRBQ->value__5N2H,Self__WRBQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__YRBQ=((__CHARACTER_CST *)__tmp__LV2J);
          __tmp__MV2J=create__char__WTMH(Self__YRBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YRBQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__ZRBQ=((__IS_EXPANDED *)__tmp__LV2J);
          __tmp__MV2J=create__receiver__WRWH(Self__ZRBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__ZRBQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__MV2J=my_copy__TO2H(__tmp__LV2J);
        } break;
        case __EXPR_SUP__: {
          __tmp__MV2J=my_copy__2O2H(__tmp__LV2J);
        } break;
        case __EXPR_SUB__: {
          __tmp__MV2J=my_copy__HP2H(__tmp__LV2J);
        } break;
        case __EXPR_MUL__: {
          __tmp__MV2J=my_copy__TP2H(__tmp__LV2J);
        } break;
        case __EXPR_DIV__: {
          __tmp__MV2J=my_copy__4P2H(__tmp__LV2J);
        } break;
        case __EXPR_AND__: {
          __tmp__MV2J=my_copy__JQ2H(__tmp__LV2J);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__MV2J=my_copy__UQ2H(__tmp__LV2J);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__MV2J=my_copy__5Q2H(__tmp__LV2J);
        } break;
        case __PUT_TO__: {
          __tmp__MV2J=my_copy__KR2H(__tmp__LV2J);
        } break;
        case __ITEM__: {
          __tmp__MV2J=my_copy__1R2H(__tmp__LV2J);
        } break;
        case __SIZE_OF__: {
          __tmp__MV2J=my_copy__HS2H(__tmp__LV2J);
        } break;
        case __CAST__: {
          __tmp__MV2J=my_copy__QS2H(__tmp__LV2J);
        } break;
        case __CALL_SLOT__: {
          __tmp__MV2J=my_copy__PIYM(__tmp__LV2J);
        } break;
        case __READ_SLOT__: {
          __tmp__MV2J=my_copy__AVGK(__tmp__LV2J);
        } break;
        case __READ_GLOBAL__: {
          __tmp__MV2J=my_copy__NVGK(__tmp__LV2J);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__MV2J=my_copy__RFCN(__tmp__LV2J);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__MV2J=my_copy__JMEO(__tmp__LV2J);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__MV2J=my_copy__RTJO(__tmp__LV2J);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__MV2J=my_copy__WMEO(__tmp__LV2J);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__MV2J=my_copy__3TJO(__tmp__LV2J);
        } break;
        case __EXPR_NEG__: {
          __tmp__MV2J=my_copy__YEJM(__tmp__LV2J);
        } break;
        case __EXPR_ADD__: {
          __tmp__MV2J=my_copy__YRLL(__tmp__LV2J);
        } break;
        case __EXPR_NOT__: {
          __tmp__MV2J=my_copy__GLYM(__tmp__LV2J);
        } break;
        case __EXPR_MOD__: {
          __tmp__MV2J=my_copy__BNEO(__tmp__LV2J);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__MV2J=my_copy__M3DP(__tmp__LV2J);
        } break;
        case __EXPR_INF__: {
          __tmp__MV2J=my_copy__PBSN(__tmp__LV2J);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__MV2J=my_copy__0BSN(__tmp__LV2J);
        } break;
        case __EXPR_OR__: {
          __tmp__MV2J=my_copy__ZOPN(__tmp__LV2J);
        } break;
        case __EXPR_XOR__: {
          __tmp__MV2J=my_copy__CYSO(__tmp__LV2J);
        } break;
        };
        add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,read__with__FYKJ(__tmp__ZT2J,__tmp__MV2J));
      };
      add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,create__type__CLQC(position__V54J(Self__2S2J),TYPE_VOID__->parent_type__UIB.default__AKC));
    } else {
      __tmp__2V2J=Self__2S2J->result_expr__HO5G;
      if (__tmp__2V2J==NULL) {
        __tmp__3V2J=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__2V2J)->__id) {
        case __LIST__: {
          __tmp__3V2J=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__3V2J=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__3V2J=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__3V2J=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__3V2J=((void *)__tmp__2V2J);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__3V2J=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__3V2J=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__3V2J=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__3V2J=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__3V2J=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__3V2J=NULL;
        } break;
        case __ITEM__: {
          __tmp__3V2J=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__3V2J=NULL;
        } break;
        case __CAST__: {
          __tmp__3V2J=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__3V2J=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__3V2J=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__3V2J=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__3V2J=NULL;
        } break;
        }
      };
      em__CT2J=__tmp__3V2J;
      if (((void *)__tmp__3V2J != (void *)NULL)) {
        __tmp__HW2J=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__3V2J)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH -  1);
        Self__RRDK= 0;
        while ((Self__RRDK <= __tmp__HW2J)) {
          __tmp__OW2J=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)em__CT2J)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__RRDK];
          if (__tmp__OW2J==NULL) {
            __tmp__PW2J=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__OW2J)->__id) {
            case __LIST__: {
              __tmp__PW2J=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__PW2J=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__PW2J=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__PW2J=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__PW2J=((void *)__tmp__OW2J);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__PW2J=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__PW2J=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__PW2J=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__PW2J=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__PW2J=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__PW2J=NULL;
            } break;
            case __ITEM__: {
              __tmp__PW2J=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__PW2J=NULL;
            } break;
            case __CAST__: {
              __tmp__PW2J=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__PW2J=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__PW2J=((void *)__tmp__OW2J);
            } break;
            case __READ_GLOBAL__: {
              __tmp__PW2J=((void *)__tmp__OW2J);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__PW2J=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__PW2J=NULL;
            } break;
            }
          };
          rd__DT2J=__tmp__PW2J;
          switch (((struct ___OBJ *)__tmp__PW2J)->__id) {
          case __READ_LOCAL__: {
            __tmp__WW2J=((__READ_LOCAL *)__tmp__PW2J)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__WW2J=((__READ_SLOT *)__tmp__PW2J)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__WW2J=((__READ_GLOBAL *)__tmp__PW2J)->global__RHJK;
          } break;
          };
          __tmp__YW2J=Self__2S2J->parent_node__OP0G.expr__KLZD;
          __tmp__ZW2J=Self__2S2J->slot__GO5G;
          if (((struct ___OBJ *)__tmp__ZW2J)->__id==__SLOT_DATA__) {
            __tmp__0W2J=((__SLOT *)((__SLOT_DATA *)__tmp__ZW2J)->parent_slot__BJZD)->slot_data_list__CL3F;
          } else {
            __tmp__0W2J=((__SLOT *)((__SLOT_CODE *)__tmp__ZW2J)->parent_slot__Y22F)->slot_data_list__CL3F;
          };
          add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,new_write__with__S4CK(Self__2S2J,__tmp__WW2J,__tmp__YW2J,((void **)((__FAST_ARRAYoSLOT_DATAo *)__tmp__0W2J)->parent_arrayed_collection__3K3F.storage__Y45F)[Self__RRDK]));
          Self__RRDK=(__INTEGER)(Self__RRDK +  1);
        };
        Self__II2Q=((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__3V2J)->expr_list__VFMH);
        __tmp__BX2J=((void **)Self__II2Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__II2Q->parent_arrayed_collection__42LC.upper__USSH];
        if (__tmp__BX2J==NULL) {
          __tmp__CX2J=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__BX2J)->__id) {
          case __LIST__: {
            __tmp__CX2J=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__CX2J=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__CX2J=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__CX2J=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__CX2J=((void *)__tmp__BX2J);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__CX2J=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__CX2J=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__CX2J=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__CX2J=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__CX2J=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__CX2J=NULL;
          } break;
          case __ITEM__: {
            __tmp__CX2J=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__CX2J=NULL;
          } break;
          case __CAST__: {
            __tmp__CX2J=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__CX2J=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__CX2J=((void *)__tmp__BX2J);
          } break;
          case __READ_GLOBAL__: {
            __tmp__CX2J=((void *)__tmp__BX2J);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__CX2J=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__CX2J=NULL;
          } break;
          }
        };
        rd__DT2J=__tmp__CX2J;
      } else {
        __tmp__JX2J=Self__2S2J->result_expr__HO5G;
        if (__tmp__JX2J==NULL) {
          __tmp__KX2J=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__JX2J)->__id) {
          case __LIST__: {
            __tmp__KX2J=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__KX2J=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__KX2J=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__KX2J=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__KX2J=((void *)__tmp__JX2J);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__KX2J=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__KX2J=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__KX2J=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__KX2J=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__KX2J=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__KX2J=NULL;
          } break;
          case __ITEM__: {
            __tmp__KX2J=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__KX2J=NULL;
          } break;
          case __CAST__: {
            __tmp__KX2J=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__KX2J=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__KX2J=((void *)__tmp__JX2J);
          } break;
          case __READ_GLOBAL__: {
            __tmp__KX2J=((void *)__tmp__JX2J);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__KX2J=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__KX2J=NULL;
          } break;
          }
        };
        rd__DT2J=__tmp__KX2J;
      };
      switch (((struct ___OBJ *)rd__DT2J)->__id) {
      case __READ_LOCAL__: {
        __tmp__MX2J=((__READ_LOCAL *)rd__DT2J)->local__ALZD;
      } break;
      case __READ_SLOT__: {
        __tmp__MX2J=((__READ_SLOT *)rd__DT2J)->slot__EVGK;
      } break;
      case __READ_GLOBAL__: {
        __tmp__MX2J=((__READ_GLOBAL *)rd__DT2J)->global__RHJK;
      } break;
      };
      add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,new_write__with__S4CK(Self__2S2J,__tmp__MX2J,Self__2S2J->parent_node__OP0G.expr__KLZD,__tmp__ZT2J));
    };
  } else {
    __tmp__YX2J=Self__2S2J->slot__GO5G;
    if (((struct ___OBJ *)__tmp__YX2J)->__id==__SLOT_DATA__) {
      Self__5UBK=((__SLOT_DATA *)__tmp__YX2J);
      result__CVBK=NULL;
      if ((idx__JT2J ==  1)) {
        result__CVBK=((__SLOT *)Self__5UBK->parent_slot__BJZD)->slot_code_intern__322F;
      } else {
        result__CVBK=((void **)((__FAST_ARRAYoSLOT_CODEo *)((__SLOT *)Self__5UBK->parent_slot__BJZD)->slot_code_list__ZUIJ)->parent_arrayed_collection__YUIJ.storage__RQIK)[(__INTEGER)(idx__JT2J -  2)];
      };
      __tmp__ZX2J=result__CVBK;
    } else {
      Self__UVBK=((__SLOT_CODE *)__tmp__YX2J);
      result__XVBK=NULL;
      if ((idx__JT2J ==  1)) {
        result__XVBK=((__SLOT *)Self__UVBK->parent_slot__Y22F)->slot_code_intern__322F;
      } else {
        result__XVBK=((void **)((__FAST_ARRAYoSLOT_CODEo *)((__SLOT *)Self__UVBK->parent_slot__Y22F)->slot_code_list__ZUIJ)->parent_arrayed_collection__YUIJ.storage__RQIK)[(__INTEGER)(idx__JT2J -  2)];
      };
      __tmp__ZX2J=result__XVBK;
    };
    Self__10JQ=((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__ZX2J)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC);
    if ((((void *)Self__10JQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__10JQ->name__1I0D == (void *)(&__string_24)))) {
      new_larg__GT2J=create_with_capacity__3THH( 1);
      __tmp__CY2J=Self__2S2J->parent_node__OP0G.data__LLZD;
      switch (((struct ___OBJ *)__tmp__CY2J)->__id) {
      case __DTA_RD__: {
        __tmp__DY2J=((__DTA_RD *)__tmp__CY2J)->parent_dta__AMQC.self_arg__QJZD;
      } break;
      case __DTA_CAST__: {
        __tmp__DY2J=DTA__->self_arg__QJZD;
      } break;
      case __DTA_WR_CODE__: {
        __tmp__DY2J=((__DTA_WR_CODE *)__tmp__CY2J)->parent_dta__E0LH.self_arg__QJZD;
      } break;
      case __DTA_BLOCK__: {
        __tmp__DY2J=DTA__->self_arg__QJZD;
      } break;
      case __DTA_WR_VALUE__: {
        __tmp__DY2J=((__DTA_WR_VALUE *)__tmp__CY2J)->parent_dta__PTUH.self_arg__QJZD;
      } break;
      case __DTA_RD_ARGS__: {
        __tmp__DY2J=((void **)((__FAST_ARRAYoEXPRo *)((__DTA_RD_ARGS *)__tmp__CY2J)->argument_list__UTFI)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
      } break;
      };
      switch (((struct ___OBJ *)__tmp__DY2J)->__id) {
      case __LIST__: {
        __tmp__EY2J=my_copy__2HYM(__tmp__DY2J);
      } break;
      case __STRING_CST__: {
        Self__MSBQ=((__STRING_CST *)__tmp__DY2J);
        __tmp__EY2J=create__text__AUMH(Self__MSBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MSBQ->string__ZK2H);
      } break;
      case __EXTERNAL_C__: {
        __tmp__EY2J=my_copy__2K2H(__tmp__DY2J);
      } break;
      case __PROTOTYPE_CST__: {
        Self__NSBQ=((__PROTOTYPE_CST *)__tmp__DY2J);
        __tmp__EY2J=create__type__CLQC(Self__NSBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NSBQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__OSBQ=((__INTEGER_CST *)__tmp__DY2J);
        __tmp__EY2J=create__value__type__DNQC(Self__OSBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OSBQ->value__PAZD,Self__OSBQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __READ_LOCAL__: {
        __tmp__EY2J=my_copy__OAFJ(__tmp__DY2J);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__EY2J=my_copy__KM2H(__tmp__DY2J);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__EY2J=my_copy__DN2H(__tmp__DY2J);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__EY2J=my_copy__QN2H(__tmp__DY2J);
      } break;
      case __REAL_CST__: {
        Self__QSBQ=((__REAL_CST *)__tmp__DY2J);
        __tmp__EY2J=create__value__type__1SMH(Self__QSBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QSBQ->value__5N2H,Self__QSBQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__SSBQ=((__CHARACTER_CST *)__tmp__DY2J);
        __tmp__EY2J=create__char__WTMH(Self__SSBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SSBQ->text__HO2H);
      } break;
      case __IS_EXPANDED__: {
        Self__TSBQ=((__IS_EXPANDED *)__tmp__DY2J);
        __tmp__EY2J=create__receiver__WRWH(Self__TSBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__TSBQ->receiver__OO2H));
      } break;
      case __GET_TYPE_ID__: {
        __tmp__EY2J=my_copy__TO2H(__tmp__DY2J);
      } break;
      case __EXPR_SUP__: {
        __tmp__EY2J=my_copy__2O2H(__tmp__DY2J);
      } break;
      case __EXPR_SUB__: {
        __tmp__EY2J=my_copy__HP2H(__tmp__DY2J);
      } break;
      case __EXPR_MUL__: {
        __tmp__EY2J=my_copy__TP2H(__tmp__DY2J);
      } break;
      case __EXPR_DIV__: {
        __tmp__EY2J=my_copy__4P2H(__tmp__DY2J);
      } break;
      case __EXPR_AND__: {
        __tmp__EY2J=my_copy__JQ2H(__tmp__DY2J);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__EY2J=my_copy__UQ2H(__tmp__DY2J);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__EY2J=my_copy__5Q2H(__tmp__DY2J);
      } break;
      case __PUT_TO__: {
        __tmp__EY2J=my_copy__KR2H(__tmp__DY2J);
      } break;
      case __ITEM__: {
        __tmp__EY2J=my_copy__1R2H(__tmp__DY2J);
      } break;
      case __SIZE_OF__: {
        __tmp__EY2J=my_copy__HS2H(__tmp__DY2J);
      } break;
      case __CAST__: {
        __tmp__EY2J=my_copy__QS2H(__tmp__DY2J);
      } break;
      case __CALL_SLOT__: {
        __tmp__EY2J=my_copy__PIYM(__tmp__DY2J);
      } break;
      case __READ_SLOT__: {
        __tmp__EY2J=my_copy__AVGK(__tmp__DY2J);
      } break;
      case __READ_GLOBAL__: {
        __tmp__EY2J=my_copy__NVGK(__tmp__DY2J);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__EY2J=my_copy__RFCN(__tmp__DY2J);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__EY2J=my_copy__JMEO(__tmp__DY2J);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__EY2J=my_copy__RTJO(__tmp__DY2J);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__EY2J=my_copy__WMEO(__tmp__DY2J);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__EY2J=my_copy__3TJO(__tmp__DY2J);
      } break;
      case __EXPR_NEG__: {
        __tmp__EY2J=my_copy__YEJM(__tmp__DY2J);
      } break;
      case __EXPR_ADD__: {
        __tmp__EY2J=my_copy__YRLL(__tmp__DY2J);
      } break;
      case __EXPR_NOT__: {
        __tmp__EY2J=my_copy__GLYM(__tmp__DY2J);
      } break;
      case __EXPR_MOD__: {
        __tmp__EY2J=my_copy__BNEO(__tmp__DY2J);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__EY2J=my_copy__M3DP(__tmp__DY2J);
      } break;
      case __EXPR_INF__: {
        __tmp__EY2J=my_copy__PBSN(__tmp__DY2J);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__EY2J=my_copy__0BSN(__tmp__DY2J);
      } break;
      case __EXPR_OR__: {
        __tmp__EY2J=my_copy__ZOPN(__tmp__DY2J);
      } break;
      case __EXPR_XOR__: {
        __tmp__EY2J=my_copy__CYSO(__tmp__DY2J);
      } break;
      };
      add_last__XSEI(new_larg__GT2J,__tmp__EY2J);
    } else {
      __tmp__LY2J=Self__2S2J->parent_node__OP0G.data__LLZD;
      switch (((struct ___OBJ *)__tmp__LY2J)->__id) {
      case __DTA_RD__: {
        Self__T5CK=((__DTA_RD *)__tmp__LY2J);
        result__V5CK=create_with_capacity__3THH( 1);
        __tmp__X5CK=Self__T5CK->parent_dta__AMQC.self_arg__QJZD;
        switch (((struct ___OBJ *)__tmp__X5CK)->__id) {
        case __LIST__: {
          __tmp__Y5CK=my_copy__2HYM(__tmp__X5CK);
        } break;
        case __STRING_CST__: {
          Self__USBQ=((__STRING_CST *)__tmp__X5CK);
          __tmp__Y5CK=create__text__AUMH(Self__USBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__USBQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__Y5CK=my_copy__2K2H(__tmp__X5CK);
        } break;
        case __PROTOTYPE_CST__: {
          Self__VSBQ=((__PROTOTYPE_CST *)__tmp__X5CK);
          __tmp__Y5CK=create__type__CLQC(Self__VSBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__VSBQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__WSBQ=((__INTEGER_CST *)__tmp__X5CK);
          __tmp__Y5CK=create__value__type__DNQC(Self__WSBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WSBQ->value__PAZD,Self__WSBQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__Y5CK=my_copy__OAFJ(__tmp__X5CK);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__Y5CK=my_copy__KM2H(__tmp__X5CK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__Y5CK=my_copy__DN2H(__tmp__X5CK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__Y5CK=my_copy__QN2H(__tmp__X5CK);
        } break;
        case __REAL_CST__: {
          Self__YSBQ=((__REAL_CST *)__tmp__X5CK);
          __tmp__Y5CK=create__value__type__1SMH(Self__YSBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YSBQ->value__5N2H,Self__YSBQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__0SBQ=((__CHARACTER_CST *)__tmp__X5CK);
          __tmp__Y5CK=create__char__WTMH(Self__0SBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0SBQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__1SBQ=((__IS_EXPANDED *)__tmp__X5CK);
          __tmp__Y5CK=create__receiver__WRWH(Self__1SBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__1SBQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__Y5CK=my_copy__TO2H(__tmp__X5CK);
        } break;
        case __EXPR_SUP__: {
          __tmp__Y5CK=my_copy__2O2H(__tmp__X5CK);
        } break;
        case __EXPR_SUB__: {
          __tmp__Y5CK=my_copy__HP2H(__tmp__X5CK);
        } break;
        case __EXPR_MUL__: {
          __tmp__Y5CK=my_copy__TP2H(__tmp__X5CK);
        } break;
        case __EXPR_DIV__: {
          __tmp__Y5CK=my_copy__4P2H(__tmp__X5CK);
        } break;
        case __EXPR_AND__: {
          __tmp__Y5CK=my_copy__JQ2H(__tmp__X5CK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__Y5CK=my_copy__UQ2H(__tmp__X5CK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__Y5CK=my_copy__5Q2H(__tmp__X5CK);
        } break;
        case __PUT_TO__: {
          __tmp__Y5CK=my_copy__KR2H(__tmp__X5CK);
        } break;
        case __ITEM__: {
          __tmp__Y5CK=my_copy__1R2H(__tmp__X5CK);
        } break;
        case __SIZE_OF__: {
          __tmp__Y5CK=my_copy__HS2H(__tmp__X5CK);
        } break;
        case __CAST__: {
          __tmp__Y5CK=my_copy__QS2H(__tmp__X5CK);
        } break;
        case __CALL_SLOT__: {
          __tmp__Y5CK=my_copy__PIYM(__tmp__X5CK);
        } break;
        case __READ_SLOT__: {
          __tmp__Y5CK=my_copy__AVGK(__tmp__X5CK);
        } break;
        case __READ_GLOBAL__: {
          __tmp__Y5CK=my_copy__NVGK(__tmp__X5CK);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__Y5CK=my_copy__RFCN(__tmp__X5CK);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__Y5CK=my_copy__JMEO(__tmp__X5CK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__Y5CK=my_copy__RTJO(__tmp__X5CK);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__Y5CK=my_copy__WMEO(__tmp__X5CK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__Y5CK=my_copy__3TJO(__tmp__X5CK);
        } break;
        case __EXPR_NEG__: {
          __tmp__Y5CK=my_copy__YEJM(__tmp__X5CK);
        } break;
        case __EXPR_ADD__: {
          __tmp__Y5CK=my_copy__YRLL(__tmp__X5CK);
        } break;
        case __EXPR_NOT__: {
          __tmp__Y5CK=my_copy__GLYM(__tmp__X5CK);
        } break;
        case __EXPR_MOD__: {
          __tmp__Y5CK=my_copy__BNEO(__tmp__X5CK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__Y5CK=my_copy__M3DP(__tmp__X5CK);
        } break;
        case __EXPR_INF__: {
          __tmp__Y5CK=my_copy__PBSN(__tmp__X5CK);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__Y5CK=my_copy__0BSN(__tmp__X5CK);
        } break;
        case __EXPR_OR__: {
          __tmp__Y5CK=my_copy__ZOPN(__tmp__X5CK);
        } break;
        case __EXPR_XOR__: {
          __tmp__Y5CK=my_copy__CYSO(__tmp__X5CK);
        } break;
        };
        add_last__XSEI(result__V5CK,__tmp__Y5CK);
        __tmp__MY2J=result__V5CK;
      } break;
      case __DTA_CAST__: {
        result__35CK=create_with_capacity__3THH( 1);
        __tmp__55CK=DTA__->self_arg__QJZD;
        switch (((struct ___OBJ *)__tmp__55CK)->__id) {
        case __LIST__: {
          __tmp__AADK=my_copy__2HYM(__tmp__55CK);
        } break;
        case __STRING_CST__: {
          Self__2SBQ=((__STRING_CST *)__tmp__55CK);
          __tmp__AADK=create__text__AUMH(Self__2SBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2SBQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__AADK=my_copy__2K2H(__tmp__55CK);
        } break;
        case __PROTOTYPE_CST__: {
          Self__3SBQ=((__PROTOTYPE_CST *)__tmp__55CK);
          __tmp__AADK=create__type__CLQC(Self__3SBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3SBQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__4SBQ=((__INTEGER_CST *)__tmp__55CK);
          __tmp__AADK=create__value__type__DNQC(Self__4SBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__4SBQ->value__PAZD,Self__4SBQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__AADK=my_copy__OAFJ(__tmp__55CK);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__AADK=my_copy__KM2H(__tmp__55CK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__AADK=my_copy__DN2H(__tmp__55CK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__AADK=my_copy__QN2H(__tmp__55CK);
        } break;
        case __REAL_CST__: {
          Self__ATBQ=((__REAL_CST *)__tmp__55CK);
          __tmp__AADK=create__value__type__1SMH(Self__ATBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ATBQ->value__5N2H,Self__ATBQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__CTBQ=((__CHARACTER_CST *)__tmp__55CK);
          __tmp__AADK=create__char__WTMH(Self__CTBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__CTBQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__DTBQ=((__IS_EXPANDED *)__tmp__55CK);
          __tmp__AADK=create__receiver__WRWH(Self__DTBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__DTBQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__AADK=my_copy__TO2H(__tmp__55CK);
        } break;
        case __EXPR_SUP__: {
          __tmp__AADK=my_copy__2O2H(__tmp__55CK);
        } break;
        case __EXPR_SUB__: {
          __tmp__AADK=my_copy__HP2H(__tmp__55CK);
        } break;
        case __EXPR_MUL__: {
          __tmp__AADK=my_copy__TP2H(__tmp__55CK);
        } break;
        case __EXPR_DIV__: {
          __tmp__AADK=my_copy__4P2H(__tmp__55CK);
        } break;
        case __EXPR_AND__: {
          __tmp__AADK=my_copy__JQ2H(__tmp__55CK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__AADK=my_copy__UQ2H(__tmp__55CK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__AADK=my_copy__5Q2H(__tmp__55CK);
        } break;
        case __PUT_TO__: {
          __tmp__AADK=my_copy__KR2H(__tmp__55CK);
        } break;
        case __ITEM__: {
          __tmp__AADK=my_copy__1R2H(__tmp__55CK);
        } break;
        case __SIZE_OF__: {
          __tmp__AADK=my_copy__HS2H(__tmp__55CK);
        } break;
        case __CAST__: {
          __tmp__AADK=my_copy__QS2H(__tmp__55CK);
        } break;
        case __CALL_SLOT__: {
          __tmp__AADK=my_copy__PIYM(__tmp__55CK);
        } break;
        case __READ_SLOT__: {
          __tmp__AADK=my_copy__AVGK(__tmp__55CK);
        } break;
        case __READ_GLOBAL__: {
          __tmp__AADK=my_copy__NVGK(__tmp__55CK);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__AADK=my_copy__RFCN(__tmp__55CK);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__AADK=my_copy__JMEO(__tmp__55CK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__AADK=my_copy__RTJO(__tmp__55CK);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__AADK=my_copy__WMEO(__tmp__55CK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__AADK=my_copy__3TJO(__tmp__55CK);
        } break;
        case __EXPR_NEG__: {
          __tmp__AADK=my_copy__YEJM(__tmp__55CK);
        } break;
        case __EXPR_ADD__: {
          __tmp__AADK=my_copy__YRLL(__tmp__55CK);
        } break;
        case __EXPR_NOT__: {
          __tmp__AADK=my_copy__GLYM(__tmp__55CK);
        } break;
        case __EXPR_MOD__: {
          __tmp__AADK=my_copy__BNEO(__tmp__55CK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__AADK=my_copy__M3DP(__tmp__55CK);
        } break;
        case __EXPR_INF__: {
          __tmp__AADK=my_copy__PBSN(__tmp__55CK);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__AADK=my_copy__0BSN(__tmp__55CK);
        } break;
        case __EXPR_OR__: {
          __tmp__AADK=my_copy__ZOPN(__tmp__55CK);
        } break;
        case __EXPR_XOR__: {
          __tmp__AADK=my_copy__CYSO(__tmp__55CK);
        } break;
        };
        add_last__XSEI(result__35CK,__tmp__AADK);
        __tmp__MY2J=result__35CK;
      } break;
      case __DTA_WR_CODE__: {
        Self__DADK=((__DTA_WR_CODE *)__tmp__LY2J);
        result__FADK=create_with_capacity__3THH( 1);
        __tmp__HADK=Self__DADK->parent_dta__E0LH.self_arg__QJZD;
        switch (((struct ___OBJ *)__tmp__HADK)->__id) {
        case __LIST__: {
          __tmp__IADK=my_copy__2HYM(__tmp__HADK);
        } break;
        case __STRING_CST__: {
          Self__ETBQ=((__STRING_CST *)__tmp__HADK);
          __tmp__IADK=create__text__AUMH(Self__ETBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ETBQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__IADK=my_copy__2K2H(__tmp__HADK);
        } break;
        case __PROTOTYPE_CST__: {
          Self__FTBQ=((__PROTOTYPE_CST *)__tmp__HADK);
          __tmp__IADK=create__type__CLQC(Self__FTBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FTBQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__GTBQ=((__INTEGER_CST *)__tmp__HADK);
          __tmp__IADK=create__value__type__DNQC(Self__GTBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__GTBQ->value__PAZD,Self__GTBQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__IADK=my_copy__OAFJ(__tmp__HADK);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__IADK=my_copy__KM2H(__tmp__HADK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__IADK=my_copy__DN2H(__tmp__HADK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__IADK=my_copy__QN2H(__tmp__HADK);
        } break;
        case __REAL_CST__: {
          Self__ITBQ=((__REAL_CST *)__tmp__HADK);
          __tmp__IADK=create__value__type__1SMH(Self__ITBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ITBQ->value__5N2H,Self__ITBQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__KTBQ=((__CHARACTER_CST *)__tmp__HADK);
          __tmp__IADK=create__char__WTMH(Self__KTBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__KTBQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__LTBQ=((__IS_EXPANDED *)__tmp__HADK);
          __tmp__IADK=create__receiver__WRWH(Self__LTBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__LTBQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__IADK=my_copy__TO2H(__tmp__HADK);
        } break;
        case __EXPR_SUP__: {
          __tmp__IADK=my_copy__2O2H(__tmp__HADK);
        } break;
        case __EXPR_SUB__: {
          __tmp__IADK=my_copy__HP2H(__tmp__HADK);
        } break;
        case __EXPR_MUL__: {
          __tmp__IADK=my_copy__TP2H(__tmp__HADK);
        } break;
        case __EXPR_DIV__: {
          __tmp__IADK=my_copy__4P2H(__tmp__HADK);
        } break;
        case __EXPR_AND__: {
          __tmp__IADK=my_copy__JQ2H(__tmp__HADK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__IADK=my_copy__UQ2H(__tmp__HADK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__IADK=my_copy__5Q2H(__tmp__HADK);
        } break;
        case __PUT_TO__: {
          __tmp__IADK=my_copy__KR2H(__tmp__HADK);
        } break;
        case __ITEM__: {
          __tmp__IADK=my_copy__1R2H(__tmp__HADK);
        } break;
        case __SIZE_OF__: {
          __tmp__IADK=my_copy__HS2H(__tmp__HADK);
        } break;
        case __CAST__: {
          __tmp__IADK=my_copy__QS2H(__tmp__HADK);
        } break;
        case __CALL_SLOT__: {
          __tmp__IADK=my_copy__PIYM(__tmp__HADK);
        } break;
        case __READ_SLOT__: {
          __tmp__IADK=my_copy__AVGK(__tmp__HADK);
        } break;
        case __READ_GLOBAL__: {
          __tmp__IADK=my_copy__NVGK(__tmp__HADK);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__IADK=my_copy__RFCN(__tmp__HADK);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__IADK=my_copy__JMEO(__tmp__HADK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__IADK=my_copy__RTJO(__tmp__HADK);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__IADK=my_copy__WMEO(__tmp__HADK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__IADK=my_copy__3TJO(__tmp__HADK);
        } break;
        case __EXPR_NEG__: {
          __tmp__IADK=my_copy__YEJM(__tmp__HADK);
        } break;
        case __EXPR_ADD__: {
          __tmp__IADK=my_copy__YRLL(__tmp__HADK);
        } break;
        case __EXPR_NOT__: {
          __tmp__IADK=my_copy__GLYM(__tmp__HADK);
        } break;
        case __EXPR_MOD__: {
          __tmp__IADK=my_copy__BNEO(__tmp__HADK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__IADK=my_copy__M3DP(__tmp__HADK);
        } break;
        case __EXPR_INF__: {
          __tmp__IADK=my_copy__PBSN(__tmp__HADK);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__IADK=my_copy__0BSN(__tmp__HADK);
        } break;
        case __EXPR_OR__: {
          __tmp__IADK=my_copy__ZOPN(__tmp__HADK);
        } break;
        case __EXPR_XOR__: {
          __tmp__IADK=my_copy__CYSO(__tmp__HADK);
        } break;
        };
        add_last__XSEI(result__FADK,__tmp__IADK);
        __tmp__MY2J=result__FADK;
      } break;
      case __DTA_BLOCK__: {
        __tmp__MY2J=get_argument__T0TI(__tmp__LY2J);
      } break;
      case __DTA_WR_VALUE__: {
        Self__LADK=((__DTA_WR_VALUE *)__tmp__LY2J);
        result__NADK=create_with_capacity__3THH( 1);
        __tmp__PADK=Self__LADK->parent_dta__PTUH.self_arg__QJZD;
        switch (((struct ___OBJ *)__tmp__PADK)->__id) {
        case __LIST__: {
          __tmp__QADK=my_copy__2HYM(__tmp__PADK);
        } break;
        case __STRING_CST__: {
          Self__MTBQ=((__STRING_CST *)__tmp__PADK);
          __tmp__QADK=create__text__AUMH(Self__MTBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__MTBQ->string__ZK2H);
        } break;
        case __EXTERNAL_C__: {
          __tmp__QADK=my_copy__2K2H(__tmp__PADK);
        } break;
        case __PROTOTYPE_CST__: {
          Self__NTBQ=((__PROTOTYPE_CST *)__tmp__PADK);
          __tmp__QADK=create__type__CLQC(Self__NTBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__NTBQ->parent_constant__E3LC.static_type__F4YD);
        } break;
        case __INTEGER_CST__: {
          Self__OTBQ=((__INTEGER_CST *)__tmp__PADK);
          __tmp__QADK=create__value__type__DNQC(Self__OTBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OTBQ->value__PAZD,Self__OTBQ->parent_constant__P3LC.static_type__F4YD);
        } break;
        case __READ_LOCAL__: {
          __tmp__QADK=my_copy__OAFJ(__tmp__PADK);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__QADK=my_copy__KM2H(__tmp__PADK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__QADK=my_copy__DN2H(__tmp__PADK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__QADK=my_copy__QN2H(__tmp__PADK);
        } break;
        case __REAL_CST__: {
          Self__QTBQ=((__REAL_CST *)__tmp__PADK);
          __tmp__QADK=create__value__type__1SMH(Self__QTBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QTBQ->value__5N2H,Self__QTBQ->parent_constant__M3JH.static_type__F4YD);
        } break;
        case __CHARACTER_CST__: {
          Self__STBQ=((__CHARACTER_CST *)__tmp__PADK);
          __tmp__QADK=create__char__WTMH(Self__STBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__STBQ->text__HO2H);
        } break;
        case __IS_EXPANDED__: {
          Self__TTBQ=((__IS_EXPANDED *)__tmp__PADK);
          __tmp__QADK=create__receiver__WRWH(Self__TTBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__TTBQ->receiver__OO2H));
        } break;
        case __GET_TYPE_ID__: {
          __tmp__QADK=my_copy__TO2H(__tmp__PADK);
        } break;
        case __EXPR_SUP__: {
          __tmp__QADK=my_copy__2O2H(__tmp__PADK);
        } break;
        case __EXPR_SUB__: {
          __tmp__QADK=my_copy__HP2H(__tmp__PADK);
        } break;
        case __EXPR_MUL__: {
          __tmp__QADK=my_copy__TP2H(__tmp__PADK);
        } break;
        case __EXPR_DIV__: {
          __tmp__QADK=my_copy__4P2H(__tmp__PADK);
        } break;
        case __EXPR_AND__: {
          __tmp__QADK=my_copy__JQ2H(__tmp__PADK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__QADK=my_copy__UQ2H(__tmp__PADK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__QADK=my_copy__5Q2H(__tmp__PADK);
        } break;
        case __PUT_TO__: {
          __tmp__QADK=my_copy__KR2H(__tmp__PADK);
        } break;
        case __ITEM__: {
          __tmp__QADK=my_copy__1R2H(__tmp__PADK);
        } break;
        case __SIZE_OF__: {
          __tmp__QADK=my_copy__HS2H(__tmp__PADK);
        } break;
        case __CAST__: {
          __tmp__QADK=my_copy__QS2H(__tmp__PADK);
        } break;
        case __CALL_SLOT__: {
          __tmp__QADK=my_copy__PIYM(__tmp__PADK);
        } break;
        case __READ_SLOT__: {
          __tmp__QADK=my_copy__AVGK(__tmp__PADK);
        } break;
        case __READ_GLOBAL__: {
          __tmp__QADK=my_copy__NVGK(__tmp__PADK);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__QADK=my_copy__RFCN(__tmp__PADK);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__QADK=my_copy__JMEO(__tmp__PADK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__QADK=my_copy__RTJO(__tmp__PADK);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__QADK=my_copy__WMEO(__tmp__PADK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__QADK=my_copy__3TJO(__tmp__PADK);
        } break;
        case __EXPR_NEG__: {
          __tmp__QADK=my_copy__YEJM(__tmp__PADK);
        } break;
        case __EXPR_ADD__: {
          __tmp__QADK=my_copy__YRLL(__tmp__PADK);
        } break;
        case __EXPR_NOT__: {
          __tmp__QADK=my_copy__GLYM(__tmp__PADK);
        } break;
        case __EXPR_MOD__: {
          __tmp__QADK=my_copy__BNEO(__tmp__PADK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__QADK=my_copy__M3DP(__tmp__PADK);
        } break;
        case __EXPR_INF__: {
          __tmp__QADK=my_copy__PBSN(__tmp__PADK);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__QADK=my_copy__0BSN(__tmp__PADK);
        } break;
        case __EXPR_OR__: {
          __tmp__QADK=my_copy__ZOPN(__tmp__PADK);
        } break;
        case __EXPR_XOR__: {
          __tmp__QADK=my_copy__CYSO(__tmp__PADK);
        } break;
        };
        add_last__XSEI(result__NADK,__tmp__QADK);
        __tmp__MY2J=result__NADK;
      } break;
      case __DTA_RD_ARGS__: {
        Self__TADK=((__DTA_RD_ARGS *)__tmp__LY2J);
        result__VADK=NULL;
        if (Self__TADK->copy_argument__WADK) {
          result__VADK=create_with_capacity__3THH((__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__TADK->argument_list__UTFI)->parent_arrayed_collection__42LC.upper__USSH +  1));
          __tmp__GBDK=((__FAST_ARRAYoEXPRo *)Self__TADK->argument_list__UTFI)->parent_arrayed_collection__42LC.upper__USSH;
          Self__RNSK= 0;
          while ((Self__RNSK <= __tmp__GBDK)) {
            __tmp__NBDK=((void **)((__FAST_ARRAYoEXPRo *)Self__TADK->argument_list__UTFI)->parent_arrayed_collection__42LC.storage__1SDI)[Self__RNSK];
            switch (((struct ___OBJ *)__tmp__NBDK)->__id) {
            case __LIST__: {
              __tmp__OBDK=my_copy__2HYM(__tmp__NBDK);
            } break;
            case __STRING_CST__: {
              Self__WTBQ=((__STRING_CST *)__tmp__NBDK);
              __tmp__OBDK=create__text__AUMH(Self__WTBQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WTBQ->string__ZK2H);
            } break;
            case __EXTERNAL_C__: {
              __tmp__OBDK=my_copy__2K2H(__tmp__NBDK);
            } break;
            case __PROTOTYPE_CST__: {
              Self__XTBQ=((__PROTOTYPE_CST *)__tmp__NBDK);
              __tmp__OBDK=create__type__CLQC(Self__XTBQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XTBQ->parent_constant__E3LC.static_type__F4YD);
            } break;
            case __INTEGER_CST__: {
              Self__YTBQ=((__INTEGER_CST *)__tmp__NBDK);
              __tmp__OBDK=create__value__type__DNQC(Self__YTBQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YTBQ->value__PAZD,Self__YTBQ->parent_constant__P3LC.static_type__F4YD);
            } break;
            case __READ_LOCAL__: {
              __tmp__OBDK=my_copy__OAFJ(__tmp__NBDK);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__OBDK=my_copy__KM2H(__tmp__NBDK);
            } break;
            case __EXPR_EQUAL__: {
              __tmp__OBDK=my_copy__DN2H(__tmp__NBDK);
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__OBDK=my_copy__QN2H(__tmp__NBDK);
            } break;
            case __REAL_CST__: {
              Self__0TBQ=((__REAL_CST *)__tmp__NBDK);
              __tmp__OBDK=create__value__type__1SMH(Self__0TBQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0TBQ->value__5N2H,Self__0TBQ->parent_constant__M3JH.static_type__F4YD);
            } break;
            case __CHARACTER_CST__: {
              Self__2TBQ=((__CHARACTER_CST *)__tmp__NBDK);
              __tmp__OBDK=create__char__WTMH(Self__2TBQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2TBQ->text__HO2H);
            } break;
            case __IS_EXPANDED__: {
              Self__3TBQ=((__IS_EXPANDED *)__tmp__NBDK);
              __tmp__OBDK=create__receiver__WRWH(Self__3TBQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__3TBQ->receiver__OO2H));
            } break;
            case __GET_TYPE_ID__: {
              __tmp__OBDK=my_copy__TO2H(__tmp__NBDK);
            } break;
            case __EXPR_SUP__: {
              __tmp__OBDK=my_copy__2O2H(__tmp__NBDK);
            } break;
            case __EXPR_SUB__: {
              __tmp__OBDK=my_copy__HP2H(__tmp__NBDK);
            } break;
            case __EXPR_MUL__: {
              __tmp__OBDK=my_copy__TP2H(__tmp__NBDK);
            } break;
            case __EXPR_DIV__: {
              __tmp__OBDK=my_copy__4P2H(__tmp__NBDK);
            } break;
            case __EXPR_AND__: {
              __tmp__OBDK=my_copy__JQ2H(__tmp__NBDK);
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__OBDK=my_copy__UQ2H(__tmp__NBDK);
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__OBDK=my_copy__5Q2H(__tmp__NBDK);
            } break;
            case __PUT_TO__: {
              __tmp__OBDK=my_copy__KR2H(__tmp__NBDK);
            } break;
            case __ITEM__: {
              __tmp__OBDK=my_copy__1R2H(__tmp__NBDK);
            } break;
            case __SIZE_OF__: {
              __tmp__OBDK=my_copy__HS2H(__tmp__NBDK);
            } break;
            case __CAST__: {
              __tmp__OBDK=my_copy__QS2H(__tmp__NBDK);
            } break;
            case __CALL_SLOT__: {
              __tmp__OBDK=my_copy__PIYM(__tmp__NBDK);
            } break;
            case __READ_SLOT__: {
              __tmp__OBDK=my_copy__AVGK(__tmp__NBDK);
            } break;
            case __READ_GLOBAL__: {
              __tmp__OBDK=my_copy__NVGK(__tmp__NBDK);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__OBDK=my_copy__RFCN(__tmp__NBDK);
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__OBDK=my_copy__JMEO(__tmp__NBDK);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__OBDK=my_copy__RTJO(__tmp__NBDK);
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__OBDK=my_copy__WMEO(__tmp__NBDK);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__OBDK=my_copy__3TJO(__tmp__NBDK);
            } break;
            case __EXPR_NEG__: {
              __tmp__OBDK=my_copy__YEJM(__tmp__NBDK);
            } break;
            case __EXPR_ADD__: {
              __tmp__OBDK=my_copy__YRLL(__tmp__NBDK);
            } break;
            case __EXPR_NOT__: {
              __tmp__OBDK=my_copy__GLYM(__tmp__NBDK);
            } break;
            case __EXPR_MOD__: {
              __tmp__OBDK=my_copy__BNEO(__tmp__NBDK);
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__OBDK=my_copy__M3DP(__tmp__NBDK);
            } break;
            case __EXPR_INF__: {
              __tmp__OBDK=my_copy__PBSN(__tmp__NBDK);
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__OBDK=my_copy__0BSN(__tmp__NBDK);
            } break;
            case __EXPR_OR__: {
              __tmp__OBDK=my_copy__ZOPN(__tmp__NBDK);
            } break;
            case __EXPR_XOR__: {
              __tmp__OBDK=my_copy__CYSO(__tmp__NBDK);
            } break;
            };
            add_last__XSEI(result__VADK,__tmp__OBDK);
            Self__RNSK=(__INTEGER)(Self__RNSK +  1);
          };
        } else {
          result__VADK=Self__TADK->argument_list__UTFI;
          Self__TADK->copy_argument__WADK=TRUE__;
        };
        __tmp__MY2J=result__VADK;
      } break;
      };
      new_larg__GT2J=__tmp__MY2J;
    };
    __tmp__OY2J=((void **)((__FAST_ARRAYoEXPRo *)new_larg__GT2J)->parent_arrayed_collection__42LC.storage__1SDI)[ 0];
    switch (((struct ___OBJ *)__tmp__OY2J)->__id) {
    case __LIST__: {
      __tmp__PY2J=static_type__GIQG(__tmp__OY2J);
    } break;
    case __STRING_CST__: {
      __tmp__PY2J=((__STRING_CST *)__tmp__OY2J)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__PY2J=((__EXTERNAL_C *)__tmp__OY2J)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__PY2J=((__PROTOTYPE_CST *)__tmp__OY2J)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__PY2J=((__INTEGER_CST *)__tmp__OY2J)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__PY2J=((__LOCAL *)((__READ_LOCAL *)__tmp__OY2J)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__PY2J=static_type__0N1H(__tmp__OY2J);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__PY2J=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__PY2J=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__PY2J=((__REAL_CST *)__tmp__OY2J)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__PY2J=((__CHARACTER_CST *)__tmp__OY2J)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__PY2J=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__PY2J=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__PY2J=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__PY2J=static_type__MP1H(__tmp__OY2J);
    } break;
    case __EXPR_MUL__: {
      __tmp__PY2J=static_type__SP1H(__tmp__OY2J);
    } break;
    case __EXPR_DIV__: {
      __tmp__PY2J=static_type__XP1H(__tmp__OY2J);
    } break;
    case __EXPR_AND__: {
      __tmp__PY2J=static_type__2P1H(__tmp__OY2J);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__PY2J=static_type__BQ1H(__tmp__OY2J);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__PY2J=static_type__GQ1H(__tmp__OY2J);
    } break;
    case __PUT_TO__: {
      __tmp__PY2J=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__PY2J=static_type__PQ1H(__tmp__OY2J);
    } break;
    case __SIZE_OF__: {
      __tmp__PY2J=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__PY2J=((__CAST *)__tmp__OY2J)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__PY2J=static_type__GIKL(__tmp__OY2J);
    } break;
    case __READ_SLOT__: {
      __tmp__PY2J=((__SLOT_DATA *)((__READ_SLOT *)__tmp__OY2J)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__PY2J=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__OY2J)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__PY2J=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__PY2J=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__PY2J=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__PY2J=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__PY2J=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__PY2J=static_type__Z2IM(__tmp__OY2J);
    } break;
    case __EXPR_ADD__: {
      __tmp__PY2J=static_type__IXML(__tmp__OY2J);
    } break;
    case __EXPR_NOT__: {
      __tmp__PY2J=static_type__BTXM(__tmp__OY2J);
    } break;
    case __EXPR_MOD__: {
      __tmp__PY2J=static_type__5LEO(__tmp__OY2J);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__PY2J=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__PY2J=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__PY2J=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__PY2J=static_type__NOPN(__tmp__OY2J);
    } break;
    case __EXPR_XOR__: {
      __tmp__PY2J=static_type__XCSO(__tmp__OY2J);
    } break;
    };
    if (((__UINTEGER_8)(((__TYPE_FULL *)__tmp__PY2J)->flag__LTL &  4) !=  0)) {
      run_value__FMQC=__tmp__PY2J;
    };
    if ((debug_level_option__3C !=  0)) {
      __tmp__4Y2J=Self__2S2J->parent_node__OP0G.data__LLZD;
      switch (((struct ___OBJ *)__tmp__4Y2J)->__id) {
      case __DTA_RD__: {
        __tmp__5Y2J=((__DTA_RD *)__tmp__4Y2J)->parent_dta__AMQC.context__OJZD;
      } break;
      case __DTA_CAST__: {
        __tmp__5Y2J=DTA__->context__OJZD;
      } break;
      case __DTA_WR_CODE__: {
        __tmp__5Y2J=((__DTA_WR_CODE *)__tmp__4Y2J)->parent_dta__E0LH.context__OJZD;
      } break;
      case __DTA_BLOCK__: {
        __tmp__5Y2J=((__DTA_BLOCK *)__tmp__4Y2J)->context__52UH;
      } break;
      case __DTA_WR_VALUE__: {
        __tmp__5Y2J=((__DTA_WR_VALUE *)__tmp__4Y2J)->parent_dta__PTUH.context__OJZD;
      } break;
      case __DTA_RD_ARGS__: {
        __tmp__5Y2J=((__DTA_RD_ARGS *)__tmp__4Y2J)->parent_dta__5OWH.context__OJZD;
      } break;
      };
      if (((void *)__tmp__5Y2J == (void *)NULL)) {
        ctext__NT2J=context_main__D2LC;
      } else {
        __tmp__LZ2J=Self__2S2J->parent_node__OP0G.data__LLZD;
        switch (((struct ___OBJ *)__tmp__LZ2J)->__id) {
        case __DTA_RD__: {
          __tmp__MZ2J=((__DTA_RD *)__tmp__LZ2J)->parent_dta__AMQC.context__OJZD;
        } break;
        case __DTA_CAST__: {
          __tmp__MZ2J=DTA__->context__OJZD;
        } break;
        case __DTA_WR_CODE__: {
          __tmp__MZ2J=((__DTA_WR_CODE *)__tmp__LZ2J)->parent_dta__E0LH.context__OJZD;
        } break;
        case __DTA_BLOCK__: {
          __tmp__MZ2J=((__DTA_BLOCK *)__tmp__LZ2J)->context__52UH;
        } break;
        case __DTA_WR_VALUE__: {
          __tmp__MZ2J=((__DTA_WR_VALUE *)__tmp__LZ2J)->parent_dta__PTUH.context__OJZD;
        } break;
        case __DTA_RD_ARGS__: {
          __tmp__MZ2J=((__DTA_RD_ARGS *)__tmp__LZ2J)->parent_dta__5OWH.context__OJZD;
        } break;
        };
        if (((struct ___OBJ *)__tmp__MZ2J)->__id==__PROFIL_SLOT__) {
          __tmp__NZ2J=((__PROFIL_SLOT *)__tmp__MZ2J)->parent_profil__51LC.context__0M0G;
        } else {
          __tmp__NZ2J=((__PROFIL_BLOCK *)__tmp__MZ2J)->parent_profil__GHAG.context__0M0G;
        };
        ctext__NT2J=__tmp__NZ2J;
      };
      add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,create__context__first__20EG(PUSH__,position__V54J(Self__2S2J),ctext__NT2J,FALSE__));
    };
    Self__UKJK=((__SLOT_CODE *)__tmp__ZX2J);
    args__VKJK=new_larg__GT2J;
    __tmp__5UJK=self_up__LKEF;
    result__YKJK=NULL;
    res_lst__ZKJK=NULL;
    pro__0KJK=NULL;
    i__2KJK= 0;
    loc__3KJK=NULL;
    typ__4KJK=NULL;
    typ_block__5KJK=NULL;
    typ_list__ALJK=NULL;
    pro_list__BLJK=NULL;
    is_new__CLJK=FALSE__;
    j__1KJK= 0;
    while_do__UMOK:
    {
      if ((j__1KJK <= ((__FAST_ARRAYoEXPRo *)args__VKJK)->parent_arrayed_collection__42LC.upper__USSH)) {
        if (((void *)typ__4KJK == (void *)NULL)) {
          __tmp__1LJK=TRUE__;
        } else {
          __tmp__ULJK=((__TYPE_FULL *)typ__4KJK)->parent_type__KTL;
          __tmp__VLJK=type_block__BLB;
          switch (((struct ___OBJ *)__tmp__ULJK)->__id) {
          case __TYPE__: {
            __tmp__WLJK=((void *)((__TYPE *)__tmp__ULJK) == (void *)__tmp__VLJK);
          } break;
          case __TYPE_NULL__: {
            __tmp__WLJK=((void *)((__TYPE_NULL *)__tmp__ULJK) == (void *)__tmp__VLJK);
          } break;
          case __TYPE_VOID__: {
            __tmp__WLJK=((void *)((__TYPE_VOID *)__tmp__ULJK) == (void *)__tmp__VLJK);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__WLJK=((void *)((__TYPE_CONTEXT *)__tmp__ULJK) == (void *)__tmp__VLJK);
          } break;
          case __TYPE_ID__: {
            __tmp__WLJK=((void *)((__TYPE_ID *)__tmp__ULJK) == (void *)__tmp__VLJK);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__WLJK=((void *)((__TYPE_GENERIC *)__tmp__ULJK) == (void *)__tmp__VLJK);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__WLJK=__infix_equal_equal__GSFJ(__tmp__ULJK,__tmp__VLJK);
          } break;
          };
          __tmp__1LJK=(! __tmp__WLJK);
        };
        __tmp__4LJK=__tmp__1LJK;
      } else {
        __tmp__4LJK=FALSE__;
      };
      if (__tmp__4LJK) {
        __tmp__FMJK=((void **)((__FAST_ARRAYoEXPRo *)args__VKJK)->parent_arrayed_collection__42LC.storage__1SDI)[j__1KJK];
        switch (((struct ___OBJ *)__tmp__FMJK)->__id) {
        case __LIST__: {
          __tmp__GMJK=static_type__GIQG(__tmp__FMJK);
        } break;
        case __STRING_CST__: {
          __tmp__GMJK=((__STRING_CST *)__tmp__FMJK)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__GMJK=((__EXTERNAL_C *)__tmp__FMJK)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__GMJK=((__PROTOTYPE_CST *)__tmp__FMJK)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__GMJK=((__INTEGER_CST *)__tmp__FMJK)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__GMJK=((__LOCAL *)((__READ_LOCAL *)__tmp__FMJK)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__GMJK=static_type__0N1H(__tmp__FMJK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__GMJK=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__GMJK=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__GMJK=((__REAL_CST *)__tmp__FMJK)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__GMJK=((__CHARACTER_CST *)__tmp__FMJK)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__GMJK=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__GMJK=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__GMJK=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__GMJK=static_type__MP1H(__tmp__FMJK);
        } break;
        case __EXPR_MUL__: {
          __tmp__GMJK=static_type__SP1H(__tmp__FMJK);
        } break;
        case __EXPR_DIV__: {
          __tmp__GMJK=static_type__XP1H(__tmp__FMJK);
        } break;
        case __EXPR_AND__: {
          __tmp__GMJK=static_type__2P1H(__tmp__FMJK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__GMJK=static_type__BQ1H(__tmp__FMJK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__GMJK=static_type__GQ1H(__tmp__FMJK);
        } break;
        case __PUT_TO__: {
          __tmp__GMJK=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__GMJK=static_type__PQ1H(__tmp__FMJK);
        } break;
        case __SIZE_OF__: {
          __tmp__GMJK=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__GMJK=((__CAST *)__tmp__FMJK)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__GMJK=static_type__GIKL(__tmp__FMJK);
        } break;
        case __READ_SLOT__: {
          __tmp__GMJK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__FMJK)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__GMJK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__FMJK)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__GMJK=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__GMJK=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__GMJK=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__GMJK=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__GMJK=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__GMJK=static_type__Z2IM(__tmp__FMJK);
        } break;
        case __EXPR_ADD__: {
          __tmp__GMJK=static_type__IXML(__tmp__FMJK);
        } break;
        case __EXPR_NOT__: {
          __tmp__GMJK=static_type__BTXM(__tmp__FMJK);
        } break;
        case __EXPR_MOD__: {
          __tmp__GMJK=static_type__5LEO(__tmp__FMJK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__GMJK=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__GMJK=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__GMJK=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__GMJK=static_type__NOPN(__tmp__FMJK);
        } break;
        case __EXPR_XOR__: {
          __tmp__GMJK=static_type__XCSO(__tmp__FMJK);
        } break;
        };
        typ__4KJK=__tmp__GMJK;
        __tmp__HMJK=((__TYPE_FULL *)__tmp__GMJK)->parent_type__KTL;
        __tmp__IMJK=type_block__BLB;
        switch (((struct ___OBJ *)__tmp__HMJK)->__id) {
        case __TYPE__: {
          __tmp__JMJK=((void *)((__TYPE *)__tmp__HMJK) == (void *)__tmp__IMJK);
        } break;
        case __TYPE_NULL__: {
          __tmp__JMJK=((void *)((__TYPE_NULL *)__tmp__HMJK) == (void *)__tmp__IMJK);
        } break;
        case __TYPE_VOID__: {
          __tmp__JMJK=((void *)((__TYPE_VOID *)__tmp__HMJK) == (void *)__tmp__IMJK);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__JMJK=((void *)((__TYPE_CONTEXT *)__tmp__HMJK) == (void *)__tmp__IMJK);
        } break;
        case __TYPE_ID__: {
          __tmp__JMJK=((void *)((__TYPE_ID *)__tmp__HMJK) == (void *)__tmp__IMJK);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__JMJK=((void *)((__TYPE_GENERIC *)__tmp__HMJK) == (void *)__tmp__IMJK);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__JMJK=__infix_equal_equal__GSFJ(__tmp__HMJK,__tmp__IMJK);
        } break;
        };
        if (__tmp__JMJK) {
          typ_list__ALJK=new__XWSG();
          __tmp__QMJK=((void **)((__FAST_ARRAYoEXPRo *)args__VKJK)->parent_arrayed_collection__42LC.storage__1SDI)[j__1KJK];
          switch (((struct ___OBJ *)__tmp__QMJK)->__id) {
          case __LIST__: {
            get_type__EYMJ(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __STRING_CST__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)((__STRING_CST *)__tmp__QMJK)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
          } break;
          case __EXTERNAL_C__: {
            get_type__ZHDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __PROTOTYPE_CST__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__QMJK)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
          } break;
          case __INTEGER_CST__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__QMJK)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
          } break;
          case __READ_LOCAL__: {
            get_type__AOFJ(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_MULTIPLE__: {
            print__1ZE((&__string_253));
            fputc((int)('\n'),stdout);
            exit(( 1));
          } break;
          case __EXPR_EQUAL__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_NOT_EQUAL__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __REAL_CST__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)((__REAL_CST *)__tmp__QMJK)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
          } break;
          case __CHARACTER_CST__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__QMJK)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
          } break;
          case __IS_EXPANDED__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __GET_TYPE_ID__: {
            add__R2EJ(typ_list__ALJK,type_integer__3JB);
          } break;
          case __EXPR_SUP__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_SUB__: {
            get_type__ZJDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_MUL__: {
            get_type__3JDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_DIV__: {
            get_type__BKDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_AND__: {
            get_type__FKDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_SHIFT_R__: {
            get_type__JKDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_SHIFT_L__: {
            get_type__NKDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __PUT_TO__: {
            add__R2EJ(typ_list__ALJK,TYPE_VOID__);
          } break;
          case __ITEM__: {
            get_type__UKDI(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __SIZE_OF__: {
            add__R2EJ(typ_list__ALJK,type_integer__3JB);
          } break;
          case __CAST__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)((__CAST *)__tmp__QMJK)->static_type__SO1H)->parent_type__KTL);
          } break;
          case __CALL_SLOT__: {
            get_type__DAML(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __READ_SLOT__: {
            get_type__OD0K(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __READ_GLOBAL__: {
            get_type__ZJOL(((__READ_GLOBAL *)__tmp__QMJK)->global__RHJK,typ_list__ALJK);
          } break;
          case __EXPR_NOT_LOGIC__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_OR_LOGIC__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_AND_LOGIC__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_NEG__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__QMJK)))->parent_type__KTL);
          } break;
          case __EXPR_ADD__: {
            get_type__YEOL(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_NOT__: {
            add__R2EJ(typ_list__ALJK,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__QMJK)))->parent_type__KTL);
          } break;
          case __EXPR_MOD__: {
            get_type__FSEO(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_SUP_EQ__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_INF__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_INF_EQ__: {
            add__R2EJ(typ_list__ALJK,type_true__FJB);
            add__R2EJ(typ_list__ALJK,type_false__NJB);
          } break;
          case __EXPR_OR__: {
            get_type__CVPN(__tmp__QMJK,typ_list__ALJK);
          } break;
          case __EXPR_XOR__: {
            get_type__FNTO(__tmp__QMJK,typ_list__ALJK);
          } break;
          };
          if (((void *)((void **)((__TYPES_TMP *)typ_list__ALJK)->parent_types__W25F.storage__WWFJ)[ 0] == (void *)TYPE_NULL__)) {
            if (((__INTEGER)(((__TYPES_TMP *)typ_list__ALJK)->parent_types__W25F.upper__4LAG +  1) >  1)) {
              __tmp__5MJK=((void **)((__TYPES_TMP *)typ_list__ALJK)->parent_types__W25F.storage__WWFJ)[ 1];
              if (__tmp__5MJK==NULL) {
                __tmp__ANJK=NULL;
              } else {
                switch (((struct ___OBJ *)__tmp__5MJK)->__id) {
                case __TYPE__: {
                  __tmp__ANJK=NULL;
                } break;
                case __TYPE_NULL__: {
                  __tmp__ANJK=NULL;
                } break;
                case __TYPE_VOID__: {
                  __tmp__ANJK=NULL;
                } break;
                case __TYPE_CONTEXT__: {
                  __tmp__ANJK=NULL;
                } break;
                case __TYPE_ID__: {
                  __tmp__ANJK=NULL;
                } break;
                case __TYPE_GENERIC__: {
                  __tmp__ANJK=NULL;
                } break;
                case __PROFIL_BLOCK__: {
                  __tmp__ANJK=((void *)__tmp__5MJK);
                } break;
                }
              };
              typ_block__5KJK=__tmp__ANJK;
            } else {
              typ__4KJK=NULL;
            };
          } else {
            __tmp__NNJK=((void **)((__TYPES_TMP *)typ_list__ALJK)->parent_types__W25F.storage__WWFJ)[ 0];
            if (__tmp__NNJK==NULL) {
              __tmp__ONJK=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__NNJK)->__id) {
              case __TYPE__: {
                __tmp__ONJK=NULL;
              } break;
              case __TYPE_NULL__: {
                __tmp__ONJK=NULL;
              } break;
              case __TYPE_VOID__: {
                __tmp__ONJK=NULL;
              } break;
              case __TYPE_CONTEXT__: {
                __tmp__ONJK=NULL;
              } break;
              case __TYPE_ID__: {
                __tmp__ONJK=NULL;
              } break;
              case __TYPE_GENERIC__: {
                __tmp__ONJK=NULL;
              } break;
              case __PROFIL_BLOCK__: {
                __tmp__ONJK=((void *)__tmp__NNJK);
              } break;
              }
            };
            typ_block__5KJK=__tmp__ONJK;
          };
          free__OOFJ(typ_list__ALJK);
        };
        j__1KJK=(__INTEGER)(j__1KJK +  1);
        goto while_do__UMOK;
      };
    };
    if (((void *)typ_block__5KJK != (void *)NULL)) {
      pro_list__BLJK=((__PROFIL_BLOCK *)typ_block__5KJK)->profil_list__MJEI;
      i__2KJK= 0;
      while (((i__2KJK <= ((__FAST_ARRAYoPROFIL_SLOTo *)pro_list__BLJK)->parent_arrayed_collection__H15F.upper__IVPG) && ((void *)result__YKJK == (void *)NULL))) {
        pro__0KJK=((void **)((__FAST_ARRAYoPROFIL_SLOTo *)pro_list__BLJK)->parent_arrayed_collection__H15F.storage__EVPG)[i__2KJK];
        if (((void *)((__PROFIL_SLOT *)pro__0KJK)->slot_code__X4NL == (void *)Self__UKJK)) {
          if (((void *)((__PROFIL_SLOT *)pro__0KJK)->parent_profil__51LC.type_self__RIEI == (void *)NULL)) {
            __tmp__BPJK=TRUE__;
          } else {
            Self__W45Q=((__TYPE_FULL *)((__PROFIL_SLOT *)pro__0KJK)->parent_profil__51LC.type_self__RIEI);
            other__X45Q=to_run__MPXD();
            __tmp__BPJK=(((void *)Self__W45Q == (void *)other__X45Q) || (((void *)Self__W45Q->parent_type__KTL == (void *)((__TYPE_FULL *)other__X45Q)->parent_type__KTL) && ((__UINTEGER_8)(Self__W45Q->flag__LTL &  15) == (__UINTEGER_8)(((__TYPE_FULL *)other__X45Q)->flag__LTL &  15))));
          };
          __tmp__EPJK=__tmp__BPJK;
        } else {
          __tmp__EPJK=FALSE__;
        };
        if (__tmp__EPJK) {
          result__YKJK=pro__0KJK;
        };
        i__2KJK=(__INTEGER)(i__2KJK +  1);
      };
      if (((void *)result__YKJK == (void *)NULL)) {
        result__YKJK=clone__FI5K();
        ((__PROFIL_SLOT *)result__YKJK)->is_context_sensitive__5POL=TRUE__;
        add_last__5J5K(((__PROFIL_BLOCK *)typ_block__5KJK)->profil_list__MJEI,result__YKJK);
        is_new__CLJK=TRUE__;
      };
    } else {
      j__1KJK= 0;
      while (((j__1KJK <= ((__FAST_ARRAYoPROFIL_SLOTo *)Self__UKJK->profil__J15F)->parent_arrayed_collection__H15F.upper__IVPG) && ((void *)result__YKJK == (void *)NULL))) {
        pro__0KJK=((void **)((__FAST_ARRAYoPROFIL_SLOTo *)Self__UKJK->profil__J15F)->parent_arrayed_collection__H15F.storage__EVPG)[j__1KJK];
        if (((void *)((__PROFIL_SLOT *)pro__0KJK)->parent_profil__51LC.type_self__RIEI == (void *)NULL)) {
          __tmp__ARJK=TRUE__;
        } else {
          Self__Y45Q=((__TYPE_FULL *)((__PROFIL_SLOT *)pro__0KJK)->parent_profil__51LC.type_self__RIEI);
          other__Z45Q=to_run__MPXD();
          __tmp__ARJK=(((void *)Self__Y45Q == (void *)other__Z45Q) || (((void *)Self__Y45Q->parent_type__KTL == (void *)((__TYPE_FULL *)other__Z45Q)->parent_type__KTL) && ((__UINTEGER_8)(Self__Y45Q->flag__LTL &  15) == (__UINTEGER_8)(((__TYPE_FULL *)other__Z45Q)->flag__LTL &  15))));
        };
        if (__tmp__ARJK) {
          result__YKJK=pro__0KJK;
          i__2KJK= 1;
          while (((i__2KJK <= ((__FAST_ARRAYoEXPRo *)args__VKJK)->parent_arrayed_collection__42LC.upper__USSH) && ((void *)result__YKJK != (void *)NULL))) {
            __tmp__2RJK=((void **)((__FAST_ARRAYoEXPRo *)args__VKJK)->parent_arrayed_collection__42LC.storage__1SDI)[i__2KJK];
            switch (((struct ___OBJ *)__tmp__2RJK)->__id) {
            case __LIST__: {
              __tmp__3RJK=static_type__GIQG(__tmp__2RJK);
            } break;
            case __STRING_CST__: {
              __tmp__3RJK=((__STRING_CST *)__tmp__2RJK)->parent_constant__5F.static_type__F4YD;
            } break;
            case __EXTERNAL_C__: {
              __tmp__3RJK=((__EXTERNAL_C *)__tmp__2RJK)->static_type__UXZD;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__3RJK=((__PROTOTYPE_CST *)__tmp__2RJK)->parent_constant__E3LC.static_type__F4YD;
            } break;
            case __INTEGER_CST__: {
              __tmp__3RJK=((__INTEGER_CST *)__tmp__2RJK)->parent_constant__P3LC.static_type__F4YD;
            } break;
            case __READ_LOCAL__: {
              __tmp__3RJK=((__LOCAL *)((__READ_LOCAL *)__tmp__2RJK)->local__ALZD)->parent_variable__B2LC.type__125F;
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__3RJK=static_type__0N1H(__tmp__2RJK);
            } break;
            case __EXPR_EQUAL__: {
              __tmp__3RJK=static_type__TO1H();
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__3RJK=static_type__YO1H();
            } break;
            case __REAL_CST__: {
              __tmp__3RJK=((__REAL_CST *)__tmp__2RJK)->parent_constant__M3JH.static_type__F4YD;
            } break;
            case __CHARACTER_CST__: {
              __tmp__3RJK=((__CHARACTER_CST *)__tmp__2RJK)->parent_constant__53JH.static_type__F4YD;
            } break;
            case __IS_EXPANDED__: {
              __tmp__3RJK=static_type__3O1H();
            } break;
            case __GET_TYPE_ID__: {
              __tmp__3RJK=static_type__CP1H();
            } break;
            case __EXPR_SUP__: {
              __tmp__3RJK=static_type__HP1H();
            } break;
            case __EXPR_SUB__: {
              __tmp__3RJK=static_type__MP1H(__tmp__2RJK);
            } break;
            case __EXPR_MUL__: {
              __tmp__3RJK=static_type__SP1H(__tmp__2RJK);
            } break;
            case __EXPR_DIV__: {
              __tmp__3RJK=static_type__XP1H(__tmp__2RJK);
            } break;
            case __EXPR_AND__: {
              __tmp__3RJK=static_type__2P1H(__tmp__2RJK);
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__3RJK=static_type__BQ1H(__tmp__2RJK);
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__3RJK=static_type__GQ1H(__tmp__2RJK);
            } break;
            case __PUT_TO__: {
              __tmp__3RJK=TYPE_VOID__->parent_type__UIB.default__AKC;
            } break;
            case __ITEM__: {
              __tmp__3RJK=static_type__PQ1H(__tmp__2RJK);
            } break;
            case __SIZE_OF__: {
              __tmp__3RJK=static_type__1Q1H();
            } break;
            case __CAST__: {
              __tmp__3RJK=((__CAST *)__tmp__2RJK)->static_type__SO1H;
            } break;
            case __CALL_SLOT__: {
              __tmp__3RJK=static_type__GIKL(__tmp__2RJK);
            } break;
            case __READ_SLOT__: {
              __tmp__3RJK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__2RJK)->slot__EVGK)->parent_variable__AJZD.type__125F;
            } break;
            case __READ_GLOBAL__: {
              __tmp__3RJK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__2RJK)->global__RHJK)->parent_variable__AJZD.type__125F;
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__3RJK=static_type__JRZM();
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__3RJK=static_type__VLEO();
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__3RJK=static_type__LVIO();
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__3RJK=static_type__0LEO();
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__3RJK=static_type__RVIO();
            } break;
            case __EXPR_NEG__: {
              __tmp__3RJK=static_type__Z2IM(__tmp__2RJK);
            } break;
            case __EXPR_ADD__: {
              __tmp__3RJK=static_type__IXML(__tmp__2RJK);
            } break;
            case __EXPR_NOT__: {
              __tmp__3RJK=static_type__BTXM(__tmp__2RJK);
            } break;
            case __EXPR_MOD__: {
              __tmp__3RJK=static_type__5LEO(__tmp__2RJK);
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__3RJK=static_type__W2DP();
            } break;
            case __EXPR_INF__: {
              __tmp__3RJK=static_type__FQQN();
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__3RJK=static_type__KQQN();
            } break;
            case __EXPR_OR__: {
              __tmp__3RJK=static_type__NOPN(__tmp__2RJK);
            } break;
            case __EXPR_XOR__: {
              __tmp__3RJK=static_type__XCSO(__tmp__2RJK);
            } break;
            };
            typ__4KJK=__tmp__3RJK;
            loc__3KJK=((void **)((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)pro__0KJK)->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[i__2KJK];
            if ((((void *)loc__3KJK != (void *)NULL) && (((__UINTEGER_8)(((__TYPE_FULL *)__tmp__3RJK)->flag__LTL &  1) !=  0) || ((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)loc__3KJK)->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0)))) {
              Self__F2OI=((__TYPE_FULL *)__tmp__3RJK);
              other__G2OI=((__LOCAL *)loc__3KJK)->parent_variable__B2LC.type__125F;
              __tmp__ETJK=(! (((void *)Self__F2OI == (void *)other__G2OI) || (((void *)Self__F2OI->parent_type__KTL == (void *)((__TYPE_FULL *)other__G2OI)->parent_type__KTL) && ((__UINTEGER_8)(Self__F2OI->flag__LTL &  15) == (__UINTEGER_8)(((__TYPE_FULL *)other__G2OI)->flag__LTL &  15)))));
            } else {
              __tmp__ETJK=FALSE__;
            };
            if ((__tmp__ETJK && ((void *)((__TYPE_FULL *)((__LOCAL *)loc__3KJK)->parent_variable__B2LC.type__125F)->parent_type__KTL != (void *)type_boolean__VJB))) {
              result__YKJK=NULL;
            };
            i__2KJK=(__INTEGER)(i__2KJK +  1);
          };
        };
        j__1KJK=(__INTEGER)(j__1KJK +  1);
      };
      if (((void *)result__YKJK == (void *)NULL)) {
        result__YKJK=clone__FI5K();
        add_last__5J5K(Self__UKJK->profil__J15F,result__YKJK);
        if ((((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_30)) && ((__INTEGER)(((__FAST_ARRAYoPROFIL_SLOTo *)Self__UKJK->profil__J15F)->parent_arrayed_collection__H15F.upper__IVPG +  1) >  1))) {
          __tmp__NUJK=((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          put_error__text__0AH( 1,(&__string_541));
          put_position__ECH(__tmp__NUJK);
          send_error__2FH();
        };
        is_new__CLJK=TRUE__;
      };
    };
    if (is_new__CLJK) {
      self_up__LKEF=((__SLOT *)Self__UKJK->parent_slot__Y22F)->receiver_type__Q22F;
      __tmp__2UJK=((__INTEGER)(((__FAST_ARRAYoPROFIL_SLOTo *)Self__UKJK->profil__J15F)->parent_arrayed_collection__H15F.upper__IVPG +  1) ==  1);
      Self__03NL=((__PROFIL_SLOT *)result__YKJK);
      loc__53NL=NULL;
      typ__A4NL=NULL;
      idx_result__C4NL= 0;
      type_multiple__D4NL=NULL;
      type_mono__E4NL=NULL;
      add__30JI(Self__03NL);
      if (((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_30))) {
        Self__03NL->parent_profil__51LC.name__XJEI=((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
      } else {
        Self__03NL->parent_profil__51LC.name__XJEI=get_intern__3MBG(((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB);
      };
      Self__03NL->slot_code__X4NL=Self__UKJK;
      Self__03NL->parent_profil__51LC.type_self__RIEI=to_run__MPXD();
      item_lst__B4NL=((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->argument_list__BC2D;
      Self__03NL->parent_profil__51LC.argument_list__N5JH=create_with_capacity__NXBG(argument_count__P0BG(((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F));
      __tmp__C5NL=((__FAST_ARRAYoITM_ARGUMENTo *)item_lst__B4NL)->parent_arrayed_collection__5GJD.upper__W31D;
      Self__GMRL= 0;
      while ((Self__GMRL <= __tmp__C5NL)) {
        __tmp__I5NL=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)item_lst__B4NL)->parent_arrayed_collection__5GJD.storage__U41D)[Self__GMRL];
        __tmp__J5NL=Self__03NL->parent_profil__51LC.argument_list__N5JH;
        if (((struct ___OBJ *)__tmp__I5NL)->__id==__ITM_ARG__) {
          to_run__TLXI(__tmp__I5NL,__tmp__J5NL);
        } else {
          to_run__3LXI(__tmp__I5NL,__tmp__J5NL);
        };
        Self__GMRL=(__INTEGER)(Self__GMRL +  1);
      };
      if ((((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_30)) && ((__INTEGER)(((__FAST_ARRAYoLOCALo *)Self__03NL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F +  1) >  1))) {
        __tmp__DAOL=((__FAST_ARRAYoLOCALo *)Self__03NL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
        Self__CAOM= 1;
        while ((Self__CAOM <= __tmp__DAOL)) {
          loc__53NL=((void **)((__FAST_ARRAYoLOCALo *)Self__03NL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__CAOM];
          ((__LOCAL *)loc__53NL)->parent_variable__B2LC.ensure_count__QEAG= 1;
          write__value__T5FH(loc__53NL,((__LOCAL *)loc__53NL)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM,create__text__access__persistant__type__2U0C(((__LOCAL *)loc__53NL)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM,(&__string_542),NULL,FALSE__,((__LOCAL *)loc__53NL)->parent_variable__B2LC.type__125F));
          Self__CAOM=(__INTEGER)(Self__CAOM +  1);
        };
      };
      if (((void *)((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->type__PD2D != (void *)type_void__NHEC)) {
        __tmp__BBOL=((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
        if (__tmp__BBOL==NULL) {
          __tmp__CBOL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__BBOL)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            __tmp__CBOL=NULL;
          } break;
          case __ITM_TYPE_STYLE__: {
            __tmp__CBOL=NULL;
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__CBOL=NULL;
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__CBOL=NULL;
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__CBOL=NULL;
          } break;
          case __ITM_TYPE_MULTI__: {
            __tmp__CBOL=((void *)__tmp__BBOL);
          } break;
          }
        };
        type_multiple__D4NL=__tmp__CBOL;
        if (((void *)__tmp__CBOL != (void *)NULL)) {
          Self__03NL->parent_profil__51LC.result_list__SA2H=create_with_capacity__NXBG((__INTEGER)((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__CBOL)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK +  1) -  1));
          idx_result__C4NL= 1;
          __tmp__OBOL=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__CBOL)->list_type__VZVD)->parent_arrayed_collection__PIB.upper__BWK -  1);
          Self__H1AM= 0;
          while ((Self__H1AM <= __tmp__OBOL)) {
            __tmp__UBOL=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)type_multiple__D4NL)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[Self__H1AM];
            switch (((struct ___OBJ *)__tmp__UBOL)->__id) {
            case __ITM_TYPE_SIMPLE__: {
              if (((__ITM_TYPE_SIMPLE *)__tmp__UBOL)->to_run__2VK==0) {
                __tmp__VBOL=((__ITM_TYPE_SIMPLE *)__tmp__UBOL)->to_run__1VK;
              } else {
                __tmp__VBOL=to_run__XVK(__tmp__UBOL);
              };
            } break;
            case __ITM_TYPE_STYLE__: {
              if (((__ITM_TYPE_STYLE *)__tmp__UBOL)->to_run__V1IB==0) {
                __tmp__VBOL=((__ITM_TYPE_STYLE *)__tmp__UBOL)->to_run__U1IB;
              } else {
                Self__5XBQ=((__ITM_TYPE_STYLE *)__tmp__UBOL);
                __tmp__AYBQ=get__XUN(Self__5XBQ);
                Self__5XBQ->to_run__U1IB=__tmp__AYBQ;
                Self__5XBQ->to_run__V1IB=0;
                __tmp__VBOL=__tmp__AYBQ;
              };
            } break;
            case __ITM_TYPE_GENERIC__: {
              __tmp__VBOL=to_run__W1IB(__tmp__UBOL);
            } break;
            case __ITM_TYPE_SELF__: {
              __tmp__VBOL=to_run__MPXD();
            } break;
            case __ITM_TYPE_GENERIC_ELT__: {
              __tmp__VBOL=to_run__DKEF(__tmp__UBOL);
            } break;
            };
            typ__A4NL=__tmp__VBOL;
            loc__53NL=get__result__Z3KM(__tmp__VBOL,((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM,idx_result__C4NL);
            add_last__T2FH(Self__03NL->parent_profil__51LC.result_list__SA2H,loc__53NL);
            idx_result__C4NL=(__INTEGER)(idx_result__C4NL +  1);
            Self__H1AM=(__INTEGER)(Self__H1AM +  1);
          };
          Self__4J2Q=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)__tmp__CBOL)->list_type__VZVD);
          __tmp__2BOL=((void **)Self__4J2Q->parent_arrayed_collection__PIB.storage__5WK)[Self__4J2Q->parent_arrayed_collection__PIB.upper__BWK];
          switch (((struct ___OBJ *)__tmp__2BOL)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            if (((__ITM_TYPE_SIMPLE *)__tmp__2BOL)->to_run__2VK==0) {
              __tmp__3BOL=((__ITM_TYPE_SIMPLE *)__tmp__2BOL)->to_run__1VK;
            } else {
              __tmp__3BOL=to_run__XVK(__tmp__2BOL);
            };
          } break;
          case __ITM_TYPE_STYLE__: {
            if (((__ITM_TYPE_STYLE *)__tmp__2BOL)->to_run__V1IB==0) {
              __tmp__3BOL=((__ITM_TYPE_STYLE *)__tmp__2BOL)->to_run__U1IB;
            } else {
              Self__IYBQ=((__ITM_TYPE_STYLE *)__tmp__2BOL);
              __tmp__JYBQ=get__XUN(Self__IYBQ);
              Self__IYBQ->to_run__U1IB=__tmp__JYBQ;
              Self__IYBQ->to_run__V1IB=0;
              __tmp__3BOL=__tmp__JYBQ;
            };
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__3BOL=to_run__W1IB(__tmp__2BOL);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__3BOL=to_run__MPXD();
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__3BOL=to_run__DKEF(__tmp__2BOL);
          } break;
          };
          typ__A4NL=__tmp__3BOL;
        } else {
          __tmp__FCOL=((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->type__PD2D;
          if (__tmp__FCOL==NULL) {
            __tmp__GCOL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__FCOL)->__id) {
            case __ITM_TYPE_SIMPLE__: {
              __tmp__GCOL=((void *)__tmp__FCOL);
            } break;
            case __ITM_TYPE_STYLE__: {
              __tmp__GCOL=((void *)__tmp__FCOL);
            } break;
            case __ITM_TYPE_GENERIC__: {
              __tmp__GCOL=((void *)__tmp__FCOL);
            } break;
            case __ITM_TYPE_SELF__: {
              __tmp__GCOL=((void *)__tmp__FCOL);
            } break;
            case __ITM_TYPE_GENERIC_ELT__: {
              __tmp__GCOL=((void *)__tmp__FCOL);
            } break;
            case __ITM_TYPE_MULTI__: {
              __tmp__GCOL=NULL;
            } break;
            }
          };
          type_mono__E4NL=__tmp__GCOL;
          switch (((struct ___OBJ *)__tmp__GCOL)->__id) {
          case __ITM_TYPE_SIMPLE__: {
            if (((__ITM_TYPE_SIMPLE *)__tmp__GCOL)->to_run__2VK==0) {
              __tmp__HCOL=((__ITM_TYPE_SIMPLE *)__tmp__GCOL)->to_run__1VK;
            } else {
              __tmp__HCOL=to_run__XVK(__tmp__GCOL);
            };
          } break;
          case __ITM_TYPE_STYLE__: {
            if (((__ITM_TYPE_STYLE *)__tmp__GCOL)->to_run__V1IB==0) {
              __tmp__HCOL=((__ITM_TYPE_STYLE *)__tmp__GCOL)->to_run__U1IB;
            } else {
              Self__KYBQ=((__ITM_TYPE_STYLE *)__tmp__GCOL);
              __tmp__LYBQ=get__XUN(Self__KYBQ);
              Self__KYBQ->to_run__U1IB=__tmp__LYBQ;
              Self__KYBQ->to_run__V1IB=0;
              __tmp__HCOL=__tmp__LYBQ;
            };
          } break;
          case __ITM_TYPE_GENERIC__: {
            __tmp__HCOL=to_run__W1IB(__tmp__GCOL);
          } break;
          case __ITM_TYPE_SELF__: {
            __tmp__HCOL=to_run__MPXD();
          } break;
          case __ITM_TYPE_GENERIC_ELT__: {
            __tmp__HCOL=to_run__DKEF(__tmp__GCOL);
          } break;
          };
          typ__A4NL=__tmp__HCOL;
        };
        Self__03NL->parent_profil__51LC.result_last__XGKH=get__result__Z3KM(typ__A4NL,((__ITM_SLOT *)((__SLOT *)Self__UKJK->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM,idx_result__C4NL);
      };
      result__F4NL=write_argument__WCOL(Self__03NL,new_larg__GT2J);
      Self__03NL->parent_profil__51LC.context__0M0G=push_extern__profil__YGQC(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)Self__03NL->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM,Self__03NL);
      Self__03NL->parent_profil__51LC.code__HZJH=list_current__IF1;
      Self__TNRL=((__SLOT_CODE *)Self__03NL->slot_code__X4NL);
      instr__XNRL=NULL;
      verify__JDAG=__tmp__2UJK;
      Self__TNRL->is_require__YNRL=TRUE__;
      contract__VNRL=((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->require__SB3D;
      Self__TNRL->last_type_contract__2NRL=((__SLOT *)Self__TNRL->parent_slot__Y22F)->receiver_type__Q22F;
      if (((void *)contract__VNRL == (void *)NULL)) {
        __tmp__CORL=((__SLOT *)Self__TNRL->parent_slot__Y22F)->receiver_type__Q22F;
        __tmp__DORL=((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
        switch (((struct ___OBJ *)__tmp__CORL)->__id) {
        case __TYPE__: {
          __tmp__EORL=search_require__AS4L(__tmp__CORL,__tmp__DORL);
        } break;
        case __TYPE_VOID__: {
          __tmp__EORL=search_require__OW4L(__tmp__CORL,__tmp__DORL);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__EORL=search_require__VY4L(__tmp__CORL,__tmp__DORL);
        } break;
        case __TYPE_ID__: {
          __tmp__EORL=search_require__204L(__tmp__CORL,__tmp__DORL);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__EORL=search_require__D34L(__tmp__CORL,__tmp__DORL);
        } break;
        };
        if (((void *)__tmp__EORL != (void *)NULL)) {
          if (verify__JDAG) {
            is_equal_profil__PL5G(((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F,__tmp__EORL);
          };
          contract__VNRL=((__ITM_SLOT *)__tmp__EORL)->require__SB3D;
          switch (((struct ___OBJ *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->receiver_type__Q22F)->__id) {
          case __TYPE__: {
            __tmp__WORL=last_type_contract__VORL;
          } break;
          case __TYPE_VOID__: {
            __tmp__WORL=last_type_contract__VORL;
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__WORL=last_type_contract__VORL;
          } break;
          case __TYPE_ID__: {
            __tmp__WORL=last_type_contract__VORL;
          } break;
          case __TYPE_GENERIC__: {
            __tmp__WORL=last_type_contract__VORL;
          } break;
          };
          Self__TNRL->last_type_contract__2NRL=__tmp__WORL;
        };
      };
      if (((void *)contract__VNRL != (void *)NULL)) {
        Self__KZ5Q=((__ITM_LIST *)contract__VNRL);
        push_intern__VCLH(Self__KZ5Q->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM);
        to_run_base__KDLH(Self__KZ5Q,TRUE__);
        lst__LZ5Q=list_current__IF1;
        pop_intern__CKLH();
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,lst__LZ5Q);
      };
      __tmp__FPRL=Self__TNRL->value__C15F;
      switch (((struct ___OBJ *)__tmp__FPRL)->__id) {
      case __ITM_LIST__: {
        Self__S1UL=((__ITM_LIST *)__tmp__FPRL);
        nb_result_list__T1UL= 0;
        nb_result_slot__U1UL= 0;
        to_run_base__KDLH(Self__S1UL,FALSE__);
        if (verify__JDAG) {
          nb_result_list__T1UL=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F - stack_result_lower__DI4F) +  1);
          if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
            if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H != (void *)NULL)) {
              nb_result_slot__U1UL=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H)->parent_arrayed_collection__QI4F.upper__TI4F +  1) +  1);
            } else {
              nb_result_slot__U1UL= 1;
            };
          };
          if ((nb_result_list__T1UL != nb_result_slot__U1UL)) {
            __tmp__D3UL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
            put_error__text__0AH( 1,(&__string_543));
            put_position__ECH(__tmp__D3UL);
            send_error__2FH();
          };
        };
      } break;
      case __ITM_PROTOTYPE__: {
        Self__L3UL=((__ITM_PROTOTYPE *)__tmp__FPRL);
        i__M3UL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__U3UL=to_run_expr__M3IH(Self__L3UL);
          switch (((struct ___OBJ *)__tmp__U3UL)->__id) {
          case __LIST__: {
            __tmp__V3UL=put_result__Z0DN(__tmp__U3UL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__V3UL=put_result__HZKI(__tmp__U3UL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__V3UL=put_result__X3KI(__tmp__U3UL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__V3UL=put_result__ICLI(__tmp__U3UL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__V3UL=put_result__ZGLI(__tmp__U3UL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__V3UL=put_result__DYFJ(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__V3UL=put_result__JLLI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__V3UL=put_result__DMLI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__V3UL=put_result__UQLI(__tmp__U3UL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__V3UL=put_result__FVLI(__tmp__U3UL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__V3UL=put_result__WZLI(__tmp__U3UL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__V3UL=put_result__G4LI(__tmp__U3UL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__V3UL=put_result__WCMI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__V3UL=put_result__HHMI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__V3UL=put_result__YLMI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__V3UL=put_result__JQMI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__V3UL=put_result__0UMI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__V3UL=put_result__LZMI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__V3UL=put_result__23MI(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__V3UL=put_result__NCNI(__tmp__U3UL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__V3UL=put_result__3GNI(__tmp__U3UL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__V3UL=put_result__NLNI(__tmp__U3UL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__V3UL=put_result__3PNI(__tmp__U3UL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__V3UL=put_result__NUNI(__tmp__U3UL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__V3UL=put_result__J5DN(__tmp__U3UL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__V3UL=put_result__YCLL(__tmp__U3UL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__V3UL=put_result__JHLL(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__V3UL=put_result__I13O(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__V3UL=put_result__WUJO(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__V3UL=put_result__3YSO(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__V3UL=put_result__HZJO(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__V3UL=put_result__P3SO(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__V3UL=put_result__WLYM(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__V3UL=put_result__HQYM(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__V3UL=put_result__0DEN(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__V3UL=put_result__Y3JO(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__V3UL=put_result__0ZIP(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__V3UL=put_result__Z53O(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__V3UL=put_result__KE4O(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__V3UL=put_result__0C0N(__tmp__U3UL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__V3UL=put_result__1I4O(__tmp__U3UL,FALSE__);
          } break;
          };
          i__M3UL=__tmp__V3UL;
        } else {
          i__M3UL=to_run_expr__M3IH(Self__L3UL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__M3UL);
      } break;
      case __ITM_LIST_IDF__: {
        Self__53UL=((__ITM_LIST_IDF *)__tmp__FPRL);
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__XYBQ=Self__53UL->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 1,(&__string_328));
          put_position__ECH(__tmp__XYBQ);
          send_error__2FH();
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
        } else {
          __tmp__MOEQ=Self__53UL->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
          put_error__text__0AH( 1,(&__string_328));
          put_position__ECH(__tmp__MOEQ);
          send_error__2FH();
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,NULL);
      } break;
      case __ITM_WRITE_VALUE__: {
        Self__U4UL=((__ITM_WRITE_VALUE *)__tmp__FPRL);
        i__V4UL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__34UL=to_run_expr__UAJH(Self__U4UL);
          switch (((struct ___OBJ *)__tmp__34UL)->__id) {
          case __LIST__: {
            __tmp__44UL=put_result__Z0DN(__tmp__34UL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__44UL=put_result__HZKI(__tmp__34UL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__44UL=put_result__X3KI(__tmp__34UL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__44UL=put_result__ICLI(__tmp__34UL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__44UL=put_result__ZGLI(__tmp__34UL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__44UL=put_result__DYFJ(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__44UL=put_result__JLLI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__44UL=put_result__DMLI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__44UL=put_result__UQLI(__tmp__34UL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__44UL=put_result__FVLI(__tmp__34UL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__44UL=put_result__WZLI(__tmp__34UL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__44UL=put_result__G4LI(__tmp__34UL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__44UL=put_result__WCMI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__44UL=put_result__HHMI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__44UL=put_result__YLMI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__44UL=put_result__JQMI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__44UL=put_result__0UMI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__44UL=put_result__LZMI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__44UL=put_result__23MI(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__44UL=put_result__NCNI(__tmp__34UL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__44UL=put_result__3GNI(__tmp__34UL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__44UL=put_result__NLNI(__tmp__34UL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__44UL=put_result__3PNI(__tmp__34UL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__44UL=put_result__NUNI(__tmp__34UL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__44UL=put_result__J5DN(__tmp__34UL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__44UL=put_result__YCLL(__tmp__34UL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__44UL=put_result__JHLL(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__44UL=put_result__I13O(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__44UL=put_result__WUJO(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__44UL=put_result__3YSO(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__44UL=put_result__HZJO(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__44UL=put_result__P3SO(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__44UL=put_result__WLYM(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__44UL=put_result__HQYM(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__44UL=put_result__0DEN(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__44UL=put_result__Y3JO(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__44UL=put_result__0ZIP(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__44UL=put_result__Z53O(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__44UL=put_result__KE4O(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__44UL=put_result__0C0N(__tmp__34UL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__44UL=put_result__1I4O(__tmp__34UL,FALSE__);
          } break;
          };
          i__V4UL=__tmp__44UL;
        } else {
          i__V4UL=to_run_expr__UAJH(Self__U4UL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__V4UL);
      } break;
      case __ITM_WRITE_CAST__: {
        Self__J5UL=((__ITM_WRITE_CAST *)__tmp__FPRL);
        i__K5UL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__S5UL=to_run_expr__WDJH(Self__J5UL);
          switch (((struct ___OBJ *)__tmp__S5UL)->__id) {
          case __LIST__: {
            __tmp__T5UL=put_result__Z0DN(__tmp__S5UL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__T5UL=put_result__HZKI(__tmp__S5UL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__T5UL=put_result__X3KI(__tmp__S5UL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__T5UL=put_result__ICLI(__tmp__S5UL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__T5UL=put_result__ZGLI(__tmp__S5UL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__T5UL=put_result__DYFJ(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__T5UL=put_result__JLLI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__T5UL=put_result__DMLI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__T5UL=put_result__UQLI(__tmp__S5UL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__T5UL=put_result__FVLI(__tmp__S5UL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__T5UL=put_result__WZLI(__tmp__S5UL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__T5UL=put_result__G4LI(__tmp__S5UL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__T5UL=put_result__WCMI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__T5UL=put_result__HHMI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__T5UL=put_result__YLMI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__T5UL=put_result__JQMI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__T5UL=put_result__0UMI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__T5UL=put_result__LZMI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__T5UL=put_result__23MI(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__T5UL=put_result__NCNI(__tmp__S5UL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__T5UL=put_result__3GNI(__tmp__S5UL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__T5UL=put_result__NLNI(__tmp__S5UL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__T5UL=put_result__3PNI(__tmp__S5UL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__T5UL=put_result__NUNI(__tmp__S5UL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__T5UL=put_result__J5DN(__tmp__S5UL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__T5UL=put_result__YCLL(__tmp__S5UL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__T5UL=put_result__JHLL(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__T5UL=put_result__I13O(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__T5UL=put_result__WUJO(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__T5UL=put_result__3YSO(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__T5UL=put_result__HZJO(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__T5UL=put_result__P3SO(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__T5UL=put_result__WLYM(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__T5UL=put_result__HQYM(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__T5UL=put_result__0DEN(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__T5UL=put_result__Y3JO(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__T5UL=put_result__0ZIP(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__T5UL=put_result__Z53O(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__T5UL=put_result__KE4O(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__T5UL=put_result__0C0N(__tmp__S5UL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__T5UL=put_result__1I4O(__tmp__S5UL,FALSE__);
          } break;
          };
          i__K5UL=__tmp__T5UL;
        } else {
          i__K5UL=to_run_expr__WDJH(Self__J5UL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__K5UL);
      } break;
      case __ITM_READ__: {
        Self__35UL=((__ITM_READ *)__tmp__FPRL);
        i__45UL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__GAVL=to_run_expr__JGJH(Self__35UL);
          switch (((struct ___OBJ *)__tmp__GAVL)->__id) {
          case __LIST__: {
            __tmp__HAVL=put_result__Z0DN(__tmp__GAVL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__HAVL=put_result__HZKI(__tmp__GAVL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__HAVL=put_result__X3KI(__tmp__GAVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__HAVL=put_result__ICLI(__tmp__GAVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__HAVL=put_result__ZGLI(__tmp__GAVL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__HAVL=put_result__DYFJ(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__HAVL=put_result__JLLI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__HAVL=put_result__DMLI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__HAVL=put_result__UQLI(__tmp__GAVL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__HAVL=put_result__FVLI(__tmp__GAVL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__HAVL=put_result__WZLI(__tmp__GAVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__HAVL=put_result__G4LI(__tmp__GAVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__HAVL=put_result__WCMI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__HAVL=put_result__HHMI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__HAVL=put_result__YLMI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__HAVL=put_result__JQMI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__HAVL=put_result__0UMI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__HAVL=put_result__LZMI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__HAVL=put_result__23MI(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__HAVL=put_result__NCNI(__tmp__GAVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__HAVL=put_result__3GNI(__tmp__GAVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__HAVL=put_result__NLNI(__tmp__GAVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__HAVL=put_result__3PNI(__tmp__GAVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__HAVL=put_result__NUNI(__tmp__GAVL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__HAVL=put_result__J5DN(__tmp__GAVL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__HAVL=put_result__YCLL(__tmp__GAVL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__HAVL=put_result__JHLL(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__HAVL=put_result__I13O(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__HAVL=put_result__WUJO(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__HAVL=put_result__3YSO(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__HAVL=put_result__HZJO(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__HAVL=put_result__P3SO(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__HAVL=put_result__WLYM(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__HAVL=put_result__HQYM(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__HAVL=put_result__0DEN(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__HAVL=put_result__Y3JO(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__HAVL=put_result__0ZIP(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__HAVL=put_result__Z53O(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__HAVL=put_result__KE4O(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__HAVL=put_result__0C0N(__tmp__GAVL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__HAVL=put_result__1I4O(__tmp__GAVL,FALSE__);
          } break;
          };
          i__45UL=__tmp__HAVL;
        } else {
          i__45UL=to_run_expr__JGJH(Self__35UL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__45UL);
      } break;
      case __ITM_WRITE_CODE__: {
        Self__SAVL=((__ITM_WRITE_CODE *)__tmp__FPRL);
        i__TAVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__1AVL=to_run_expr__MHJH(Self__SAVL);
          switch (((struct ___OBJ *)__tmp__1AVL)->__id) {
          case __LIST__: {
            __tmp__2AVL=put_result__Z0DN(__tmp__1AVL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__2AVL=put_result__HZKI(__tmp__1AVL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__2AVL=put_result__X3KI(__tmp__1AVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__2AVL=put_result__ICLI(__tmp__1AVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__2AVL=put_result__ZGLI(__tmp__1AVL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__2AVL=put_result__DYFJ(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__2AVL=put_result__JLLI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__2AVL=put_result__DMLI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__2AVL=put_result__UQLI(__tmp__1AVL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__2AVL=put_result__FVLI(__tmp__1AVL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__2AVL=put_result__WZLI(__tmp__1AVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__2AVL=put_result__G4LI(__tmp__1AVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__2AVL=put_result__WCMI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__2AVL=put_result__HHMI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__2AVL=put_result__YLMI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__2AVL=put_result__JQMI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__2AVL=put_result__0UMI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__2AVL=put_result__LZMI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__2AVL=put_result__23MI(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__2AVL=put_result__NCNI(__tmp__1AVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__2AVL=put_result__3GNI(__tmp__1AVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__2AVL=put_result__NLNI(__tmp__1AVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__2AVL=put_result__3PNI(__tmp__1AVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__2AVL=put_result__NUNI(__tmp__1AVL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__2AVL=put_result__J5DN(__tmp__1AVL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__2AVL=put_result__YCLL(__tmp__1AVL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__2AVL=put_result__JHLL(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__2AVL=put_result__I13O(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__2AVL=put_result__WUJO(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__2AVL=put_result__3YSO(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__2AVL=put_result__HZJO(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__2AVL=put_result__P3SO(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__2AVL=put_result__WLYM(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__2AVL=put_result__HQYM(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__2AVL=put_result__0DEN(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__2AVL=put_result__Y3JO(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__2AVL=put_result__0ZIP(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__2AVL=put_result__Z53O(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__2AVL=put_result__KE4O(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__2AVL=put_result__0C0N(__tmp__1AVL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__2AVL=put_result__1I4O(__tmp__1AVL,FALSE__);
          } break;
          };
          i__TAVL=__tmp__2AVL;
        } else {
          i__TAVL=to_run_expr__MHJH(Self__SAVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__TAVL);
      } break;
      case __ITM_READ_ARG2__: {
        Self__HBVL=((__ITM_READ_ARG2 *)__tmp__FPRL);
        i__IBVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__QBVL=to_run_expr__3IJH(Self__HBVL);
          switch (((struct ___OBJ *)__tmp__QBVL)->__id) {
          case __LIST__: {
            __tmp__RBVL=put_result__Z0DN(__tmp__QBVL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__RBVL=put_result__HZKI(__tmp__QBVL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__RBVL=put_result__X3KI(__tmp__QBVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__RBVL=put_result__ICLI(__tmp__QBVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__RBVL=put_result__ZGLI(__tmp__QBVL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__RBVL=put_result__DYFJ(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__RBVL=put_result__JLLI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__RBVL=put_result__DMLI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__RBVL=put_result__UQLI(__tmp__QBVL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__RBVL=put_result__FVLI(__tmp__QBVL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__RBVL=put_result__WZLI(__tmp__QBVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__RBVL=put_result__G4LI(__tmp__QBVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__RBVL=put_result__WCMI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__RBVL=put_result__HHMI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__RBVL=put_result__YLMI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__RBVL=put_result__JQMI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__RBVL=put_result__0UMI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__RBVL=put_result__LZMI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__RBVL=put_result__23MI(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__RBVL=put_result__NCNI(__tmp__QBVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__RBVL=put_result__3GNI(__tmp__QBVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__RBVL=put_result__NLNI(__tmp__QBVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__RBVL=put_result__3PNI(__tmp__QBVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__RBVL=put_result__NUNI(__tmp__QBVL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__RBVL=put_result__J5DN(__tmp__QBVL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__RBVL=put_result__YCLL(__tmp__QBVL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__RBVL=put_result__JHLL(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__RBVL=put_result__I13O(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__RBVL=put_result__WUJO(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__RBVL=put_result__3YSO(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__RBVL=put_result__HZJO(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__RBVL=put_result__P3SO(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__RBVL=put_result__WLYM(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__RBVL=put_result__HQYM(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__RBVL=put_result__0DEN(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__RBVL=put_result__Y3JO(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__RBVL=put_result__0ZIP(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__RBVL=put_result__Z53O(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__RBVL=put_result__KE4O(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__RBVL=put_result__0C0N(__tmp__QBVL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__RBVL=put_result__1I4O(__tmp__QBVL,FALSE__);
          } break;
          };
          i__IBVL=__tmp__RBVL;
        } else {
          i__IBVL=to_run_expr__3IJH(Self__HBVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__IBVL);
      } break;
      case __ITM_BINARY__: {
        Self__1BVL=((__ITM_BINARY *)__tmp__FPRL);
        i__2BVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__ECVL=to_run_expr__RMJH(Self__1BVL);
          switch (((struct ___OBJ *)__tmp__ECVL)->__id) {
          case __LIST__: {
            __tmp__FCVL=put_result__Z0DN(__tmp__ECVL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__FCVL=put_result__HZKI(__tmp__ECVL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__FCVL=put_result__X3KI(__tmp__ECVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__FCVL=put_result__ICLI(__tmp__ECVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__FCVL=put_result__ZGLI(__tmp__ECVL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__FCVL=put_result__DYFJ(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__FCVL=put_result__JLLI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__FCVL=put_result__DMLI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__FCVL=put_result__UQLI(__tmp__ECVL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__FCVL=put_result__FVLI(__tmp__ECVL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__FCVL=put_result__WZLI(__tmp__ECVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__FCVL=put_result__G4LI(__tmp__ECVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__FCVL=put_result__WCMI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__FCVL=put_result__HHMI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__FCVL=put_result__YLMI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__FCVL=put_result__JQMI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__FCVL=put_result__0UMI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__FCVL=put_result__LZMI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__FCVL=put_result__23MI(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__FCVL=put_result__NCNI(__tmp__ECVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__FCVL=put_result__3GNI(__tmp__ECVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__FCVL=put_result__NLNI(__tmp__ECVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__FCVL=put_result__3PNI(__tmp__ECVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__FCVL=put_result__NUNI(__tmp__ECVL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__FCVL=put_result__J5DN(__tmp__ECVL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__FCVL=put_result__YCLL(__tmp__ECVL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__FCVL=put_result__JHLL(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__FCVL=put_result__I13O(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__FCVL=put_result__WUJO(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__FCVL=put_result__3YSO(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__FCVL=put_result__HZJO(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__FCVL=put_result__P3SO(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__FCVL=put_result__WLYM(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__FCVL=put_result__HQYM(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__FCVL=put_result__0DEN(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__FCVL=put_result__Y3JO(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__FCVL=put_result__0ZIP(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__FCVL=put_result__Z53O(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__FCVL=put_result__KE4O(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__FCVL=put_result__0C0N(__tmp__ECVL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__FCVL=put_result__1I4O(__tmp__ECVL,FALSE__);
          } break;
          };
          i__2BVL=__tmp__FCVL;
        } else {
          i__2BVL=to_run_expr__RMJH(Self__1BVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__2BVL);
      } break;
      case __ITM_READ_ARG1__: {
        Self__QCVL=((__ITM_READ_ARG1 *)__tmp__FPRL);
        i__RCVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__ZCVL=to_run_expr__0XJH(Self__QCVL);
          switch (((struct ___OBJ *)__tmp__ZCVL)->__id) {
          case __LIST__: {
            __tmp__0CVL=put_result__Z0DN(__tmp__ZCVL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__0CVL=put_result__HZKI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__0CVL=put_result__X3KI(__tmp__ZCVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__0CVL=put_result__ICLI(__tmp__ZCVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__0CVL=put_result__ZGLI(__tmp__ZCVL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__0CVL=put_result__DYFJ(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__0CVL=put_result__JLLI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__0CVL=put_result__DMLI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__0CVL=put_result__UQLI(__tmp__ZCVL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__0CVL=put_result__FVLI(__tmp__ZCVL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__0CVL=put_result__WZLI(__tmp__ZCVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__0CVL=put_result__G4LI(__tmp__ZCVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__0CVL=put_result__WCMI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__0CVL=put_result__HHMI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__0CVL=put_result__YLMI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__0CVL=put_result__JQMI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__0CVL=put_result__0UMI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__0CVL=put_result__LZMI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__0CVL=put_result__23MI(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__0CVL=put_result__NCNI(__tmp__ZCVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__0CVL=put_result__3GNI(__tmp__ZCVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__0CVL=put_result__NLNI(__tmp__ZCVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__0CVL=put_result__3PNI(__tmp__ZCVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__0CVL=put_result__NUNI(__tmp__ZCVL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__0CVL=put_result__J5DN(__tmp__ZCVL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__0CVL=put_result__YCLL(__tmp__ZCVL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__0CVL=put_result__JHLL(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__0CVL=put_result__I13O(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__0CVL=put_result__WUJO(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__0CVL=put_result__3YSO(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__0CVL=put_result__HZJO(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__0CVL=put_result__P3SO(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__0CVL=put_result__WLYM(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__0CVL=put_result__HQYM(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__0CVL=put_result__0DEN(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__0CVL=put_result__Y3JO(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__0CVL=put_result__0ZIP(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__0CVL=put_result__Z53O(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__0CVL=put_result__KE4O(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__0CVL=put_result__0C0N(__tmp__ZCVL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__0CVL=put_result__1I4O(__tmp__ZCVL,FALSE__);
          } break;
          };
          i__RCVL=__tmp__0CVL;
        } else {
          i__RCVL=to_run_expr__0XJH(Self__QCVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__RCVL);
      } break;
      case __ITM_OLD__: {
        Self__EDVL=((__ITM_OLD *)__tmp__FPRL);
        i__FDVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          i__FDVL=put_result__DYFJ(to_run_expr__5XJH(Self__EDVL),FALSE__);
        } else {
          i__FDVL=to_run_expr__5XJH(Self__EDVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__FDVL);
      } break;
      case __ITM_EXTERNAL_TYPE__: {
        Self__ZDVL=((__ITM_EXTERNAL_TYPE *)__tmp__FPRL);
        i__0DVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          i__0DVL=put_result__DYFJ(to_run_expr__U1JH(Self__ZDVL),FALSE__);
        } else {
          i__0DVL=to_run_expr__U1JH(Self__ZDVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__0DVL);
      } break;
      case __ITM_REAL__: {
        Self__OEVL=((__ITM_REAL *)__tmp__FPRL);
        i__PEVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          i__PEVL=put_result__FVLI(to_run_expr__J3JH(Self__OEVL),FALSE__);
        } else {
          i__PEVL=to_run_expr__J3JH(Self__OEVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__PEVL);
      } break;
      case __ITM_NUMBER__: {
        Self__DFVL=((__ITM_NUMBER *)__tmp__FPRL);
        i__EFVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          i__EFVL=put_result__ZGLI(to_run_expr__T3JH(Self__DFVL),FALSE__);
        } else {
          i__EFVL=to_run_expr__T3JH(Self__DFVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__EFVL);
      } break;
      case __ITM_CHARACTER__: {
        Self__YFVL=((__ITM_CHARACTER *)__tmp__FPRL);
        i__ZFVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          i__ZFVL=put_result__WZLI(create__char__WTMH(Self__YFVL->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__YFVL->character__ED0D),FALSE__);
        } else {
          i__ZFVL=create__char__WTMH(Self__YFVL->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM,Self__YFVL->character__ED0D);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__ZFVL);
      } break;
      case __ITM_STRING__: {
        Self__MGVL=((__ITM_STRING *)__tmp__FPRL);
        i__NGVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          i__NGVL=put_result__HZKI(create__text__AUMH(Self__MGVL->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__MGVL->string__QD0D),FALSE__);
        } else {
          i__NGVL=create__text__AUMH(Self__MGVL->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM,Self__MGVL->string__QD0D);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__NGVL);
      } break;
      case __ITM_EXTERNAL__: {
        Self__BHVL=((__ITM_EXTERNAL *)__tmp__FPRL);
        i__CHVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__KHVL=to_run_expr__J4JH(Self__BHVL);
          switch (((struct ___OBJ *)__tmp__KHVL)->__id) {
          case __EXTERNAL_C__: {
            __tmp__LHVL=put_result__X3KI(__tmp__KHVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__LHVL=put_result__ICLI(__tmp__KHVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__LHVL=put_result__ZGLI(__tmp__KHVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__LHVL=put_result__G4LI(__tmp__KHVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__LHVL=put_result__WCMI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__LHVL=put_result__HHMI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__LHVL=put_result__YLMI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__LHVL=put_result__JQMI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__LHVL=put_result__0UMI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__LHVL=put_result__LZMI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__LHVL=put_result__23MI(__tmp__KHVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__LHVL=put_result__NCNI(__tmp__KHVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__LHVL=put_result__3GNI(__tmp__KHVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__LHVL=put_result__NLNI(__tmp__KHVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__LHVL=put_result__3PNI(__tmp__KHVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__LHVL=put_result__NUNI(__tmp__KHVL,FALSE__);
          } break;
          };
          i__CHVL=__tmp__LHVL;
        } else {
          i__CHVL=to_run_expr__J4JH(Self__BHVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__CHVL);
      } break;
      case __ITM_READ_ARGS__: {
        Self__WHVL=((__ITM_READ_ARGS *)__tmp__FPRL);
        i__XHVL=NULL;
        if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
          __tmp__5HVL=to_run_expr__TIKH(Self__WHVL);
          switch (((struct ___OBJ *)__tmp__5HVL)->__id) {
          case __LIST__: {
            __tmp__AIVL=put_result__Z0DN(__tmp__5HVL,FALSE__);
          } break;
          case __STRING_CST__: {
            __tmp__AIVL=put_result__HZKI(__tmp__5HVL,FALSE__);
          } break;
          case __EXTERNAL_C__: {
            __tmp__AIVL=put_result__X3KI(__tmp__5HVL,FALSE__);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__AIVL=put_result__ICLI(__tmp__5HVL,FALSE__);
          } break;
          case __INTEGER_CST__: {
            __tmp__AIVL=put_result__ZGLI(__tmp__5HVL,FALSE__);
          } break;
          case __READ_LOCAL__: {
            __tmp__AIVL=put_result__DYFJ(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__AIVL=put_result__JLLI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__AIVL=put_result__DMLI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__AIVL=put_result__UQLI(__tmp__5HVL,FALSE__);
          } break;
          case __REAL_CST__: {
            __tmp__AIVL=put_result__FVLI(__tmp__5HVL,FALSE__);
          } break;
          case __CHARACTER_CST__: {
            __tmp__AIVL=put_result__WZLI(__tmp__5HVL,FALSE__);
          } break;
          case __IS_EXPANDED__: {
            __tmp__AIVL=put_result__G4LI(__tmp__5HVL,FALSE__);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__AIVL=put_result__WCMI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_SUP__: {
            __tmp__AIVL=put_result__HHMI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_SUB__: {
            __tmp__AIVL=put_result__YLMI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_MUL__: {
            __tmp__AIVL=put_result__JQMI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_DIV__: {
            __tmp__AIVL=put_result__0UMI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_AND__: {
            __tmp__AIVL=put_result__LZMI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__AIVL=put_result__23MI(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__AIVL=put_result__NCNI(__tmp__5HVL,FALSE__);
          } break;
          case __PUT_TO__: {
            __tmp__AIVL=put_result__3GNI(__tmp__5HVL,FALSE__);
          } break;
          case __ITEM__: {
            __tmp__AIVL=put_result__NLNI(__tmp__5HVL,FALSE__);
          } break;
          case __SIZE_OF__: {
            __tmp__AIVL=put_result__3PNI(__tmp__5HVL,FALSE__);
          } break;
          case __CAST__: {
            __tmp__AIVL=put_result__NUNI(__tmp__5HVL,FALSE__);
          } break;
          case __CALL_SLOT__: {
            __tmp__AIVL=put_result__J5DN(__tmp__5HVL,FALSE__);
          } break;
          case __READ_SLOT__: {
            __tmp__AIVL=put_result__YCLL(__tmp__5HVL,FALSE__);
          } break;
          case __READ_GLOBAL__: {
            __tmp__AIVL=put_result__JHLL(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__AIVL=put_result__I13O(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__AIVL=put_result__WUJO(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__AIVL=put_result__3YSO(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__AIVL=put_result__HZJO(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__AIVL=put_result__P3SO(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_NEG__: {
            __tmp__AIVL=put_result__WLYM(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_ADD__: {
            __tmp__AIVL=put_result__HQYM(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_NOT__: {
            __tmp__AIVL=put_result__0DEN(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_MOD__: {
            __tmp__AIVL=put_result__Y3JO(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__AIVL=put_result__0ZIP(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_INF__: {
            __tmp__AIVL=put_result__Z53O(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__AIVL=put_result__KE4O(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_OR__: {
            __tmp__AIVL=put_result__0C0N(__tmp__5HVL,FALSE__);
          } break;
          case __EXPR_XOR__: {
            __tmp__AIVL=put_result__1I4O(__tmp__5HVL,FALSE__);
          } break;
          };
          i__XHVL=__tmp__AIVL;
        } else {
          i__XHVL=to_run_expr__TIKH(Self__WHVL);
        };
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,i__XHVL);
      } break;
      };
      Self__TNRL->is_require__YNRL=FALSE__;
      contract__VNRL=((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->ensure__WB3D;
      Self__TNRL->last_type_contract__2NRL=((__SLOT *)Self__TNRL->parent_slot__Y22F)->receiver_type__Q22F;
      if (((void *)contract__VNRL == (void *)NULL)) {
        __tmp__OPRL=((__SLOT *)Self__TNRL->parent_slot__Y22F)->receiver_type__Q22F;
        __tmp__PPRL=((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.name__1QB;
        switch (((struct ___OBJ *)__tmp__OPRL)->__id) {
        case __TYPE__: {
          __tmp__QPRL=search_ensure__LA5L(__tmp__OPRL,__tmp__PPRL);
        } break;
        case __TYPE_VOID__: {
          __tmp__QPRL=search_ensure__ZE5L(__tmp__OPRL,__tmp__PPRL);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__QPRL=search_ensure__AH5L(__tmp__OPRL,__tmp__PPRL);
        } break;
        case __TYPE_ID__: {
          __tmp__QPRL=search_ensure__HJ5L(__tmp__OPRL,__tmp__PPRL);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__QPRL=search_ensure__OL5L(__tmp__OPRL,__tmp__PPRL);
        } break;
        };
        if (((void *)__tmp__QPRL != (void *)NULL)) {
          if (verify__JDAG) {
            is_equal_profil__PL5G(((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F,__tmp__QPRL);
          };
          contract__VNRL=((__ITM_SLOT *)__tmp__QPRL)->ensure__WB3D;
          switch (((struct ___OBJ *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->receiver_type__Q22F)->__id) {
          case __TYPE__: {
            __tmp__BQRL=last_type_contract__VORL;
          } break;
          case __TYPE_VOID__: {
            __tmp__BQRL=last_type_contract__VORL;
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__BQRL=last_type_contract__VORL;
          } break;
          case __TYPE_ID__: {
            __tmp__BQRL=last_type_contract__VORL;
          } break;
          case __TYPE_GENERIC__: {
            __tmp__BQRL=last_type_contract__VORL;
          } break;
          };
          Self__TNRL->last_type_contract__2NRL=__tmp__BQRL;
        };
      };
      if (((void *)contract__VNRL != (void *)NULL)) {
        Self__W54L=((__ITM_LIST *)contract__VNRL);
        push_intern__VCLH(Self__W54L->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM);
        to_run_base__KDLH(Self__W54L,TRUE__);
        lst__Y54L=list_current__IF1;
        pop_intern__CKLH();
        add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,lst__Y54L);
      };
      if (((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH != (void *)NULL)) {
        instr__XNRL=read__IC5G(((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH);
      } else {
        if (((void *)((__SECTION_ *)((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC)->name__1I0D == (void *)(&__string_25))) {
          add_first__PPCM(list_current__IF1,create__text__access__persistant__type__2U0C(((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM,(&__string_544),NULL,TRUE__,TYPE_VOID__->parent_type__UIB.default__AKC));
          add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,create__text__access__persistant__type__2U0C(((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM,(&__string_545),NULL,TRUE__,TYPE_VOID__->parent_type__UIB.default__AKC));
        };
        instr__XNRL=create__type__CLQC(((__ITM_SLOT *)((__SLOT *)Self__TNRL->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM,TYPE_VOID__->parent_type__UIB.default__AKC);
      };
      add_last__AL4G(((__LIST *)list_current__IF1)->expr_list__JUOG,instr__XNRL);
      Self__A0BQ=((__CONTEXT *)((void **)((__FAST_ARRAYoCONTEXTo *)stack__GHQC)->parent_arrayed_collection__FHQC.storage__33YD)[top__3GQC]);
      pop_stack_until__DDAG(stack_local_lower__AI4F);
      stack_local_lower__AI4F=Self__A0BQ->local__CI4F;
      remove_since__ERPG(stack_result__WI4F,stack_result_lower__DI4F);
      stack_result_lower__DI4F=Self__A0BQ->result__FI4F;
      list_current__IF1=Self__A0BQ->list__HI4F;
      profil_second__3PQC=Self__A0BQ->profil__LI4F;
      profil_first__4PQC=Self__A0BQ->old_profil_first__JI4F;
      top__3GQC=(__INTEGER)(top__3GQC -  1);
      res_lst__ZKJK=result__F4NL;
      self_up__LKEF=__tmp__5UJK;
    } else {
      res_lst__ZKJK=write_argument__WCOL(result__YKJK,new_larg__GT2J);
    };
    call__BT2J=create__profil__with__W4TI(position__V54J(Self__2S2J),result__YKJK,res_lst__ZKJK);
    __tmp__YZ2J=Self__2S2J->result_expr__HO5G;
    switch (((struct ___OBJ *)__tmp__YZ2J)->__id) {
    case __LIST__: {
      __tmp__ZZ2J=static_type__GIQG(__tmp__YZ2J);
    } break;
    case __STRING_CST__: {
      __tmp__ZZ2J=((__STRING_CST *)__tmp__YZ2J)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZZ2J=((__EXTERNAL_C *)__tmp__YZ2J)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZZ2J=((__PROTOTYPE_CST *)__tmp__YZ2J)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__ZZ2J=((__INTEGER_CST *)__tmp__YZ2J)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZZ2J=((__LOCAL *)((__READ_LOCAL *)__tmp__YZ2J)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZZ2J=static_type__0N1H(__tmp__YZ2J);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZZ2J=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZZ2J=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__ZZ2J=((__REAL_CST *)__tmp__YZ2J)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZZ2J=((__CHARACTER_CST *)__tmp__YZ2J)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZZ2J=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZZ2J=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__ZZ2J=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__ZZ2J=static_type__MP1H(__tmp__YZ2J);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZZ2J=static_type__SP1H(__tmp__YZ2J);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZZ2J=static_type__XP1H(__tmp__YZ2J);
    } break;
    case __EXPR_AND__: {
      __tmp__ZZ2J=static_type__2P1H(__tmp__YZ2J);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZZ2J=static_type__BQ1H(__tmp__YZ2J);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZZ2J=static_type__GQ1H(__tmp__YZ2J);
    } break;
    case __PUT_TO__: {
      __tmp__ZZ2J=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__ZZ2J=static_type__PQ1H(__tmp__YZ2J);
    } break;
    case __SIZE_OF__: {
      __tmp__ZZ2J=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__ZZ2J=((__CAST *)__tmp__YZ2J)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZZ2J=static_type__GIKL(__tmp__YZ2J);
    } break;
    case __READ_SLOT__: {
      __tmp__ZZ2J=((__SLOT_DATA *)((__READ_SLOT *)__tmp__YZ2J)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZZ2J=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__YZ2J)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZZ2J=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZZ2J=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZZ2J=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZZ2J=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZZ2J=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__ZZ2J=static_type__Z2IM(__tmp__YZ2J);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZZ2J=static_type__IXML(__tmp__YZ2J);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZZ2J=static_type__BTXM(__tmp__YZ2J);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZZ2J=static_type__5LEO(__tmp__YZ2J);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZZ2J=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__ZZ2J=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZZ2J=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__ZZ2J=static_type__NOPN(__tmp__YZ2J);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZZ2J=static_type__XCSO(__tmp__YZ2J);
    } break;
    };
    if (((void *)((__TYPE_FULL *)__tmp__ZZ2J)->parent_type__KTL != (void *)TYPE_VOID__)) {
      __tmp__B02J=Self__2S2J->result_expr__HO5G;
      if (__tmp__B02J==NULL) {
        __tmp__C02J=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__B02J)->__id) {
        case __LIST__: {
          __tmp__C02J=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__C02J=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__C02J=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__C02J=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__C02J=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__C02J=((void *)__tmp__B02J);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__C02J=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__C02J=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__C02J=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__C02J=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__C02J=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__C02J=NULL;
        } break;
        case __ITEM__: {
          __tmp__C02J=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__C02J=NULL;
        } break;
        case __CAST__: {
          __tmp__C02J=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__C02J=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__C02J=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__C02J=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__C02J=NULL;
        } break;
        }
      };
      em__CT2J=__tmp__C02J;
      if (((void *)__tmp__C02J != (void *)NULL)) {
        __tmp__M02J=(__INTEGER)(((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__C02J)->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH -  1);
        Self__MSDK= 0;
        while ((Self__MSDK <= __tmp__M02J)) {
          __tmp__T02J=((void **)((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)em__CT2J)->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__MSDK];
          if (__tmp__T02J==NULL) {
            __tmp__U02J=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__T02J)->__id) {
            case __LIST__: {
              __tmp__U02J=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__U02J=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__U02J=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__U02J=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__U02J=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__U02J=((void *)__tmp__T02J);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__U02J=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__U02J=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__U02J=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__U02J=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__U02J=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__U02J=NULL;
            } break;
            case __ITEM__: {
              __tmp__U02J=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__U02J=NULL;
            } break;
            case __CAST__: {
              __tmp__U02J=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__U02J=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__U02J=((void *)__tmp__T02J);
            } break;
            case __READ_GLOBAL__: {
              __tmp__U02J=((void *)__tmp__T02J);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__U02J=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__U02J=NULL;
            } break;
            }
          };
          switch (((struct ___OBJ *)__tmp__U02J)->__id) {
          case __READ_LOCAL__: {
            __tmp__102J=((__READ_LOCAL *)__tmp__U02J)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__102J=((__READ_SLOT *)__tmp__U02J)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__102J=((__READ_GLOBAL *)__tmp__U02J)->global__RHJK;
          } break;
          };
          __tmp__202J=((__CALL_SLOT *)call__BT2J)->profil__QA2H;
          if (((struct ___OBJ *)__tmp__202J)->__id==__PROFIL_SLOT__) {
            __tmp__302J=((__PROFIL_SLOT *)__tmp__202J)->parent_profil__51LC.result_list__SA2H;
          } else {
            __tmp__302J=((__PROFIL_BLOCK *)__tmp__202J)->parent_profil__GHAG.result_list__SA2H;
          };
          __tmp__402J=((void **)((__FAST_ARRAYoLOCALo *)__tmp__302J)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__MSDK];
          position__V54J(Self__2S2J);
          rd__DT2J=read__IC5G(__tmp__402J);
          __tmp__B12J=position__V54J(Self__2S2J);
          if (((struct ___OBJ *)__tmp__102J)->__id==__LOCAL__) {
            __tmp__C12J=write__value__T5FH(__tmp__102J,__tmp__B12J,rd__DT2J);
          } else {
            __tmp__C12J=write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__102J),__tmp__B12J,NULL,rd__DT2J);
          };
          add_last__JPDI(((__CALL_SLOT *)call__BT2J)->result_list__1A2H,__tmp__C12J);
          Self__MSDK=(__INTEGER)(Self__MSDK +  1);
        };
        Self__OK2Q=((__FAST_ARRAYoEXPRo *)((__EXPR_MULTIPLE *)__tmp__C02J)->expr_list__VFMH);
        __tmp__G12J=((void **)Self__OK2Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__OK2Q->parent_arrayed_collection__42LC.upper__USSH];
        if (__tmp__G12J==NULL) {
          __tmp__H12J=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__G12J)->__id) {
          case __LIST__: {
            __tmp__H12J=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__H12J=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__H12J=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__H12J=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__H12J=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__H12J=((void *)__tmp__G12J);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__H12J=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__H12J=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__H12J=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__H12J=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__H12J=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__H12J=NULL;
          } break;
          case __ITEM__: {
            __tmp__H12J=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__H12J=NULL;
          } break;
          case __CAST__: {
            __tmp__H12J=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__H12J=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__H12J=((void *)__tmp__G12J);
          } break;
          case __READ_GLOBAL__: {
            __tmp__H12J=((void *)__tmp__G12J);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__H12J=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__H12J=NULL;
          } break;
          }
        };
        rd__DT2J=__tmp__H12J;
      } else {
        __tmp__O12J=Self__2S2J->result_expr__HO5G;
        if (__tmp__O12J==NULL) {
          __tmp__P12J=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__O12J)->__id) {
          case __LIST__: {
            __tmp__P12J=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__P12J=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__P12J=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__P12J=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__P12J=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__P12J=((void *)__tmp__O12J);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__P12J=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__P12J=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__P12J=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__P12J=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__P12J=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__P12J=NULL;
          } break;
          case __ITEM__: {
            __tmp__P12J=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__P12J=NULL;
          } break;
          case __CAST__: {
            __tmp__P12J=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__P12J=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__P12J=((void *)__tmp__O12J);
          } break;
          case __READ_GLOBAL__: {
            __tmp__P12J=((void *)__tmp__O12J);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__P12J=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__P12J=NULL;
          } break;
          }
        };
        rd__DT2J=__tmp__P12J;
      };
      switch (((struct ___OBJ *)rd__DT2J)->__id) {
      case __READ_LOCAL__: {
        __tmp__X12J=((__READ_LOCAL *)rd__DT2J)->local__ALZD;
      } break;
      case __READ_SLOT__: {
        __tmp__X12J=((__READ_SLOT *)rd__DT2J)->slot__EVGK;
      } break;
      case __READ_GLOBAL__: {
        __tmp__X12J=((__READ_GLOBAL *)rd__DT2J)->global__RHJK;
      } break;
      };
      __tmp__Y12J=position__V54J(Self__2S2J);
      if (((struct ___OBJ *)__tmp__X12J)->__id==__LOCAL__) {
        __tmp__Z12J=write__value__T5FH(__tmp__X12J,__tmp__Y12J,call__BT2J);
      } else {
        __tmp__Z12J=write_direct__with__value__05DH(((__SLOT_DATA *)__tmp__X12J),__tmp__Y12J,NULL,call__BT2J);
      };
      add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,__tmp__Z12J);
    } else {
      add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,call__BT2J);
    };
  };
  add_last__AL4G(((__LIST *)result__5S2J)->expr_list__JUOG,create__type__CLQC(position__V54J(Self__2S2J),TYPE_VOID__->parent_type__UIB.default__AKC));
  return(result__5S2J);
}

static void* execute_unlink__42LK(__EXTERNAL_C *Self__52LK)
// ({EXTERNAL_C}) With resultRecursive, No inlinable.
{
  void *result__B3LK,*__tmp__D4LK;
  __INTEGER __tmp__13LK,Self__AAAL;
  void *__tmp__C4LK;
  __READ_LOCAL *Self__30JQ,*Self__FOWQ;
  __READ_GLOBAL *Self__A1JQ;
  __LIST *Self__ALZQ;
  result__B3LK=NULL;
  if (Self__52LK->is_persistant__VXZD) {
    Self__52LK->static_type__UXZD=TYPE_VOID__->parent_type__UIB.default__AKC;
    result__B3LK=execute_link__U5ZK(Self__52LK);
  } else {
    if (((void *)Self__52LK->access_list__XXZD != (void *)NULL)) {
      __tmp__13LK=((__FAST_ARRAYoEXPRo *)Self__52LK->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH;
      Self__AAAL= 0;
      while ((Self__AAAL <= __tmp__13LK)) {
        __tmp__C4LK=((void **)((__FAST_ARRAYoEXPRo *)Self__52LK->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__AAAL];
        switch (((struct ___OBJ *)__tmp__C4LK)->__id) {
        case __LIST__: {
          __tmp__D4LK=execute_unlink__0SRJ(__tmp__C4LK);
        } break;
        case __STRING_CST__: {
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__D4LK=execute_unlink__42LK(__tmp__C4LK);
        } break;
        case __PROTOTYPE_CST__: {
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __INTEGER_CST__: {
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __READ_LOCAL__: {
          Self__30JQ=((__READ_LOCAL *)__tmp__C4LK);
          unread__YVJK(Self__30JQ->local__ALZD,Self__30JQ);
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__D4LK=execute_unlink__PBMK(__tmp__C4LK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__D4LK=execute_unlink__WGMK(__tmp__C4LK);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__D4LK=execute_unlink__HHMK(__tmp__C4LK);
        } break;
        case __REAL_CST__: {
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __CHARACTER_CST__: {
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __IS_EXPANDED__: {
          Self__FOWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__C4LK)->receiver__OO2H);
          unread__YVJK(Self__FOWQ->local__ALZD,Self__FOWQ);
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=NULL;
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(((__GET_TYPE_ID *)__tmp__C4LK));
          __tmp__D4LK=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__D4LK=execute_unlink__IIMK(__tmp__C4LK);
        } break;
        case __EXPR_SUB__: {
          __tmp__D4LK=execute_unlink__ZIMK(__tmp__C4LK);
        } break;
        case __EXPR_MUL__: {
          __tmp__D4LK=execute_unlink__KJMK(__tmp__C4LK);
        } break;
        case __EXPR_DIV__: {
          __tmp__D4LK=execute_unlink__1JMK(__tmp__C4LK);
        } break;
        case __EXPR_AND__: {
          __tmp__D4LK=execute_unlink__MKMK(__tmp__C4LK);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__D4LK=execute_unlink__3KMK(__tmp__C4LK);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__D4LK=execute_unlink__OLMK(__tmp__C4LK);
        } break;
        case __PUT_TO__: {
          __tmp__D4LK=execute_link__BOPK(((__PUT_TO *)__tmp__C4LK));
        } break;
        case __ITEM__: {
          __tmp__D4LK=execute_unlink__CMMK(__tmp__C4LK);
        } break;
        case __SIZE_OF__: {
          __tmp__D4LK=execute_unlink__SMMK(__tmp__C4LK);
        } break;
        case __CAST__: {
          __tmp__D4LK=execute_unlink__XMMK(__tmp__C4LK);
        } break;
        case __CALL_SLOT__: {
          __tmp__D4LK=execute_unlink__2NQL(__tmp__C4LK);
        } break;
        case __READ_SLOT__: {
          __tmp__D4LK=execute_unlink__WDAL(__tmp__C4LK);
        } break;
        case __READ_GLOBAL__: {
          Self__A1JQ=((__READ_GLOBAL *)__tmp__C4LK);
          unread__15ML(Self__A1JQ->global__RHJK,Self__A1JQ);
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          __tmp__D4LK=execute_access_unlink__VMDL(Self__A1JQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__D4LK=execute_unlink__CRZM(__tmp__C4LK);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__D4LK=execute_unlink__B2EO(__tmp__C4LK);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__D4LK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__C4LK));
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__D4LK=execute_unlink__R2EO(__tmp__C4LK);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__D4LK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__C4LK));
        } break;
        case __EXPR_NEG__: {
          __tmp__D4LK=execute_unlink__XYJM(__tmp__C4LK);
        } break;
        case __EXPR_ADD__: {
          __tmp__D4LK=execute_unlink__3NNL(__tmp__C4LK);
        } break;
        case __EXPR_NOT__: {
          __tmp__D4LK=execute_unlink__YLZM(__tmp__C4LK);
        } break;
        case __EXPR_MOD__: {
          __tmp__D4LK=execute_unlink__B3EO(__tmp__C4LK);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__D4LK=execute_unlink__AJEP(__tmp__C4LK);
        } break;
        case __EXPR_INF__: {
          __tmp__D4LK=execute_unlink__CPQN(__tmp__C4LK);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__D4LK=execute_unlink__SPQN(__tmp__C4LK);
        } break;
        case __EXPR_OR__: {
          __tmp__D4LK=execute_unlink__JDQN(__tmp__C4LK);
        } break;
        case __EXPR_XOR__: {
          __tmp__D4LK=execute_unlink__YNUO(__tmp__C4LK);
        } break;
        };
        if (((void *)__tmp__D4LK != (void *)NULL)) {
          Self__ALZQ=((__LIST *)list_current__IF1);
          add__to__1H5G(Self__ALZQ->expr_list__JUOG,__tmp__D4LK,(__INTEGER)(Self__ALZQ->index__PXRG -  1));
          Self__ALZQ->index__PXRG=(__INTEGER)(Self__ALZQ->index__PXRG +  1);
        };
        Self__AAAL=(__INTEGER)(Self__AAAL +  1);
      };
    };
  };
  return(result__B3LK);
}

static void* execute__F2TK(__SWITCH *Self__G2TK)
// ({SWITCH}) With resultNo recursive, No inlinable.
{
  void *result__J2TK,*__tmp__SAUK,*__tmp__CBUK,*__tmp__HDUK;
  void *result__NCCL,*__tmp__SFCL,*__tmp__YFCL;
  void *typ__K2TK,*__tmp__CBAL,*__tmp__DBAL,*__tmp__GBAL,*__tmp__HBAL;
  void *__tmp__Z3TK,*__tmp__OBUK,*__tmp__0JQL;
  void *wrt__L2TK,*__tmp__TAUK,*wr_true__OCCL,*wr_false__PCCL;
  void *__tmp__TFCL,*__tmp__ZFCL;
  void *lst__M2TK;
  void *tb__N2TK,*__tmp__PBUK;
  void *lst_typ__I2TK;
  void *__tmp__Q2TK,*__tmp__BBUK,*__tmp__ECUK,*__tmp__GDUK,*__tmp__QDUK;
  void *__tmp__1EUK,*__tmp__NFUK,*__tmp__OFUK,*val_true__RCCL;
  void *val_false__SCCL,*__tmp__XCCL,*__tmp__0GCL,*__tmp__1GCL;
  __TYPES_TMP *Self__QAAL;
  __INTEGER __tmp__2AAL,Self__I4FL,__tmp__EBAL,__tmp__IBAL,__tmp__R3TK;
  __INTEGER Self__WBAL,__tmp__G4TK,Self__UF0K,j__K4TK,__tmp__AZIL;
  __INTEGER i__DPJL,__tmp__RGUK,Self__QQFL;
  __TYPE *Self__MOWQ,*Self__34FL;
  __TYPE_GENERIC *Self__NOWQ,*Self__W5FL;
  __POSITION pos__G1JQ,__tmp__2EUK,pos__OCAL;
  __READ_LOCAL *Self__M1JQ,*Self__KPWQ,*Self__V1JQ,*Self__MPWQ;
  __READ_GLOBAL *Self__P1JQ,*Self__Y1JQ;
  __LIST *Self__RLZQ;
  __PROFIL_BLOCK *Self__MZ5Q;
  void *__tmp__FCUK,*__tmp__RDUK,*__tmp__YCCL,*__tmp__FGCL,*__tmp__CHCL;
  void *__tmp__CJCL;
  __CASE *Self__ZJQL;
  void *rd__QCCL,*__tmp__PHCL,*__tmp__QJCL;
  void *__tmp__OGCL,*__tmp__PGCL;
  __EXPR_NOT_LOGIC *__tmp__3LCL;
  __BOOLEAN is_end__O2TK,__tmp__1AUK,__tmp__YAUK,__tmp__4CUK,b__UCCL;
  __BOOLEAN c__VCCL,d__WCCL,__tmp__TGCL,__tmp__UGCL,__tmp__2GCL;
  __BOOLEAN __tmp__IHCL,__tmp__1HCL,__tmp__XICL,__tmp__XKCL,__tmp__2ICL;
  __BOOLEAN __tmp__IJCL,__tmp__1JCL;
  __FAST_ARRAYoCASEo *Self__WYIL,*Self__435Q,*Self__RLFL,*Self__A45Q;
  __FAST_ARRAYoCASEo *Self__KP3J;
  void **__tmp__5YIL,**Self__SOJL;
  result__J2TK=NULL;
  typ__K2TK=NULL;
  wrt__L2TK=NULL;
  lst__M2TK=NULL;
  tb__N2TK=NULL;
  is_end__O2TK=FALSE__;
  lst_typ__I2TK=new__XWSG();
  __tmp__Q2TK=Self__G2TK->expr__MMFI;
  switch (((struct ___OBJ *)__tmp__Q2TK)->__id) {
  case __LIST__: {
    get_type__EYMJ(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __STRING_CST__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)((__STRING_CST *)__tmp__Q2TK)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
  } break;
  case __EXTERNAL_C__: {
    get_type__ZHDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __PROTOTYPE_CST__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__Q2TK)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __INTEGER_CST__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__Q2TK)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
  } break;
  case __READ_LOCAL__: {
    get_type__AOFJ(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_MULTIPLE__: {
    print__1ZE((&__string_253));
    fputc((int)('\n'),stdout);
    exit(( 1));
  } break;
  case __EXPR_EQUAL__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_NOT_EQUAL__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __REAL_CST__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)((__REAL_CST *)__tmp__Q2TK)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __CHARACTER_CST__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__Q2TK)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
  } break;
  case __IS_EXPANDED__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __GET_TYPE_ID__: {
    add__R2EJ(lst_typ__I2TK,type_integer__3JB);
  } break;
  case __EXPR_SUP__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_SUB__: {
    get_type__ZJDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_MUL__: {
    get_type__3JDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_DIV__: {
    get_type__BKDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_AND__: {
    get_type__FKDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_SHIFT_R__: {
    get_type__JKDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_SHIFT_L__: {
    get_type__NKDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __PUT_TO__: {
    add__R2EJ(lst_typ__I2TK,TYPE_VOID__);
  } break;
  case __ITEM__: {
    get_type__UKDI(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __SIZE_OF__: {
    add__R2EJ(lst_typ__I2TK,type_integer__3JB);
  } break;
  case __CAST__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)((__CAST *)__tmp__Q2TK)->static_type__SO1H)->parent_type__KTL);
  } break;
  case __CALL_SLOT__: {
    get_type__DAML(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __READ_SLOT__: {
    get_type__OD0K(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __READ_GLOBAL__: {
    get_type__ZJOL(((__READ_GLOBAL *)__tmp__Q2TK)->global__RHJK,lst_typ__I2TK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_OR_LOGIC__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_AND_LOGIC__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_NEG__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__Q2TK)))->parent_type__KTL);
  } break;
  case __EXPR_ADD__: {
    get_type__YEOL(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_NOT__: {
    add__R2EJ(lst_typ__I2TK,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__Q2TK)))->parent_type__KTL);
  } break;
  case __EXPR_MOD__: {
    get_type__FSEO(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_SUP_EQ__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_INF__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_INF_EQ__: {
    add__R2EJ(lst_typ__I2TK,type_true__FJB);
    add__R2EJ(lst_typ__I2TK,type_false__NJB);
  } break;
  case __EXPR_OR__: {
    get_type__CVPN(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  case __EXPR_XOR__: {
    get_type__FNTO(__tmp__Q2TK,lst_typ__I2TK);
  } break;
  };
  if (((__INTEGER)(((__TYPES_TMP *)lst_typ__I2TK)->parent_types__W25F.upper__4LAG +  1) > (__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1))) {
    print__1ZE((&__string_546));
    Self__QAAL=((__TYPES_TMP *)lst_typ__I2TK);
    if ((Self__QAAL->parent_types__W25F.upper__4LAG != (__INTEGER)(-  1))) {
      __tmp__2AAL=(__INTEGER)(Self__QAAL->parent_types__W25F.upper__4LAG -  1);
      Self__I4FL= 0;
      while ((Self__I4FL <= __tmp__2AAL)) {
        __tmp__CBAL=((void **)Self__QAAL->parent_types__W25F.storage__WWFJ)[Self__I4FL];
        switch (((struct ___OBJ *)__tmp__CBAL)->__id) {
        case __TYPE__: {
          Self__MOWQ=((__TYPE *)__tmp__CBAL);
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,((__PROTOTYPE *)Self__MOWQ->prototype__RD)->parent_named__QD.name__1QB);
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        case __TYPE_NULL__: {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,(&__string_59));
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        case __TYPE_VOID__: {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,(&__string_2));
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        case __TYPE_CONTEXT__: {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,(&__string_44));
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        case __TYPE_ID__: {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,(&__string_46));
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        case __TYPE_GENERIC__: {
          Self__NOWQ=((__TYPE_GENERIC *)__tmp__CBAL);
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,Self__NOWQ->name__2R2B);
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        case __PROFIL_BLOCK__: {
          ((__STRING *)string_tmp__RB)->count__VF= 0;
          append__MOK(string_tmp__RB,(&__string_39));
          put_string__2EG(((__STRING *)string_tmp__RB));
        } break;
        };
        fputc((int)('('),stdout);
        __tmp__DBAL=((void **)Self__QAAL->parent_types__W25F.storage__WWFJ)[Self__I4FL];
        switch (((struct ___OBJ *)__tmp__DBAL)->__id) {
        case __TYPE__: {
          __tmp__EBAL=((__TYPE *)__tmp__DBAL)->index__LJC;
        } break;
        case __TYPE_NULL__: {
          __tmp__EBAL=((__TYPE_NULL *)__tmp__DBAL)->parent_type__TIB.index__LJC;
        } break;
        case __TYPE_VOID__: {
          __tmp__EBAL=((__TYPE_VOID *)__tmp__DBAL)->parent_type__UIB.index__LJC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__EBAL=((__TYPE_CONTEXT *)__tmp__DBAL)->parent_type__VIB.index__LJC;
        } break;
        case __TYPE_ID__: {
          __tmp__EBAL=((__TYPE_ID *)__tmp__DBAL)->parent_type__WIB.index__LJC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__EBAL=((__TYPE_GENERIC *)__tmp__DBAL)->parent_type__T2IB.index__LJC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__EBAL=((__PROFIL_BLOCK *)__tmp__DBAL)->parent_type__HHAG.index__LJC;
        } break;
        };
        print__Y0CD(__tmp__EBAL);
        print__1ZE((&__string_547));
        Self__I4FL=(__INTEGER)(Self__I4FL +  1);
      };
      __tmp__GBAL=((void **)Self__QAAL->parent_types__W25F.storage__WWFJ)[Self__QAAL->parent_types__W25F.upper__4LAG];
      switch (((struct ___OBJ *)__tmp__GBAL)->__id) {
      case __TYPE__: {
        Self__34FL=((__TYPE *)__tmp__GBAL);
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,((__PROTOTYPE *)Self__34FL->prototype__RD)->parent_named__QD.name__1QB);
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      case __TYPE_NULL__: {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,(&__string_59));
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      case __TYPE_VOID__: {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,(&__string_2));
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      case __TYPE_CONTEXT__: {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,(&__string_44));
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      case __TYPE_ID__: {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,(&__string_46));
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      case __TYPE_GENERIC__: {
        Self__W5FL=((__TYPE_GENERIC *)__tmp__GBAL);
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,Self__W5FL->name__2R2B);
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      case __PROFIL_BLOCK__: {
        ((__STRING *)string_tmp__RB)->count__VF= 0;
        append__MOK(string_tmp__RB,(&__string_39));
        put_string__2EG(((__STRING *)string_tmp__RB));
      } break;
      };
      fputc((int)('('),stdout);
      __tmp__HBAL=((void **)Self__QAAL->parent_types__W25F.storage__WWFJ)[Self__QAAL->parent_types__W25F.upper__4LAG];
      switch (((struct ___OBJ *)__tmp__HBAL)->__id) {
      case __TYPE__: {
        __tmp__IBAL=((__TYPE *)__tmp__HBAL)->index__LJC;
      } break;
      case __TYPE_NULL__: {
        __tmp__IBAL=((__TYPE_NULL *)__tmp__HBAL)->parent_type__TIB.index__LJC;
      } break;
      case __TYPE_VOID__: {
        __tmp__IBAL=((__TYPE_VOID *)__tmp__HBAL)->parent_type__UIB.index__LJC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__IBAL=((__TYPE_CONTEXT *)__tmp__HBAL)->parent_type__VIB.index__LJC;
      } break;
      case __TYPE_ID__: {
        __tmp__IBAL=((__TYPE_ID *)__tmp__HBAL)->parent_type__WIB.index__LJC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__IBAL=((__TYPE_GENERIC *)__tmp__HBAL)->parent_type__T2IB.index__LJC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__IBAL=((__PROFIL_BLOCK *)__tmp__HBAL)->parent_type__HHAG.index__LJC;
      } break;
      };
      print__Y0CD(__tmp__IBAL);
      fputc((int)(')'),stdout);
    } else {
      print__1ZE((&__string_548));
    };
    print__1ZE((&__string_549));
    ((__STRING *)string_tmp__RB)->count__VF= 0;
    __tmp__R3TK=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
    Self__WBAL= 0;
    while ((Self__WBAL <= __tmp__R3TK)) {
      __tmp__Z3TK=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__WBAL])->id__QMAG;
      switch (((struct ___OBJ *)__tmp__Z3TK)->__id) {
      case __TYPE__: {
        append__MOK(string_tmp__RB,((__PROTOTYPE *)((__TYPE *)__tmp__Z3TK)->prototype__RD)->parent_named__QD.name__1QB);
      } break;
      case __TYPE_NULL__: {
        append__MOK(string_tmp__RB,(&__string_59));
      } break;
      case __TYPE_VOID__: {
        append__MOK(string_tmp__RB,(&__string_2));
      } break;
      case __TYPE_CONTEXT__: {
        append__MOK(string_tmp__RB,(&__string_44));
      } break;
      case __TYPE_ID__: {
        append__MOK(string_tmp__RB,(&__string_46));
      } break;
      case __TYPE_GENERIC__: {
        append__MOK(string_tmp__RB,((__TYPE_GENERIC *)__tmp__Z3TK)->name__2R2B);
      } break;
      case __PROFIL_BLOCK__: {
        append__MOK(string_tmp__RB,(&__string_39));
      } break;
      };
      add_last__YPK(string_tmp__RB,',');
      Self__WBAL=(__INTEGER)(Self__WBAL +  1);
    };
    put_string__2EG(((__STRING *)string_tmp__RB));
    fputc((int)('\n'),stdout);
    pos__G1JQ=Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM;
    put_error__text__0AH( 0,(&__string_550));
    put_position__ECH(pos__G1JQ);
    send_error__2FH();
  };
  __tmp__G4TK=((__TYPES_TMP *)lst_typ__I2TK)->parent_types__W25F.upper__4LAG;
  Self__UF0K= 0;
  while ((Self__UF0K <= __tmp__G4TK)) {
    j__K4TK=Self__UF0K;
    typ__K2TK=((void **)((__TYPES_TMP *)lst_typ__I2TK)->parent_types__W25F.storage__WWFJ)[Self__UF0K];
    while (((void *)typ__K2TK != (void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[j__K4TK])->id__QMAG)) {
      remove__EEPL(((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[j__K4TK]);
      Self__WYIL=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG);
      __tmp__5YIL=Self__WYIL->parent_arrayed_collection__CHAG.storage__NYEJ;
      __tmp__AZIL=Self__WYIL->parent_arrayed_collection__CHAG.upper__HMAG;
      Self__SOJL=((void **)__tmp__5YIL);
      i__DPJL=j__K4TK;
      while ((i__DPJL != __tmp__AZIL)) {
        Self__SOJL[i__DPJL]=Self__SOJL[(__INTEGER)(i__DPJL +  1)];
        i__DPJL=(__INTEGER)(i__DPJL +  1);
      };
      Self__WYIL->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(Self__WYIL->parent_arrayed_collection__CHAG.upper__HMAG -  1);
    };
    Self__UF0K=(__INTEGER)(Self__UF0K +  1);
  };
  while (((__INTEGER)(((__TYPES_TMP *)lst_typ__I2TK)->parent_types__W25F.upper__4LAG +  1) != (__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1))) {
    Self__435Q=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG);
    remove__EEPL(((void **)Self__435Q->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__435Q->parent_arrayed_collection__CHAG.upper__HMAG]);
    Self__RLFL=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG);
    Self__RLFL->parent_arrayed_collection__CHAG.upper__HMAG=(__INTEGER)(Self__RLFL->parent_arrayed_collection__CHAG.upper__HMAG -  1);
  };
  free__OOFJ(lst_typ__I2TK);
  if (((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  1)) {
    __tmp__1AUK=TRUE__;
  } else {
    if (((((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2) && (debug_level_option__3C ==  0)) && ((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->id__QMAG == (void *)TYPE_NULL__))) {
      __tmp__SAUK=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
      if (__tmp__SAUK==NULL) {
        __tmp__TAUK=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__SAUK)->__id) {
        case __LIST__: {
          __tmp__TAUK=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__TAUK=NULL;
        } break;
        case __PUSH__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__TAUK=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__TAUK=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__TAUK=NULL;
        } break;
        case __SWITCH__: {
          __tmp__TAUK=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__TAUK=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__TAUK=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__TAUK=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__TAUK=((void *)__tmp__SAUK);
        } break;
        case __WRITE_SLOT__: {
          __tmp__TAUK=((void *)__tmp__SAUK);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__TAUK=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__TAUK=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__TAUK=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__TAUK=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__TAUK=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__TAUK=NULL;
        } break;
        case __ITEM__: {
          __tmp__TAUK=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__TAUK=NULL;
        } break;
        case __CAST__: {
          __tmp__TAUK=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__TAUK=NULL;
        } break;
        case __NOP__: {
          __tmp__TAUK=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__TAUK=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__TAUK=((void *)__tmp__SAUK);
        } break;
        case __READ_GLOBAL__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__TAUK=NULL;
        } break;
        case __LOOP__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__TAUK=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__TAUK=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__TAUK=NULL;
        } break;
        }
      };
      wrt__L2TK=__tmp__TAUK;
      __tmp__YAUK=((void *)__tmp__TAUK == (void *)NULL);
    } else {
      __tmp__YAUK=FALSE__;
    };
    __tmp__1AUK=__tmp__YAUK;
  };
  if (__tmp__1AUK) {
    __tmp__BBUK=Self__G2TK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__BBUK)->__id) {
    case __LIST__: {
      __tmp__CBUK=execute_unlink__0SRJ(__tmp__BBUK);
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__CBUK=execute_unlink__42LK(__tmp__BBUK);
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __READ_LOCAL__: {
      Self__M1JQ=((__READ_LOCAL *)__tmp__BBUK);
      unread__YVJK(Self__M1JQ->local__ALZD,Self__M1JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__CBUK=execute_unlink__PBMK(__tmp__BBUK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__CBUK=execute_unlink__WGMK(__tmp__BBUK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__CBUK=execute_unlink__HHMK(__tmp__BBUK);
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__KPWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BBUK)->receiver__OO2H);
      unread__YVJK(Self__KPWQ->local__ALZD,Self__KPWQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__BBUK));
      __tmp__CBUK=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__CBUK=execute_unlink__IIMK(__tmp__BBUK);
    } break;
    case __EXPR_SUB__: {
      __tmp__CBUK=execute_unlink__ZIMK(__tmp__BBUK);
    } break;
    case __EXPR_MUL__: {
      __tmp__CBUK=execute_unlink__KJMK(__tmp__BBUK);
    } break;
    case __EXPR_DIV__: {
      __tmp__CBUK=execute_unlink__1JMK(__tmp__BBUK);
    } break;
    case __EXPR_AND__: {
      __tmp__CBUK=execute_unlink__MKMK(__tmp__BBUK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__CBUK=execute_unlink__3KMK(__tmp__BBUK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__CBUK=execute_unlink__OLMK(__tmp__BBUK);
    } break;
    case __PUT_TO__: {
      __tmp__CBUK=execute_link__BOPK(((__PUT_TO *)__tmp__BBUK));
    } break;
    case __ITEM__: {
      __tmp__CBUK=execute_unlink__CMMK(__tmp__BBUK);
    } break;
    case __SIZE_OF__: {
      __tmp__CBUK=execute_unlink__SMMK(__tmp__BBUK);
    } break;
    case __CAST__: {
      __tmp__CBUK=execute_unlink__XMMK(__tmp__BBUK);
    } break;
    case __CALL_SLOT__: {
      __tmp__CBUK=execute_unlink__2NQL(__tmp__BBUK);
    } break;
    case __READ_SLOT__: {
      __tmp__CBUK=execute_unlink__WDAL(__tmp__BBUK);
    } break;
    case __READ_GLOBAL__: {
      Self__P1JQ=((__READ_GLOBAL *)__tmp__BBUK);
      unread__15ML(Self__P1JQ->global__RHJK,Self__P1JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__CBUK=execute_access_unlink__VMDL(Self__P1JQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__CBUK=execute_unlink__CRZM(__tmp__BBUK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__CBUK=execute_unlink__B2EO(__tmp__BBUK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__CBUK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__BBUK));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__CBUK=execute_unlink__R2EO(__tmp__BBUK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__CBUK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__BBUK));
    } break;
    case __EXPR_NEG__: {
      __tmp__CBUK=execute_unlink__XYJM(__tmp__BBUK);
    } break;
    case __EXPR_ADD__: {
      __tmp__CBUK=execute_unlink__3NNL(__tmp__BBUK);
    } break;
    case __EXPR_NOT__: {
      __tmp__CBUK=execute_unlink__YLZM(__tmp__BBUK);
    } break;
    case __EXPR_MOD__: {
      __tmp__CBUK=execute_unlink__B3EO(__tmp__BBUK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__CBUK=execute_unlink__AJEP(__tmp__BBUK);
    } break;
    case __EXPR_INF__: {
      __tmp__CBUK=execute_unlink__CPQN(__tmp__BBUK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__CBUK=execute_unlink__SPQN(__tmp__BBUK);
    } break;
    case __EXPR_OR__: {
      __tmp__CBUK=execute_unlink__JDQN(__tmp__BBUK);
    } break;
    case __EXPR_XOR__: {
      __tmp__CBUK=execute_unlink__YNUO(__tmp__BBUK);
    } break;
    };
    if (((void *)__tmp__CBUK != (void *)NULL)) {
      Self__RLZQ=((__LIST *)list_current__IF1);
      add__to__1H5G(Self__RLZQ->expr_list__JUOG,__tmp__CBUK,(__INTEGER)(Self__RLZQ->index__PXRG -  1));
      Self__RLZQ->index__PXRG=(__INTEGER)(Self__RLZQ->index__PXRG +  1);
    };
    Self__A45Q=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG);
    __tmp__OBUK=((__CASE *)((void **)Self__A45Q->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__A45Q->parent_arrayed_collection__CHAG.upper__HMAG])->id__QMAG;
    if (__tmp__OBUK==NULL) {
      __tmp__PBUK=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__OBUK)->__id) {
      case __TYPE__: {
        __tmp__PBUK=NULL;
      } break;
      case __TYPE_NULL__: {
        __tmp__PBUK=NULL;
      } break;
      case __TYPE_VOID__: {
        __tmp__PBUK=NULL;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__PBUK=NULL;
      } break;
      case __TYPE_ID__: {
        __tmp__PBUK=NULL;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__PBUK=NULL;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__PBUK=((void *)__tmp__OBUK);
      } break;
      }
    };
    tb__N2TK=__tmp__PBUK;
    if (((void *)__tmp__PBUK != (void *)NULL)) {
      Self__MZ5Q=((__PROFIL_BLOCK *)__tmp__PBUK);
      ((__SLOT_DATA *)Self__MZ5Q->slot_value__H4IH)->parent_variable__AJZD.ensure_count__QEAG=(__INTEGER)(((__SLOT_DATA *)Self__MZ5Q->slot_value__H4IH)->parent_variable__AJZD.ensure_count__QEAG -  1);
    };
    Self__KP3J=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG);
    result__J2TK=execute_unlink__0SRJ(((__LIST *)((__CASE *)((void **)Self__KP3J->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__KP3J->parent_arrayed_collection__CHAG.upper__HMAG])->code__BQAG));
    is_end__O2TK=TRUE__;
  };
  if (((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2)) {
    __tmp__ECUK=Self__G2TK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__ECUK)->__id) {
    case __LIST__: {
      __tmp__FCUK=static_type__GIQG(__tmp__ECUK);
    } break;
    case __STRING_CST__: {
      __tmp__FCUK=((__STRING_CST *)__tmp__ECUK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FCUK=((__EXTERNAL_C *)__tmp__ECUK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FCUK=((__PROTOTYPE_CST *)__tmp__ECUK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__FCUK=((__INTEGER_CST *)__tmp__ECUK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__FCUK=((__LOCAL *)((__READ_LOCAL *)__tmp__ECUK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FCUK=static_type__0N1H(__tmp__ECUK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FCUK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FCUK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__FCUK=((__REAL_CST *)__tmp__ECUK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__FCUK=((__CHARACTER_CST *)__tmp__ECUK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__FCUK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FCUK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__FCUK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__FCUK=static_type__MP1H(__tmp__ECUK);
    } break;
    case __EXPR_MUL__: {
      __tmp__FCUK=static_type__SP1H(__tmp__ECUK);
    } break;
    case __EXPR_DIV__: {
      __tmp__FCUK=static_type__XP1H(__tmp__ECUK);
    } break;
    case __EXPR_AND__: {
      __tmp__FCUK=static_type__2P1H(__tmp__ECUK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FCUK=static_type__BQ1H(__tmp__ECUK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FCUK=static_type__GQ1H(__tmp__ECUK);
    } break;
    case __PUT_TO__: {
      __tmp__FCUK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__FCUK=static_type__PQ1H(__tmp__ECUK);
    } break;
    case __SIZE_OF__: {
      __tmp__FCUK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__FCUK=((__CAST *)__tmp__ECUK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__FCUK=static_type__GIKL(__tmp__ECUK);
    } break;
    case __READ_SLOT__: {
      __tmp__FCUK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__ECUK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__FCUK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__ECUK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FCUK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FCUK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FCUK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FCUK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FCUK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__FCUK=static_type__Z2IM(__tmp__ECUK);
    } break;
    case __EXPR_ADD__: {
      __tmp__FCUK=static_type__IXML(__tmp__ECUK);
    } break;
    case __EXPR_NOT__: {
      __tmp__FCUK=static_type__BTXM(__tmp__ECUK);
    } break;
    case __EXPR_MOD__: {
      __tmp__FCUK=static_type__5LEO(__tmp__ECUK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FCUK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__FCUK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FCUK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__FCUK=static_type__NOPN(__tmp__ECUK);
    } break;
    case __EXPR_XOR__: {
      __tmp__FCUK=static_type__XCSO(__tmp__ECUK);
    } break;
    };
    __tmp__4CUK=((void *)((__TYPE_FULL *)__tmp__FCUK)->parent_type__KTL == (void *)type_boolean__VJB);
  } else {
    __tmp__4CUK=FALSE__;
  };
  if (((__tmp__4CUK && is_empty__UJVL(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG)) && is_empty__UJVL(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG))) {
    __tmp__GDUK=Self__G2TK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__GDUK)->__id) {
    case __LIST__: {
      __tmp__HDUK=execute_unlink__0SRJ(__tmp__GDUK);
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__HDUK=execute_unlink__42LK(__tmp__GDUK);
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __READ_LOCAL__: {
      Self__V1JQ=((__READ_LOCAL *)__tmp__GDUK);
      unread__YVJK(Self__V1JQ->local__ALZD,Self__V1JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HDUK=execute_unlink__PBMK(__tmp__GDUK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HDUK=execute_unlink__WGMK(__tmp__GDUK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HDUK=execute_unlink__HHMK(__tmp__GDUK);
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__MPWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GDUK)->receiver__OO2H);
      unread__YVJK(Self__MPWQ->local__ALZD,Self__MPWQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__GDUK));
      __tmp__HDUK=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__HDUK=execute_unlink__IIMK(__tmp__GDUK);
    } break;
    case __EXPR_SUB__: {
      __tmp__HDUK=execute_unlink__ZIMK(__tmp__GDUK);
    } break;
    case __EXPR_MUL__: {
      __tmp__HDUK=execute_unlink__KJMK(__tmp__GDUK);
    } break;
    case __EXPR_DIV__: {
      __tmp__HDUK=execute_unlink__1JMK(__tmp__GDUK);
    } break;
    case __EXPR_AND__: {
      __tmp__HDUK=execute_unlink__MKMK(__tmp__GDUK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HDUK=execute_unlink__3KMK(__tmp__GDUK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HDUK=execute_unlink__OLMK(__tmp__GDUK);
    } break;
    case __PUT_TO__: {
      __tmp__HDUK=execute_link__BOPK(((__PUT_TO *)__tmp__GDUK));
    } break;
    case __ITEM__: {
      __tmp__HDUK=execute_unlink__CMMK(__tmp__GDUK);
    } break;
    case __SIZE_OF__: {
      __tmp__HDUK=execute_unlink__SMMK(__tmp__GDUK);
    } break;
    case __CAST__: {
      __tmp__HDUK=execute_unlink__XMMK(__tmp__GDUK);
    } break;
    case __CALL_SLOT__: {
      __tmp__HDUK=execute_unlink__2NQL(__tmp__GDUK);
    } break;
    case __READ_SLOT__: {
      __tmp__HDUK=execute_unlink__WDAL(__tmp__GDUK);
    } break;
    case __READ_GLOBAL__: {
      Self__Y1JQ=((__READ_GLOBAL *)__tmp__GDUK);
      unread__15ML(Self__Y1JQ->global__RHJK,Self__Y1JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__HDUK=execute_access_unlink__VMDL(Self__Y1JQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HDUK=execute_unlink__CRZM(__tmp__GDUK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HDUK=execute_unlink__B2EO(__tmp__GDUK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HDUK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__GDUK));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HDUK=execute_unlink__R2EO(__tmp__GDUK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HDUK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__GDUK));
    } break;
    case __EXPR_NEG__: {
      __tmp__HDUK=execute_unlink__XYJM(__tmp__GDUK);
    } break;
    case __EXPR_ADD__: {
      __tmp__HDUK=execute_unlink__3NNL(__tmp__GDUK);
    } break;
    case __EXPR_NOT__: {
      __tmp__HDUK=execute_unlink__YLZM(__tmp__GDUK);
    } break;
    case __EXPR_MOD__: {
      __tmp__HDUK=execute_unlink__B3EO(__tmp__GDUK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HDUK=execute_unlink__AJEP(__tmp__GDUK);
    } break;
    case __EXPR_INF__: {
      __tmp__HDUK=execute_unlink__CPQN(__tmp__GDUK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HDUK=execute_unlink__SPQN(__tmp__GDUK);
    } break;
    case __EXPR_OR__: {
      __tmp__HDUK=execute_unlink__JDQN(__tmp__GDUK);
    } break;
    case __EXPR_XOR__: {
      __tmp__HDUK=execute_unlink__YNUO(__tmp__GDUK);
    } break;
    };
    result__J2TK=__tmp__HDUK;
    is_end__O2TK=TRUE__;
  };
  if ((! is_end__O2TK)) {
    __tmp__QDUK=Self__G2TK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__QDUK)->__id) {
    case __LIST__: {
      __tmp__RDUK=static_type__GIQG(__tmp__QDUK);
    } break;
    case __STRING_CST__: {
      __tmp__RDUK=((__STRING_CST *)__tmp__QDUK)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__RDUK=((__EXTERNAL_C *)__tmp__QDUK)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RDUK=((__PROTOTYPE_CST *)__tmp__QDUK)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__RDUK=((__INTEGER_CST *)__tmp__QDUK)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__RDUK=((__LOCAL *)((__READ_LOCAL *)__tmp__QDUK)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RDUK=static_type__0N1H(__tmp__QDUK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RDUK=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RDUK=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__RDUK=((__REAL_CST *)__tmp__QDUK)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__RDUK=((__CHARACTER_CST *)__tmp__QDUK)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__RDUK=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RDUK=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__RDUK=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__RDUK=static_type__MP1H(__tmp__QDUK);
    } break;
    case __EXPR_MUL__: {
      __tmp__RDUK=static_type__SP1H(__tmp__QDUK);
    } break;
    case __EXPR_DIV__: {
      __tmp__RDUK=static_type__XP1H(__tmp__QDUK);
    } break;
    case __EXPR_AND__: {
      __tmp__RDUK=static_type__2P1H(__tmp__QDUK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RDUK=static_type__BQ1H(__tmp__QDUK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RDUK=static_type__GQ1H(__tmp__QDUK);
    } break;
    case __PUT_TO__: {
      __tmp__RDUK=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__RDUK=static_type__PQ1H(__tmp__QDUK);
    } break;
    case __SIZE_OF__: {
      __tmp__RDUK=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__RDUK=((__CAST *)__tmp__QDUK)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__RDUK=static_type__GIKL(__tmp__QDUK);
    } break;
    case __READ_SLOT__: {
      __tmp__RDUK=((__SLOT_DATA *)((__READ_SLOT *)__tmp__QDUK)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__RDUK=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__QDUK)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RDUK=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RDUK=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RDUK=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RDUK=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RDUK=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__RDUK=static_type__Z2IM(__tmp__QDUK);
    } break;
    case __EXPR_ADD__: {
      __tmp__RDUK=static_type__IXML(__tmp__QDUK);
    } break;
    case __EXPR_NOT__: {
      __tmp__RDUK=static_type__BTXM(__tmp__QDUK);
    } break;
    case __EXPR_MOD__: {
      __tmp__RDUK=static_type__5LEO(__tmp__QDUK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RDUK=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__RDUK=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RDUK=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__RDUK=static_type__NOPN(__tmp__QDUK);
    } break;
    case __EXPR_XOR__: {
      __tmp__RDUK=static_type__XCSO(__tmp__QDUK);
    } break;
    };
    if (((((void *)((__TYPE_FULL *)__tmp__RDUK)->parent_type__KTL == (void *)type_boolean__VJB) && ((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2)) && is_empty__UJVL(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG))) {
      __tmp__1EUK=Self__G2TK->expr__MMFI;
      switch (((struct ___OBJ *)__tmp__1EUK)->__id) {
      case __LIST__: {
        __tmp__2EUK=((__LIST *)__tmp__1EUK)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __STRING_CST__: {
        __tmp__2EUK=((__STRING_CST *)__tmp__1EUK)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXTERNAL_C__: {
        __tmp__2EUK=((__EXTERNAL_C *)__tmp__1EUK)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__2EUK=((__PROTOTYPE_CST *)__tmp__1EUK)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __INTEGER_CST__: {
        __tmp__2EUK=((__INTEGER_CST *)__tmp__1EUK)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_LOCAL__: {
        __tmp__2EUK=((__READ_LOCAL *)__tmp__1EUK)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__2EUK=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__2EUK=((__EXPR_EQUAL *)__tmp__1EUK)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__2EUK=((__EXPR_NOT_EQUAL *)__tmp__1EUK)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __REAL_CST__: {
        __tmp__2EUK=((__REAL_CST *)__tmp__1EUK)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CHARACTER_CST__: {
        __tmp__2EUK=((__CHARACTER_CST *)__tmp__1EUK)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __IS_EXPANDED__: {
        __tmp__2EUK=((__IS_EXPANDED *)__tmp__1EUK)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__2EUK=((__GET_TYPE_ID *)__tmp__1EUK)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP__: {
        __tmp__2EUK=((__EXPR_SUP *)__tmp__1EUK)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUB__: {
        __tmp__2EUK=((__EXPR_SUB *)__tmp__1EUK)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MUL__: {
        __tmp__2EUK=((__EXPR_MUL *)__tmp__1EUK)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_DIV__: {
        __tmp__2EUK=((__EXPR_DIV *)__tmp__1EUK)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND__: {
        __tmp__2EUK=((__EXPR_AND *)__tmp__1EUK)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__2EUK=((__EXPR_SHIFT_R *)__tmp__1EUK)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__2EUK=((__EXPR_SHIFT_L *)__tmp__1EUK)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PUT_TO__: {
        __tmp__2EUK=((__PUT_TO *)__tmp__1EUK)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __ITEM__: {
        __tmp__2EUK=((__ITEM *)__tmp__1EUK)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __SIZE_OF__: {
        __tmp__2EUK=((__SIZE_OF *)__tmp__1EUK)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CAST__: {
        __tmp__2EUK=((__CAST *)__tmp__1EUK)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CALL_SLOT__: {
        __tmp__2EUK=((__CALL_SLOT *)__tmp__1EUK)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_SLOT__: {
        __tmp__2EUK=((__READ_SLOT *)__tmp__1EUK)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_GLOBAL__: {
        __tmp__2EUK=((__READ_GLOBAL *)__tmp__1EUK)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__2EUK=((__EXPR_NOT_LOGIC *)__tmp__1EUK)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__2EUK=((__EXPR_OR_LOGIC *)__tmp__1EUK)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__2EUK=((__EXPR_OR_OR_LOGIC *)__tmp__1EUK)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__2EUK=((__EXPR_AND_LOGIC *)__tmp__1EUK)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__2EUK=((__EXPR_AND_AND_LOGIC *)__tmp__1EUK)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NEG__: {
        __tmp__2EUK=((__EXPR_NEG *)__tmp__1EUK)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_ADD__: {
        __tmp__2EUK=((__EXPR_ADD *)__tmp__1EUK)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT__: {
        __tmp__2EUK=((__EXPR_NOT *)__tmp__1EUK)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MOD__: {
        __tmp__2EUK=((__EXPR_MOD *)__tmp__1EUK)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__2EUK=((__EXPR_SUP_EQ *)__tmp__1EUK)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF__: {
        __tmp__2EUK=((__EXPR_INF *)__tmp__1EUK)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__2EUK=((__EXPR_INF_EQ *)__tmp__1EUK)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR__: {
        __tmp__2EUK=((__EXPR_OR *)__tmp__1EUK)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_XOR__: {
        __tmp__2EUK=((__EXPR_XOR *)__tmp__1EUK)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      };
      Self__G2TK->expr__MMFI=create__with__BQNM(__tmp__2EUK,Self__G2TK->expr__MMFI);
      lst__M2TK=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG;
      ((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG;
      ((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG=lst__M2TK;
    };
    __tmp__NFUK=Self__G2TK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__NFUK)->__id) {
    case __LIST__: {
      __tmp__OFUK=execute_link__LUOG(__tmp__NFUK);
    } break;
    case __STRING_CST__: {
      __tmp__OFUK=((__STRING_CST *)__tmp__NFUK);
    } break;
    case __EXTERNAL_C__: {
      __tmp__OFUK=execute_link__U5ZK(__tmp__NFUK);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OFUK=((__PROTOTYPE_CST *)__tmp__NFUK);
    } break;
    case __INTEGER_CST__: {
      __tmp__OFUK=((__INTEGER_CST *)__tmp__NFUK);
    } break;
    case __READ_LOCAL__: {
      __tmp__OFUK=execute_link__EHAL(__tmp__NFUK);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OFUK=execute_link__YLAL();
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OFUK=execute_link__2LAL(__tmp__NFUK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OFUK=execute_link__FQAL(__tmp__NFUK);
    } break;
    case __REAL_CST__: {
      __tmp__OFUK=((__REAL_CST *)__tmp__NFUK);
    } break;
    case __CHARACTER_CST__: {
      __tmp__OFUK=((__CHARACTER_CST *)__tmp__NFUK);
    } break;
    case __IS_EXPANDED__: {
      __tmp__OFUK=execute_link__UUAL(__tmp__NFUK);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OFUK=execute_link__1VAL(__tmp__NFUK);
    } break;
    case __EXPR_SUP__: {
      __tmp__OFUK=execute_link__AWAL(__tmp__NFUK);
    } break;
    case __EXPR_SUB__: {
      __tmp__OFUK=execute_link__J0AL(__tmp__NFUK);
    } break;
    case __EXPR_MUL__: {
      __tmp__OFUK=execute_link__S4AL(__tmp__NFUK);
    } break;
    case __EXPR_DIV__: {
      __tmp__OFUK=execute_link__1CBL(__tmp__NFUK);
    } break;
    case __EXPR_AND__: {
      __tmp__OFUK=execute_link__EHBL(__tmp__NFUK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OFUK=execute_link__NLBL(__tmp__NFUK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OFUK=execute_link__WPBL(__tmp__NFUK);
    } break;
    case __PUT_TO__: {
      __tmp__OFUK=execute_link__BOPK(__tmp__NFUK);
    } break;
    case __ITEM__: {
      __tmp__OFUK=execute_link__5TBL(__tmp__NFUK);
    } break;
    case __SIZE_OF__: {
      __tmp__OFUK=execute_link__GUBL(__tmp__NFUK);
    } break;
    case __CAST__: {
      __tmp__OFUK=execute_link__LUBL(__tmp__NFUK);
    } break;
    case __CALL_SLOT__: {
      __tmp__OFUK=execute_link__A2TL(__tmp__NFUK);
    } break;
    case __READ_SLOT__: {
      __tmp__OFUK=execute_link__EYBL(__tmp__NFUK);
    } break;
    case __READ_GLOBAL__: {
      __tmp__OFUK=execute_link__U2BL(__tmp__NFUK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OFUK=execute_link__SRZM(__tmp__NFUK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OFUK=execute_link__OBFO(__tmp__NFUK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OFUK=execute_link__GJLO(__tmp__NFUK);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OFUK=execute_link__HHFO(__tmp__NFUK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OFUK=execute_link__KPLO(__tmp__NFUK);
    } break;
    case __EXPR_NEG__: {
      __tmp__OFUK=execute_link__0GKM(__tmp__NFUK);
    } break;
    case __EXPR_ADD__: {
      __tmp__OFUK=execute_link__RROL(__tmp__NFUK);
    } break;
    case __EXPR_NOT__: {
      __tmp__OFUK=execute_link__GUZM(__tmp__NFUK);
    } break;
    case __EXPR_MOD__: {
      __tmp__OFUK=execute_link__ANFO(__tmp__NFUK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OFUK=execute_link__YLEP(__tmp__NFUK);
    } break;
    case __EXPR_INF__: {
      __tmp__OFUK=execute_link__VQQN(__tmp__NFUK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OFUK=execute_link__4UQN(__tmp__NFUK);
    } break;
    case __EXPR_OR__: {
      __tmp__OFUK=execute_link__1HQN(__tmp__NFUK);
    } break;
    case __EXPR_XOR__: {
      __tmp__OFUK=execute_link__IYUO(__tmp__NFUK);
    } break;
    };
    Self__G2TK->expr__MMFI=__tmp__OFUK;
    count_no_recursive__GBCL= 0;
    if ((((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->id__QMAG == (void *)TYPE_NULL__) && ((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2))) {
      execute_case__0WRG(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG);
      execute_case__0WRG(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG);
    } else {
      __tmp__RGUK=((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
      Self__QQFL= 0;
      while ((Self__QQFL <= __tmp__RGUK)) {
        Self__ZJQL=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__QQFL]);
        __tmp__0JQL=Self__ZJQL->id__QMAG;
        switch (((struct ___OBJ *)__tmp__0JQL)->__id) {
        case __TYPE__: {
          ((__TYPE *)__tmp__0JQL)->last_pass_binding__YYZI=pass_count__Z3LC;
        } break;
        case __TYPE_NULL__: {
          ((__TYPE_NULL *)__tmp__0JQL)->parent_type__TIB.last_pass_binding__YYZI=pass_count__Z3LC;
        } break;
        case __TYPE_VOID__: {
          ((__TYPE_VOID *)__tmp__0JQL)->parent_type__UIB.last_pass_binding__YYZI=pass_count__Z3LC;
        } break;
        case __TYPE_CONTEXT__: {
          ((__TYPE_CONTEXT *)__tmp__0JQL)->parent_type__VIB.last_pass_binding__YYZI=pass_count__Z3LC;
        } break;
        case __TYPE_ID__: {
          ((__TYPE_ID *)__tmp__0JQL)->parent_type__WIB.last_pass_binding__YYZI=pass_count__Z3LC;
        } break;
        case __TYPE_GENERIC__: {
          ((__TYPE_GENERIC *)__tmp__0JQL)->parent_type__T2IB.last_pass_binding__YYZI=pass_count__Z3LC;
        } break;
        case __PROFIL_BLOCK__: {
          set_late_binding__OOSL();
        } break;
        };
        execute_case__0WRG(Self__ZJQL->code__BQAG);
        Self__QQFL=(__INTEGER)(Self__QQFL +  1);
      };
    };
    result__NCCL=NULL;
    wr_true__OCCL=NULL;
    wr_false__PCCL=NULL;
    rd__QCCL=NULL;
    val_true__RCCL=NULL;
    val_false__SCCL=NULL;
    b__UCCL=FALSE__;
    c__VCCL=FALSE__;
    d__WCCL=FALSE__;
    __tmp__XCCL=Self__G2TK->expr__MMFI;
    switch (((struct ___OBJ *)__tmp__XCCL)->__id) {
    case __LIST__: {
      __tmp__YCCL=static_type__GIQG(__tmp__XCCL);
    } break;
    case __STRING_CST__: {
      __tmp__YCCL=((__STRING_CST *)__tmp__XCCL)->parent_constant__5F.static_type__F4YD;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YCCL=((__EXTERNAL_C *)__tmp__XCCL)->static_type__UXZD;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YCCL=((__PROTOTYPE_CST *)__tmp__XCCL)->parent_constant__E3LC.static_type__F4YD;
    } break;
    case __INTEGER_CST__: {
      __tmp__YCCL=((__INTEGER_CST *)__tmp__XCCL)->parent_constant__P3LC.static_type__F4YD;
    } break;
    case __READ_LOCAL__: {
      __tmp__YCCL=((__LOCAL *)((__READ_LOCAL *)__tmp__XCCL)->local__ALZD)->parent_variable__B2LC.type__125F;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YCCL=static_type__0N1H(__tmp__XCCL);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YCCL=static_type__TO1H();
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YCCL=static_type__YO1H();
    } break;
    case __REAL_CST__: {
      __tmp__YCCL=((__REAL_CST *)__tmp__XCCL)->parent_constant__M3JH.static_type__F4YD;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YCCL=((__CHARACTER_CST *)__tmp__XCCL)->parent_constant__53JH.static_type__F4YD;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YCCL=static_type__3O1H();
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YCCL=static_type__CP1H();
    } break;
    case __EXPR_SUP__: {
      __tmp__YCCL=static_type__HP1H();
    } break;
    case __EXPR_SUB__: {
      __tmp__YCCL=static_type__MP1H(__tmp__XCCL);
    } break;
    case __EXPR_MUL__: {
      __tmp__YCCL=static_type__SP1H(__tmp__XCCL);
    } break;
    case __EXPR_DIV__: {
      __tmp__YCCL=static_type__XP1H(__tmp__XCCL);
    } break;
    case __EXPR_AND__: {
      __tmp__YCCL=static_type__2P1H(__tmp__XCCL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YCCL=static_type__BQ1H(__tmp__XCCL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YCCL=static_type__GQ1H(__tmp__XCCL);
    } break;
    case __PUT_TO__: {
      __tmp__YCCL=TYPE_VOID__->parent_type__UIB.default__AKC;
    } break;
    case __ITEM__: {
      __tmp__YCCL=static_type__PQ1H(__tmp__XCCL);
    } break;
    case __SIZE_OF__: {
      __tmp__YCCL=static_type__1Q1H();
    } break;
    case __CAST__: {
      __tmp__YCCL=((__CAST *)__tmp__XCCL)->static_type__SO1H;
    } break;
    case __CALL_SLOT__: {
      __tmp__YCCL=static_type__GIKL(__tmp__XCCL);
    } break;
    case __READ_SLOT__: {
      __tmp__YCCL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__XCCL)->slot__EVGK)->parent_variable__AJZD.type__125F;
    } break;
    case __READ_GLOBAL__: {
      __tmp__YCCL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__XCCL)->global__RHJK)->parent_variable__AJZD.type__125F;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YCCL=static_type__JRZM();
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YCCL=static_type__VLEO();
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YCCL=static_type__LVIO();
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YCCL=static_type__0LEO();
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YCCL=static_type__RVIO();
    } break;
    case __EXPR_NEG__: {
      __tmp__YCCL=static_type__Z2IM(__tmp__XCCL);
    } break;
    case __EXPR_ADD__: {
      __tmp__YCCL=static_type__IXML(__tmp__XCCL);
    } break;
    case __EXPR_NOT__: {
      __tmp__YCCL=static_type__BTXM(__tmp__XCCL);
    } break;
    case __EXPR_MOD__: {
      __tmp__YCCL=static_type__5LEO(__tmp__XCCL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YCCL=static_type__W2DP();
    } break;
    case __EXPR_INF__: {
      __tmp__YCCL=static_type__FQQN();
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YCCL=static_type__KQQN();
    } break;
    case __EXPR_OR__: {
      __tmp__YCCL=static_type__NOPN(__tmp__XCCL);
    } break;
    case __EXPR_XOR__: {
      __tmp__YCCL=static_type__XCSO(__tmp__XCCL);
    } break;
    };
    if ((((((void *)((__TYPE_FULL *)__tmp__YCCL)->parent_type__KTL == (void *)type_boolean__VJB) && ((__INTEGER)(((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) ==  2)) && ((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) ==  2)) && ((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) ==  2))) {
      if ((((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->id__QMAG != (void *)type_true__FJB) || ((void *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->id__QMAG != (void *)type_false__NJB))) {
        pos__OCAL=Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM;
        put_error__text__0AH( 0,(&__string_551));
        put_position__ECH(pos__OCAL);
        send_error__2FH();
      };
      __tmp__SFCL=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 0])->code__BQAG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
      if (__tmp__SFCL==NULL) {
        __tmp__TFCL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__SFCL)->__id) {
        case __LIST__: {
          __tmp__TFCL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__TFCL=NULL;
        } break;
        case __PUSH__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__TFCL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__TFCL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__TFCL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__TFCL=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__TFCL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__TFCL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__TFCL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__TFCL=((void *)__tmp__SFCL);
        } break;
        case __WRITE_SLOT__: {
          __tmp__TFCL=((void *)__tmp__SFCL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__TFCL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__TFCL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__TFCL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__TFCL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__TFCL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__TFCL=NULL;
        } break;
        case __ITEM__: {
          __tmp__TFCL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__TFCL=NULL;
        } break;
        case __CAST__: {
          __tmp__TFCL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__TFCL=NULL;
        } break;
        case __NOP__: {
          __tmp__TFCL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__TFCL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__TFCL=((void *)__tmp__SFCL);
        } break;
        case __READ_GLOBAL__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__TFCL=NULL;
        } break;
        case __LOOP__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__TFCL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__TFCL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__TFCL=NULL;
        } break;
        }
      };
      wr_true__OCCL=__tmp__TFCL;
      __tmp__YFCL=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__G2TK->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[ 1])->code__BQAG)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0];
      if (__tmp__YFCL==NULL) {
        __tmp__ZFCL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__YFCL)->__id) {
        case __LIST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __PUSH__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZFCL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__ZFCL=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__ZFCL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZFCL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__ZFCL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__ZFCL=((void *)__tmp__YFCL);
        } break;
        case __WRITE_SLOT__: {
          __tmp__ZFCL=((void *)__tmp__YFCL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZFCL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__ZFCL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZFCL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__ZFCL=NULL;
        } break;
        case __ITEM__: {
          __tmp__ZFCL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__ZFCL=NULL;
        } break;
        case __CAST__: {
          __tmp__ZFCL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__ZFCL=NULL;
        } break;
        case __NOP__: {
          __tmp__ZFCL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__ZFCL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__ZFCL=((void *)__tmp__YFCL);
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZFCL=NULL;
        } break;
        case __LOOP__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__ZFCL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__ZFCL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__ZFCL=NULL;
        } break;
        }
      };
      wr_false__PCCL=__tmp__ZFCL;
      if ((((void *)__tmp__TFCL != (void *)NULL) && ((void *)__tmp__ZFCL != (void *)NULL))) {
        switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__FGCL=((__SLOT_DATA *)((__WRITE_GLOBAL *)__tmp__TFCL)->global__4U1H)->parent_variable__AJZD.type__125F;
        } break;
        case __WRITE_SLOT__: {
          __tmp__FGCL=((__SLOT_DATA *)((__WRITE_SLOT *)__tmp__TFCL)->slot__5T1H)->parent_variable__AJZD.type__125F;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__FGCL=((__LOCAL *)((__WRITE_LOCAL *)__tmp__TFCL)->local__2RIJ)->parent_variable__B2LC.type__125F;
        } break;
        };
        __tmp__TGCL=((void *)((__TYPE_FULL *)__tmp__FGCL)->parent_type__KTL == (void *)type_boolean__VJB);
      } else {
        __tmp__TGCL=FALSE__;
      };
      if (__tmp__TGCL) {
        switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__OGCL=((__WRITE_GLOBAL *)__tmp__TFCL)->global__4U1H;
        } break;
        case __WRITE_SLOT__: {
          __tmp__OGCL=((__WRITE_SLOT *)__tmp__TFCL)->slot__5T1H;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__OGCL=((__WRITE_LOCAL *)__tmp__TFCL)->local__2RIJ;
        } break;
        };
        switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__PGCL=((__WRITE_GLOBAL *)__tmp__ZFCL)->global__4U1H;
        } break;
        case __WRITE_SLOT__: {
          __tmp__PGCL=((__WRITE_SLOT *)__tmp__ZFCL)->slot__5T1H;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__PGCL=((__WRITE_LOCAL *)__tmp__ZFCL)->local__2RIJ;
        } break;
        };
        __tmp__UGCL=((void *)__tmp__OGCL == (void *)__tmp__PGCL);
      } else {
        __tmp__UGCL=FALSE__;
      };
      if (__tmp__UGCL) {
        switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__0GCL=((__WRITE_GLOBAL *)__tmp__TFCL)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__0GCL=((__WRITE_SLOT *)__tmp__TFCL)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__0GCL=((__WRITE_LOCAL *)__tmp__TFCL)->parent_write__X50I.value__HBEH;
        } break;
        };
        val_true__RCCL=__tmp__0GCL;
        switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__1GCL=((__WRITE_GLOBAL *)__tmp__ZFCL)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__1GCL=((__WRITE_SLOT *)__tmp__ZFCL)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__1GCL=((__WRITE_LOCAL *)__tmp__ZFCL)->parent_write__X50I.value__HBEH;
        } break;
        };
        val_false__SCCL=__tmp__1GCL;
        switch (((struct ___OBJ *)__tmp__0GCL)->__id) {
        case __LIST__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__2GCL=TRUE__;
        } break;
        case __EXTERNAL_C__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__2GCL=TRUE__;
        } break;
        case __INTEGER_CST__: {
          __tmp__2GCL=TRUE__;
        } break;
        case __READ_LOCAL__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __REAL_CST__: {
          __tmp__2GCL=TRUE__;
        } break;
        case __CHARACTER_CST__: {
          __tmp__2GCL=TRUE__;
        } break;
        case __IS_EXPANDED__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_SUB__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_MUL__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_DIV__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_AND__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __PUT_TO__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __CAST__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __READ_GLOBAL__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_NEG__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_ADD__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_NOT__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_MOD__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_INF__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_OR__: {
          __tmp__2GCL=FALSE__;
        } break;
        case __EXPR_XOR__: {
          __tmp__2GCL=FALSE__;
        } break;
        };
        if (__tmp__2GCL) {
          switch (((struct ___OBJ *)__tmp__0GCL)->__id) {
          case __LIST__: {
            __tmp__CHCL=static_type__GIQG(__tmp__0GCL);
          } break;
          case __STRING_CST__: {
            __tmp__CHCL=((__STRING_CST *)__tmp__0GCL)->parent_constant__5F.static_type__F4YD;
          } break;
          case __EXTERNAL_C__: {
            __tmp__CHCL=((__EXTERNAL_C *)__tmp__0GCL)->static_type__UXZD;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__CHCL=((__PROTOTYPE_CST *)__tmp__0GCL)->parent_constant__E3LC.static_type__F4YD;
          } break;
          case __INTEGER_CST__: {
            __tmp__CHCL=((__INTEGER_CST *)__tmp__0GCL)->parent_constant__P3LC.static_type__F4YD;
          } break;
          case __READ_LOCAL__: {
            __tmp__CHCL=((__LOCAL *)((__READ_LOCAL *)__tmp__0GCL)->local__ALZD)->parent_variable__B2LC.type__125F;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__CHCL=static_type__0N1H(__tmp__0GCL);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__CHCL=static_type__TO1H();
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__CHCL=static_type__YO1H();
          } break;
          case __REAL_CST__: {
            __tmp__CHCL=((__REAL_CST *)__tmp__0GCL)->parent_constant__M3JH.static_type__F4YD;
          } break;
          case __CHARACTER_CST__: {
            __tmp__CHCL=((__CHARACTER_CST *)__tmp__0GCL)->parent_constant__53JH.static_type__F4YD;
          } break;
          case __IS_EXPANDED__: {
            __tmp__CHCL=static_type__3O1H();
          } break;
          case __GET_TYPE_ID__: {
            __tmp__CHCL=static_type__CP1H();
          } break;
          case __EXPR_SUP__: {
            __tmp__CHCL=static_type__HP1H();
          } break;
          case __EXPR_SUB__: {
            __tmp__CHCL=static_type__MP1H(__tmp__0GCL);
          } break;
          case __EXPR_MUL__: {
            __tmp__CHCL=static_type__SP1H(__tmp__0GCL);
          } break;
          case __EXPR_DIV__: {
            __tmp__CHCL=static_type__XP1H(__tmp__0GCL);
          } break;
          case __EXPR_AND__: {
            __tmp__CHCL=static_type__2P1H(__tmp__0GCL);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__CHCL=static_type__BQ1H(__tmp__0GCL);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__CHCL=static_type__GQ1H(__tmp__0GCL);
          } break;
          case __PUT_TO__: {
            __tmp__CHCL=TYPE_VOID__->parent_type__UIB.default__AKC;
          } break;
          case __ITEM__: {
            __tmp__CHCL=static_type__PQ1H(__tmp__0GCL);
          } break;
          case __SIZE_OF__: {
            __tmp__CHCL=static_type__1Q1H();
          } break;
          case __CAST__: {
            __tmp__CHCL=((__CAST *)__tmp__0GCL)->static_type__SO1H;
          } break;
          case __CALL_SLOT__: {
            __tmp__CHCL=static_type__GIKL(__tmp__0GCL);
          } break;
          case __READ_SLOT__: {
            __tmp__CHCL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0GCL)->slot__EVGK)->parent_variable__AJZD.type__125F;
          } break;
          case __READ_GLOBAL__: {
            __tmp__CHCL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0GCL)->global__RHJK)->parent_variable__AJZD.type__125F;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__CHCL=static_type__JRZM();
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__CHCL=static_type__VLEO();
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__CHCL=static_type__LVIO();
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__CHCL=static_type__0LEO();
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__CHCL=static_type__RVIO();
          } break;
          case __EXPR_NEG__: {
            __tmp__CHCL=static_type__Z2IM(__tmp__0GCL);
          } break;
          case __EXPR_ADD__: {
            __tmp__CHCL=static_type__IXML(__tmp__0GCL);
          } break;
          case __EXPR_NOT__: {
            __tmp__CHCL=static_type__BTXM(__tmp__0GCL);
          } break;
          case __EXPR_MOD__: {
            __tmp__CHCL=static_type__5LEO(__tmp__0GCL);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__CHCL=static_type__W2DP();
          } break;
          case __EXPR_INF__: {
            __tmp__CHCL=static_type__FQQN();
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__CHCL=static_type__KQQN();
          } break;
          case __EXPR_OR__: {
            __tmp__CHCL=static_type__NOPN(__tmp__0GCL);
          } break;
          case __EXPR_XOR__: {
            __tmp__CHCL=static_type__XCSO(__tmp__0GCL);
          } break;
          };
          b__UCCL=((void *)((__TYPE_FULL *)__tmp__CHCL)->parent_type__KTL == (void *)type_true__FJB);
          __tmp__IHCL=b__UCCL;
        } else {
          __tmp__IHCL=FALSE__;
        };
        if (__tmp__IHCL) {
          if (__tmp__1GCL==NULL) {
            __tmp__PHCL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__1GCL)->__id) {
            case __LIST__: {
              __tmp__PHCL=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__PHCL=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__PHCL=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__PHCL=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__PHCL=((void *)__tmp__1GCL);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__PHCL=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__PHCL=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__PHCL=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__PHCL=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__PHCL=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__PHCL=NULL;
            } break;
            case __ITEM__: {
              __tmp__PHCL=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__PHCL=NULL;
            } break;
            case __CAST__: {
              __tmp__PHCL=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__PHCL=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__PHCL=((void *)__tmp__1GCL);
            } break;
            case __READ_GLOBAL__: {
              __tmp__PHCL=((void *)__tmp__1GCL);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__PHCL=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__PHCL=NULL;
            } break;
            }
          };
          rd__QCCL=__tmp__PHCL;
          if (((void *)__tmp__PHCL != (void *)NULL)) {
            switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
            case __WRITE_GLOBAL__: {
              remove__S5IK(__tmp__TFCL);
            } break;
            case __WRITE_SLOT__: {
              remove__W5IK(__tmp__TFCL);
            } break;
            case __WRITE_LOCAL__: {
              remove__25IK(__tmp__TFCL);
            } break;
            };
            val_false__SCCL=create__with__and__2TDO(Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM,Self__G2TK->expr__MMFI,__tmp__1GCL);
            switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
            case __WRITE_GLOBAL__: {
              ((__WRITE_GLOBAL *)__tmp__ZFCL)->parent_write__QBGH.value__HBEH=val_false__SCCL;
            } break;
            case __WRITE_SLOT__: {
              ((__WRITE_SLOT *)__tmp__ZFCL)->parent_write__3BGH.value__HBEH=val_false__SCCL;
            } break;
            case __WRITE_LOCAL__: {
              ((__WRITE_LOCAL *)__tmp__ZFCL)->parent_write__X50I.value__HBEH=val_false__SCCL;
            } break;
            };
            result__NCCL=__tmp__ZFCL;
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__1HCL=TRUE__;
          } else {
            __tmp__1HCL=FALSE__;
          };
          if ((! __tmp__1HCL)) {
            if (((count_no_recursive__GBCL ==  0) || (modify_count__F4LC ==  0))) {
              switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
              case __WRITE_GLOBAL__: {
                remove__S5IK(__tmp__TFCL);
              } break;
              case __WRITE_SLOT__: {
                remove__W5IK(__tmp__TFCL);
              } break;
              case __WRITE_LOCAL__: {
                remove__25IK(__tmp__TFCL);
              } break;
              };
              val_false__SCCL=create__with__and__0BIO(Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM,Self__G2TK->expr__MMFI,val_false__SCCL);
              switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
              case __WRITE_GLOBAL__: {
                ((__WRITE_GLOBAL *)__tmp__ZFCL)->parent_write__QBGH.value__HBEH=val_false__SCCL;
              } break;
              case __WRITE_SLOT__: {
                ((__WRITE_SLOT *)__tmp__ZFCL)->parent_write__3BGH.value__HBEH=val_false__SCCL;
              } break;
              case __WRITE_LOCAL__: {
                ((__WRITE_LOCAL *)__tmp__ZFCL)->parent_write__X50I.value__HBEH=val_false__SCCL;
              } break;
              };
              result__NCCL=__tmp__ZFCL;
              switch_new_pass__IAMC=TRUE__;
            };
          };
          __tmp__XICL=TRUE__;
        } else {
          __tmp__XICL=FALSE__;
        };
        if (__tmp__XICL) {
          __tmp__XKCL=TRUE__;
        } else {
          switch (((struct ___OBJ *)val_false__SCCL)->__id) {
          case __LIST__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__2ICL=TRUE__;
          } break;
          case __EXTERNAL_C__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__2ICL=TRUE__;
          } break;
          case __INTEGER_CST__: {
            __tmp__2ICL=TRUE__;
          } break;
          case __READ_LOCAL__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __REAL_CST__: {
            __tmp__2ICL=TRUE__;
          } break;
          case __CHARACTER_CST__: {
            __tmp__2ICL=TRUE__;
          } break;
          case __IS_EXPANDED__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_SUB__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_MUL__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_DIV__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_AND__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __PUT_TO__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __CAST__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __READ_GLOBAL__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_NEG__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_ADD__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_NOT__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_MOD__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_INF__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_OR__: {
            __tmp__2ICL=FALSE__;
          } break;
          case __EXPR_XOR__: {
            __tmp__2ICL=FALSE__;
          } break;
          };
          c__VCCL=__tmp__2ICL;
          if (__tmp__2ICL) {
            switch (((struct ___OBJ *)val_false__SCCL)->__id) {
            case __LIST__: {
              __tmp__CJCL=static_type__GIQG(val_false__SCCL);
            } break;
            case __STRING_CST__: {
              __tmp__CJCL=((__STRING_CST *)val_false__SCCL)->parent_constant__5F.static_type__F4YD;
            } break;
            case __EXTERNAL_C__: {
              __tmp__CJCL=((__EXTERNAL_C *)val_false__SCCL)->static_type__UXZD;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__CJCL=((__PROTOTYPE_CST *)val_false__SCCL)->parent_constant__E3LC.static_type__F4YD;
            } break;
            case __INTEGER_CST__: {
              __tmp__CJCL=((__INTEGER_CST *)val_false__SCCL)->parent_constant__P3LC.static_type__F4YD;
            } break;
            case __READ_LOCAL__: {
              __tmp__CJCL=((__LOCAL *)((__READ_LOCAL *)val_false__SCCL)->local__ALZD)->parent_variable__B2LC.type__125F;
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__CJCL=static_type__0N1H(val_false__SCCL);
            } break;
            case __EXPR_EQUAL__: {
              __tmp__CJCL=static_type__TO1H();
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__CJCL=static_type__YO1H();
            } break;
            case __REAL_CST__: {
              __tmp__CJCL=((__REAL_CST *)val_false__SCCL)->parent_constant__M3JH.static_type__F4YD;
            } break;
            case __CHARACTER_CST__: {
              __tmp__CJCL=((__CHARACTER_CST *)val_false__SCCL)->parent_constant__53JH.static_type__F4YD;
            } break;
            case __IS_EXPANDED__: {
              __tmp__CJCL=static_type__3O1H();
            } break;
            case __GET_TYPE_ID__: {
              __tmp__CJCL=static_type__CP1H();
            } break;
            case __EXPR_SUP__: {
              __tmp__CJCL=static_type__HP1H();
            } break;
            case __EXPR_SUB__: {
              __tmp__CJCL=static_type__MP1H(val_false__SCCL);
            } break;
            case __EXPR_MUL__: {
              __tmp__CJCL=static_type__SP1H(val_false__SCCL);
            } break;
            case __EXPR_DIV__: {
              __tmp__CJCL=static_type__XP1H(val_false__SCCL);
            } break;
            case __EXPR_AND__: {
              __tmp__CJCL=static_type__2P1H(val_false__SCCL);
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__CJCL=static_type__BQ1H(val_false__SCCL);
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__CJCL=static_type__GQ1H(val_false__SCCL);
            } break;
            case __PUT_TO__: {
              __tmp__CJCL=TYPE_VOID__->parent_type__UIB.default__AKC;
            } break;
            case __ITEM__: {
              __tmp__CJCL=static_type__PQ1H(val_false__SCCL);
            } break;
            case __SIZE_OF__: {
              __tmp__CJCL=static_type__1Q1H();
            } break;
            case __CAST__: {
              __tmp__CJCL=((__CAST *)val_false__SCCL)->static_type__SO1H;
            } break;
            case __CALL_SLOT__: {
              __tmp__CJCL=static_type__GIKL(val_false__SCCL);
            } break;
            case __READ_SLOT__: {
              __tmp__CJCL=((__SLOT_DATA *)((__READ_SLOT *)val_false__SCCL)->slot__EVGK)->parent_variable__AJZD.type__125F;
            } break;
            case __READ_GLOBAL__: {
              __tmp__CJCL=((__SLOT_DATA *)((__READ_GLOBAL *)val_false__SCCL)->global__RHJK)->parent_variable__AJZD.type__125F;
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__CJCL=static_type__JRZM();
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__CJCL=static_type__VLEO();
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__CJCL=static_type__LVIO();
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__CJCL=static_type__0LEO();
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__CJCL=static_type__RVIO();
            } break;
            case __EXPR_NEG__: {
              __tmp__CJCL=static_type__Z2IM(val_false__SCCL);
            } break;
            case __EXPR_ADD__: {
              __tmp__CJCL=static_type__IXML(val_false__SCCL);
            } break;
            case __EXPR_NOT__: {
              __tmp__CJCL=static_type__BTXM(val_false__SCCL);
            } break;
            case __EXPR_MOD__: {
              __tmp__CJCL=static_type__5LEO(val_false__SCCL);
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__CJCL=static_type__W2DP();
            } break;
            case __EXPR_INF__: {
              __tmp__CJCL=static_type__FQQN();
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__CJCL=static_type__KQQN();
            } break;
            case __EXPR_OR__: {
              __tmp__CJCL=static_type__NOPN(val_false__SCCL);
            } break;
            case __EXPR_XOR__: {
              __tmp__CJCL=static_type__XCSO(val_false__SCCL);
            } break;
            };
            d__WCCL=((void *)((__TYPE_FULL *)__tmp__CJCL)->parent_type__KTL == (void *)type_false__NJB);
            __tmp__IJCL=d__WCCL;
          } else {
            __tmp__IJCL=FALSE__;
          };
          if (__tmp__IJCL) {
            if (__tmp__0GCL==NULL) {
              __tmp__QJCL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__0GCL)->__id) {
              case __LIST__: {
                __tmp__QJCL=NULL;
              } break;
              case __STRING_CST__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXTERNAL_C__: {
                __tmp__QJCL=NULL;
              } break;
              case __PROTOTYPE_CST__: {
                __tmp__QJCL=NULL;
              } break;
              case __INTEGER_CST__: {
                __tmp__QJCL=NULL;
              } break;
              case __READ_LOCAL__: {
                __tmp__QJCL=((void *)__tmp__0GCL);
              } break;
              case __EXPR_MULTIPLE__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_EQUAL__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_NOT_EQUAL__: {
                __tmp__QJCL=NULL;
              } break;
              case __REAL_CST__: {
                __tmp__QJCL=NULL;
              } break;
              case __CHARACTER_CST__: {
                __tmp__QJCL=NULL;
              } break;
              case __IS_EXPANDED__: {
                __tmp__QJCL=NULL;
              } break;
              case __GET_TYPE_ID__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_SUP__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_SUB__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_MUL__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_DIV__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_AND__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_SHIFT_R__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_SHIFT_L__: {
                __tmp__QJCL=NULL;
              } break;
              case __PUT_TO__: {
                __tmp__QJCL=NULL;
              } break;
              case __ITEM__: {
                __tmp__QJCL=NULL;
              } break;
              case __SIZE_OF__: {
                __tmp__QJCL=NULL;
              } break;
              case __CAST__: {
                __tmp__QJCL=NULL;
              } break;
              case __CALL_SLOT__: {
                __tmp__QJCL=NULL;
              } break;
              case __READ_SLOT__: {
                __tmp__QJCL=((void *)__tmp__0GCL);
              } break;
              case __READ_GLOBAL__: {
                __tmp__QJCL=((void *)__tmp__0GCL);
              } break;
              case __EXPR_NOT_LOGIC__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_OR_LOGIC__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_AND_LOGIC__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_NEG__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_ADD__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_NOT__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_MOD__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_SUP_EQ__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_INF__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_INF_EQ__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_OR__: {
                __tmp__QJCL=NULL;
              } break;
              case __EXPR_XOR__: {
                __tmp__QJCL=NULL;
              } break;
              }
            };
            rd__QCCL=__tmp__QJCL;
            if (((void *)__tmp__QJCL != (void *)NULL)) {
              switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
              case __WRITE_GLOBAL__: {
                remove__S5IK(__tmp__ZFCL);
              } break;
              case __WRITE_SLOT__: {
                remove__W5IK(__tmp__ZFCL);
              } break;
              case __WRITE_LOCAL__: {
                remove__25IK(__tmp__ZFCL);
              } break;
              };
              val_true__RCCL=create__with__and__B3DO(Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM,Self__G2TK->expr__MMFI,__tmp__0GCL);
              switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
              case __WRITE_GLOBAL__: {
                ((__WRITE_GLOBAL *)__tmp__TFCL)->parent_write__QBGH.value__HBEH=val_true__RCCL;
              } break;
              case __WRITE_SLOT__: {
                ((__WRITE_SLOT *)__tmp__TFCL)->parent_write__3BGH.value__HBEH=val_true__RCCL;
              } break;
              case __WRITE_LOCAL__: {
                ((__WRITE_LOCAL *)__tmp__TFCL)->parent_write__X50I.value__HBEH=val_true__RCCL;
              } break;
              };
              result__NCCL=__tmp__TFCL;
              modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
              __tmp__1JCL=TRUE__;
            } else {
              __tmp__1JCL=FALSE__;
            };
            if ((! __tmp__1JCL)) {
              if (((count_no_recursive__GBCL ==  0) || (modify_count__F4LC ==  0))) {
                switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
                case __WRITE_GLOBAL__: {
                  remove__S5IK(__tmp__ZFCL);
                } break;
                case __WRITE_SLOT__: {
                  remove__W5IK(__tmp__ZFCL);
                } break;
                case __WRITE_LOCAL__: {
                  remove__25IK(__tmp__ZFCL);
                } break;
                };
                val_true__RCCL=create__with__and__MCIO(Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM,Self__G2TK->expr__MMFI,val_true__RCCL);
                switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
                case __WRITE_GLOBAL__: {
                  ((__WRITE_GLOBAL *)__tmp__TFCL)->parent_write__QBGH.value__HBEH=val_true__RCCL;
                } break;
                case __WRITE_SLOT__: {
                  ((__WRITE_SLOT *)__tmp__TFCL)->parent_write__3BGH.value__HBEH=val_true__RCCL;
                } break;
                case __WRITE_LOCAL__: {
                  ((__WRITE_LOCAL *)__tmp__TFCL)->parent_write__X50I.value__HBEH=val_true__RCCL;
                } break;
                };
                result__NCCL=__tmp__TFCL;
                switch_new_pass__IAMC=TRUE__;
              };
            };
          };
          __tmp__XKCL=__tmp__IJCL;
        };
        if ((! __tmp__XKCL)) {
          if ((((__tmp__2GCL && (! b__UCCL)) & c__VCCL) && (! d__WCCL))) {
            switch (((struct ___OBJ *)__tmp__ZFCL)->__id) {
            case __WRITE_GLOBAL__: {
              remove__S5IK(__tmp__ZFCL);
            } break;
            case __WRITE_SLOT__: {
              remove__W5IK(__tmp__ZFCL);
            } break;
            case __WRITE_LOCAL__: {
              remove__25IK(__tmp__ZFCL);
            } break;
            };
            __tmp__3LCL=create__with__BQNM(Self__G2TK->parent_instr__HAMC.parent_itm_object__TE.position__BJM,Self__G2TK->expr__MMFI);
            switch (((struct ___OBJ *)__tmp__TFCL)->__id) {
            case __WRITE_GLOBAL__: {
              ((__WRITE_GLOBAL *)__tmp__TFCL)->parent_write__QBGH.value__HBEH=__tmp__3LCL;
            } break;
            case __WRITE_SLOT__: {
              ((__WRITE_SLOT *)__tmp__TFCL)->parent_write__3BGH.value__HBEH=__tmp__3LCL;
            } break;
            case __WRITE_LOCAL__: {
              ((__WRITE_LOCAL *)__tmp__TFCL)->parent_write__X50I.value__HBEH=__tmp__3LCL;
            } break;
            };
            result__NCCL=__tmp__TFCL;
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
          };
        };
      };
    };
    result__J2TK=result__NCCL;
    if (((void *)result__NCCL == (void *)NULL)) {
      result__J2TK=Self__G2TK;
    };
  };
  return(result__J2TK);
}

static void* execute_unlink__PBMK(__EXPR_MULTIPLE *Self__QBMK)
// ({EXPR_MULTIPLE}) With resultNo recursive, No inlinable.
{
  __INTEGER __tmp__XBMK,Self__0EPK;
  void *__tmp__4BMK;
  __READ_LOCAL *Self__TBFQ,*Self__VBFQ;
  __READ_GLOBAL *Self__WBFQ;
  __tmp__XBMK=((__FAST_ARRAYoEXPRo *)Self__QBMK->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH;
  Self__0EPK= 0;
  while ((Self__0EPK <= __tmp__XBMK)) {
    __tmp__4BMK=((void **)((__FAST_ARRAYoEXPRo *)Self__QBMK->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__0EPK];
    switch (((struct ___OBJ *)__tmp__4BMK)->__id) {
    case __LIST__: {
      remove__KPJJ(__tmp__4BMK);
    } break;
    case __STRING_CST__: {
    } break;
    case __EXTERNAL_C__: {
      remove__UUAK(__tmp__4BMK);
    } break;
    case __PROTOTYPE_CST__: {
    } break;
    case __INTEGER_CST__: {
    } break;
    case __READ_LOCAL__: {
      Self__TBFQ=((__READ_LOCAL *)__tmp__4BMK);
      unread__YVJK(Self__TBFQ->local__ALZD,Self__TBFQ);
    } break;
    case __EXPR_MULTIPLE__: {
      remove__TVAK(__tmp__4BMK);
    } break;
    case __EXPR_EQUAL__: {
      remove__DWAK(__tmp__4BMK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      remove__HWAK(__tmp__4BMK);
    } break;
    case __REAL_CST__: {
    } break;
    case __CHARACTER_CST__: {
    } break;
    case __IS_EXPANDED__: {
      Self__VBFQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__4BMK)->receiver__OO2H);
      unread__YVJK(Self__VBFQ->local__ALZD,Self__VBFQ);
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(__tmp__4BMK);
    } break;
    case __EXPR_SUP__: {
      remove__VWAK(__tmp__4BMK);
    } break;
    case __EXPR_SUB__: {
      remove__ZWAK(__tmp__4BMK);
    } break;
    case __EXPR_MUL__: {
      remove__3WAK(__tmp__4BMK);
    } break;
    case __EXPR_DIV__: {
      remove__BXAK(__tmp__4BMK);
    } break;
    case __EXPR_AND__: {
      remove__FXAK(__tmp__4BMK);
    } break;
    case __EXPR_SHIFT_R__: {
      remove__JXAK(__tmp__4BMK);
    } break;
    case __EXPR_SHIFT_L__: {
      remove__NXAK(__tmp__4BMK);
    } break;
    case __PUT_TO__: {
      remove__RXAK(__tmp__4BMK);
    } break;
    case __ITEM__: {
      remove__SYAK(__tmp__4BMK);
    } break;
    case __SIZE_OF__: {
      remove__WYAK(__tmp__4BMK);
    } break;
    case __CAST__: {
      remove__ZYAK(__tmp__4BMK);
    } break;
    case __CALL_SLOT__: {
      remove__2NML(__tmp__4BMK);
    } break;
    case __READ_SLOT__: {
      remove__4GHK(__tmp__4BMK);
    } break;
    case __READ_GLOBAL__: {
      Self__WBFQ=((__READ_GLOBAL *)__tmp__4BMK);
      unread__15ML(Self__WBFQ->global__RHJK,Self__WBFQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      remove__GWZM(__tmp__4BMK);
    } break;
    case __EXPR_OR_LOGIC__: {
      remove__WPEO(__tmp__4BMK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      remove__WMKO(__tmp__4BMK);
    } break;
    case __EXPR_AND_LOGIC__: {
      remove__0PEO(__tmp__4BMK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      remove__1MKO(__tmp__4BMK);
    } break;
    case __EXPR_NEG__: {
      remove__3KJM(__tmp__4BMK);
    } break;
    case __EXPR_ADD__: {
      remove__QQML(__tmp__4BMK);
    } break;
    case __EXPR_NOT__: {
      remove__D5YM(__tmp__4BMK);
    } break;
    case __EXPR_MOD__: {
      remove__4PEO(__tmp__4BMK);
    } break;
    case __EXPR_SUP_EQ__: {
      remove__X5DP(__tmp__4BMK);
    } break;
    case __EXPR_INF__: {
      remove__KZQN(__tmp__4BMK);
    } break;
    case __EXPR_INF_EQ__: {
      remove__OZQN(__tmp__4BMK);
    } break;
    case __EXPR_OR__: {
      remove__LUPN(__tmp__4BMK);
    } break;
    case __EXPR_XOR__: {
      remove__AQTO(__tmp__4BMK);
    } break;
    };
    Self__0EPK=(__INTEGER)(Self__0EPK +  1);
  };
  return(NULL);
}

static void* execute__GFGK(__WRITE_GLOBAL *Self__HFGK)
// ({WRITE_GLOBAL}) With resultNo recursive, No inlinable.
{
  void *result__JFGK,*__tmp__KIGK;
  void *read__KFGK,*__tmp__ZGGK;
  void *__tmp__2FGK,*__tmp__5GGK,*__tmp__AHGK;
  void *__tmp__3FGK,*slot__MFGK;
  void *__tmp__YGGK,*__tmp__JIGK,*__tmp__QIGK,*__tmp__RIGK;
  __READ_LOCAL *Self__41JQ,*Self__3PWQ;
  __READ_GLOBAL *Self__C2JQ;
  __SLOT_DATA *Self__UCCQ;
  __BOOLEAN __tmp__ZHGK,__tmp__VHGK;
  result__JFGK=NULL;
  read__KFGK=NULL;
  __tmp__2FGK=Self__HFGK->global__4U1H;
  if (__tmp__2FGK==NULL) {
    __tmp__3FGK=NULL;
  } else {
    __tmp__3FGK=((void *)__tmp__2FGK);
  };
  slot__MFGK=__tmp__3FGK;
  if (((((__SLOT_DATA *)Self__HFGK->global__4U1H)->parent_variable__AJZD.ensure_count__QEAG ==  0) && (((void *)__tmp__3FGK == (void *)NULL) || ((void *)((__SECTION_ *)id_section__UG4F(__tmp__3FGK))->name__1I0D != (void *)(&__string_28))))) {
    __tmp__ZHGK=TRUE__;
  } else {
    __tmp__YGGK=Self__HFGK->parent_write__QBGH.value__HBEH;
    if (__tmp__YGGK==NULL) {
      __tmp__ZGGK=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__YGGK)->__id) {
      case __LIST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__ZGGK=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__ZGGK=((void *)__tmp__YGGK);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ZGGK=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__ZGGK=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ZGGK=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__ZGGK=NULL;
      } break;
      case __ITEM__: {
        __tmp__ZGGK=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__ZGGK=NULL;
      } break;
      case __CAST__: {
        __tmp__ZGGK=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__ZGGK=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__ZGGK=((void *)__tmp__YGGK);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ZGGK=((void *)__tmp__YGGK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__ZGGK=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__ZGGK=NULL;
      } break;
      }
    };
    read__KFGK=__tmp__ZGGK;
    if (((void *)__tmp__ZGGK != (void *)NULL)) {
      __tmp__5GGK=Self__HFGK->global__4U1H;
      switch (((struct ___OBJ *)__tmp__ZGGK)->__id) {
      case __READ_LOCAL__: {
        __tmp__AHGK=((__READ_LOCAL *)__tmp__ZGGK)->local__ALZD;
      } break;
      case __READ_SLOT__: {
        __tmp__AHGK=((__READ_SLOT *)__tmp__ZGGK)->slot__EVGK;
      } break;
      case __READ_GLOBAL__: {
        __tmp__AHGK=((__READ_GLOBAL *)__tmp__ZGGK)->global__RHJK;
      } break;
      };
      __tmp__VHGK=((void *)__tmp__5GGK == (void *)__tmp__AHGK);
    } else {
      __tmp__VHGK=FALSE__;
    };
    __tmp__ZHGK=(__tmp__VHGK && (((__SLOT_DATA *)Self__HFGK->global__4U1H)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-'));
  };
  if (__tmp__ZHGK) {
    if (((void *)((__SLOT_DATA *)Self__HFGK->global__4U1H)->value__M4OG != (void *)NULL)) {
      execute__UPHL(Self__HFGK->global__4U1H);
    };
    unwrite__CDNL(Self__HFGK->global__4U1H,Self__HFGK);
    __tmp__JIGK=Self__HFGK->parent_write__QBGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__JIGK)->__id) {
    case __LIST__: {
      __tmp__KIGK=execute_unlink__0SRJ(__tmp__JIGK);
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__KIGK=execute_unlink__42LK(__tmp__JIGK);
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __READ_LOCAL__: {
      Self__41JQ=((__READ_LOCAL *)__tmp__JIGK);
      unread__YVJK(Self__41JQ->local__ALZD,Self__41JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__KIGK=execute_unlink__PBMK(__tmp__JIGK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__KIGK=execute_unlink__WGMK(__tmp__JIGK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__KIGK=execute_unlink__HHMK(__tmp__JIGK);
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__3PWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__JIGK)->receiver__OO2H);
      unread__YVJK(Self__3PWQ->local__ALZD,Self__3PWQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__JIGK));
      __tmp__KIGK=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__KIGK=execute_unlink__IIMK(__tmp__JIGK);
    } break;
    case __EXPR_SUB__: {
      __tmp__KIGK=execute_unlink__ZIMK(__tmp__JIGK);
    } break;
    case __EXPR_MUL__: {
      __tmp__KIGK=execute_unlink__KJMK(__tmp__JIGK);
    } break;
    case __EXPR_DIV__: {
      __tmp__KIGK=execute_unlink__1JMK(__tmp__JIGK);
    } break;
    case __EXPR_AND__: {
      __tmp__KIGK=execute_unlink__MKMK(__tmp__JIGK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__KIGK=execute_unlink__3KMK(__tmp__JIGK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__KIGK=execute_unlink__OLMK(__tmp__JIGK);
    } break;
    case __PUT_TO__: {
      __tmp__KIGK=execute_link__BOPK(((__PUT_TO *)__tmp__JIGK));
    } break;
    case __ITEM__: {
      __tmp__KIGK=execute_unlink__CMMK(__tmp__JIGK);
    } break;
    case __SIZE_OF__: {
      __tmp__KIGK=execute_unlink__SMMK(__tmp__JIGK);
    } break;
    case __CAST__: {
      __tmp__KIGK=execute_unlink__XMMK(__tmp__JIGK);
    } break;
    case __CALL_SLOT__: {
      __tmp__KIGK=execute_unlink__2NQL(__tmp__JIGK);
    } break;
    case __READ_SLOT__: {
      __tmp__KIGK=execute_unlink__WDAL(__tmp__JIGK);
    } break;
    case __READ_GLOBAL__: {
      Self__C2JQ=((__READ_GLOBAL *)__tmp__JIGK);
      unread__15ML(Self__C2JQ->global__RHJK,Self__C2JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__KIGK=execute_access_unlink__VMDL(Self__C2JQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__KIGK=execute_unlink__CRZM(__tmp__JIGK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__KIGK=execute_unlink__B2EO(__tmp__JIGK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__KIGK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__JIGK));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__KIGK=execute_unlink__R2EO(__tmp__JIGK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__KIGK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__JIGK));
    } break;
    case __EXPR_NEG__: {
      __tmp__KIGK=execute_unlink__XYJM(__tmp__JIGK);
    } break;
    case __EXPR_ADD__: {
      __tmp__KIGK=execute_unlink__3NNL(__tmp__JIGK);
    } break;
    case __EXPR_NOT__: {
      __tmp__KIGK=execute_unlink__YLZM(__tmp__JIGK);
    } break;
    case __EXPR_MOD__: {
      __tmp__KIGK=execute_unlink__B3EO(__tmp__JIGK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__KIGK=execute_unlink__AJEP(__tmp__JIGK);
    } break;
    case __EXPR_INF__: {
      __tmp__KIGK=execute_unlink__CPQN(__tmp__JIGK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__KIGK=execute_unlink__SPQN(__tmp__JIGK);
    } break;
    case __EXPR_OR__: {
      __tmp__KIGK=execute_unlink__JDQN(__tmp__JIGK);
    } break;
    case __EXPR_XOR__: {
      __tmp__KIGK=execute_unlink__YNUO(__tmp__JIGK);
    } break;
    };
    result__JFGK=__tmp__KIGK;
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  } else {
    if (((void *)((__SLOT_DATA *)Self__HFGK->global__4U1H)->value__M4OG != (void *)NULL)) {
      execute__UPHL(Self__HFGK->global__4U1H);
    };
    __tmp__QIGK=Self__HFGK->parent_write__QBGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__QIGK)->__id) {
    case __LIST__: {
      __tmp__RIGK=execute_link__LUOG(__tmp__QIGK);
    } break;
    case __STRING_CST__: {
      __tmp__RIGK=((__STRING_CST *)__tmp__QIGK);
    } break;
    case __EXTERNAL_C__: {
      __tmp__RIGK=execute_link__U5ZK(__tmp__QIGK);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RIGK=((__PROTOTYPE_CST *)__tmp__QIGK);
    } break;
    case __INTEGER_CST__: {
      __tmp__RIGK=((__INTEGER_CST *)__tmp__QIGK);
    } break;
    case __READ_LOCAL__: {
      __tmp__RIGK=execute_link__EHAL(__tmp__QIGK);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RIGK=execute_link__YLAL();
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RIGK=execute_link__2LAL(__tmp__QIGK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RIGK=execute_link__FQAL(__tmp__QIGK);
    } break;
    case __REAL_CST__: {
      __tmp__RIGK=((__REAL_CST *)__tmp__QIGK);
    } break;
    case __CHARACTER_CST__: {
      __tmp__RIGK=((__CHARACTER_CST *)__tmp__QIGK);
    } break;
    case __IS_EXPANDED__: {
      __tmp__RIGK=execute_link__UUAL(__tmp__QIGK);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RIGK=execute_link__1VAL(__tmp__QIGK);
    } break;
    case __EXPR_SUP__: {
      __tmp__RIGK=execute_link__AWAL(__tmp__QIGK);
    } break;
    case __EXPR_SUB__: {
      __tmp__RIGK=execute_link__J0AL(__tmp__QIGK);
    } break;
    case __EXPR_MUL__: {
      __tmp__RIGK=execute_link__S4AL(__tmp__QIGK);
    } break;
    case __EXPR_DIV__: {
      __tmp__RIGK=execute_link__1CBL(__tmp__QIGK);
    } break;
    case __EXPR_AND__: {
      __tmp__RIGK=execute_link__EHBL(__tmp__QIGK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RIGK=execute_link__NLBL(__tmp__QIGK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RIGK=execute_link__WPBL(__tmp__QIGK);
    } break;
    case __PUT_TO__: {
      __tmp__RIGK=execute_link__BOPK(__tmp__QIGK);
    } break;
    case __ITEM__: {
      __tmp__RIGK=execute_link__5TBL(__tmp__QIGK);
    } break;
    case __SIZE_OF__: {
      __tmp__RIGK=execute_link__GUBL(__tmp__QIGK);
    } break;
    case __CAST__: {
      __tmp__RIGK=execute_link__LUBL(__tmp__QIGK);
    } break;
    case __CALL_SLOT__: {
      __tmp__RIGK=execute_link__A2TL(__tmp__QIGK);
    } break;
    case __READ_SLOT__: {
      __tmp__RIGK=execute_link__EYBL(__tmp__QIGK);
    } break;
    case __READ_GLOBAL__: {
      __tmp__RIGK=execute_link__U2BL(__tmp__QIGK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RIGK=execute_link__SRZM(__tmp__QIGK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RIGK=execute_link__OBFO(__tmp__QIGK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RIGK=execute_link__GJLO(__tmp__QIGK);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RIGK=execute_link__HHFO(__tmp__QIGK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RIGK=execute_link__KPLO(__tmp__QIGK);
    } break;
    case __EXPR_NEG__: {
      __tmp__RIGK=execute_link__0GKM(__tmp__QIGK);
    } break;
    case __EXPR_ADD__: {
      __tmp__RIGK=execute_link__RROL(__tmp__QIGK);
    } break;
    case __EXPR_NOT__: {
      __tmp__RIGK=execute_link__GUZM(__tmp__QIGK);
    } break;
    case __EXPR_MOD__: {
      __tmp__RIGK=execute_link__ANFO(__tmp__QIGK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RIGK=execute_link__YLEP(__tmp__QIGK);
    } break;
    case __EXPR_INF__: {
      __tmp__RIGK=execute_link__VQQN(__tmp__QIGK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RIGK=execute_link__4UQN(__tmp__QIGK);
    } break;
    case __EXPR_OR__: {
      __tmp__RIGK=execute_link__1HQN(__tmp__QIGK);
    } break;
    case __EXPR_XOR__: {
      __tmp__RIGK=execute_link__IYUO(__tmp__QIGK);
    } break;
    };
    Self__HFGK->parent_write__QBGH.value__HBEH=__tmp__RIGK;
    seq_index__SIGK=(__UINTEGER_32)(seq_index__SIGK +  1);
    Self__UCCQ=((__SLOT_DATA *)Self__HFGK->global__4U1H);
    Self__UCCQ->last_write__Y5IL=Self__HFGK;
    Self__UCCQ->last_seq_index__55IL=seq_index__SIGK;
    Self__UCCQ->last_seq_or_and__TDQL=seq_or_and__AYRG;
    Self__UCCQ->last_seq_call_and_loop__ZWPL=seq_call_and_loop__VREJ;
    Self__UCCQ->last_seq_call_local_and_loop__S0PL=seq_call_local_and_loop__51IL;
    Self__UCCQ->last_list_current__UAJL=list_current__IF1;
    Self__UCCQ->last_index__UOPL=((__LIST *)list_current__IF1)->index__PXRG;
    result__JFGK=Self__HFGK;
  };
  return(result__JFGK);
}

static void* execute__ZIGK(__WRITE_SLOT *Self__0IGK)
// ({WRITE_SLOT}) With resultNo recursive, No inlinable.
{
  void *result__2IGK,*__tmp__V3TL,*__tmp__3LGK;
  void *read__3IGK,*__tmp__MKGK;
  void *__tmp__PJGK,*__tmp__SKGK,*__tmp__TKGK;
  void *__tmp__QJGK,*slot__5IGK;
  void *__tmp__LKGK,*__tmp__U3TL,*__tmp__2LGK,*__tmp__E5TL,*__tmp__F5TL;
  void *__tmp__DMGK,*__tmp__EMGK;
  __READ_LOCAL *Self__I2JQ,*Self__NQWQ,*Self__S2JQ,*Self__PQWQ;
  __READ_GLOBAL *Self__M2JQ,*Self__W2JQ;
  __LIST *Self__TLZQ;
  __SLOT_DATA *Self__42TL;
  __BOOLEAN __tmp__MLGK,__tmp__ILGK;
  result__2IGK=NULL;
  read__3IGK=NULL;
  __tmp__PJGK=Self__0IGK->slot__5T1H;
  if (__tmp__PJGK==NULL) {
    __tmp__QJGK=NULL;
  } else {
    __tmp__QJGK=((void *)__tmp__PJGK);
  };
  slot__5IGK=__tmp__QJGK;
  if (((((__SLOT_DATA *)Self__0IGK->slot__5T1H)->parent_variable__AJZD.ensure_count__QEAG ==  0) && (((void *)__tmp__QJGK == (void *)NULL) || ((void *)((__SECTION_ *)id_section__UG4F(__tmp__QJGK))->name__1I0D != (void *)(&__string_28))))) {
    __tmp__MLGK=TRUE__;
  } else {
    __tmp__LKGK=Self__0IGK->parent_write__3BGH.value__HBEH;
    if (__tmp__LKGK==NULL) {
      __tmp__MKGK=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__LKGK)->__id) {
      case __LIST__: {
        __tmp__MKGK=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__MKGK=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__MKGK=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__MKGK=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__MKGK=((void *)__tmp__LKGK);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__MKGK=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__MKGK=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__MKGK=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__MKGK=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__MKGK=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__MKGK=NULL;
      } break;
      case __ITEM__: {
        __tmp__MKGK=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__MKGK=NULL;
      } break;
      case __CAST__: {
        __tmp__MKGK=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__MKGK=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__MKGK=((void *)__tmp__LKGK);
      } break;
      case __READ_GLOBAL__: {
        __tmp__MKGK=((void *)__tmp__LKGK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__MKGK=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__MKGK=NULL;
      } break;
      }
    };
    read__3IGK=__tmp__MKGK;
    if (((void *)__tmp__MKGK != (void *)NULL)) {
      __tmp__SKGK=Self__0IGK->slot__5T1H;
      switch (((struct ___OBJ *)__tmp__MKGK)->__id) {
      case __READ_LOCAL__: {
        __tmp__TKGK=((__READ_LOCAL *)__tmp__MKGK)->local__ALZD;
      } break;
      case __READ_SLOT__: {
        __tmp__TKGK=((__READ_SLOT *)__tmp__MKGK)->slot__EVGK;
      } break;
      case __READ_GLOBAL__: {
        __tmp__TKGK=((__READ_GLOBAL *)__tmp__MKGK)->global__RHJK;
      } break;
      };
      __tmp__ILGK=((void *)__tmp__SKGK == (void *)__tmp__TKGK);
    } else {
      __tmp__ILGK=FALSE__;
    };
    __tmp__MLGK=(__tmp__ILGK && (((__SLOT_DATA *)Self__0IGK->slot__5T1H)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-'));
  };
  if (__tmp__MLGK) {
    if (((void *)((__SLOT_DATA *)Self__0IGK->slot__5T1H)->value__M4OG != (void *)NULL)) {
      execute__UPHL(Self__0IGK->slot__5T1H);
    };
    __tmp__U3TL=Self__0IGK->receiver__HU1H;
    switch (((struct ___OBJ *)__tmp__U3TL)->__id) {
    case __LIST__: {
      __tmp__V3TL=execute_unlink__0SRJ(__tmp__U3TL);
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__V3TL=execute_unlink__42LK(__tmp__U3TL);
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __READ_LOCAL__: {
      Self__I2JQ=((__READ_LOCAL *)__tmp__U3TL);
      unread__YVJK(Self__I2JQ->local__ALZD,Self__I2JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__V3TL=execute_unlink__PBMK(__tmp__U3TL);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__V3TL=execute_unlink__WGMK(__tmp__U3TL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__V3TL=execute_unlink__HHMK(__tmp__U3TL);
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__NQWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__U3TL)->receiver__OO2H);
      unread__YVJK(Self__NQWQ->local__ALZD,Self__NQWQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__U3TL));
      __tmp__V3TL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__V3TL=execute_unlink__IIMK(__tmp__U3TL);
    } break;
    case __EXPR_SUB__: {
      __tmp__V3TL=execute_unlink__ZIMK(__tmp__U3TL);
    } break;
    case __EXPR_MUL__: {
      __tmp__V3TL=execute_unlink__KJMK(__tmp__U3TL);
    } break;
    case __EXPR_DIV__: {
      __tmp__V3TL=execute_unlink__1JMK(__tmp__U3TL);
    } break;
    case __EXPR_AND__: {
      __tmp__V3TL=execute_unlink__MKMK(__tmp__U3TL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__V3TL=execute_unlink__3KMK(__tmp__U3TL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__V3TL=execute_unlink__OLMK(__tmp__U3TL);
    } break;
    case __PUT_TO__: {
      __tmp__V3TL=execute_link__BOPK(((__PUT_TO *)__tmp__U3TL));
    } break;
    case __ITEM__: {
      __tmp__V3TL=execute_unlink__CMMK(__tmp__U3TL);
    } break;
    case __SIZE_OF__: {
      __tmp__V3TL=execute_unlink__SMMK(__tmp__U3TL);
    } break;
    case __CAST__: {
      __tmp__V3TL=execute_unlink__XMMK(__tmp__U3TL);
    } break;
    case __CALL_SLOT__: {
      __tmp__V3TL=execute_unlink__2NQL(__tmp__U3TL);
    } break;
    case __READ_SLOT__: {
      __tmp__V3TL=execute_unlink__WDAL(__tmp__U3TL);
    } break;
    case __READ_GLOBAL__: {
      Self__M2JQ=((__READ_GLOBAL *)__tmp__U3TL);
      unread__15ML(Self__M2JQ->global__RHJK,Self__M2JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__V3TL=execute_access_unlink__VMDL(Self__M2JQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__V3TL=execute_unlink__CRZM(__tmp__U3TL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__V3TL=execute_unlink__B2EO(__tmp__U3TL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__V3TL=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__U3TL));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__V3TL=execute_unlink__R2EO(__tmp__U3TL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__V3TL=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__U3TL));
    } break;
    case __EXPR_NEG__: {
      __tmp__V3TL=execute_unlink__XYJM(__tmp__U3TL);
    } break;
    case __EXPR_ADD__: {
      __tmp__V3TL=execute_unlink__3NNL(__tmp__U3TL);
    } break;
    case __EXPR_NOT__: {
      __tmp__V3TL=execute_unlink__YLZM(__tmp__U3TL);
    } break;
    case __EXPR_MOD__: {
      __tmp__V3TL=execute_unlink__B3EO(__tmp__U3TL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__V3TL=execute_unlink__AJEP(__tmp__U3TL);
    } break;
    case __EXPR_INF__: {
      __tmp__V3TL=execute_unlink__CPQN(__tmp__U3TL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__V3TL=execute_unlink__SPQN(__tmp__U3TL);
    } break;
    case __EXPR_OR__: {
      __tmp__V3TL=execute_unlink__JDQN(__tmp__U3TL);
    } break;
    case __EXPR_XOR__: {
      __tmp__V3TL=execute_unlink__YNUO(__tmp__U3TL);
    } break;
    };
    if (((void *)__tmp__V3TL != (void *)NULL)) {
      Self__TLZQ=((__LIST *)list_current__IF1);
      add__to__1H5G(Self__TLZQ->expr_list__JUOG,__tmp__V3TL,(__INTEGER)(Self__TLZQ->index__PXRG -  1));
      Self__TLZQ->index__PXRG=(__INTEGER)(Self__TLZQ->index__PXRG +  1);
    };
    unwrite__CDNL(Self__0IGK->slot__5T1H,Self__0IGK);
    __tmp__2LGK=Self__0IGK->parent_write__3BGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__2LGK)->__id) {
    case __LIST__: {
      __tmp__3LGK=execute_unlink__0SRJ(__tmp__2LGK);
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__3LGK=execute_unlink__42LK(__tmp__2LGK);
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __READ_LOCAL__: {
      Self__S2JQ=((__READ_LOCAL *)__tmp__2LGK);
      unread__YVJK(Self__S2JQ->local__ALZD,Self__S2JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3LGK=execute_unlink__PBMK(__tmp__2LGK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3LGK=execute_unlink__WGMK(__tmp__2LGK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3LGK=execute_unlink__HHMK(__tmp__2LGK);
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__PQWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2LGK)->receiver__OO2H);
      unread__YVJK(Self__PQWQ->local__ALZD,Self__PQWQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__2LGK));
      __tmp__3LGK=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__3LGK=execute_unlink__IIMK(__tmp__2LGK);
    } break;
    case __EXPR_SUB__: {
      __tmp__3LGK=execute_unlink__ZIMK(__tmp__2LGK);
    } break;
    case __EXPR_MUL__: {
      __tmp__3LGK=execute_unlink__KJMK(__tmp__2LGK);
    } break;
    case __EXPR_DIV__: {
      __tmp__3LGK=execute_unlink__1JMK(__tmp__2LGK);
    } break;
    case __EXPR_AND__: {
      __tmp__3LGK=execute_unlink__MKMK(__tmp__2LGK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3LGK=execute_unlink__3KMK(__tmp__2LGK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3LGK=execute_unlink__OLMK(__tmp__2LGK);
    } break;
    case __PUT_TO__: {
      __tmp__3LGK=execute_link__BOPK(((__PUT_TO *)__tmp__2LGK));
    } break;
    case __ITEM__: {
      __tmp__3LGK=execute_unlink__CMMK(__tmp__2LGK);
    } break;
    case __SIZE_OF__: {
      __tmp__3LGK=execute_unlink__SMMK(__tmp__2LGK);
    } break;
    case __CAST__: {
      __tmp__3LGK=execute_unlink__XMMK(__tmp__2LGK);
    } break;
    case __CALL_SLOT__: {
      __tmp__3LGK=execute_unlink__2NQL(__tmp__2LGK);
    } break;
    case __READ_SLOT__: {
      __tmp__3LGK=execute_unlink__WDAL(__tmp__2LGK);
    } break;
    case __READ_GLOBAL__: {
      Self__W2JQ=((__READ_GLOBAL *)__tmp__2LGK);
      unread__15ML(Self__W2JQ->global__RHJK,Self__W2JQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__3LGK=execute_access_unlink__VMDL(Self__W2JQ);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3LGK=execute_unlink__CRZM(__tmp__2LGK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3LGK=execute_unlink__B2EO(__tmp__2LGK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3LGK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__2LGK));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3LGK=execute_unlink__R2EO(__tmp__2LGK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3LGK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__2LGK));
    } break;
    case __EXPR_NEG__: {
      __tmp__3LGK=execute_unlink__XYJM(__tmp__2LGK);
    } break;
    case __EXPR_ADD__: {
      __tmp__3LGK=execute_unlink__3NNL(__tmp__2LGK);
    } break;
    case __EXPR_NOT__: {
      __tmp__3LGK=execute_unlink__YLZM(__tmp__2LGK);
    } break;
    case __EXPR_MOD__: {
      __tmp__3LGK=execute_unlink__B3EO(__tmp__2LGK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3LGK=execute_unlink__AJEP(__tmp__2LGK);
    } break;
    case __EXPR_INF__: {
      __tmp__3LGK=execute_unlink__CPQN(__tmp__2LGK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3LGK=execute_unlink__SPQN(__tmp__2LGK);
    } break;
    case __EXPR_OR__: {
      __tmp__3LGK=execute_unlink__JDQN(__tmp__2LGK);
    } break;
    case __EXPR_XOR__: {
      __tmp__3LGK=execute_unlink__YNUO(__tmp__2LGK);
    } break;
    };
    result__2IGK=__tmp__3LGK;
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  } else {
    if (((void *)((__SLOT_DATA *)Self__0IGK->slot__5T1H)->value__M4OG != (void *)NULL)) {
      execute__UPHL(Self__0IGK->slot__5T1H);
    };
    __tmp__E5TL=Self__0IGK->receiver__HU1H;
    switch (((struct ___OBJ *)__tmp__E5TL)->__id) {
    case __LIST__: {
      __tmp__F5TL=execute_link__LUOG(__tmp__E5TL);
    } break;
    case __STRING_CST__: {
      __tmp__F5TL=((__STRING_CST *)__tmp__E5TL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__F5TL=execute_link__U5ZK(__tmp__E5TL);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__F5TL=((__PROTOTYPE_CST *)__tmp__E5TL);
    } break;
    case __INTEGER_CST__: {
      __tmp__F5TL=((__INTEGER_CST *)__tmp__E5TL);
    } break;
    case __READ_LOCAL__: {
      __tmp__F5TL=execute_link__EHAL(__tmp__E5TL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__F5TL=execute_link__YLAL();
    } break;
    case __EXPR_EQUAL__: {
      __tmp__F5TL=execute_link__2LAL(__tmp__E5TL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__F5TL=execute_link__FQAL(__tmp__E5TL);
    } break;
    case __REAL_CST__: {
      __tmp__F5TL=((__REAL_CST *)__tmp__E5TL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__F5TL=((__CHARACTER_CST *)__tmp__E5TL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__F5TL=execute_link__UUAL(__tmp__E5TL);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__F5TL=execute_link__1VAL(__tmp__E5TL);
    } break;
    case __EXPR_SUP__: {
      __tmp__F5TL=execute_link__AWAL(__tmp__E5TL);
    } break;
    case __EXPR_SUB__: {
      __tmp__F5TL=execute_link__J0AL(__tmp__E5TL);
    } break;
    case __EXPR_MUL__: {
      __tmp__F5TL=execute_link__S4AL(__tmp__E5TL);
    } break;
    case __EXPR_DIV__: {
      __tmp__F5TL=execute_link__1CBL(__tmp__E5TL);
    } break;
    case __EXPR_AND__: {
      __tmp__F5TL=execute_link__EHBL(__tmp__E5TL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__F5TL=execute_link__NLBL(__tmp__E5TL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__F5TL=execute_link__WPBL(__tmp__E5TL);
    } break;
    case __PUT_TO__: {
      __tmp__F5TL=execute_link__BOPK(__tmp__E5TL);
    } break;
    case __ITEM__: {
      __tmp__F5TL=execute_link__5TBL(__tmp__E5TL);
    } break;
    case __SIZE_OF__: {
      __tmp__F5TL=execute_link__GUBL(__tmp__E5TL);
    } break;
    case __CAST__: {
      __tmp__F5TL=execute_link__LUBL(__tmp__E5TL);
    } break;
    case __CALL_SLOT__: {
      __tmp__F5TL=execute_link__A2TL(__tmp__E5TL);
    } break;
    case __READ_SLOT__: {
      __tmp__F5TL=execute_link__EYBL(__tmp__E5TL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__F5TL=execute_link__U2BL(__tmp__E5TL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__F5TL=execute_link__SRZM(__tmp__E5TL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__F5TL=execute_link__OBFO(__tmp__E5TL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__F5TL=execute_link__GJLO(__tmp__E5TL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__F5TL=execute_link__HHFO(__tmp__E5TL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__F5TL=execute_link__KPLO(__tmp__E5TL);
    } break;
    case __EXPR_NEG__: {
      __tmp__F5TL=execute_link__0GKM(__tmp__E5TL);
    } break;
    case __EXPR_ADD__: {
      __tmp__F5TL=execute_link__RROL(__tmp__E5TL);
    } break;
    case __EXPR_NOT__: {
      __tmp__F5TL=execute_link__GUZM(__tmp__E5TL);
    } break;
    case __EXPR_MOD__: {
      __tmp__F5TL=execute_link__ANFO(__tmp__E5TL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__F5TL=execute_link__YLEP(__tmp__E5TL);
    } break;
    case __EXPR_INF__: {
      __tmp__F5TL=execute_link__VQQN(__tmp__E5TL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__F5TL=execute_link__4UQN(__tmp__E5TL);
    } break;
    case __EXPR_OR__: {
      __tmp__F5TL=execute_link__1HQN(__tmp__E5TL);
    } break;
    case __EXPR_XOR__: {
      __tmp__F5TL=execute_link__IYUO(__tmp__E5TL);
    } break;
    };
    Self__0IGK->receiver__HU1H=__tmp__F5TL;
    __tmp__DMGK=Self__0IGK->parent_write__3BGH.value__HBEH;
    switch (((struct ___OBJ *)__tmp__DMGK)->__id) {
    case __LIST__: {
      __tmp__EMGK=execute_link__LUOG(__tmp__DMGK);
    } break;
    case __STRING_CST__: {
      __tmp__EMGK=((__STRING_CST *)__tmp__DMGK);
    } break;
    case __EXTERNAL_C__: {
      __tmp__EMGK=execute_link__U5ZK(__tmp__DMGK);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__EMGK=((__PROTOTYPE_CST *)__tmp__DMGK);
    } break;
    case __INTEGER_CST__: {
      __tmp__EMGK=((__INTEGER_CST *)__tmp__DMGK);
    } break;
    case __READ_LOCAL__: {
      __tmp__EMGK=execute_link__EHAL(__tmp__DMGK);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__EMGK=execute_link__YLAL();
    } break;
    case __EXPR_EQUAL__: {
      __tmp__EMGK=execute_link__2LAL(__tmp__DMGK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__EMGK=execute_link__FQAL(__tmp__DMGK);
    } break;
    case __REAL_CST__: {
      __tmp__EMGK=((__REAL_CST *)__tmp__DMGK);
    } break;
    case __CHARACTER_CST__: {
      __tmp__EMGK=((__CHARACTER_CST *)__tmp__DMGK);
    } break;
    case __IS_EXPANDED__: {
      __tmp__EMGK=execute_link__UUAL(__tmp__DMGK);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__EMGK=execute_link__1VAL(__tmp__DMGK);
    } break;
    case __EXPR_SUP__: {
      __tmp__EMGK=execute_link__AWAL(__tmp__DMGK);
    } break;
    case __EXPR_SUB__: {
      __tmp__EMGK=execute_link__J0AL(__tmp__DMGK);
    } break;
    case __EXPR_MUL__: {
      __tmp__EMGK=execute_link__S4AL(__tmp__DMGK);
    } break;
    case __EXPR_DIV__: {
      __tmp__EMGK=execute_link__1CBL(__tmp__DMGK);
    } break;
    case __EXPR_AND__: {
      __tmp__EMGK=execute_link__EHBL(__tmp__DMGK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__EMGK=execute_link__NLBL(__tmp__DMGK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__EMGK=execute_link__WPBL(__tmp__DMGK);
    } break;
    case __PUT_TO__: {
      __tmp__EMGK=execute_link__BOPK(__tmp__DMGK);
    } break;
    case __ITEM__: {
      __tmp__EMGK=execute_link__5TBL(__tmp__DMGK);
    } break;
    case __SIZE_OF__: {
      __tmp__EMGK=execute_link__GUBL(__tmp__DMGK);
    } break;
    case __CAST__: {
      __tmp__EMGK=execute_link__LUBL(__tmp__DMGK);
    } break;
    case __CALL_SLOT__: {
      __tmp__EMGK=execute_link__A2TL(__tmp__DMGK);
    } break;
    case __READ_SLOT__: {
      __tmp__EMGK=execute_link__EYBL(__tmp__DMGK);
    } break;
    case __READ_GLOBAL__: {
      __tmp__EMGK=execute_link__U2BL(__tmp__DMGK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__EMGK=execute_link__SRZM(__tmp__DMGK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__EMGK=execute_link__OBFO(__tmp__DMGK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__EMGK=execute_link__GJLO(__tmp__DMGK);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__EMGK=execute_link__HHFO(__tmp__DMGK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__EMGK=execute_link__KPLO(__tmp__DMGK);
    } break;
    case __EXPR_NEG__: {
      __tmp__EMGK=execute_link__0GKM(__tmp__DMGK);
    } break;
    case __EXPR_ADD__: {
      __tmp__EMGK=execute_link__RROL(__tmp__DMGK);
    } break;
    case __EXPR_NOT__: {
      __tmp__EMGK=execute_link__GUZM(__tmp__DMGK);
    } break;
    case __EXPR_MOD__: {
      __tmp__EMGK=execute_link__ANFO(__tmp__DMGK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__EMGK=execute_link__YLEP(__tmp__DMGK);
    } break;
    case __EXPR_INF__: {
      __tmp__EMGK=execute_link__VQQN(__tmp__DMGK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__EMGK=execute_link__4UQN(__tmp__DMGK);
    } break;
    case __EXPR_OR__: {
      __tmp__EMGK=execute_link__1HQN(__tmp__DMGK);
    } break;
    case __EXPR_XOR__: {
      __tmp__EMGK=execute_link__IYUO(__tmp__DMGK);
    } break;
    };
    Self__0IGK->parent_write__3BGH.value__HBEH=__tmp__EMGK;
    seq_index__SIGK=(__UINTEGER_32)(seq_index__SIGK +  1);
    Self__42TL=((__SLOT_DATA *)Self__0IGK->slot__5T1H);
    Self__42TL->last_write__Y5IL=Self__0IGK;
    Self__42TL->last_seq_index__55IL=seq_index__SIGK;
    Self__42TL->last_seq_or_and__TDQL=seq_or_and__AYRG;
    Self__42TL->last_seq_call_and_loop__ZWPL=seq_call_and_loop__VREJ;
    Self__42TL->last_seq_call_local_and_loop__S0PL=seq_call_local_and_loop__51IL;
    Self__42TL->last_list_current__UAJL=list_current__IF1;
    Self__42TL->last_index__UOPL=((__LIST *)list_current__IF1)->index__PXRG;
    result__2IGK=Self__0IGK;
  };
  return(result__2IGK);
}

static void* execute_unlink__WGMK(__EXPR_EQUAL *Self__XGMK)
// ({EXPR_EQUAL}) With resultRecursive, No inlinable.
{
  void *__tmp__0GMK,*__tmp__EHMK;
  void *__tmp__1GMK,*__tmp__FHMK;
  __READ_LOCAL *Self__0BFQ,*Self__ZQWQ,*Self__1BFQ,*Self__1QWQ;
  __READ_GLOBAL *Self__22JQ,*Self__C3JQ;
  __LIST *Self__VLZQ;
  __tmp__0GMK=Self__XGMK->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__0GMK)->__id) {
  case __LIST__: {
    __tmp__1GMK=execute_unlink__0SRJ(__tmp__0GMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1GMK=execute_unlink__42LK(__tmp__0GMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__0BFQ=((__READ_LOCAL *)__tmp__0GMK);
    unread__YVJK(Self__0BFQ->local__ALZD,Self__0BFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1GMK=execute_unlink__PBMK(__tmp__0GMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1GMK=execute_unlink__WGMK(__tmp__0GMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1GMK=execute_unlink__HHMK(__tmp__0GMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__ZQWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0GMK)->receiver__OO2H);
    unread__YVJK(Self__ZQWQ->local__ALZD,Self__ZQWQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__0GMK));
    __tmp__1GMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__1GMK=execute_unlink__IIMK(__tmp__0GMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__1GMK=execute_unlink__ZIMK(__tmp__0GMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__1GMK=execute_unlink__KJMK(__tmp__0GMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__1GMK=execute_unlink__1JMK(__tmp__0GMK);
  } break;
  case __EXPR_AND__: {
    __tmp__1GMK=execute_unlink__MKMK(__tmp__0GMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1GMK=execute_unlink__3KMK(__tmp__0GMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1GMK=execute_unlink__OLMK(__tmp__0GMK);
  } break;
  case __PUT_TO__: {
    __tmp__1GMK=execute_link__BOPK(((__PUT_TO *)__tmp__0GMK));
  } break;
  case __ITEM__: {
    __tmp__1GMK=execute_unlink__CMMK(__tmp__0GMK);
  } break;
  case __SIZE_OF__: {
    __tmp__1GMK=execute_unlink__SMMK(__tmp__0GMK);
  } break;
  case __CAST__: {
    __tmp__1GMK=execute_unlink__XMMK(__tmp__0GMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__1GMK=execute_unlink__2NQL(__tmp__0GMK);
  } break;
  case __READ_SLOT__: {
    __tmp__1GMK=execute_unlink__WDAL(__tmp__0GMK);
  } break;
  case __READ_GLOBAL__: {
    Self__22JQ=((__READ_GLOBAL *)__tmp__0GMK);
    unread__15ML(Self__22JQ->global__RHJK,Self__22JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1GMK=execute_access_unlink__VMDL(Self__22JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1GMK=execute_unlink__CRZM(__tmp__0GMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1GMK=execute_unlink__B2EO(__tmp__0GMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1GMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__0GMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1GMK=execute_unlink__R2EO(__tmp__0GMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1GMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__0GMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__1GMK=execute_unlink__XYJM(__tmp__0GMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__1GMK=execute_unlink__3NNL(__tmp__0GMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__1GMK=execute_unlink__YLZM(__tmp__0GMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__1GMK=execute_unlink__B3EO(__tmp__0GMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1GMK=execute_unlink__AJEP(__tmp__0GMK);
  } break;
  case __EXPR_INF__: {
    __tmp__1GMK=execute_unlink__CPQN(__tmp__0GMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1GMK=execute_unlink__SPQN(__tmp__0GMK);
  } break;
  case __EXPR_OR__: {
    __tmp__1GMK=execute_unlink__JDQN(__tmp__0GMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__1GMK=execute_unlink__YNUO(__tmp__0GMK);
  } break;
  };
  if (((void *)__tmp__1GMK != (void *)NULL)) {
    Self__VLZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__VLZQ->expr_list__JUOG,__tmp__1GMK,(__INTEGER)(Self__VLZQ->index__PXRG -  1));
    Self__VLZQ->index__PXRG=(__INTEGER)(Self__VLZQ->index__PXRG +  1);
  };
  __tmp__EHMK=Self__XGMK->parent_expr_binary_cmp__1LJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__EHMK)->__id) {
  case __LIST__: {
    __tmp__FHMK=execute_unlink__0SRJ(__tmp__EHMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__FHMK=execute_unlink__42LK(__tmp__EHMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__1BFQ=((__READ_LOCAL *)__tmp__EHMK);
    unread__YVJK(Self__1BFQ->local__ALZD,Self__1BFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FHMK=execute_unlink__PBMK(__tmp__EHMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FHMK=execute_unlink__WGMK(__tmp__EHMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FHMK=execute_unlink__HHMK(__tmp__EHMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__1QWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__EHMK)->receiver__OO2H);
    unread__YVJK(Self__1QWQ->local__ALZD,Self__1QWQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__EHMK));
    __tmp__FHMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__FHMK=execute_unlink__IIMK(__tmp__EHMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__FHMK=execute_unlink__ZIMK(__tmp__EHMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__FHMK=execute_unlink__KJMK(__tmp__EHMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__FHMK=execute_unlink__1JMK(__tmp__EHMK);
  } break;
  case __EXPR_AND__: {
    __tmp__FHMK=execute_unlink__MKMK(__tmp__EHMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FHMK=execute_unlink__3KMK(__tmp__EHMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FHMK=execute_unlink__OLMK(__tmp__EHMK);
  } break;
  case __PUT_TO__: {
    __tmp__FHMK=execute_link__BOPK(((__PUT_TO *)__tmp__EHMK));
  } break;
  case __ITEM__: {
    __tmp__FHMK=execute_unlink__CMMK(__tmp__EHMK);
  } break;
  case __SIZE_OF__: {
    __tmp__FHMK=execute_unlink__SMMK(__tmp__EHMK);
  } break;
  case __CAST__: {
    __tmp__FHMK=execute_unlink__XMMK(__tmp__EHMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__FHMK=execute_unlink__2NQL(__tmp__EHMK);
  } break;
  case __READ_SLOT__: {
    __tmp__FHMK=execute_unlink__WDAL(__tmp__EHMK);
  } break;
  case __READ_GLOBAL__: {
    Self__C3JQ=((__READ_GLOBAL *)__tmp__EHMK);
    unread__15ML(Self__C3JQ->global__RHJK,Self__C3JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FHMK=execute_access_unlink__VMDL(Self__C3JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FHMK=execute_unlink__CRZM(__tmp__EHMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FHMK=execute_unlink__B2EO(__tmp__EHMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FHMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__EHMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FHMK=execute_unlink__R2EO(__tmp__EHMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FHMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__EHMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__FHMK=execute_unlink__XYJM(__tmp__EHMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__FHMK=execute_unlink__3NNL(__tmp__EHMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__FHMK=execute_unlink__YLZM(__tmp__EHMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__FHMK=execute_unlink__B3EO(__tmp__EHMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FHMK=execute_unlink__AJEP(__tmp__EHMK);
  } break;
  case __EXPR_INF__: {
    __tmp__FHMK=execute_unlink__CPQN(__tmp__EHMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FHMK=execute_unlink__SPQN(__tmp__EHMK);
  } break;
  case __EXPR_OR__: {
    __tmp__FHMK=execute_unlink__JDQN(__tmp__EHMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__FHMK=execute_unlink__YNUO(__tmp__EHMK);
  } break;
  };
  return(__tmp__FHMK);
}

static void* execute_unlink__HHMK(__EXPR_NOT_EQUAL *Self__IHMK)
// ({EXPR_NOT_EQUAL}) With resultRecursive, No inlinable.
{
  void *__tmp__LHMK,*__tmp__VHMK;
  void *__tmp__MHMK,*__tmp__WHMK;
  __READ_LOCAL *Self__2BFQ,*Self__3QWQ,*Self__3BFQ,*Self__ECFQ;
  __READ_GLOBAL *Self__I3JQ,*Self__O3JQ;
  __LIST *Self__XLZQ;
  __tmp__LHMK=Self__IHMK->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__LHMK)->__id) {
  case __LIST__: {
    __tmp__MHMK=execute_unlink__0SRJ(__tmp__LHMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__MHMK=execute_unlink__42LK(__tmp__LHMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__2BFQ=((__READ_LOCAL *)__tmp__LHMK);
    unread__YVJK(Self__2BFQ->local__ALZD,Self__2BFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MHMK=execute_unlink__PBMK(__tmp__LHMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MHMK=execute_unlink__WGMK(__tmp__LHMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MHMK=execute_unlink__HHMK(__tmp__LHMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__3QWQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LHMK)->receiver__OO2H);
    unread__YVJK(Self__3QWQ->local__ALZD,Self__3QWQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__LHMK));
    __tmp__MHMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__MHMK=execute_unlink__IIMK(__tmp__LHMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__MHMK=execute_unlink__ZIMK(__tmp__LHMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__MHMK=execute_unlink__KJMK(__tmp__LHMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__MHMK=execute_unlink__1JMK(__tmp__LHMK);
  } break;
  case __EXPR_AND__: {
    __tmp__MHMK=execute_unlink__MKMK(__tmp__LHMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MHMK=execute_unlink__3KMK(__tmp__LHMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MHMK=execute_unlink__OLMK(__tmp__LHMK);
  } break;
  case __PUT_TO__: {
    __tmp__MHMK=execute_link__BOPK(((__PUT_TO *)__tmp__LHMK));
  } break;
  case __ITEM__: {
    __tmp__MHMK=execute_unlink__CMMK(__tmp__LHMK);
  } break;
  case __SIZE_OF__: {
    __tmp__MHMK=execute_unlink__SMMK(__tmp__LHMK);
  } break;
  case __CAST__: {
    __tmp__MHMK=execute_unlink__XMMK(__tmp__LHMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__MHMK=execute_unlink__2NQL(__tmp__LHMK);
  } break;
  case __READ_SLOT__: {
    __tmp__MHMK=execute_unlink__WDAL(__tmp__LHMK);
  } break;
  case __READ_GLOBAL__: {
    Self__I3JQ=((__READ_GLOBAL *)__tmp__LHMK);
    unread__15ML(Self__I3JQ->global__RHJK,Self__I3JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MHMK=execute_access_unlink__VMDL(Self__I3JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MHMK=execute_unlink__CRZM(__tmp__LHMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MHMK=execute_unlink__B2EO(__tmp__LHMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MHMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__LHMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MHMK=execute_unlink__R2EO(__tmp__LHMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MHMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__LHMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__MHMK=execute_unlink__XYJM(__tmp__LHMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__MHMK=execute_unlink__3NNL(__tmp__LHMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__MHMK=execute_unlink__YLZM(__tmp__LHMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__MHMK=execute_unlink__B3EO(__tmp__LHMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MHMK=execute_unlink__AJEP(__tmp__LHMK);
  } break;
  case __EXPR_INF__: {
    __tmp__MHMK=execute_unlink__CPQN(__tmp__LHMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MHMK=execute_unlink__SPQN(__tmp__LHMK);
  } break;
  case __EXPR_OR__: {
    __tmp__MHMK=execute_unlink__JDQN(__tmp__LHMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__MHMK=execute_unlink__YNUO(__tmp__LHMK);
  } break;
  };
  if (((void *)__tmp__MHMK != (void *)NULL)) {
    Self__XLZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__XLZQ->expr_list__JUOG,__tmp__MHMK,(__INTEGER)(Self__XLZQ->index__PXRG -  1));
    Self__XLZQ->index__PXRG=(__INTEGER)(Self__XLZQ->index__PXRG +  1);
  };
  __tmp__VHMK=Self__IHMK->parent_expr_binary_cmp__DMJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__VHMK)->__id) {
  case __LIST__: {
    __tmp__WHMK=execute_unlink__0SRJ(__tmp__VHMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__WHMK=execute_unlink__42LK(__tmp__VHMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__3BFQ=((__READ_LOCAL *)__tmp__VHMK);
    unread__YVJK(Self__3BFQ->local__ALZD,Self__3BFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WHMK=execute_unlink__PBMK(__tmp__VHMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WHMK=execute_unlink__WGMK(__tmp__VHMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WHMK=execute_unlink__HHMK(__tmp__VHMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__ECFQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__VHMK)->receiver__OO2H);
    unread__YVJK(Self__ECFQ->local__ALZD,Self__ECFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__VHMK));
    __tmp__WHMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__WHMK=execute_unlink__IIMK(__tmp__VHMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__WHMK=execute_unlink__ZIMK(__tmp__VHMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__WHMK=execute_unlink__KJMK(__tmp__VHMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__WHMK=execute_unlink__1JMK(__tmp__VHMK);
  } break;
  case __EXPR_AND__: {
    __tmp__WHMK=execute_unlink__MKMK(__tmp__VHMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WHMK=execute_unlink__3KMK(__tmp__VHMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WHMK=execute_unlink__OLMK(__tmp__VHMK);
  } break;
  case __PUT_TO__: {
    __tmp__WHMK=execute_link__BOPK(((__PUT_TO *)__tmp__VHMK));
  } break;
  case __ITEM__: {
    __tmp__WHMK=execute_unlink__CMMK(__tmp__VHMK);
  } break;
  case __SIZE_OF__: {
    __tmp__WHMK=execute_unlink__SMMK(__tmp__VHMK);
  } break;
  case __CAST__: {
    __tmp__WHMK=execute_unlink__XMMK(__tmp__VHMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__WHMK=execute_unlink__2NQL(__tmp__VHMK);
  } break;
  case __READ_SLOT__: {
    __tmp__WHMK=execute_unlink__WDAL(__tmp__VHMK);
  } break;
  case __READ_GLOBAL__: {
    Self__O3JQ=((__READ_GLOBAL *)__tmp__VHMK);
    unread__15ML(Self__O3JQ->global__RHJK,Self__O3JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WHMK=execute_access_unlink__VMDL(Self__O3JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WHMK=execute_unlink__CRZM(__tmp__VHMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WHMK=execute_unlink__B2EO(__tmp__VHMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WHMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__VHMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WHMK=execute_unlink__R2EO(__tmp__VHMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WHMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__VHMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__WHMK=execute_unlink__XYJM(__tmp__VHMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__WHMK=execute_unlink__3NNL(__tmp__VHMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__WHMK=execute_unlink__YLZM(__tmp__VHMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__WHMK=execute_unlink__B3EO(__tmp__VHMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WHMK=execute_unlink__AJEP(__tmp__VHMK);
  } break;
  case __EXPR_INF__: {
    __tmp__WHMK=execute_unlink__CPQN(__tmp__VHMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WHMK=execute_unlink__SPQN(__tmp__VHMK);
  } break;
  case __EXPR_OR__: {
    __tmp__WHMK=execute_unlink__JDQN(__tmp__VHMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__WHMK=execute_unlink__YNUO(__tmp__VHMK);
  } break;
  };
  return(__tmp__WHMK);
}

static void* execute_unlink__IIMK(__EXPR_SUP *Self__JIMK)
// ({EXPR_SUP}) With resultRecursive, No inlinable.
{
  void *__tmp__MIMK,*__tmp__WIMK;
  void *__tmp__NIMK,*__tmp__XIMK;
  __READ_LOCAL *Self__FCFQ,*Self__U3JQ,*Self__HCFQ,*Self__13JQ;
  __READ_GLOBAL *Self__W3JQ,*Self__33JQ;
  __LIST *Self__ZLZQ;
  __tmp__MIMK=Self__JIMK->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__MIMK)->__id) {
  case __LIST__: {
    __tmp__NIMK=execute_unlink__0SRJ(__tmp__MIMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__NIMK=execute_unlink__42LK(__tmp__MIMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__FCFQ=((__READ_LOCAL *)__tmp__MIMK);
    unread__YVJK(Self__FCFQ->local__ALZD,Self__FCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NIMK=execute_unlink__PBMK(__tmp__MIMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NIMK=execute_unlink__WGMK(__tmp__MIMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NIMK=execute_unlink__HHMK(__tmp__MIMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__U3JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MIMK)->receiver__OO2H);
    unread__YVJK(Self__U3JQ->local__ALZD,Self__U3JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__MIMK));
    __tmp__NIMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__NIMK=execute_unlink__IIMK(__tmp__MIMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__NIMK=execute_unlink__ZIMK(__tmp__MIMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__NIMK=execute_unlink__KJMK(__tmp__MIMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__NIMK=execute_unlink__1JMK(__tmp__MIMK);
  } break;
  case __EXPR_AND__: {
    __tmp__NIMK=execute_unlink__MKMK(__tmp__MIMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NIMK=execute_unlink__3KMK(__tmp__MIMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NIMK=execute_unlink__OLMK(__tmp__MIMK);
  } break;
  case __PUT_TO__: {
    __tmp__NIMK=execute_link__BOPK(((__PUT_TO *)__tmp__MIMK));
  } break;
  case __ITEM__: {
    __tmp__NIMK=execute_unlink__CMMK(__tmp__MIMK);
  } break;
  case __SIZE_OF__: {
    __tmp__NIMK=execute_unlink__SMMK(__tmp__MIMK);
  } break;
  case __CAST__: {
    __tmp__NIMK=execute_unlink__XMMK(__tmp__MIMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__NIMK=execute_unlink__2NQL(__tmp__MIMK);
  } break;
  case __READ_SLOT__: {
    __tmp__NIMK=execute_unlink__WDAL(__tmp__MIMK);
  } break;
  case __READ_GLOBAL__: {
    Self__W3JQ=((__READ_GLOBAL *)__tmp__MIMK);
    unread__15ML(Self__W3JQ->global__RHJK,Self__W3JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NIMK=execute_access_unlink__VMDL(Self__W3JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NIMK=execute_unlink__CRZM(__tmp__MIMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NIMK=execute_unlink__B2EO(__tmp__MIMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NIMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__MIMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NIMK=execute_unlink__R2EO(__tmp__MIMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NIMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__MIMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__NIMK=execute_unlink__XYJM(__tmp__MIMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__NIMK=execute_unlink__3NNL(__tmp__MIMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__NIMK=execute_unlink__YLZM(__tmp__MIMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__NIMK=execute_unlink__B3EO(__tmp__MIMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NIMK=execute_unlink__AJEP(__tmp__MIMK);
  } break;
  case __EXPR_INF__: {
    __tmp__NIMK=execute_unlink__CPQN(__tmp__MIMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NIMK=execute_unlink__SPQN(__tmp__MIMK);
  } break;
  case __EXPR_OR__: {
    __tmp__NIMK=execute_unlink__JDQN(__tmp__MIMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__NIMK=execute_unlink__YNUO(__tmp__MIMK);
  } break;
  };
  if (((void *)__tmp__NIMK != (void *)NULL)) {
    Self__ZLZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__ZLZQ->expr_list__JUOG,__tmp__NIMK,(__INTEGER)(Self__ZLZQ->index__PXRG -  1));
    Self__ZLZQ->index__PXRG=(__INTEGER)(Self__ZLZQ->index__PXRG +  1);
  };
  __tmp__WIMK=Self__JIMK->parent_expr_binary_cmp__TAKH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__WIMK)->__id) {
  case __LIST__: {
    __tmp__XIMK=execute_unlink__0SRJ(__tmp__WIMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__XIMK=execute_unlink__42LK(__tmp__WIMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__HCFQ=((__READ_LOCAL *)__tmp__WIMK);
    unread__YVJK(Self__HCFQ->local__ALZD,Self__HCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__XIMK=execute_unlink__PBMK(__tmp__WIMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__XIMK=execute_unlink__WGMK(__tmp__WIMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__XIMK=execute_unlink__HHMK(__tmp__WIMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__13JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__WIMK)->receiver__OO2H);
    unread__YVJK(Self__13JQ->local__ALZD,Self__13JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__WIMK));
    __tmp__XIMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__XIMK=execute_unlink__IIMK(__tmp__WIMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__XIMK=execute_unlink__ZIMK(__tmp__WIMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__XIMK=execute_unlink__KJMK(__tmp__WIMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__XIMK=execute_unlink__1JMK(__tmp__WIMK);
  } break;
  case __EXPR_AND__: {
    __tmp__XIMK=execute_unlink__MKMK(__tmp__WIMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__XIMK=execute_unlink__3KMK(__tmp__WIMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__XIMK=execute_unlink__OLMK(__tmp__WIMK);
  } break;
  case __PUT_TO__: {
    __tmp__XIMK=execute_link__BOPK(((__PUT_TO *)__tmp__WIMK));
  } break;
  case __ITEM__: {
    __tmp__XIMK=execute_unlink__CMMK(__tmp__WIMK);
  } break;
  case __SIZE_OF__: {
    __tmp__XIMK=execute_unlink__SMMK(__tmp__WIMK);
  } break;
  case __CAST__: {
    __tmp__XIMK=execute_unlink__XMMK(__tmp__WIMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__XIMK=execute_unlink__2NQL(__tmp__WIMK);
  } break;
  case __READ_SLOT__: {
    __tmp__XIMK=execute_unlink__WDAL(__tmp__WIMK);
  } break;
  case __READ_GLOBAL__: {
    Self__33JQ=((__READ_GLOBAL *)__tmp__WIMK);
    unread__15ML(Self__33JQ->global__RHJK,Self__33JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XIMK=execute_access_unlink__VMDL(Self__33JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__XIMK=execute_unlink__CRZM(__tmp__WIMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__XIMK=execute_unlink__B2EO(__tmp__WIMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__XIMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__WIMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__XIMK=execute_unlink__R2EO(__tmp__WIMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__XIMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__WIMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__XIMK=execute_unlink__XYJM(__tmp__WIMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__XIMK=execute_unlink__3NNL(__tmp__WIMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__XIMK=execute_unlink__YLZM(__tmp__WIMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__XIMK=execute_unlink__B3EO(__tmp__WIMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__XIMK=execute_unlink__AJEP(__tmp__WIMK);
  } break;
  case __EXPR_INF__: {
    __tmp__XIMK=execute_unlink__CPQN(__tmp__WIMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__XIMK=execute_unlink__SPQN(__tmp__WIMK);
  } break;
  case __EXPR_OR__: {
    __tmp__XIMK=execute_unlink__JDQN(__tmp__WIMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__XIMK=execute_unlink__YNUO(__tmp__WIMK);
  } break;
  };
  return(__tmp__XIMK);
}

static void* execute_unlink__ZIMK(__EXPR_SUB *Self__0IMK)
// ({EXPR_SUB}) With resultRecursive, No inlinable.
{
  void *__tmp__3IMK,*__tmp__HJMK;
  void *__tmp__4IMK,*__tmp__IJMK;
  __READ_LOCAL *Self__JCFQ,*Self__C4JQ,*Self__LCFQ,*Self__J4JQ;
  __READ_GLOBAL *Self__E4JQ,*Self__L4JQ;
  __LIST *Self__1LZQ;
  __tmp__3IMK=Self__0IMK->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__3IMK)->__id) {
  case __LIST__: {
    __tmp__4IMK=execute_unlink__0SRJ(__tmp__3IMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__4IMK=execute_unlink__42LK(__tmp__3IMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__JCFQ=((__READ_LOCAL *)__tmp__3IMK);
    unread__YVJK(Self__JCFQ->local__ALZD,Self__JCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4IMK=execute_unlink__PBMK(__tmp__3IMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4IMK=execute_unlink__WGMK(__tmp__3IMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4IMK=execute_unlink__HHMK(__tmp__3IMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__C4JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3IMK)->receiver__OO2H);
    unread__YVJK(Self__C4JQ->local__ALZD,Self__C4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__3IMK));
    __tmp__4IMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__4IMK=execute_unlink__IIMK(__tmp__3IMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__4IMK=execute_unlink__ZIMK(__tmp__3IMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__4IMK=execute_unlink__KJMK(__tmp__3IMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__4IMK=execute_unlink__1JMK(__tmp__3IMK);
  } break;
  case __EXPR_AND__: {
    __tmp__4IMK=execute_unlink__MKMK(__tmp__3IMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4IMK=execute_unlink__3KMK(__tmp__3IMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4IMK=execute_unlink__OLMK(__tmp__3IMK);
  } break;
  case __PUT_TO__: {
    __tmp__4IMK=execute_link__BOPK(((__PUT_TO *)__tmp__3IMK));
  } break;
  case __ITEM__: {
    __tmp__4IMK=execute_unlink__CMMK(__tmp__3IMK);
  } break;
  case __SIZE_OF__: {
    __tmp__4IMK=execute_unlink__SMMK(__tmp__3IMK);
  } break;
  case __CAST__: {
    __tmp__4IMK=execute_unlink__XMMK(__tmp__3IMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__4IMK=execute_unlink__2NQL(__tmp__3IMK);
  } break;
  case __READ_SLOT__: {
    __tmp__4IMK=execute_unlink__WDAL(__tmp__3IMK);
  } break;
  case __READ_GLOBAL__: {
    Self__E4JQ=((__READ_GLOBAL *)__tmp__3IMK);
    unread__15ML(Self__E4JQ->global__RHJK,Self__E4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__4IMK=execute_access_unlink__VMDL(Self__E4JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4IMK=execute_unlink__CRZM(__tmp__3IMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4IMK=execute_unlink__B2EO(__tmp__3IMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4IMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__3IMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4IMK=execute_unlink__R2EO(__tmp__3IMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4IMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__3IMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__4IMK=execute_unlink__XYJM(__tmp__3IMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__4IMK=execute_unlink__3NNL(__tmp__3IMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__4IMK=execute_unlink__YLZM(__tmp__3IMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__4IMK=execute_unlink__B3EO(__tmp__3IMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4IMK=execute_unlink__AJEP(__tmp__3IMK);
  } break;
  case __EXPR_INF__: {
    __tmp__4IMK=execute_unlink__CPQN(__tmp__3IMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4IMK=execute_unlink__SPQN(__tmp__3IMK);
  } break;
  case __EXPR_OR__: {
    __tmp__4IMK=execute_unlink__JDQN(__tmp__3IMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__4IMK=execute_unlink__YNUO(__tmp__3IMK);
  } break;
  };
  if (((void *)__tmp__4IMK != (void *)NULL)) {
    Self__1LZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__1LZQ->expr_list__JUOG,__tmp__4IMK,(__INTEGER)(Self__1LZQ->index__PXRG -  1));
    Self__1LZQ->index__PXRG=(__INTEGER)(Self__1LZQ->index__PXRG +  1);
  };
  __tmp__HJMK=Self__0IMK->parent_expr_binary__HBKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__HJMK)->__id) {
  case __LIST__: {
    __tmp__IJMK=execute_unlink__0SRJ(__tmp__HJMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__IJMK=execute_unlink__42LK(__tmp__HJMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__LCFQ=((__READ_LOCAL *)__tmp__HJMK);
    unread__YVJK(Self__LCFQ->local__ALZD,Self__LCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IJMK=execute_unlink__PBMK(__tmp__HJMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IJMK=execute_unlink__WGMK(__tmp__HJMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IJMK=execute_unlink__HHMK(__tmp__HJMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__J4JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__HJMK)->receiver__OO2H);
    unread__YVJK(Self__J4JQ->local__ALZD,Self__J4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__HJMK));
    __tmp__IJMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__IJMK=execute_unlink__IIMK(__tmp__HJMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__IJMK=execute_unlink__ZIMK(__tmp__HJMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__IJMK=execute_unlink__KJMK(__tmp__HJMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__IJMK=execute_unlink__1JMK(__tmp__HJMK);
  } break;
  case __EXPR_AND__: {
    __tmp__IJMK=execute_unlink__MKMK(__tmp__HJMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IJMK=execute_unlink__3KMK(__tmp__HJMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IJMK=execute_unlink__OLMK(__tmp__HJMK);
  } break;
  case __PUT_TO__: {
    __tmp__IJMK=execute_link__BOPK(((__PUT_TO *)__tmp__HJMK));
  } break;
  case __ITEM__: {
    __tmp__IJMK=execute_unlink__CMMK(__tmp__HJMK);
  } break;
  case __SIZE_OF__: {
    __tmp__IJMK=execute_unlink__SMMK(__tmp__HJMK);
  } break;
  case __CAST__: {
    __tmp__IJMK=execute_unlink__XMMK(__tmp__HJMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__IJMK=execute_unlink__2NQL(__tmp__HJMK);
  } break;
  case __READ_SLOT__: {
    __tmp__IJMK=execute_unlink__WDAL(__tmp__HJMK);
  } break;
  case __READ_GLOBAL__: {
    Self__L4JQ=((__READ_GLOBAL *)__tmp__HJMK);
    unread__15ML(Self__L4JQ->global__RHJK,Self__L4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IJMK=execute_access_unlink__VMDL(Self__L4JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IJMK=execute_unlink__CRZM(__tmp__HJMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IJMK=execute_unlink__B2EO(__tmp__HJMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IJMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__HJMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IJMK=execute_unlink__R2EO(__tmp__HJMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IJMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__HJMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__IJMK=execute_unlink__XYJM(__tmp__HJMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__IJMK=execute_unlink__3NNL(__tmp__HJMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__IJMK=execute_unlink__YLZM(__tmp__HJMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__IJMK=execute_unlink__B3EO(__tmp__HJMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IJMK=execute_unlink__AJEP(__tmp__HJMK);
  } break;
  case __EXPR_INF__: {
    __tmp__IJMK=execute_unlink__CPQN(__tmp__HJMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IJMK=execute_unlink__SPQN(__tmp__HJMK);
  } break;
  case __EXPR_OR__: {
    __tmp__IJMK=execute_unlink__JDQN(__tmp__HJMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__IJMK=execute_unlink__YNUO(__tmp__HJMK);
  } break;
  };
  return(__tmp__IJMK);
}

static void* execute_unlink__KJMK(__EXPR_MUL *Self__LJMK)
// ({EXPR_MUL}) With resultRecursive, No inlinable.
{
  void *__tmp__OJMK,*__tmp__YJMK;
  void *__tmp__PJMK,*__tmp__ZJMK;
  __READ_LOCAL *Self__NCFQ,*Self__Q4JQ,*Self__PCFQ,*Self__X4JQ;
  __READ_GLOBAL *Self__S4JQ,*Self__Z4JQ;
  __LIST *Self__3LZQ;
  __tmp__OJMK=Self__LJMK->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__OJMK)->__id) {
  case __LIST__: {
    __tmp__PJMK=execute_unlink__0SRJ(__tmp__OJMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__PJMK=execute_unlink__42LK(__tmp__OJMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__NCFQ=((__READ_LOCAL *)__tmp__OJMK);
    unread__YVJK(Self__NCFQ->local__ALZD,Self__NCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PJMK=execute_unlink__PBMK(__tmp__OJMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PJMK=execute_unlink__WGMK(__tmp__OJMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PJMK=execute_unlink__HHMK(__tmp__OJMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__Q4JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__OJMK)->receiver__OO2H);
    unread__YVJK(Self__Q4JQ->local__ALZD,Self__Q4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__OJMK));
    __tmp__PJMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__PJMK=execute_unlink__IIMK(__tmp__OJMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__PJMK=execute_unlink__ZIMK(__tmp__OJMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__PJMK=execute_unlink__KJMK(__tmp__OJMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__PJMK=execute_unlink__1JMK(__tmp__OJMK);
  } break;
  case __EXPR_AND__: {
    __tmp__PJMK=execute_unlink__MKMK(__tmp__OJMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PJMK=execute_unlink__3KMK(__tmp__OJMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PJMK=execute_unlink__OLMK(__tmp__OJMK);
  } break;
  case __PUT_TO__: {
    __tmp__PJMK=execute_link__BOPK(((__PUT_TO *)__tmp__OJMK));
  } break;
  case __ITEM__: {
    __tmp__PJMK=execute_unlink__CMMK(__tmp__OJMK);
  } break;
  case __SIZE_OF__: {
    __tmp__PJMK=execute_unlink__SMMK(__tmp__OJMK);
  } break;
  case __CAST__: {
    __tmp__PJMK=execute_unlink__XMMK(__tmp__OJMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__PJMK=execute_unlink__2NQL(__tmp__OJMK);
  } break;
  case __READ_SLOT__: {
    __tmp__PJMK=execute_unlink__WDAL(__tmp__OJMK);
  } break;
  case __READ_GLOBAL__: {
    Self__S4JQ=((__READ_GLOBAL *)__tmp__OJMK);
    unread__15ML(Self__S4JQ->global__RHJK,Self__S4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJMK=execute_access_unlink__VMDL(Self__S4JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PJMK=execute_unlink__CRZM(__tmp__OJMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PJMK=execute_unlink__B2EO(__tmp__OJMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PJMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__OJMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PJMK=execute_unlink__R2EO(__tmp__OJMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PJMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__OJMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__PJMK=execute_unlink__XYJM(__tmp__OJMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__PJMK=execute_unlink__3NNL(__tmp__OJMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__PJMK=execute_unlink__YLZM(__tmp__OJMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__PJMK=execute_unlink__B3EO(__tmp__OJMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PJMK=execute_unlink__AJEP(__tmp__OJMK);
  } break;
  case __EXPR_INF__: {
    __tmp__PJMK=execute_unlink__CPQN(__tmp__OJMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PJMK=execute_unlink__SPQN(__tmp__OJMK);
  } break;
  case __EXPR_OR__: {
    __tmp__PJMK=execute_unlink__JDQN(__tmp__OJMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__PJMK=execute_unlink__YNUO(__tmp__OJMK);
  } break;
  };
  if (((void *)__tmp__PJMK != (void *)NULL)) {
    Self__3LZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__3LZQ->expr_list__JUOG,__tmp__PJMK,(__INTEGER)(Self__3LZQ->index__PXRG -  1));
    Self__3LZQ->index__PXRG=(__INTEGER)(Self__3LZQ->index__PXRG +  1);
  };
  __tmp__YJMK=Self__LJMK->parent_expr_binary__0BKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__YJMK)->__id) {
  case __LIST__: {
    __tmp__ZJMK=execute_unlink__0SRJ(__tmp__YJMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ZJMK=execute_unlink__42LK(__tmp__YJMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__PCFQ=((__READ_LOCAL *)__tmp__YJMK);
    unread__YVJK(Self__PCFQ->local__ALZD,Self__PCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ZJMK=execute_unlink__PBMK(__tmp__YJMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ZJMK=execute_unlink__WGMK(__tmp__YJMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ZJMK=execute_unlink__HHMK(__tmp__YJMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__X4JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YJMK)->receiver__OO2H);
    unread__YVJK(Self__X4JQ->local__ALZD,Self__X4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__YJMK));
    __tmp__ZJMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__ZJMK=execute_unlink__IIMK(__tmp__YJMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__ZJMK=execute_unlink__ZIMK(__tmp__YJMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__ZJMK=execute_unlink__KJMK(__tmp__YJMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__ZJMK=execute_unlink__1JMK(__tmp__YJMK);
  } break;
  case __EXPR_AND__: {
    __tmp__ZJMK=execute_unlink__MKMK(__tmp__YJMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ZJMK=execute_unlink__3KMK(__tmp__YJMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ZJMK=execute_unlink__OLMK(__tmp__YJMK);
  } break;
  case __PUT_TO__: {
    __tmp__ZJMK=execute_link__BOPK(((__PUT_TO *)__tmp__YJMK));
  } break;
  case __ITEM__: {
    __tmp__ZJMK=execute_unlink__CMMK(__tmp__YJMK);
  } break;
  case __SIZE_OF__: {
    __tmp__ZJMK=execute_unlink__SMMK(__tmp__YJMK);
  } break;
  case __CAST__: {
    __tmp__ZJMK=execute_unlink__XMMK(__tmp__YJMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__ZJMK=execute_unlink__2NQL(__tmp__YJMK);
  } break;
  case __READ_SLOT__: {
    __tmp__ZJMK=execute_unlink__WDAL(__tmp__YJMK);
  } break;
  case __READ_GLOBAL__: {
    Self__Z4JQ=((__READ_GLOBAL *)__tmp__YJMK);
    unread__15ML(Self__Z4JQ->global__RHJK,Self__Z4JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ZJMK=execute_access_unlink__VMDL(Self__Z4JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ZJMK=execute_unlink__CRZM(__tmp__YJMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ZJMK=execute_unlink__B2EO(__tmp__YJMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ZJMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__YJMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ZJMK=execute_unlink__R2EO(__tmp__YJMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ZJMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__YJMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__ZJMK=execute_unlink__XYJM(__tmp__YJMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__ZJMK=execute_unlink__3NNL(__tmp__YJMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__ZJMK=execute_unlink__YLZM(__tmp__YJMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__ZJMK=execute_unlink__B3EO(__tmp__YJMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ZJMK=execute_unlink__AJEP(__tmp__YJMK);
  } break;
  case __EXPR_INF__: {
    __tmp__ZJMK=execute_unlink__CPQN(__tmp__YJMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ZJMK=execute_unlink__SPQN(__tmp__YJMK);
  } break;
  case __EXPR_OR__: {
    __tmp__ZJMK=execute_unlink__JDQN(__tmp__YJMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__ZJMK=execute_unlink__YNUO(__tmp__YJMK);
  } break;
  };
  return(__tmp__ZJMK);
}

static void* execute_unlink__1JMK(__EXPR_DIV *Self__2JMK)
// ({EXPR_DIV}) With resultRecursive, No inlinable.
{
  void *__tmp__5JMK,*__tmp__JKMK;
  void *__tmp__AKMK,*__tmp__KKMK;
  __READ_LOCAL *Self__RCFQ,*Self__44JQ,*Self__TCFQ,*Self__F5JQ;
  __READ_GLOBAL *Self__A5JQ,*Self__H5JQ;
  __LIST *Self__5LZQ;
  __tmp__5JMK=Self__2JMK->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__5JMK)->__id) {
  case __LIST__: {
    __tmp__AKMK=execute_unlink__0SRJ(__tmp__5JMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__AKMK=execute_unlink__42LK(__tmp__5JMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__RCFQ=((__READ_LOCAL *)__tmp__5JMK);
    unread__YVJK(Self__RCFQ->local__ALZD,Self__RCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__AKMK=execute_unlink__PBMK(__tmp__5JMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__AKMK=execute_unlink__WGMK(__tmp__5JMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__AKMK=execute_unlink__HHMK(__tmp__5JMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__44JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__5JMK)->receiver__OO2H);
    unread__YVJK(Self__44JQ->local__ALZD,Self__44JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__5JMK));
    __tmp__AKMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__AKMK=execute_unlink__IIMK(__tmp__5JMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__AKMK=execute_unlink__ZIMK(__tmp__5JMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__AKMK=execute_unlink__KJMK(__tmp__5JMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__AKMK=execute_unlink__1JMK(__tmp__5JMK);
  } break;
  case __EXPR_AND__: {
    __tmp__AKMK=execute_unlink__MKMK(__tmp__5JMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__AKMK=execute_unlink__3KMK(__tmp__5JMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__AKMK=execute_unlink__OLMK(__tmp__5JMK);
  } break;
  case __PUT_TO__: {
    __tmp__AKMK=execute_link__BOPK(((__PUT_TO *)__tmp__5JMK));
  } break;
  case __ITEM__: {
    __tmp__AKMK=execute_unlink__CMMK(__tmp__5JMK);
  } break;
  case __SIZE_OF__: {
    __tmp__AKMK=execute_unlink__SMMK(__tmp__5JMK);
  } break;
  case __CAST__: {
    __tmp__AKMK=execute_unlink__XMMK(__tmp__5JMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__AKMK=execute_unlink__2NQL(__tmp__5JMK);
  } break;
  case __READ_SLOT__: {
    __tmp__AKMK=execute_unlink__WDAL(__tmp__5JMK);
  } break;
  case __READ_GLOBAL__: {
    Self__A5JQ=((__READ_GLOBAL *)__tmp__5JMK);
    unread__15ML(Self__A5JQ->global__RHJK,Self__A5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__AKMK=execute_access_unlink__VMDL(Self__A5JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__AKMK=execute_unlink__CRZM(__tmp__5JMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__AKMK=execute_unlink__B2EO(__tmp__5JMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__AKMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__5JMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__AKMK=execute_unlink__R2EO(__tmp__5JMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__AKMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__5JMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__AKMK=execute_unlink__XYJM(__tmp__5JMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__AKMK=execute_unlink__3NNL(__tmp__5JMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__AKMK=execute_unlink__YLZM(__tmp__5JMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__AKMK=execute_unlink__B3EO(__tmp__5JMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__AKMK=execute_unlink__AJEP(__tmp__5JMK);
  } break;
  case __EXPR_INF__: {
    __tmp__AKMK=execute_unlink__CPQN(__tmp__5JMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__AKMK=execute_unlink__SPQN(__tmp__5JMK);
  } break;
  case __EXPR_OR__: {
    __tmp__AKMK=execute_unlink__JDQN(__tmp__5JMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__AKMK=execute_unlink__YNUO(__tmp__5JMK);
  } break;
  };
  if (((void *)__tmp__AKMK != (void *)NULL)) {
    Self__5LZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__5LZQ->expr_list__JUOG,__tmp__AKMK,(__INTEGER)(Self__5LZQ->index__PXRG -  1));
    Self__5LZQ->index__PXRG=(__INTEGER)(Self__5LZQ->index__PXRG +  1);
  };
  __tmp__JKMK=Self__2JMK->parent_expr_binary__NCKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__JKMK)->__id) {
  case __LIST__: {
    __tmp__KKMK=execute_unlink__0SRJ(__tmp__JKMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__KKMK=execute_unlink__42LK(__tmp__JKMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__TCFQ=((__READ_LOCAL *)__tmp__JKMK);
    unread__YVJK(Self__TCFQ->local__ALZD,Self__TCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KKMK=execute_unlink__PBMK(__tmp__JKMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KKMK=execute_unlink__WGMK(__tmp__JKMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KKMK=execute_unlink__HHMK(__tmp__JKMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__F5JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__JKMK)->receiver__OO2H);
    unread__YVJK(Self__F5JQ->local__ALZD,Self__F5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__JKMK));
    __tmp__KKMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__KKMK=execute_unlink__IIMK(__tmp__JKMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__KKMK=execute_unlink__ZIMK(__tmp__JKMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__KKMK=execute_unlink__KJMK(__tmp__JKMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__KKMK=execute_unlink__1JMK(__tmp__JKMK);
  } break;
  case __EXPR_AND__: {
    __tmp__KKMK=execute_unlink__MKMK(__tmp__JKMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KKMK=execute_unlink__3KMK(__tmp__JKMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KKMK=execute_unlink__OLMK(__tmp__JKMK);
  } break;
  case __PUT_TO__: {
    __tmp__KKMK=execute_link__BOPK(((__PUT_TO *)__tmp__JKMK));
  } break;
  case __ITEM__: {
    __tmp__KKMK=execute_unlink__CMMK(__tmp__JKMK);
  } break;
  case __SIZE_OF__: {
    __tmp__KKMK=execute_unlink__SMMK(__tmp__JKMK);
  } break;
  case __CAST__: {
    __tmp__KKMK=execute_unlink__XMMK(__tmp__JKMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__KKMK=execute_unlink__2NQL(__tmp__JKMK);
  } break;
  case __READ_SLOT__: {
    __tmp__KKMK=execute_unlink__WDAL(__tmp__JKMK);
  } break;
  case __READ_GLOBAL__: {
    Self__H5JQ=((__READ_GLOBAL *)__tmp__JKMK);
    unread__15ML(Self__H5JQ->global__RHJK,Self__H5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__KKMK=execute_access_unlink__VMDL(Self__H5JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KKMK=execute_unlink__CRZM(__tmp__JKMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KKMK=execute_unlink__B2EO(__tmp__JKMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KKMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__JKMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KKMK=execute_unlink__R2EO(__tmp__JKMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KKMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__JKMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__KKMK=execute_unlink__XYJM(__tmp__JKMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__KKMK=execute_unlink__3NNL(__tmp__JKMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__KKMK=execute_unlink__YLZM(__tmp__JKMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__KKMK=execute_unlink__B3EO(__tmp__JKMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KKMK=execute_unlink__AJEP(__tmp__JKMK);
  } break;
  case __EXPR_INF__: {
    __tmp__KKMK=execute_unlink__CPQN(__tmp__JKMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KKMK=execute_unlink__SPQN(__tmp__JKMK);
  } break;
  case __EXPR_OR__: {
    __tmp__KKMK=execute_unlink__JDQN(__tmp__JKMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__KKMK=execute_unlink__YNUO(__tmp__JKMK);
  } break;
  };
  return(__tmp__KKMK);
}

static void* execute_unlink__MKMK(__EXPR_AND *Self__NKMK)
// ({EXPR_AND}) With resultRecursive, No inlinable.
{
  void *__tmp__QKMK,*__tmp__0KMK;
  void *__tmp__RKMK,*__tmp__1KMK;
  __READ_LOCAL *Self__VCFQ,*Self__M5JQ,*Self__XCFQ,*Self__T5JQ;
  __READ_GLOBAL *Self__O5JQ,*Self__V5JQ;
  __LIST *Self__BMZQ;
  __tmp__QKMK=Self__NKMK->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__QKMK)->__id) {
  case __LIST__: {
    __tmp__RKMK=execute_unlink__0SRJ(__tmp__QKMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__RKMK=execute_unlink__42LK(__tmp__QKMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__VCFQ=((__READ_LOCAL *)__tmp__QKMK);
    unread__YVJK(Self__VCFQ->local__ALZD,Self__VCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RKMK=execute_unlink__PBMK(__tmp__QKMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RKMK=execute_unlink__WGMK(__tmp__QKMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RKMK=execute_unlink__HHMK(__tmp__QKMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__M5JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QKMK)->receiver__OO2H);
    unread__YVJK(Self__M5JQ->local__ALZD,Self__M5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__QKMK));
    __tmp__RKMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__RKMK=execute_unlink__IIMK(__tmp__QKMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__RKMK=execute_unlink__ZIMK(__tmp__QKMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__RKMK=execute_unlink__KJMK(__tmp__QKMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__RKMK=execute_unlink__1JMK(__tmp__QKMK);
  } break;
  case __EXPR_AND__: {
    __tmp__RKMK=execute_unlink__MKMK(__tmp__QKMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RKMK=execute_unlink__3KMK(__tmp__QKMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RKMK=execute_unlink__OLMK(__tmp__QKMK);
  } break;
  case __PUT_TO__: {
    __tmp__RKMK=execute_link__BOPK(((__PUT_TO *)__tmp__QKMK));
  } break;
  case __ITEM__: {
    __tmp__RKMK=execute_unlink__CMMK(__tmp__QKMK);
  } break;
  case __SIZE_OF__: {
    __tmp__RKMK=execute_unlink__SMMK(__tmp__QKMK);
  } break;
  case __CAST__: {
    __tmp__RKMK=execute_unlink__XMMK(__tmp__QKMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__RKMK=execute_unlink__2NQL(__tmp__QKMK);
  } break;
  case __READ_SLOT__: {
    __tmp__RKMK=execute_unlink__WDAL(__tmp__QKMK);
  } break;
  case __READ_GLOBAL__: {
    Self__O5JQ=((__READ_GLOBAL *)__tmp__QKMK);
    unread__15ML(Self__O5JQ->global__RHJK,Self__O5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RKMK=execute_access_unlink__VMDL(Self__O5JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RKMK=execute_unlink__CRZM(__tmp__QKMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RKMK=execute_unlink__B2EO(__tmp__QKMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RKMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__QKMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RKMK=execute_unlink__R2EO(__tmp__QKMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RKMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__QKMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__RKMK=execute_unlink__XYJM(__tmp__QKMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__RKMK=execute_unlink__3NNL(__tmp__QKMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__RKMK=execute_unlink__YLZM(__tmp__QKMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__RKMK=execute_unlink__B3EO(__tmp__QKMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RKMK=execute_unlink__AJEP(__tmp__QKMK);
  } break;
  case __EXPR_INF__: {
    __tmp__RKMK=execute_unlink__CPQN(__tmp__QKMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RKMK=execute_unlink__SPQN(__tmp__QKMK);
  } break;
  case __EXPR_OR__: {
    __tmp__RKMK=execute_unlink__JDQN(__tmp__QKMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__RKMK=execute_unlink__YNUO(__tmp__QKMK);
  } break;
  };
  if (((void *)__tmp__RKMK != (void *)NULL)) {
    Self__BMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__BMZQ->expr_list__JUOG,__tmp__RKMK,(__INTEGER)(Self__BMZQ->index__PXRG -  1));
    Self__BMZQ->index__PXRG=(__INTEGER)(Self__BMZQ->index__PXRG +  1);
  };
  __tmp__0KMK=Self__NKMK->parent_expr_binary__ADKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__0KMK)->__id) {
  case __LIST__: {
    __tmp__1KMK=execute_unlink__0SRJ(__tmp__0KMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1KMK=execute_unlink__42LK(__tmp__0KMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__XCFQ=((__READ_LOCAL *)__tmp__0KMK);
    unread__YVJK(Self__XCFQ->local__ALZD,Self__XCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1KMK=execute_unlink__PBMK(__tmp__0KMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1KMK=execute_unlink__WGMK(__tmp__0KMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1KMK=execute_unlink__HHMK(__tmp__0KMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__T5JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0KMK)->receiver__OO2H);
    unread__YVJK(Self__T5JQ->local__ALZD,Self__T5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__0KMK));
    __tmp__1KMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__1KMK=execute_unlink__IIMK(__tmp__0KMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__1KMK=execute_unlink__ZIMK(__tmp__0KMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__1KMK=execute_unlink__KJMK(__tmp__0KMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__1KMK=execute_unlink__1JMK(__tmp__0KMK);
  } break;
  case __EXPR_AND__: {
    __tmp__1KMK=execute_unlink__MKMK(__tmp__0KMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1KMK=execute_unlink__3KMK(__tmp__0KMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1KMK=execute_unlink__OLMK(__tmp__0KMK);
  } break;
  case __PUT_TO__: {
    __tmp__1KMK=execute_link__BOPK(((__PUT_TO *)__tmp__0KMK));
  } break;
  case __ITEM__: {
    __tmp__1KMK=execute_unlink__CMMK(__tmp__0KMK);
  } break;
  case __SIZE_OF__: {
    __tmp__1KMK=execute_unlink__SMMK(__tmp__0KMK);
  } break;
  case __CAST__: {
    __tmp__1KMK=execute_unlink__XMMK(__tmp__0KMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__1KMK=execute_unlink__2NQL(__tmp__0KMK);
  } break;
  case __READ_SLOT__: {
    __tmp__1KMK=execute_unlink__WDAL(__tmp__0KMK);
  } break;
  case __READ_GLOBAL__: {
    Self__V5JQ=((__READ_GLOBAL *)__tmp__0KMK);
    unread__15ML(Self__V5JQ->global__RHJK,Self__V5JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1KMK=execute_access_unlink__VMDL(Self__V5JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1KMK=execute_unlink__CRZM(__tmp__0KMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1KMK=execute_unlink__B2EO(__tmp__0KMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1KMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__0KMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1KMK=execute_unlink__R2EO(__tmp__0KMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1KMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__0KMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__1KMK=execute_unlink__XYJM(__tmp__0KMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__1KMK=execute_unlink__3NNL(__tmp__0KMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__1KMK=execute_unlink__YLZM(__tmp__0KMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__1KMK=execute_unlink__B3EO(__tmp__0KMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1KMK=execute_unlink__AJEP(__tmp__0KMK);
  } break;
  case __EXPR_INF__: {
    __tmp__1KMK=execute_unlink__CPQN(__tmp__0KMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1KMK=execute_unlink__SPQN(__tmp__0KMK);
  } break;
  case __EXPR_OR__: {
    __tmp__1KMK=execute_unlink__JDQN(__tmp__0KMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__1KMK=execute_unlink__YNUO(__tmp__0KMK);
  } break;
  };
  return(__tmp__1KMK);
}

static void* execute_unlink__3KMK(__EXPR_SHIFT_R *Self__4KMK)
// ({EXPR_SHIFT_R}) With resultRecursive, No inlinable.
{
  void *__tmp__BLMK,*__tmp__LLMK;
  void *__tmp__CLMK,*__tmp__MLMK;
  __READ_LOCAL *Self__ZCFQ,*Self__05JQ,*Self__1CFQ,*Self__BAKQ;
  __READ_GLOBAL *Self__25JQ,*Self__DAKQ;
  __LIST *Self__DMZQ;
  __tmp__BLMK=Self__4KMK->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__BLMK)->__id) {
  case __LIST__: {
    __tmp__CLMK=execute_unlink__0SRJ(__tmp__BLMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__CLMK=execute_unlink__42LK(__tmp__BLMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__ZCFQ=((__READ_LOCAL *)__tmp__BLMK);
    unread__YVJK(Self__ZCFQ->local__ALZD,Self__ZCFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__CLMK=execute_unlink__PBMK(__tmp__BLMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__CLMK=execute_unlink__WGMK(__tmp__BLMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__CLMK=execute_unlink__HHMK(__tmp__BLMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__05JQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BLMK)->receiver__OO2H);
    unread__YVJK(Self__05JQ->local__ALZD,Self__05JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__BLMK));
    __tmp__CLMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__CLMK=execute_unlink__IIMK(__tmp__BLMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__CLMK=execute_unlink__ZIMK(__tmp__BLMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__CLMK=execute_unlink__KJMK(__tmp__BLMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__CLMK=execute_unlink__1JMK(__tmp__BLMK);
  } break;
  case __EXPR_AND__: {
    __tmp__CLMK=execute_unlink__MKMK(__tmp__BLMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__CLMK=execute_unlink__3KMK(__tmp__BLMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__CLMK=execute_unlink__OLMK(__tmp__BLMK);
  } break;
  case __PUT_TO__: {
    __tmp__CLMK=execute_link__BOPK(((__PUT_TO *)__tmp__BLMK));
  } break;
  case __ITEM__: {
    __tmp__CLMK=execute_unlink__CMMK(__tmp__BLMK);
  } break;
  case __SIZE_OF__: {
    __tmp__CLMK=execute_unlink__SMMK(__tmp__BLMK);
  } break;
  case __CAST__: {
    __tmp__CLMK=execute_unlink__XMMK(__tmp__BLMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__CLMK=execute_unlink__2NQL(__tmp__BLMK);
  } break;
  case __READ_SLOT__: {
    __tmp__CLMK=execute_unlink__WDAL(__tmp__BLMK);
  } break;
  case __READ_GLOBAL__: {
    Self__25JQ=((__READ_GLOBAL *)__tmp__BLMK);
    unread__15ML(Self__25JQ->global__RHJK,Self__25JQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CLMK=execute_access_unlink__VMDL(Self__25JQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__CLMK=execute_unlink__CRZM(__tmp__BLMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__CLMK=execute_unlink__B2EO(__tmp__BLMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__CLMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__BLMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__CLMK=execute_unlink__R2EO(__tmp__BLMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__CLMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__BLMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__CLMK=execute_unlink__XYJM(__tmp__BLMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__CLMK=execute_unlink__3NNL(__tmp__BLMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__CLMK=execute_unlink__YLZM(__tmp__BLMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__CLMK=execute_unlink__B3EO(__tmp__BLMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__CLMK=execute_unlink__AJEP(__tmp__BLMK);
  } break;
  case __EXPR_INF__: {
    __tmp__CLMK=execute_unlink__CPQN(__tmp__BLMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__CLMK=execute_unlink__SPQN(__tmp__BLMK);
  } break;
  case __EXPR_OR__: {
    __tmp__CLMK=execute_unlink__JDQN(__tmp__BLMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__CLMK=execute_unlink__YNUO(__tmp__BLMK);
  } break;
  };
  if (((void *)__tmp__CLMK != (void *)NULL)) {
    Self__DMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__DMZQ->expr_list__JUOG,__tmp__CLMK,(__INTEGER)(Self__DMZQ->index__PXRG -  1));
    Self__DMZQ->index__PXRG=(__INTEGER)(Self__DMZQ->index__PXRG +  1);
  };
  __tmp__LLMK=Self__4KMK->parent_expr_binary__TDKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__LLMK)->__id) {
  case __LIST__: {
    __tmp__MLMK=execute_unlink__0SRJ(__tmp__LLMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__MLMK=execute_unlink__42LK(__tmp__LLMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__1CFQ=((__READ_LOCAL *)__tmp__LLMK);
    unread__YVJK(Self__1CFQ->local__ALZD,Self__1CFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MLMK=execute_unlink__PBMK(__tmp__LLMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MLMK=execute_unlink__WGMK(__tmp__LLMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MLMK=execute_unlink__HHMK(__tmp__LLMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__BAKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LLMK)->receiver__OO2H);
    unread__YVJK(Self__BAKQ->local__ALZD,Self__BAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__LLMK));
    __tmp__MLMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__MLMK=execute_unlink__IIMK(__tmp__LLMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__MLMK=execute_unlink__ZIMK(__tmp__LLMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__MLMK=execute_unlink__KJMK(__tmp__LLMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__MLMK=execute_unlink__1JMK(__tmp__LLMK);
  } break;
  case __EXPR_AND__: {
    __tmp__MLMK=execute_unlink__MKMK(__tmp__LLMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MLMK=execute_unlink__3KMK(__tmp__LLMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MLMK=execute_unlink__OLMK(__tmp__LLMK);
  } break;
  case __PUT_TO__: {
    __tmp__MLMK=execute_link__BOPK(((__PUT_TO *)__tmp__LLMK));
  } break;
  case __ITEM__: {
    __tmp__MLMK=execute_unlink__CMMK(__tmp__LLMK);
  } break;
  case __SIZE_OF__: {
    __tmp__MLMK=execute_unlink__SMMK(__tmp__LLMK);
  } break;
  case __CAST__: {
    __tmp__MLMK=execute_unlink__XMMK(__tmp__LLMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__MLMK=execute_unlink__2NQL(__tmp__LLMK);
  } break;
  case __READ_SLOT__: {
    __tmp__MLMK=execute_unlink__WDAL(__tmp__LLMK);
  } break;
  case __READ_GLOBAL__: {
    Self__DAKQ=((__READ_GLOBAL *)__tmp__LLMK);
    unread__15ML(Self__DAKQ->global__RHJK,Self__DAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MLMK=execute_access_unlink__VMDL(Self__DAKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MLMK=execute_unlink__CRZM(__tmp__LLMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MLMK=execute_unlink__B2EO(__tmp__LLMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MLMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__LLMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MLMK=execute_unlink__R2EO(__tmp__LLMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MLMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__LLMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__MLMK=execute_unlink__XYJM(__tmp__LLMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__MLMK=execute_unlink__3NNL(__tmp__LLMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__MLMK=execute_unlink__YLZM(__tmp__LLMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__MLMK=execute_unlink__B3EO(__tmp__LLMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MLMK=execute_unlink__AJEP(__tmp__LLMK);
  } break;
  case __EXPR_INF__: {
    __tmp__MLMK=execute_unlink__CPQN(__tmp__LLMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MLMK=execute_unlink__SPQN(__tmp__LLMK);
  } break;
  case __EXPR_OR__: {
    __tmp__MLMK=execute_unlink__JDQN(__tmp__LLMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__MLMK=execute_unlink__YNUO(__tmp__LLMK);
  } break;
  };
  return(__tmp__MLMK);
}

static void* execute_unlink__OLMK(__EXPR_SHIFT_L *Self__PLMK)
// ({EXPR_SHIFT_L}) With resultRecursive, No inlinable.
{
  void *__tmp__SLMK,*__tmp__2LMK;
  void *__tmp__TLMK,*__tmp__3LMK;
  __READ_LOCAL *Self__3CFQ,*Self__IAKQ,*Self__5CFQ,*Self__PAKQ;
  __READ_GLOBAL *Self__KAKQ,*Self__RAKQ;
  __LIST *Self__FMZQ;
  __tmp__SLMK=Self__PLMK->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__SLMK)->__id) {
  case __LIST__: {
    __tmp__TLMK=execute_unlink__0SRJ(__tmp__SLMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__TLMK=execute_unlink__42LK(__tmp__SLMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__3CFQ=((__READ_LOCAL *)__tmp__SLMK);
    unread__YVJK(Self__3CFQ->local__ALZD,Self__3CFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TLMK=execute_unlink__PBMK(__tmp__SLMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TLMK=execute_unlink__WGMK(__tmp__SLMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TLMK=execute_unlink__HHMK(__tmp__SLMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__IAKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__SLMK)->receiver__OO2H);
    unread__YVJK(Self__IAKQ->local__ALZD,Self__IAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__SLMK));
    __tmp__TLMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__TLMK=execute_unlink__IIMK(__tmp__SLMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__TLMK=execute_unlink__ZIMK(__tmp__SLMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__TLMK=execute_unlink__KJMK(__tmp__SLMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__TLMK=execute_unlink__1JMK(__tmp__SLMK);
  } break;
  case __EXPR_AND__: {
    __tmp__TLMK=execute_unlink__MKMK(__tmp__SLMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TLMK=execute_unlink__3KMK(__tmp__SLMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TLMK=execute_unlink__OLMK(__tmp__SLMK);
  } break;
  case __PUT_TO__: {
    __tmp__TLMK=execute_link__BOPK(((__PUT_TO *)__tmp__SLMK));
  } break;
  case __ITEM__: {
    __tmp__TLMK=execute_unlink__CMMK(__tmp__SLMK);
  } break;
  case __SIZE_OF__: {
    __tmp__TLMK=execute_unlink__SMMK(__tmp__SLMK);
  } break;
  case __CAST__: {
    __tmp__TLMK=execute_unlink__XMMK(__tmp__SLMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__TLMK=execute_unlink__2NQL(__tmp__SLMK);
  } break;
  case __READ_SLOT__: {
    __tmp__TLMK=execute_unlink__WDAL(__tmp__SLMK);
  } break;
  case __READ_GLOBAL__: {
    Self__KAKQ=((__READ_GLOBAL *)__tmp__SLMK);
    unread__15ML(Self__KAKQ->global__RHJK,Self__KAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TLMK=execute_access_unlink__VMDL(Self__KAKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TLMK=execute_unlink__CRZM(__tmp__SLMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TLMK=execute_unlink__B2EO(__tmp__SLMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TLMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__SLMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TLMK=execute_unlink__R2EO(__tmp__SLMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TLMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__SLMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__TLMK=execute_unlink__XYJM(__tmp__SLMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__TLMK=execute_unlink__3NNL(__tmp__SLMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__TLMK=execute_unlink__YLZM(__tmp__SLMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__TLMK=execute_unlink__B3EO(__tmp__SLMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TLMK=execute_unlink__AJEP(__tmp__SLMK);
  } break;
  case __EXPR_INF__: {
    __tmp__TLMK=execute_unlink__CPQN(__tmp__SLMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TLMK=execute_unlink__SPQN(__tmp__SLMK);
  } break;
  case __EXPR_OR__: {
    __tmp__TLMK=execute_unlink__JDQN(__tmp__SLMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__TLMK=execute_unlink__YNUO(__tmp__SLMK);
  } break;
  };
  if (((void *)__tmp__TLMK != (void *)NULL)) {
    Self__FMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__FMZQ->expr_list__JUOG,__tmp__TLMK,(__INTEGER)(Self__FMZQ->index__PXRG -  1));
    Self__FMZQ->index__PXRG=(__INTEGER)(Self__FMZQ->index__PXRG +  1);
  };
  __tmp__2LMK=Self__PLMK->parent_expr_binary__GEKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__2LMK)->__id) {
  case __LIST__: {
    __tmp__3LMK=execute_unlink__0SRJ(__tmp__2LMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__3LMK=execute_unlink__42LK(__tmp__2LMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__5CFQ=((__READ_LOCAL *)__tmp__2LMK);
    unread__YVJK(Self__5CFQ->local__ALZD,Self__5CFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3LMK=execute_unlink__PBMK(__tmp__2LMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3LMK=execute_unlink__WGMK(__tmp__2LMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3LMK=execute_unlink__HHMK(__tmp__2LMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__PAKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2LMK)->receiver__OO2H);
    unread__YVJK(Self__PAKQ->local__ALZD,Self__PAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__2LMK));
    __tmp__3LMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__3LMK=execute_unlink__IIMK(__tmp__2LMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__3LMK=execute_unlink__ZIMK(__tmp__2LMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__3LMK=execute_unlink__KJMK(__tmp__2LMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__3LMK=execute_unlink__1JMK(__tmp__2LMK);
  } break;
  case __EXPR_AND__: {
    __tmp__3LMK=execute_unlink__MKMK(__tmp__2LMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3LMK=execute_unlink__3KMK(__tmp__2LMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3LMK=execute_unlink__OLMK(__tmp__2LMK);
  } break;
  case __PUT_TO__: {
    __tmp__3LMK=execute_link__BOPK(((__PUT_TO *)__tmp__2LMK));
  } break;
  case __ITEM__: {
    __tmp__3LMK=execute_unlink__CMMK(__tmp__2LMK);
  } break;
  case __SIZE_OF__: {
    __tmp__3LMK=execute_unlink__SMMK(__tmp__2LMK);
  } break;
  case __CAST__: {
    __tmp__3LMK=execute_unlink__XMMK(__tmp__2LMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__3LMK=execute_unlink__2NQL(__tmp__2LMK);
  } break;
  case __READ_SLOT__: {
    __tmp__3LMK=execute_unlink__WDAL(__tmp__2LMK);
  } break;
  case __READ_GLOBAL__: {
    Self__RAKQ=((__READ_GLOBAL *)__tmp__2LMK);
    unread__15ML(Self__RAKQ->global__RHJK,Self__RAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3LMK=execute_access_unlink__VMDL(Self__RAKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3LMK=execute_unlink__CRZM(__tmp__2LMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3LMK=execute_unlink__B2EO(__tmp__2LMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3LMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__2LMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3LMK=execute_unlink__R2EO(__tmp__2LMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3LMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__2LMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__3LMK=execute_unlink__XYJM(__tmp__2LMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__3LMK=execute_unlink__3NNL(__tmp__2LMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__3LMK=execute_unlink__YLZM(__tmp__2LMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__3LMK=execute_unlink__B3EO(__tmp__2LMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3LMK=execute_unlink__AJEP(__tmp__2LMK);
  } break;
  case __EXPR_INF__: {
    __tmp__3LMK=execute_unlink__CPQN(__tmp__2LMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3LMK=execute_unlink__SPQN(__tmp__2LMK);
  } break;
  case __EXPR_OR__: {
    __tmp__3LMK=execute_unlink__JDQN(__tmp__2LMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__3LMK=execute_unlink__YNUO(__tmp__2LMK);
  } break;
  };
  return(__tmp__3LMK);
}

static void* execute_link__BOPK(__PUT_TO *Self__COPK)
// ({PUT_TO}) With resultRecursive, No inlinable.
{
  void *__tmp__EOPK,*__tmp__FOPK,*__tmp__GOPK,*__tmp__HOPK,*__tmp__IOPK;
  void *__tmp__JOPK;
  __tmp__EOPK=Self__COPK->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__EOPK)->__id) {
  case __LIST__: {
    __tmp__FOPK=execute_link__LUOG(__tmp__EOPK);
  } break;
  case __STRING_CST__: {
    __tmp__FOPK=((__STRING_CST *)__tmp__EOPK);
  } break;
  case __EXTERNAL_C__: {
    __tmp__FOPK=execute_link__U5ZK(__tmp__EOPK);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__FOPK=((__PROTOTYPE_CST *)__tmp__EOPK);
  } break;
  case __INTEGER_CST__: {
    __tmp__FOPK=((__INTEGER_CST *)__tmp__EOPK);
  } break;
  case __READ_LOCAL__: {
    __tmp__FOPK=execute_link__EHAL(__tmp__EOPK);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FOPK=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FOPK=execute_link__2LAL(__tmp__EOPK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FOPK=execute_link__FQAL(__tmp__EOPK);
  } break;
  case __REAL_CST__: {
    __tmp__FOPK=((__REAL_CST *)__tmp__EOPK);
  } break;
  case __CHARACTER_CST__: {
    __tmp__FOPK=((__CHARACTER_CST *)__tmp__EOPK);
  } break;
  case __IS_EXPANDED__: {
    __tmp__FOPK=execute_link__UUAL(__tmp__EOPK);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FOPK=execute_link__1VAL(__tmp__EOPK);
  } break;
  case __EXPR_SUP__: {
    __tmp__FOPK=execute_link__AWAL(__tmp__EOPK);
  } break;
  case __EXPR_SUB__: {
    __tmp__FOPK=execute_link__J0AL(__tmp__EOPK);
  } break;
  case __EXPR_MUL__: {
    __tmp__FOPK=execute_link__S4AL(__tmp__EOPK);
  } break;
  case __EXPR_DIV__: {
    __tmp__FOPK=execute_link__1CBL(__tmp__EOPK);
  } break;
  case __EXPR_AND__: {
    __tmp__FOPK=execute_link__EHBL(__tmp__EOPK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FOPK=execute_link__NLBL(__tmp__EOPK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FOPK=execute_link__WPBL(__tmp__EOPK);
  } break;
  case __PUT_TO__: {
    __tmp__FOPK=execute_link__BOPK(__tmp__EOPK);
  } break;
  case __ITEM__: {
    __tmp__FOPK=execute_link__5TBL(__tmp__EOPK);
  } break;
  case __SIZE_OF__: {
    __tmp__FOPK=execute_link__GUBL(__tmp__EOPK);
  } break;
  case __CAST__: {
    __tmp__FOPK=execute_link__LUBL(__tmp__EOPK);
  } break;
  case __CALL_SLOT__: {
    __tmp__FOPK=execute_link__A2TL(__tmp__EOPK);
  } break;
  case __READ_SLOT__: {
    __tmp__FOPK=execute_link__EYBL(__tmp__EOPK);
  } break;
  case __READ_GLOBAL__: {
    __tmp__FOPK=execute_link__U2BL(__tmp__EOPK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FOPK=execute_link__SRZM(__tmp__EOPK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FOPK=execute_link__OBFO(__tmp__EOPK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FOPK=execute_link__GJLO(__tmp__EOPK);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FOPK=execute_link__HHFO(__tmp__EOPK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FOPK=execute_link__KPLO(__tmp__EOPK);
  } break;
  case __EXPR_NEG__: {
    __tmp__FOPK=execute_link__0GKM(__tmp__EOPK);
  } break;
  case __EXPR_ADD__: {
    __tmp__FOPK=execute_link__RROL(__tmp__EOPK);
  } break;
  case __EXPR_NOT__: {
    __tmp__FOPK=execute_link__GUZM(__tmp__EOPK);
  } break;
  case __EXPR_MOD__: {
    __tmp__FOPK=execute_link__ANFO(__tmp__EOPK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FOPK=execute_link__YLEP(__tmp__EOPK);
  } break;
  case __EXPR_INF__: {
    __tmp__FOPK=execute_link__VQQN(__tmp__EOPK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FOPK=execute_link__4UQN(__tmp__EOPK);
  } break;
  case __EXPR_OR__: {
    __tmp__FOPK=execute_link__1HQN(__tmp__EOPK);
  } break;
  case __EXPR_XOR__: {
    __tmp__FOPK=execute_link__IYUO(__tmp__EOPK);
  } break;
  };
  Self__COPK->receiver__OR2H=__tmp__FOPK;
  __tmp__GOPK=Self__COPK->index__SR2H;
  switch (((struct ___OBJ *)__tmp__GOPK)->__id) {
  case __LIST__: {
    __tmp__HOPK=execute_link__LUOG(__tmp__GOPK);
  } break;
  case __STRING_CST__: {
    __tmp__HOPK=((__STRING_CST *)__tmp__GOPK);
  } break;
  case __EXTERNAL_C__: {
    __tmp__HOPK=execute_link__U5ZK(__tmp__GOPK);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__HOPK=((__PROTOTYPE_CST *)__tmp__GOPK);
  } break;
  case __INTEGER_CST__: {
    __tmp__HOPK=((__INTEGER_CST *)__tmp__GOPK);
  } break;
  case __READ_LOCAL__: {
    __tmp__HOPK=execute_link__EHAL(__tmp__GOPK);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HOPK=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HOPK=execute_link__2LAL(__tmp__GOPK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HOPK=execute_link__FQAL(__tmp__GOPK);
  } break;
  case __REAL_CST__: {
    __tmp__HOPK=((__REAL_CST *)__tmp__GOPK);
  } break;
  case __CHARACTER_CST__: {
    __tmp__HOPK=((__CHARACTER_CST *)__tmp__GOPK);
  } break;
  case __IS_EXPANDED__: {
    __tmp__HOPK=execute_link__UUAL(__tmp__GOPK);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__HOPK=execute_link__1VAL(__tmp__GOPK);
  } break;
  case __EXPR_SUP__: {
    __tmp__HOPK=execute_link__AWAL(__tmp__GOPK);
  } break;
  case __EXPR_SUB__: {
    __tmp__HOPK=execute_link__J0AL(__tmp__GOPK);
  } break;
  case __EXPR_MUL__: {
    __tmp__HOPK=execute_link__S4AL(__tmp__GOPK);
  } break;
  case __EXPR_DIV__: {
    __tmp__HOPK=execute_link__1CBL(__tmp__GOPK);
  } break;
  case __EXPR_AND__: {
    __tmp__HOPK=execute_link__EHBL(__tmp__GOPK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HOPK=execute_link__NLBL(__tmp__GOPK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HOPK=execute_link__WPBL(__tmp__GOPK);
  } break;
  case __PUT_TO__: {
    __tmp__HOPK=execute_link__BOPK(__tmp__GOPK);
  } break;
  case __ITEM__: {
    __tmp__HOPK=execute_link__5TBL(__tmp__GOPK);
  } break;
  case __SIZE_OF__: {
    __tmp__HOPK=execute_link__GUBL(__tmp__GOPK);
  } break;
  case __CAST__: {
    __tmp__HOPK=execute_link__LUBL(__tmp__GOPK);
  } break;
  case __CALL_SLOT__: {
    __tmp__HOPK=execute_link__A2TL(__tmp__GOPK);
  } break;
  case __READ_SLOT__: {
    __tmp__HOPK=execute_link__EYBL(__tmp__GOPK);
  } break;
  case __READ_GLOBAL__: {
    __tmp__HOPK=execute_link__U2BL(__tmp__GOPK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HOPK=execute_link__SRZM(__tmp__GOPK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HOPK=execute_link__OBFO(__tmp__GOPK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HOPK=execute_link__GJLO(__tmp__GOPK);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HOPK=execute_link__HHFO(__tmp__GOPK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HOPK=execute_link__KPLO(__tmp__GOPK);
  } break;
  case __EXPR_NEG__: {
    __tmp__HOPK=execute_link__0GKM(__tmp__GOPK);
  } break;
  case __EXPR_ADD__: {
    __tmp__HOPK=execute_link__RROL(__tmp__GOPK);
  } break;
  case __EXPR_NOT__: {
    __tmp__HOPK=execute_link__GUZM(__tmp__GOPK);
  } break;
  case __EXPR_MOD__: {
    __tmp__HOPK=execute_link__ANFO(__tmp__GOPK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HOPK=execute_link__YLEP(__tmp__GOPK);
  } break;
  case __EXPR_INF__: {
    __tmp__HOPK=execute_link__VQQN(__tmp__GOPK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HOPK=execute_link__4UQN(__tmp__GOPK);
  } break;
  case __EXPR_OR__: {
    __tmp__HOPK=execute_link__1HQN(__tmp__GOPK);
  } break;
  case __EXPR_XOR__: {
    __tmp__HOPK=execute_link__IYUO(__tmp__GOPK);
  } break;
  };
  Self__COPK->index__SR2H=__tmp__HOPK;
  __tmp__IOPK=Self__COPK->value__WR2H;
  switch (((struct ___OBJ *)__tmp__IOPK)->__id) {
  case __LIST__: {
    __tmp__JOPK=execute_link__LUOG(__tmp__IOPK);
  } break;
  case __STRING_CST__: {
    __tmp__JOPK=((__STRING_CST *)__tmp__IOPK);
  } break;
  case __EXTERNAL_C__: {
    __tmp__JOPK=execute_link__U5ZK(__tmp__IOPK);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__JOPK=((__PROTOTYPE_CST *)__tmp__IOPK);
  } break;
  case __INTEGER_CST__: {
    __tmp__JOPK=((__INTEGER_CST *)__tmp__IOPK);
  } break;
  case __READ_LOCAL__: {
    __tmp__JOPK=execute_link__EHAL(__tmp__IOPK);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__JOPK=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__JOPK=execute_link__2LAL(__tmp__IOPK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__JOPK=execute_link__FQAL(__tmp__IOPK);
  } break;
  case __REAL_CST__: {
    __tmp__JOPK=((__REAL_CST *)__tmp__IOPK);
  } break;
  case __CHARACTER_CST__: {
    __tmp__JOPK=((__CHARACTER_CST *)__tmp__IOPK);
  } break;
  case __IS_EXPANDED__: {
    __tmp__JOPK=execute_link__UUAL(__tmp__IOPK);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__JOPK=execute_link__1VAL(__tmp__IOPK);
  } break;
  case __EXPR_SUP__: {
    __tmp__JOPK=execute_link__AWAL(__tmp__IOPK);
  } break;
  case __EXPR_SUB__: {
    __tmp__JOPK=execute_link__J0AL(__tmp__IOPK);
  } break;
  case __EXPR_MUL__: {
    __tmp__JOPK=execute_link__S4AL(__tmp__IOPK);
  } break;
  case __EXPR_DIV__: {
    __tmp__JOPK=execute_link__1CBL(__tmp__IOPK);
  } break;
  case __EXPR_AND__: {
    __tmp__JOPK=execute_link__EHBL(__tmp__IOPK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__JOPK=execute_link__NLBL(__tmp__IOPK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__JOPK=execute_link__WPBL(__tmp__IOPK);
  } break;
  case __PUT_TO__: {
    __tmp__JOPK=execute_link__BOPK(__tmp__IOPK);
  } break;
  case __ITEM__: {
    __tmp__JOPK=execute_link__5TBL(__tmp__IOPK);
  } break;
  case __SIZE_OF__: {
    __tmp__JOPK=execute_link__GUBL(__tmp__IOPK);
  } break;
  case __CAST__: {
    __tmp__JOPK=execute_link__LUBL(__tmp__IOPK);
  } break;
  case __CALL_SLOT__: {
    __tmp__JOPK=execute_link__A2TL(__tmp__IOPK);
  } break;
  case __READ_SLOT__: {
    __tmp__JOPK=execute_link__EYBL(__tmp__IOPK);
  } break;
  case __READ_GLOBAL__: {
    __tmp__JOPK=execute_link__U2BL(__tmp__IOPK);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__JOPK=execute_link__SRZM(__tmp__IOPK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__JOPK=execute_link__OBFO(__tmp__IOPK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__JOPK=execute_link__GJLO(__tmp__IOPK);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__JOPK=execute_link__HHFO(__tmp__IOPK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__JOPK=execute_link__KPLO(__tmp__IOPK);
  } break;
  case __EXPR_NEG__: {
    __tmp__JOPK=execute_link__0GKM(__tmp__IOPK);
  } break;
  case __EXPR_ADD__: {
    __tmp__JOPK=execute_link__RROL(__tmp__IOPK);
  } break;
  case __EXPR_NOT__: {
    __tmp__JOPK=execute_link__GUZM(__tmp__IOPK);
  } break;
  case __EXPR_MOD__: {
    __tmp__JOPK=execute_link__ANFO(__tmp__IOPK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__JOPK=execute_link__YLEP(__tmp__IOPK);
  } break;
  case __EXPR_INF__: {
    __tmp__JOPK=execute_link__VQQN(__tmp__IOPK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__JOPK=execute_link__4UQN(__tmp__IOPK);
  } break;
  case __EXPR_OR__: {
    __tmp__JOPK=execute_link__1HQN(__tmp__IOPK);
  } break;
  case __EXPR_XOR__: {
    __tmp__JOPK=execute_link__IYUO(__tmp__IOPK);
  } break;
  };
  Self__COPK->value__WR2H=__tmp__JOPK;
  return(Self__COPK);
}

static void* execute_unlink__CMMK(__ITEM *Self__DMMK)
// ({ITEM}) With resultRecursive, No inlinable.
{
  void *__tmp__GMMK,*__tmp__QMMK;
  void *__tmp__HMMK,*__tmp__RMMK;
  __READ_LOCAL *Self__BDFQ,*Self__WAKQ,*Self__EDFQ,*Self__2AKQ;
  __READ_GLOBAL *Self__XAKQ,*Self__3AKQ;
  __LIST *Self__HMZQ;
  __tmp__GMMK=Self__DMMK->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__GMMK)->__id) {
  case __LIST__: {
    __tmp__HMMK=execute_unlink__0SRJ(__tmp__GMMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__HMMK=execute_unlink__42LK(__tmp__GMMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__BDFQ=((__READ_LOCAL *)__tmp__GMMK);
    unread__YVJK(Self__BDFQ->local__ALZD,Self__BDFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HMMK=execute_unlink__PBMK(__tmp__GMMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HMMK=execute_unlink__WGMK(__tmp__GMMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HMMK=execute_unlink__HHMK(__tmp__GMMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__WAKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GMMK)->receiver__OO2H);
    unread__YVJK(Self__WAKQ->local__ALZD,Self__WAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__GMMK));
    __tmp__HMMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__HMMK=execute_unlink__IIMK(__tmp__GMMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__HMMK=execute_unlink__ZIMK(__tmp__GMMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__HMMK=execute_unlink__KJMK(__tmp__GMMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__HMMK=execute_unlink__1JMK(__tmp__GMMK);
  } break;
  case __EXPR_AND__: {
    __tmp__HMMK=execute_unlink__MKMK(__tmp__GMMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HMMK=execute_unlink__3KMK(__tmp__GMMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HMMK=execute_unlink__OLMK(__tmp__GMMK);
  } break;
  case __PUT_TO__: {
    __tmp__HMMK=execute_link__BOPK(((__PUT_TO *)__tmp__GMMK));
  } break;
  case __ITEM__: {
    __tmp__HMMK=execute_unlink__CMMK(__tmp__GMMK);
  } break;
  case __SIZE_OF__: {
    __tmp__HMMK=execute_unlink__SMMK(__tmp__GMMK);
  } break;
  case __CAST__: {
    __tmp__HMMK=execute_unlink__XMMK(__tmp__GMMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__HMMK=execute_unlink__2NQL(__tmp__GMMK);
  } break;
  case __READ_SLOT__: {
    __tmp__HMMK=execute_unlink__WDAL(__tmp__GMMK);
  } break;
  case __READ_GLOBAL__: {
    Self__XAKQ=((__READ_GLOBAL *)__tmp__GMMK);
    unread__15ML(Self__XAKQ->global__RHJK,Self__XAKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HMMK=execute_access_unlink__VMDL(Self__XAKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HMMK=execute_unlink__CRZM(__tmp__GMMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HMMK=execute_unlink__B2EO(__tmp__GMMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HMMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__GMMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HMMK=execute_unlink__R2EO(__tmp__GMMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HMMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__GMMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__HMMK=execute_unlink__XYJM(__tmp__GMMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__HMMK=execute_unlink__3NNL(__tmp__GMMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__HMMK=execute_unlink__YLZM(__tmp__GMMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__HMMK=execute_unlink__B3EO(__tmp__GMMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HMMK=execute_unlink__AJEP(__tmp__GMMK);
  } break;
  case __EXPR_INF__: {
    __tmp__HMMK=execute_unlink__CPQN(__tmp__GMMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HMMK=execute_unlink__SPQN(__tmp__GMMK);
  } break;
  case __EXPR_OR__: {
    __tmp__HMMK=execute_unlink__JDQN(__tmp__GMMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__HMMK=execute_unlink__YNUO(__tmp__GMMK);
  } break;
  };
  if (((void *)__tmp__HMMK != (void *)NULL)) {
    Self__HMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__HMZQ->expr_list__JUOG,__tmp__HMMK,(__INTEGER)(Self__HMZQ->index__PXRG -  1));
    Self__HMZQ->index__PXRG=(__INTEGER)(Self__HMZQ->index__PXRG +  1);
  };
  __tmp__QMMK=Self__DMMK->index__CS2H;
  switch (((struct ___OBJ *)__tmp__QMMK)->__id) {
  case __LIST__: {
    __tmp__RMMK=execute_unlink__0SRJ(__tmp__QMMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__RMMK=execute_unlink__42LK(__tmp__QMMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__EDFQ=((__READ_LOCAL *)__tmp__QMMK);
    unread__YVJK(Self__EDFQ->local__ALZD,Self__EDFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RMMK=execute_unlink__PBMK(__tmp__QMMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RMMK=execute_unlink__WGMK(__tmp__QMMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RMMK=execute_unlink__HHMK(__tmp__QMMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__2AKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QMMK)->receiver__OO2H);
    unread__YVJK(Self__2AKQ->local__ALZD,Self__2AKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__QMMK));
    __tmp__RMMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__RMMK=execute_unlink__IIMK(__tmp__QMMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__RMMK=execute_unlink__ZIMK(__tmp__QMMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__RMMK=execute_unlink__KJMK(__tmp__QMMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__RMMK=execute_unlink__1JMK(__tmp__QMMK);
  } break;
  case __EXPR_AND__: {
    __tmp__RMMK=execute_unlink__MKMK(__tmp__QMMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RMMK=execute_unlink__3KMK(__tmp__QMMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RMMK=execute_unlink__OLMK(__tmp__QMMK);
  } break;
  case __PUT_TO__: {
    __tmp__RMMK=execute_link__BOPK(((__PUT_TO *)__tmp__QMMK));
  } break;
  case __ITEM__: {
    __tmp__RMMK=execute_unlink__CMMK(__tmp__QMMK);
  } break;
  case __SIZE_OF__: {
    __tmp__RMMK=execute_unlink__SMMK(__tmp__QMMK);
  } break;
  case __CAST__: {
    __tmp__RMMK=execute_unlink__XMMK(__tmp__QMMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__RMMK=execute_unlink__2NQL(__tmp__QMMK);
  } break;
  case __READ_SLOT__: {
    __tmp__RMMK=execute_unlink__WDAL(__tmp__QMMK);
  } break;
  case __READ_GLOBAL__: {
    Self__3AKQ=((__READ_GLOBAL *)__tmp__QMMK);
    unread__15ML(Self__3AKQ->global__RHJK,Self__3AKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RMMK=execute_access_unlink__VMDL(Self__3AKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RMMK=execute_unlink__CRZM(__tmp__QMMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RMMK=execute_unlink__B2EO(__tmp__QMMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RMMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__QMMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RMMK=execute_unlink__R2EO(__tmp__QMMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RMMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__QMMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__RMMK=execute_unlink__XYJM(__tmp__QMMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__RMMK=execute_unlink__3NNL(__tmp__QMMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__RMMK=execute_unlink__YLZM(__tmp__QMMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__RMMK=execute_unlink__B3EO(__tmp__QMMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RMMK=execute_unlink__AJEP(__tmp__QMMK);
  } break;
  case __EXPR_INF__: {
    __tmp__RMMK=execute_unlink__CPQN(__tmp__QMMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RMMK=execute_unlink__SPQN(__tmp__QMMK);
  } break;
  case __EXPR_OR__: {
    __tmp__RMMK=execute_unlink__JDQN(__tmp__QMMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__RMMK=execute_unlink__YNUO(__tmp__QMMK);
  } break;
  };
  return(__tmp__RMMK);
}

static void* execute_unlink__SMMK(__SIZE_OF *Self__TMMK)
// ({SIZE_OF}) With resultRecursive, No inlinable.
{
  void *__tmp__VMMK;
  void *__tmp__WMMK;
  __READ_LOCAL *Self__HDFQ,*Self__CBKQ;
  __READ_GLOBAL *Self__DBKQ;
  __tmp__VMMK=Self__TMMK->receiver__LS2H;
  switch (((struct ___OBJ *)__tmp__VMMK)->__id) {
  case __LIST__: {
    __tmp__WMMK=execute_unlink__0SRJ(__tmp__VMMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__WMMK=execute_unlink__42LK(__tmp__VMMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__HDFQ=((__READ_LOCAL *)__tmp__VMMK);
    unread__YVJK(Self__HDFQ->local__ALZD,Self__HDFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WMMK=execute_unlink__PBMK(__tmp__VMMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WMMK=execute_unlink__WGMK(__tmp__VMMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WMMK=execute_unlink__HHMK(__tmp__VMMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__CBKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__VMMK)->receiver__OO2H);
    unread__YVJK(Self__CBKQ->local__ALZD,Self__CBKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__VMMK));
    __tmp__WMMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__WMMK=execute_unlink__IIMK(__tmp__VMMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__WMMK=execute_unlink__ZIMK(__tmp__VMMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__WMMK=execute_unlink__KJMK(__tmp__VMMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__WMMK=execute_unlink__1JMK(__tmp__VMMK);
  } break;
  case __EXPR_AND__: {
    __tmp__WMMK=execute_unlink__MKMK(__tmp__VMMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WMMK=execute_unlink__3KMK(__tmp__VMMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WMMK=execute_unlink__OLMK(__tmp__VMMK);
  } break;
  case __PUT_TO__: {
    __tmp__WMMK=execute_link__BOPK(((__PUT_TO *)__tmp__VMMK));
  } break;
  case __ITEM__: {
    __tmp__WMMK=execute_unlink__CMMK(__tmp__VMMK);
  } break;
  case __SIZE_OF__: {
    __tmp__WMMK=execute_unlink__SMMK(__tmp__VMMK);
  } break;
  case __CAST__: {
    __tmp__WMMK=execute_unlink__XMMK(__tmp__VMMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__WMMK=execute_unlink__2NQL(__tmp__VMMK);
  } break;
  case __READ_SLOT__: {
    __tmp__WMMK=execute_unlink__WDAL(__tmp__VMMK);
  } break;
  case __READ_GLOBAL__: {
    Self__DBKQ=((__READ_GLOBAL *)__tmp__VMMK);
    unread__15ML(Self__DBKQ->global__RHJK,Self__DBKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__WMMK=execute_access_unlink__VMDL(Self__DBKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WMMK=execute_unlink__CRZM(__tmp__VMMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WMMK=execute_unlink__B2EO(__tmp__VMMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WMMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__VMMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WMMK=execute_unlink__R2EO(__tmp__VMMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WMMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__VMMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__WMMK=execute_unlink__XYJM(__tmp__VMMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__WMMK=execute_unlink__3NNL(__tmp__VMMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__WMMK=execute_unlink__YLZM(__tmp__VMMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__WMMK=execute_unlink__B3EO(__tmp__VMMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WMMK=execute_unlink__AJEP(__tmp__VMMK);
  } break;
  case __EXPR_INF__: {
    __tmp__WMMK=execute_unlink__CPQN(__tmp__VMMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WMMK=execute_unlink__SPQN(__tmp__VMMK);
  } break;
  case __EXPR_OR__: {
    __tmp__WMMK=execute_unlink__JDQN(__tmp__VMMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__WMMK=execute_unlink__YNUO(__tmp__VMMK);
  } break;
  };
  return(__tmp__WMMK);
}

static void* execute_unlink__XMMK(__CAST *Self__YMMK)
// ({CAST}) With resultRecursive, No inlinable.
{
  void *__tmp__0MMK;
  void *__tmp__1MMK;
  __READ_LOCAL *Self__KDFQ,*Self__IBKQ;
  __READ_GLOBAL *Self__JBKQ;
  __tmp__0MMK=Self__YMMK->value__US2H;
  switch (((struct ___OBJ *)__tmp__0MMK)->__id) {
  case __LIST__: {
    __tmp__1MMK=execute_unlink__0SRJ(__tmp__0MMK);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1MMK=execute_unlink__42LK(__tmp__0MMK);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__KDFQ=((__READ_LOCAL *)__tmp__0MMK);
    unread__YVJK(Self__KDFQ->local__ALZD,Self__KDFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1MMK=execute_unlink__PBMK(__tmp__0MMK);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1MMK=execute_unlink__WGMK(__tmp__0MMK);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1MMK=execute_unlink__HHMK(__tmp__0MMK);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__IBKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0MMK)->receiver__OO2H);
    unread__YVJK(Self__IBKQ->local__ALZD,Self__IBKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__0MMK));
    __tmp__1MMK=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__1MMK=execute_unlink__IIMK(__tmp__0MMK);
  } break;
  case __EXPR_SUB__: {
    __tmp__1MMK=execute_unlink__ZIMK(__tmp__0MMK);
  } break;
  case __EXPR_MUL__: {
    __tmp__1MMK=execute_unlink__KJMK(__tmp__0MMK);
  } break;
  case __EXPR_DIV__: {
    __tmp__1MMK=execute_unlink__1JMK(__tmp__0MMK);
  } break;
  case __EXPR_AND__: {
    __tmp__1MMK=execute_unlink__MKMK(__tmp__0MMK);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1MMK=execute_unlink__3KMK(__tmp__0MMK);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1MMK=execute_unlink__OLMK(__tmp__0MMK);
  } break;
  case __PUT_TO__: {
    __tmp__1MMK=execute_link__BOPK(((__PUT_TO *)__tmp__0MMK));
  } break;
  case __ITEM__: {
    __tmp__1MMK=execute_unlink__CMMK(__tmp__0MMK);
  } break;
  case __SIZE_OF__: {
    __tmp__1MMK=execute_unlink__SMMK(__tmp__0MMK);
  } break;
  case __CAST__: {
    __tmp__1MMK=execute_unlink__XMMK(__tmp__0MMK);
  } break;
  case __CALL_SLOT__: {
    __tmp__1MMK=execute_unlink__2NQL(__tmp__0MMK);
  } break;
  case __READ_SLOT__: {
    __tmp__1MMK=execute_unlink__WDAL(__tmp__0MMK);
  } break;
  case __READ_GLOBAL__: {
    Self__JBKQ=((__READ_GLOBAL *)__tmp__0MMK);
    unread__15ML(Self__JBKQ->global__RHJK,Self__JBKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1MMK=execute_access_unlink__VMDL(Self__JBKQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1MMK=execute_unlink__CRZM(__tmp__0MMK);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1MMK=execute_unlink__B2EO(__tmp__0MMK);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1MMK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__0MMK));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1MMK=execute_unlink__R2EO(__tmp__0MMK);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1MMK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__0MMK));
  } break;
  case __EXPR_NEG__: {
    __tmp__1MMK=execute_unlink__XYJM(__tmp__0MMK);
  } break;
  case __EXPR_ADD__: {
    __tmp__1MMK=execute_unlink__3NNL(__tmp__0MMK);
  } break;
  case __EXPR_NOT__: {
    __tmp__1MMK=execute_unlink__YLZM(__tmp__0MMK);
  } break;
  case __EXPR_MOD__: {
    __tmp__1MMK=execute_unlink__B3EO(__tmp__0MMK);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1MMK=execute_unlink__AJEP(__tmp__0MMK);
  } break;
  case __EXPR_INF__: {
    __tmp__1MMK=execute_unlink__CPQN(__tmp__0MMK);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1MMK=execute_unlink__SPQN(__tmp__0MMK);
  } break;
  case __EXPR_OR__: {
    __tmp__1MMK=execute_unlink__JDQN(__tmp__0MMK);
  } break;
  case __EXPR_XOR__: {
    __tmp__1MMK=execute_unlink__YNUO(__tmp__0MMK);
  } break;
  };
  return(__tmp__1MMK);
}

static void* execute_unlink__2NQL(__CALL_SLOT *Self__3NQL)
// ({CALL_SLOT}) With resultRecursive, No inlinable.
{
  void *result__5NQL,*__tmp__UQSL,*__tmp__YQSL,*__tmp__JSSL,*__tmp__3VSL;
  void *__tmp__BWSL,*__tmp__SXSL,*__tmp__QW2L,*__tmp__TX2L,*__tmp__PZ2L;
  void *__tmp__J02L;
  void *__tmp__AOQL,*__tmp__HOQL,*__tmp__SV2L,*__tmp__2OQL,*__tmp__CPQL;
  __PROFIL_SLOT *Self__MPSL,*Self__WBKQ;
  void *switch__OPSL,*__tmp__VQSL,*switch__XUSL,*__tmp__4VSL;
  void *__tmp__QZ2L,*switch__JV2L;
  void *void___PPSL,*__tmp__ZQSL,*void___YUSL,*__tmp__CWSL;
  void *msg__QPSL,*__tmp__KSSL,*msg__ZUSL,*__tmp__TXSL,*msg_slot__KV2L;
  void *__tmp__K02L;
  void *lst__RPSL,*lst__0USL,*body__LV2L,*__tmp__DZ2L;
  __INTEGER count_recur__SPSL,__tmp__VRSL,Self__K1UN,count_recur__1USL;
  __INTEGER __tmp__4WSL,Self__L2UN,idx__MV2L,__tmp__EX2L,Self__4IAM;
  __INTEGER __tmp__WZ2L,Self__0JAM;
  __POSITION __tmp__JTSL,__tmp__SYSL,__tmp__RV2L,__tmp__W02L;
  __POSITION __tmp__C12L;
  __PROFIL_BLOCK *Self__VUSL;
  void *new_val__OV2L,*__tmp__5V2L,*__tmp__KW2L;
  void *__tmp__TV2L;
  void *result__QV2L;
  void *wrt__NV2L;
  void *__tmp__AW2L,*__tmp__IW2L;
  void *__tmp__PW2L,*__tmp__SX2L;
  __BOOLEAN result__TPSL,__tmp__BOQL,result__2USL;
  __FAST_ARRAYoINSTRo *Self__KO2Q,*Self__5O2Q;
  void **__tmp__NZ5Q,**__tmp__OZ5Q;
  result__5NQL=NULL;
  __tmp__AOQL=Self__3NQL->profil__QA2H;
  if (((struct ___OBJ *)__tmp__AOQL)->__id==__PROFIL_SLOT__) {
    Self__MPSL=((__PROFIL_SLOT *)__tmp__AOQL);
    switch__OPSL=NULL;
    void___PPSL=NULL;
    msg__QPSL=NULL;
    lst__RPSL=NULL;
    count_recur__SPSL= 0;
    result__TPSL=FALSE__;
    if ((((! mode_recursive__WYUC) && (Self__MPSL->parent_profil__51LC.stat__BNEJ ==  2)) && ((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__MPSL->parent_profil__51LC.code__HZJH)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) >=  2))) {
      __tmp__UQSL=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)Self__MPSL->parent_profil__51LC.code__HZJH)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__MPSL->parent_profil__51LC.code__HZJH)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
      if (__tmp__UQSL==NULL) {
        __tmp__VQSL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__UQSL)->__id) {
        case __LIST__: {
          __tmp__VQSL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__VQSL=NULL;
        } break;
        case __PUSH__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__VQSL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__VQSL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__VQSL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__VQSL=((void *)__tmp__UQSL);
        } break;
        case __NODE_TYPE__: {
          __tmp__VQSL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__VQSL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__VQSL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__VQSL=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__VQSL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__VQSL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__VQSL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__VQSL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__VQSL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__VQSL=NULL;
        } break;
        case __ITEM__: {
          __tmp__VQSL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__VQSL=NULL;
        } break;
        case __CAST__: {
          __tmp__VQSL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__VQSL=NULL;
        } break;
        case __NOP__: {
          __tmp__VQSL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__VQSL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__VQSL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__VQSL=NULL;
        } break;
        case __LOOP__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__VQSL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__VQSL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__VQSL=NULL;
        } break;
        }
      };
      switch__OPSL=__tmp__VQSL;
      Self__KO2Q=((__FAST_ARRAYoINSTRo *)((__LIST *)Self__MPSL->parent_profil__51LC.code__HZJH)->expr_list__JUOG);
      __tmp__YQSL=((void **)Self__KO2Q->parent_arrayed_collection__IUOG.storage__BM4G)[Self__KO2Q->parent_arrayed_collection__IUOG.upper__THQG];
      if (__tmp__YQSL==NULL) {
        __tmp__ZQSL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__YQSL)->__id) {
        case __LIST__: {
          __tmp__ZQSL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__ZQSL=NULL;
        } break;
        case __PUSH__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZQSL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__ZQSL=((void *)__tmp__YQSL);
        } break;
        case __INTEGER_CST__: {
          __tmp__ZQSL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__ZQSL=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__ZQSL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZQSL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__ZQSL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__ZQSL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__ZQSL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__ZQSL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZQSL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__ZQSL=NULL;
        } break;
        case __ITEM__: {
          __tmp__ZQSL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__ZQSL=NULL;
        } break;
        case __CAST__: {
          __tmp__ZQSL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__ZQSL=NULL;
        } break;
        case __NOP__: {
          __tmp__ZQSL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__ZQSL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZQSL=NULL;
        } break;
        case __LOOP__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__ZQSL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__ZQSL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__ZQSL=NULL;
        } break;
        }
      };
      void___PPSL=__tmp__ZQSL;
      if (((((void *)__tmp__VQSL != (void *)NULL) && ((void *)__tmp__ZQSL != (void *)NULL)) && ((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__ZQSL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)TYPE_VOID__))) {
        __tmp__VRSL=((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__VQSL)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
        Self__K1UN= 0;
        __tmp__NZ5Q=((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__VQSL)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ;
        while ((Self__K1UN <= __tmp__VRSL)) {
          lst__RPSL=((__CASE *)((void **)__tmp__NZ5Q)[Self__K1UN])->code__BQAG;
          if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)lst__RPSL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) >  1)) {
            __tmp__JSSL=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)lst__RPSL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)lst__RPSL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
            if (__tmp__JSSL==NULL) {
              __tmp__KSSL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__JSSL)->__id) {
              case __LIST__: {
                __tmp__KSSL=NULL;
              } break;
              case __STRING_CST__: {
                __tmp__KSSL=NULL;
              } break;
              case __PUSH__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXTERNAL_C__: {
                __tmp__KSSL=NULL;
              } break;
              case __PROTOTYPE_CST__: {
                __tmp__KSSL=NULL;
              } break;
              case __INTEGER_CST__: {
                __tmp__KSSL=NULL;
              } break;
              case __SWITCH__: {
                __tmp__KSSL=NULL;
              } break;
              case __NODE_TYPE__: {
                __tmp__KSSL=NULL;
              } break;
              case __READ_LOCAL__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_MULTIPLE__: {
                __tmp__KSSL=NULL;
              } break;
              case __NODE_STYLE__: {
                __tmp__KSSL=NULL;
              } break;
              case __WRITE_GLOBAL__: {
                __tmp__KSSL=NULL;
              } break;
              case __WRITE_SLOT__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_EQUAL__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_NOT_EQUAL__: {
                __tmp__KSSL=NULL;
              } break;
              case __REAL_CST__: {
                __tmp__KSSL=NULL;
              } break;
              case __CHARACTER_CST__: {
                __tmp__KSSL=NULL;
              } break;
              case __IS_EXPANDED__: {
                __tmp__KSSL=NULL;
              } break;
              case __GET_TYPE_ID__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_SUP__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_SUB__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_MUL__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_DIV__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_AND__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_SHIFT_R__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_SHIFT_L__: {
                __tmp__KSSL=NULL;
              } break;
              case __PUT_TO__: {
                __tmp__KSSL=NULL;
              } break;
              case __ITEM__: {
                __tmp__KSSL=NULL;
              } break;
              case __SIZE_OF__: {
                __tmp__KSSL=NULL;
              } break;
              case __CAST__: {
                __tmp__KSSL=NULL;
              } break;
              case __CALL_SLOT__: {
                __tmp__KSSL=((void *)__tmp__JSSL);
              } break;
              case __NOP__: {
                __tmp__KSSL=NULL;
              } break;
              case __READ_SLOT__: {
                __tmp__KSSL=NULL;
              } break;
              case __WRITE_LOCAL__: {
                __tmp__KSSL=NULL;
              } break;
              case __READ_GLOBAL__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_NOT_LOGIC__: {
                __tmp__KSSL=NULL;
              } break;
              case __LOOP__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_OR_LOGIC__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_AND_LOGIC__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_NEG__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_ADD__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_NOT__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_MOD__: {
                __tmp__KSSL=NULL;
              } break;
              case __LOOP_END__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_SUP_EQ__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_INF__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_INF_EQ__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_OR__: {
                __tmp__KSSL=NULL;
              } break;
              case __EXPR_XOR__: {
                __tmp__KSSL=NULL;
              } break;
              }
            };
            msg__QPSL=__tmp__KSSL;
            if ((((void *)__tmp__KSSL != (void *)NULL) && ((void *)((__CALL_SLOT *)__tmp__KSSL)->profil__QA2H == (void *)Self__MPSL))) {
              count_recur__SPSL=(__INTEGER)(count_recur__SPSL +  1);
            };
          };
          Self__K1UN=(__INTEGER)(Self__K1UN +  1);
        };
        if ((count_recur__SPSL == (__INTEGER)(((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__VQSL)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1))) {
          __tmp__JTSL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)Self__MPSL->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM;
          put_error__text__0AH( 1,(&__string_552));
          put_position__ECH(__tmp__JTSL);
          send_error__2FH();
        };
        if ((count_recur__SPSL == (__INTEGER)((__INTEGER)(((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__VQSL)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) -  1))) {
          if (((__INTEGER)(Self__MPSL->parent_profil__51LC.count_intern_call__WTSL -  1) == count_recur__SPSL)) {
            if ((Self__MPSL->parent_profil__51LC.link_count__FALJ == Self__MPSL->parent_profil__51LC.count_intern_call__WTSL)) {
              result__TPSL=TRUE__;
              Self__MPSL->parent_profil__51LC.stat__BNEJ=(__INTEGER_8)(~ (__INTEGER_8)((__INTEGER_8)(~ Self__MPSL->parent_profil__51LC.stat__BNEJ) &  -2));
            };
          };
        };
      };
    };
    __tmp__BOQL=result__TPSL;
  } else {
    Self__VUSL=((__PROFIL_BLOCK *)__tmp__AOQL);
    switch__XUSL=NULL;
    void___YUSL=NULL;
    msg__ZUSL=NULL;
    lst__0USL=NULL;
    count_recur__1USL= 0;
    result__2USL=FALSE__;
    if ((((! mode_recursive__WYUC) && (Self__VUSL->parent_profil__GHAG.stat__BNEJ ==  2)) && ((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__VUSL->parent_profil__GHAG.code__HZJH)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) >=  2))) {
      __tmp__3VSL=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)Self__VUSL->parent_profil__GHAG.code__HZJH)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__VUSL->parent_profil__GHAG.code__HZJH)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
      if (__tmp__3VSL==NULL) {
        __tmp__4VSL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__3VSL)->__id) {
        case __LIST__: {
          __tmp__4VSL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__4VSL=NULL;
        } break;
        case __PUSH__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__4VSL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__4VSL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__4VSL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__4VSL=((void *)__tmp__3VSL);
        } break;
        case __NODE_TYPE__: {
          __tmp__4VSL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__4VSL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__4VSL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__4VSL=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__4VSL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__4VSL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__4VSL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__4VSL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__4VSL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__4VSL=NULL;
        } break;
        case __ITEM__: {
          __tmp__4VSL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__4VSL=NULL;
        } break;
        case __CAST__: {
          __tmp__4VSL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__4VSL=NULL;
        } break;
        case __NOP__: {
          __tmp__4VSL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__4VSL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__4VSL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__4VSL=NULL;
        } break;
        case __LOOP__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__4VSL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__4VSL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__4VSL=NULL;
        } break;
        }
      };
      switch__XUSL=__tmp__4VSL;
      Self__5O2Q=((__FAST_ARRAYoINSTRo *)((__LIST *)Self__VUSL->parent_profil__GHAG.code__HZJH)->expr_list__JUOG);
      __tmp__BWSL=((void **)Self__5O2Q->parent_arrayed_collection__IUOG.storage__BM4G)[Self__5O2Q->parent_arrayed_collection__IUOG.upper__THQG];
      if (__tmp__BWSL==NULL) {
        __tmp__CWSL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__BWSL)->__id) {
        case __LIST__: {
          __tmp__CWSL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__CWSL=NULL;
        } break;
        case __PUSH__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__CWSL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__CWSL=((void *)__tmp__BWSL);
        } break;
        case __INTEGER_CST__: {
          __tmp__CWSL=NULL;
        } break;
        case __SWITCH__: {
          __tmp__CWSL=NULL;
        } break;
        case __NODE_TYPE__: {
          __tmp__CWSL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__CWSL=NULL;
        } break;
        case __NODE_STYLE__: {
          __tmp__CWSL=NULL;
        } break;
        case __WRITE_GLOBAL__: {
          __tmp__CWSL=NULL;
        } break;
        case __WRITE_SLOT__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__CWSL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__CWSL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__CWSL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__CWSL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__CWSL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__CWSL=NULL;
        } break;
        case __ITEM__: {
          __tmp__CWSL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__CWSL=NULL;
        } break;
        case __CAST__: {
          __tmp__CWSL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__CWSL=NULL;
        } break;
        case __NOP__: {
          __tmp__CWSL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__CWSL=NULL;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__CWSL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__CWSL=NULL;
        } break;
        case __LOOP__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__CWSL=NULL;
        } break;
        case __LOOP_END__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__CWSL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__CWSL=NULL;
        } break;
        }
      };
      void___YUSL=__tmp__CWSL;
      if (((((void *)__tmp__4VSL != (void *)NULL) && ((void *)__tmp__CWSL != (void *)NULL)) && ((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__CWSL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)TYPE_VOID__))) {
        __tmp__4WSL=((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__4VSL)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
        Self__L2UN= 0;
        __tmp__OZ5Q=((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__4VSL)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ;
        while ((Self__L2UN <= __tmp__4WSL)) {
          lst__0USL=((__CASE *)((void **)__tmp__OZ5Q)[Self__L2UN])->code__BQAG;
          if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)lst__0USL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) >  1)) {
            __tmp__SXSL=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)lst__0USL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)lst__0USL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
            if (__tmp__SXSL==NULL) {
              __tmp__TXSL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__SXSL)->__id) {
              case __LIST__: {
                __tmp__TXSL=NULL;
              } break;
              case __STRING_CST__: {
                __tmp__TXSL=NULL;
              } break;
              case __PUSH__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXTERNAL_C__: {
                __tmp__TXSL=NULL;
              } break;
              case __PROTOTYPE_CST__: {
                __tmp__TXSL=NULL;
              } break;
              case __INTEGER_CST__: {
                __tmp__TXSL=NULL;
              } break;
              case __SWITCH__: {
                __tmp__TXSL=NULL;
              } break;
              case __NODE_TYPE__: {
                __tmp__TXSL=NULL;
              } break;
              case __READ_LOCAL__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_MULTIPLE__: {
                __tmp__TXSL=NULL;
              } break;
              case __NODE_STYLE__: {
                __tmp__TXSL=NULL;
              } break;
              case __WRITE_GLOBAL__: {
                __tmp__TXSL=NULL;
              } break;
              case __WRITE_SLOT__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_EQUAL__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_NOT_EQUAL__: {
                __tmp__TXSL=NULL;
              } break;
              case __REAL_CST__: {
                __tmp__TXSL=NULL;
              } break;
              case __CHARACTER_CST__: {
                __tmp__TXSL=NULL;
              } break;
              case __IS_EXPANDED__: {
                __tmp__TXSL=NULL;
              } break;
              case __GET_TYPE_ID__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_SUP__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_SUB__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_MUL__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_DIV__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_AND__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_SHIFT_R__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_SHIFT_L__: {
                __tmp__TXSL=NULL;
              } break;
              case __PUT_TO__: {
                __tmp__TXSL=NULL;
              } break;
              case __ITEM__: {
                __tmp__TXSL=NULL;
              } break;
              case __SIZE_OF__: {
                __tmp__TXSL=NULL;
              } break;
              case __CAST__: {
                __tmp__TXSL=NULL;
              } break;
              case __CALL_SLOT__: {
                __tmp__TXSL=((void *)__tmp__SXSL);
              } break;
              case __NOP__: {
                __tmp__TXSL=NULL;
              } break;
              case __READ_SLOT__: {
                __tmp__TXSL=NULL;
              } break;
              case __WRITE_LOCAL__: {
                __tmp__TXSL=NULL;
              } break;
              case __READ_GLOBAL__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_NOT_LOGIC__: {
                __tmp__TXSL=NULL;
              } break;
              case __LOOP__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_OR_LOGIC__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_AND_LOGIC__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_NEG__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_ADD__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_NOT__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_MOD__: {
                __tmp__TXSL=NULL;
              } break;
              case __LOOP_END__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_SUP_EQ__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_INF__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_INF_EQ__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_OR__: {
                __tmp__TXSL=NULL;
              } break;
              case __EXPR_XOR__: {
                __tmp__TXSL=NULL;
              } break;
              }
            };
            msg__ZUSL=__tmp__TXSL;
            if ((((void *)__tmp__TXSL != (void *)NULL) && ((void *)((__CALL_SLOT *)__tmp__TXSL)->profil__QA2H == (void *)Self__VUSL))) {
              count_recur__1USL=(__INTEGER)(count_recur__1USL +  1);
            };
          };
          Self__L2UN=(__INTEGER)(Self__L2UN +  1);
        };
        if ((count_recur__1USL == (__INTEGER)(((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__4VSL)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1))) {
          print__1ZE((&__string_553));
          fputc((int)('\n'),stdout);
          exit(( 1));
          print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
          __tmp__SYSL=((__POSITION ) 0);
          put_error__text__0AH( 1,(&__string_552));
          put_position__ECH(__tmp__SYSL);
          send_error__2FH();
        };
        if ((count_recur__1USL == (__INTEGER)((__INTEGER)(((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__4VSL)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG +  1) -  1))) {
          if (((__INTEGER)(Self__VUSL->parent_profil__GHAG.count_intern_call__WTSL -  1) == count_recur__1USL)) {
            if ((Self__VUSL->parent_profil__GHAG.link_count__FALJ == Self__VUSL->parent_profil__GHAG.count_intern_call__WTSL)) {
              result__2USL=TRUE__;
              Self__VUSL->parent_profil__GHAG.stat__BNEJ=(__INTEGER_8)(~ (__INTEGER_8)((__INTEGER_8)(~ Self__VUSL->parent_profil__GHAG.stat__BNEJ) &  -2));
            };
          };
        };
      };
    };
    __tmp__BOQL=result__2USL;
  };
  if (__tmp__BOQL) {
    __tmp__HOQL=Self__3NQL->profil__QA2H;
    if (((struct ___OBJ *)__tmp__HOQL)->__id==__PROFIL_SLOT__) {
      Self__WBKQ=((__PROFIL_SLOT *)__tmp__HOQL);
      remove__OGAM(Self__WBKQ);
      remove_profil__3FAM(Self__WBKQ->slot_code__X4NL,Self__WBKQ);
    } else {
      remove__OGAM(((__PROFIL_BLOCK *)__tmp__HOQL));
    };
    msg_slot__KV2L=NULL;
    body__LV2L=NULL;
    idx__MV2L= 0;
    new_val__OV2L=NULL;
    __tmp__RV2L=Self__3NQL->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    __tmp__SV2L=Self__3NQL->profil__QA2H;
    if (((struct ___OBJ *)__tmp__SV2L)->__id==__PROFIL_SLOT__) {
      __tmp__TV2L=((__PROFIL_SLOT *)__tmp__SV2L)->parent_profil__51LC.name__XJEI;
    } else {
      __tmp__TV2L=((__PROFIL_BLOCK *)__tmp__SV2L)->parent_profil__GHAG.name__XJEI;
    };
    result__QV2L=create__name__body__UHAM(__tmp__RV2L,__tmp__TV2L,source__Q53L(Self__3NQL));
    wrt__NV2L=((void **)((__FAST_ARRAYoWRITEo *)Self__3NQL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0];
    if (((void *)wrt__NV2L != (void *)NULL)) {
      ((void **)((__FAST_ARRAYoWRITEo *)Self__3NQL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0]=NULL;
      switch (((struct ___OBJ *)wrt__NV2L)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__5V2L=((__WRITE_GLOBAL *)wrt__NV2L)->parent_write__QBGH.value__HBEH;
      } break;
      case __WRITE_SLOT__: {
        __tmp__5V2L=((__WRITE_SLOT *)wrt__NV2L)->parent_write__3BGH.value__HBEH;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__5V2L=((__WRITE_LOCAL *)wrt__NV2L)->parent_write__X50I.value__HBEH;
      } break;
      };
      switch (((struct ___OBJ *)__tmp__5V2L)->__id) {
      case __LIST__: {
        __tmp__AW2L=static_type__GIQG(__tmp__5V2L);
      } break;
      case __STRING_CST__: {
        __tmp__AW2L=((__STRING_CST *)__tmp__5V2L)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__AW2L=((__EXTERNAL_C *)__tmp__5V2L)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__AW2L=((__PROTOTYPE_CST *)__tmp__5V2L)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__AW2L=((__INTEGER_CST *)__tmp__5V2L)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__AW2L=((__LOCAL *)((__READ_LOCAL *)__tmp__5V2L)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__AW2L=static_type__0N1H(__tmp__5V2L);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__AW2L=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__AW2L=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__AW2L=((__REAL_CST *)__tmp__5V2L)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__AW2L=((__CHARACTER_CST *)__tmp__5V2L)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__AW2L=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__AW2L=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__AW2L=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__AW2L=static_type__MP1H(__tmp__5V2L);
      } break;
      case __EXPR_MUL__: {
        __tmp__AW2L=static_type__SP1H(__tmp__5V2L);
      } break;
      case __EXPR_DIV__: {
        __tmp__AW2L=static_type__XP1H(__tmp__5V2L);
      } break;
      case __EXPR_AND__: {
        __tmp__AW2L=static_type__2P1H(__tmp__5V2L);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__AW2L=static_type__BQ1H(__tmp__5V2L);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__AW2L=static_type__GQ1H(__tmp__5V2L);
      } break;
      case __PUT_TO__: {
        __tmp__AW2L=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__AW2L=static_type__PQ1H(__tmp__5V2L);
      } break;
      case __SIZE_OF__: {
        __tmp__AW2L=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__AW2L=((__CAST *)__tmp__5V2L)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__AW2L=static_type__GIKL(__tmp__5V2L);
      } break;
      case __READ_SLOT__: {
        __tmp__AW2L=((__SLOT_DATA *)((__READ_SLOT *)__tmp__5V2L)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__AW2L=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__5V2L)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__AW2L=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__AW2L=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__AW2L=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__AW2L=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__AW2L=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__AW2L=static_type__Z2IM(__tmp__5V2L);
      } break;
      case __EXPR_ADD__: {
        __tmp__AW2L=static_type__IXML(__tmp__5V2L);
      } break;
      case __EXPR_NOT__: {
        __tmp__AW2L=static_type__BTXM(__tmp__5V2L);
      } break;
      case __EXPR_MOD__: {
        __tmp__AW2L=static_type__5LEO(__tmp__5V2L);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__AW2L=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__AW2L=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__AW2L=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__AW2L=static_type__NOPN(__tmp__5V2L);
      } break;
      case __EXPR_XOR__: {
        __tmp__AW2L=static_type__XCSO(__tmp__5V2L);
      } break;
      };
      if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__AW2L)->flag__LTL &  1) !=  0))) {
        switch (((struct ___OBJ *)wrt__NV2L)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__IW2L=((__SLOT_DATA *)((__WRITE_GLOBAL *)wrt__NV2L)->global__4U1H)->parent_variable__AJZD.type__125F;
        } break;
        case __WRITE_SLOT__: {
          __tmp__IW2L=((__SLOT_DATA *)((__WRITE_SLOT *)wrt__NV2L)->slot__5T1H)->parent_variable__AJZD.type__125F;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__IW2L=((__LOCAL *)((__WRITE_LOCAL *)wrt__NV2L)->local__2RIJ)->parent_variable__B2LC.type__125F;
        } break;
        };
        switch (((struct ___OBJ *)wrt__NV2L)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__KW2L=((__WRITE_GLOBAL *)wrt__NV2L)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__KW2L=((__WRITE_SLOT *)wrt__NV2L)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__KW2L=((__WRITE_LOCAL *)wrt__NV2L)->parent_write__X50I.value__HBEH;
        } break;
        };
        new_val__OV2L=create__value__S1WH(CAST__,__tmp__IW2L,__tmp__KW2L);
        switch (((struct ___OBJ *)wrt__NV2L)->__id) {
        case __WRITE_GLOBAL__: {
          ((__WRITE_GLOBAL *)wrt__NV2L)->parent_write__QBGH.value__HBEH=new_val__OV2L;
        } break;
        case __WRITE_SLOT__: {
          ((__WRITE_SLOT *)wrt__NV2L)->parent_write__3BGH.value__HBEH=new_val__OV2L;
        } break;
        case __WRITE_LOCAL__: {
          ((__WRITE_LOCAL *)wrt__NV2L)->parent_write__X50I.value__HBEH=new_val__OV2L;
        } break;
        };
      };
      switch (((struct ___OBJ *)wrt__NV2L)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__PW2L=((__WRITE_GLOBAL *)wrt__NV2L)->global__4U1H;
      } break;
      case __WRITE_SLOT__: {
        __tmp__PW2L=((__WRITE_SLOT *)wrt__NV2L)->slot__5T1H;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__PW2L=((__WRITE_LOCAL *)wrt__NV2L)->local__2RIJ;
      } break;
      };
      if (((struct ___OBJ *)__tmp__PW2L)->__id==__LOCAL__) {
        ((__LOCAL *)__tmp__PW2L)->parent_variable__B2LC.parent_named__A2LC.style__LDGC='+';
      } else {
        ((__SLOT_DATA *)__tmp__PW2L)->parent_variable__AJZD.parent_named__A2LC.style__LDGC='+';
      };
      switch (((struct ___OBJ *)wrt__NV2L)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__QW2L=execute__GFGK(wrt__NV2L);
      } break;
      case __WRITE_SLOT__: {
        __tmp__QW2L=execute__ZIGK(wrt__NV2L);
      } break;
      case __WRITE_LOCAL__: {
        __tmp__QW2L=execute__3OGK(wrt__NV2L);
      } break;
      };
      if (((void *)__tmp__QW2L != (void *)NULL)) {
        insert__to__PDDM(list_current__IF1,__tmp__QW2L,((__LIST *)list_current__IF1)->index__PXRG);
      };
    };
    __tmp__EX2L=((__FAST_ARRAYoWRITEo *)Self__3NQL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
    Self__4IAM= 1;
    while ((Self__4IAM <= __tmp__EX2L)) {
      wrt__NV2L=((void **)((__FAST_ARRAYoWRITEo *)Self__3NQL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__4IAM];
      if (((void *)wrt__NV2L != (void *)NULL)) {
        ((void **)((__FAST_ARRAYoWRITEo *)Self__3NQL->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__4IAM]=NULL;
        switch (((struct ___OBJ *)wrt__NV2L)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__SX2L=((__WRITE_GLOBAL *)wrt__NV2L)->global__4U1H;
        } break;
        case __WRITE_SLOT__: {
          __tmp__SX2L=((__WRITE_SLOT *)wrt__NV2L)->slot__5T1H;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__SX2L=((__WRITE_LOCAL *)wrt__NV2L)->local__2RIJ;
        } break;
        };
        if (((struct ___OBJ *)__tmp__SX2L)->__id==__LOCAL__) {
          ((__LOCAL *)__tmp__SX2L)->parent_variable__B2LC.parent_named__A2LC.style__LDGC='+';
        } else {
          ((__SLOT_DATA *)__tmp__SX2L)->parent_variable__AJZD.parent_named__A2LC.style__LDGC='+';
        };
        switch (((struct ___OBJ *)wrt__NV2L)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__TX2L=execute__GFGK(wrt__NV2L);
        } break;
        case __WRITE_SLOT__: {
          __tmp__TX2L=execute__ZIGK(wrt__NV2L);
        } break;
        case __WRITE_LOCAL__: {
          __tmp__TX2L=execute__3OGK(wrt__NV2L);
        } break;
        };
        if (((void *)__tmp__TX2L != (void *)NULL)) {
          insert__to__PDDM(list_current__IF1,__tmp__TX2L,((__LIST *)list_current__IF1)->index__PXRG);
        };
      };
      Self__4IAM=(__INTEGER)(Self__4IAM +  1);
    };
    if ((debug_level_option__3C !=  0)) {
      insert__to__PDDM(list_current__IF1,((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)source__Q53L(Self__3NQL))->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0],((__LIST *)list_current__IF1)->index__PXRG);
      __tmp__DZ2L=source__Q53L(Self__3NQL);
      source__Q53L(Self__3NQL);
      ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)__tmp__DZ2L)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[ 0]=NOP__;
    };
    __tmp__PZ2L=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)source__Q53L(Self__3NQL))->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)source__Q53L(Self__3NQL))->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)];
    if (__tmp__PZ2L==NULL) {
      __tmp__QZ2L=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__PZ2L)->__id) {
      case __LIST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __PUSH__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__QZ2L=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __SWITCH__: {
        __tmp__QZ2L=((void *)__tmp__PZ2L);
      } break;
      case __NODE_TYPE__: {
        __tmp__QZ2L=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__QZ2L=NULL;
      } break;
      case __NODE_STYLE__: {
        __tmp__QZ2L=NULL;
      } break;
      case __WRITE_GLOBAL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__QZ2L=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__QZ2L=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__QZ2L=NULL;
      } break;
      case __ITEM__: {
        __tmp__QZ2L=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__QZ2L=NULL;
      } break;
      case __CAST__: {
        __tmp__QZ2L=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__QZ2L=NULL;
      } break;
      case __NOP__: {
        __tmp__QZ2L=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__QZ2L=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__QZ2L=NULL;
      } break;
      case __LOOP__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__QZ2L=NULL;
      } break;
      case __LOOP_END__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__QZ2L=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__QZ2L=NULL;
      } break;
      }
    };
    switch__JV2L=__tmp__QZ2L;
    __tmp__WZ2L=((__FAST_ARRAYoCASEo *)((__SWITCH *)__tmp__QZ2L)->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG;
    Self__0JAM= 0;
    while ((Self__0JAM <= __tmp__WZ2L)) {
      body__LV2L=((__CASE *)((void **)((__FAST_ARRAYoCASEo *)((__SWITCH *)switch__JV2L)->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[Self__0JAM])->code__BQAG;
      if (((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)body__LV2L)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) >  1)) {
        idx__MV2L=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)body__LV2L)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1);
        __tmp__J02L=((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)body__LV2L)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(idx__MV2L -  1)];
        if (__tmp__J02L==NULL) {
          __tmp__K02L=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__J02L)->__id) {
          case __LIST__: {
            __tmp__K02L=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__K02L=NULL;
          } break;
          case __PUSH__: {
            __tmp__K02L=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__K02L=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__K02L=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__K02L=NULL;
          } break;
          case __SWITCH__: {
            __tmp__K02L=NULL;
          } break;
          case __NODE_TYPE__: {
            __tmp__K02L=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__K02L=NULL;
          } break;
          case __NODE_STYLE__: {
            __tmp__K02L=NULL;
          } break;
          case __WRITE_GLOBAL__: {
            __tmp__K02L=NULL;
          } break;
          case __WRITE_SLOT__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__K02L=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__K02L=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__K02L=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__K02L=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__K02L=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__K02L=NULL;
          } break;
          case __ITEM__: {
            __tmp__K02L=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__K02L=NULL;
          } break;
          case __CAST__: {
            __tmp__K02L=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__K02L=((void *)__tmp__J02L);
          } break;
          case __NOP__: {
            __tmp__K02L=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__K02L=NULL;
          } break;
          case __WRITE_LOCAL__: {
            __tmp__K02L=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__K02L=NULL;
          } break;
          case __LOOP__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__K02L=NULL;
          } break;
          case __LOOP_END__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__K02L=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__K02L=NULL;
          } break;
          }
        };
        msg_slot__KV2L=__tmp__K02L;
        if (((void *)__tmp__K02L != (void *)NULL)) {
          if (((void *)__tmp__K02L == (void *)Self__3NQL)) {
            __tmp__W02L=Self__3NQL->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
            put_error__text__0AH( 1,(&__string_554));
            put_position__ECH(__tmp__W02L);
            send_error__2FH();
          };
          if (((void *)((__CALL_SLOT *)__tmp__K02L)->profil__QA2H != (void *)Self__3NQL->profil__QA2H)) {
            __tmp__C12L=Self__3NQL->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
            put_error__text__0AH( 1,(&__string_555));
            put_position__ECH(__tmp__C12L);
            send_error__2FH();
          };
          argument_to_assignment__index__alias__ITLM(__tmp__K02L,body__LV2L,idx__MV2L,FALSE__);
          ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)body__LV2L)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)body__LV2L)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1) -  1)]=create__loop__CJHM(((__CALL_SLOT *)__tmp__K02L)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,result__QV2L);
        };
      };
      Self__0JAM=(__INTEGER)(Self__0JAM +  1);
    };
    result__5NQL=result__QV2L;
    execute__SALM(result__QV2L);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  } else {
    result__5NQL=execute_inline__QFZL(Self__3NQL);
    if (((void *)result__5NQL == (void *)NULL)) {
      execute_normal__BMAM(Self__3NQL);
      if (is_empty__UJVL(source__Q53L(Self__3NQL))) {
        __tmp__2OQL=Self__3NQL->profil__QA2H;
        if (((struct ___OBJ *)__tmp__2OQL)->__id==__PROFIL_SLOT__) {
          unlink__ZVQL(__tmp__2OQL);
        } else {
          unlink__XWQL(__tmp__2OQL);
        };
        modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      } else {
        result__5NQL=Self__3NQL;
        __tmp__CPQL=Self__3NQL->profil__QA2H;
        if (((struct ___OBJ *)__tmp__CPQL)->__id==__PROFIL_SLOT__) {
          set_life__2OAM(__tmp__CPQL);
        } else {
          set_life__GPAM(__tmp__CPQL);
        };
      };
    };
  };
  return(result__5NQL);
}

static void* execute_unlink__WDAL(__READ_SLOT *Self__XDAL)
// ({READ_SLOT}) With resultRecursive, No inlinable.
{
  unread__15ML(Self__XDAL->slot__EVGK,Self__XDAL);
  modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  return(execute_access_unlink__5LDL(Self__XDAL));
}

static void* execute__3OGK(__WRITE_LOCAL *Self__4OGK)
// ({WRITE_LOCAL}) With resultNo recursive, No inlinable.
{
  void *result__APGK,*__tmp__BSGK;
  void *read__BPGK,*__tmp__QQGK;
  void *slot__DPGK;
  void *__tmp__PQGK,*__tmp__ASGK,*__tmp__ISGK,*__tmp__JSGK;
  void *__tmp__WQGK,*__tmp__XQGK;
  __READ_LOCAL *Self__4BKQ,*Self__DCKQ;
  __READ_GLOBAL *Self__2DAL;
  __LOCAL *Self__LCUL;
  void *result__TPAM;
  __LOCAL_SEQ *result__QSEM,*Self__O2KM;
  __POINTER ptr__RSEM;
  __INTEGER typ_id__WSEM;
  __UINTEGER_32 sz__TSEM,a__JQ2Q,new_size__HQ2Q,t__NQ2Q,a__PQ2Q;
  __BOOLEAN __tmp__QRGK,__tmp__MRGK;
  __FAST_ARRAYoLOCAL_SEQo *Self__A44K,*Self__1TEM;
  result__APGK=NULL;
  read__BPGK=NULL;
  slot__DPGK=NULL;
  if ((((__LOCAL *)Self__4OGK->local__2RIJ)->parent_variable__B2LC.ensure_count__QEAG ==  0)) {
    __tmp__QRGK=TRUE__;
  } else {
    __tmp__PQGK=Self__4OGK->parent_write__X50I.value__HBEH;
    if (__tmp__PQGK==NULL) {
      __tmp__QQGK=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__PQGK)->__id) {
      case __LIST__: {
        __tmp__QQGK=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__QQGK=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__QQGK=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__QQGK=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__QQGK=((void *)__tmp__PQGK);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__QQGK=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__QQGK=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__QQGK=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__QQGK=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__QQGK=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__QQGK=NULL;
      } break;
      case __ITEM__: {
        __tmp__QQGK=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__QQGK=NULL;
      } break;
      case __CAST__: {
        __tmp__QQGK=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__QQGK=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__QQGK=((void *)__tmp__PQGK);
      } break;
      case __READ_GLOBAL__: {
        __tmp__QQGK=((void *)__tmp__PQGK);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__QQGK=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__QQGK=NULL;
      } break;
      }
    };
    read__BPGK=__tmp__QQGK;
    if (((void *)__tmp__QQGK != (void *)NULL)) {
      __tmp__WQGK=Self__4OGK->local__2RIJ;
      switch (((struct ___OBJ *)__tmp__QQGK)->__id) {
      case __READ_LOCAL__: {
        __tmp__XQGK=((__READ_LOCAL *)__tmp__QQGK)->local__ALZD;
      } break;
      case __READ_SLOT__: {
        __tmp__XQGK=((__READ_SLOT *)__tmp__QQGK)->slot__EVGK;
      } break;
      case __READ_GLOBAL__: {
        __tmp__XQGK=((__READ_GLOBAL *)__tmp__QQGK)->global__RHJK;
      } break;
      };
      __tmp__MRGK=((void *)__tmp__WQGK == (void *)__tmp__XQGK);
    } else {
      __tmp__MRGK=FALSE__;
    };
    __tmp__QRGK=__tmp__MRGK;
  };
  if (__tmp__QRGK) {
    unwrite__OGNL(Self__4OGK->local__2RIJ,Self__4OGK);
    __tmp__ASGK=Self__4OGK->parent_write__X50I.value__HBEH;
    switch (((struct ___OBJ *)__tmp__ASGK)->__id) {
    case __LIST__: {
      __tmp__BSGK=execute_unlink__0SRJ(__tmp__ASGK);
    } break;
    case __STRING_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BSGK=execute_unlink__42LK(__tmp__ASGK);
    } break;
    case __PROTOTYPE_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __INTEGER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __READ_LOCAL__: {
      Self__4BKQ=((__READ_LOCAL *)__tmp__ASGK);
      unread__YVJK(Self__4BKQ->local__ALZD,Self__4BKQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BSGK=execute_unlink__PBMK(__tmp__ASGK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BSGK=execute_unlink__WGMK(__tmp__ASGK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BSGK=execute_unlink__HHMK(__tmp__ASGK);
    } break;
    case __REAL_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __CHARACTER_CST__: {
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __IS_EXPANDED__: {
      Self__DCKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ASGK)->receiver__OO2H);
      unread__YVJK(Self__DCKQ->local__ALZD,Self__DCKQ);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=NULL;
    } break;
    case __GET_TYPE_ID__: {
      remove__SWAK(((__GET_TYPE_ID *)__tmp__ASGK));
      __tmp__BSGK=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__BSGK=execute_unlink__IIMK(__tmp__ASGK);
    } break;
    case __EXPR_SUB__: {
      __tmp__BSGK=execute_unlink__ZIMK(__tmp__ASGK);
    } break;
    case __EXPR_MUL__: {
      __tmp__BSGK=execute_unlink__KJMK(__tmp__ASGK);
    } break;
    case __EXPR_DIV__: {
      __tmp__BSGK=execute_unlink__1JMK(__tmp__ASGK);
    } break;
    case __EXPR_AND__: {
      __tmp__BSGK=execute_unlink__MKMK(__tmp__ASGK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BSGK=execute_unlink__3KMK(__tmp__ASGK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BSGK=execute_unlink__OLMK(__tmp__ASGK);
    } break;
    case __PUT_TO__: {
      __tmp__BSGK=execute_link__BOPK(((__PUT_TO *)__tmp__ASGK));
    } break;
    case __ITEM__: {
      __tmp__BSGK=execute_unlink__CMMK(__tmp__ASGK);
    } break;
    case __SIZE_OF__: {
      __tmp__BSGK=execute_unlink__SMMK(__tmp__ASGK);
    } break;
    case __CAST__: {
      __tmp__BSGK=execute_unlink__XMMK(__tmp__ASGK);
    } break;
    case __CALL_SLOT__: {
      __tmp__BSGK=execute_unlink__2NQL(__tmp__ASGK);
    } break;
    case __READ_SLOT__: {
      __tmp__BSGK=execute_unlink__WDAL(__tmp__ASGK);
    } break;
    case __READ_GLOBAL__: {
      Self__2DAL=((__READ_GLOBAL *)__tmp__ASGK);
      unread__15ML(Self__2DAL->global__RHJK,Self__2DAL);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__BSGK=execute_access_unlink__VMDL(Self__2DAL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BSGK=execute_unlink__CRZM(__tmp__ASGK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BSGK=execute_unlink__B2EO(__tmp__ASGK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BSGK=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__ASGK));
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BSGK=execute_unlink__R2EO(__tmp__ASGK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BSGK=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__ASGK));
    } break;
    case __EXPR_NEG__: {
      __tmp__BSGK=execute_unlink__XYJM(__tmp__ASGK);
    } break;
    case __EXPR_ADD__: {
      __tmp__BSGK=execute_unlink__3NNL(__tmp__ASGK);
    } break;
    case __EXPR_NOT__: {
      __tmp__BSGK=execute_unlink__YLZM(__tmp__ASGK);
    } break;
    case __EXPR_MOD__: {
      __tmp__BSGK=execute_unlink__B3EO(__tmp__ASGK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BSGK=execute_unlink__AJEP(__tmp__ASGK);
    } break;
    case __EXPR_INF__: {
      __tmp__BSGK=execute_unlink__CPQN(__tmp__ASGK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BSGK=execute_unlink__SPQN(__tmp__ASGK);
    } break;
    case __EXPR_OR__: {
      __tmp__BSGK=execute_unlink__JDQN(__tmp__ASGK);
    } break;
    case __EXPR_XOR__: {
      __tmp__BSGK=execute_unlink__YNUO(__tmp__ASGK);
    } break;
    };
    result__APGK=__tmp__BSGK;
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  } else {
    __tmp__ISGK=Self__4OGK->parent_write__X50I.value__HBEH;
    switch (((struct ___OBJ *)__tmp__ISGK)->__id) {
    case __LIST__: {
      __tmp__JSGK=execute_link__LUOG(__tmp__ISGK);
    } break;
    case __STRING_CST__: {
      __tmp__JSGK=((__STRING_CST *)__tmp__ISGK);
    } break;
    case __EXTERNAL_C__: {
      __tmp__JSGK=execute_link__U5ZK(__tmp__ISGK);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JSGK=((__PROTOTYPE_CST *)__tmp__ISGK);
    } break;
    case __INTEGER_CST__: {
      __tmp__JSGK=((__INTEGER_CST *)__tmp__ISGK);
    } break;
    case __READ_LOCAL__: {
      __tmp__JSGK=execute_link__EHAL(__tmp__ISGK);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JSGK=execute_link__YLAL();
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JSGK=execute_link__2LAL(__tmp__ISGK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JSGK=execute_link__FQAL(__tmp__ISGK);
    } break;
    case __REAL_CST__: {
      __tmp__JSGK=((__REAL_CST *)__tmp__ISGK);
    } break;
    case __CHARACTER_CST__: {
      __tmp__JSGK=((__CHARACTER_CST *)__tmp__ISGK);
    } break;
    case __IS_EXPANDED__: {
      __tmp__JSGK=execute_link__UUAL(__tmp__ISGK);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JSGK=execute_link__1VAL(__tmp__ISGK);
    } break;
    case __EXPR_SUP__: {
      __tmp__JSGK=execute_link__AWAL(__tmp__ISGK);
    } break;
    case __EXPR_SUB__: {
      __tmp__JSGK=execute_link__J0AL(__tmp__ISGK);
    } break;
    case __EXPR_MUL__: {
      __tmp__JSGK=execute_link__S4AL(__tmp__ISGK);
    } break;
    case __EXPR_DIV__: {
      __tmp__JSGK=execute_link__1CBL(__tmp__ISGK);
    } break;
    case __EXPR_AND__: {
      __tmp__JSGK=execute_link__EHBL(__tmp__ISGK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JSGK=execute_link__NLBL(__tmp__ISGK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JSGK=execute_link__WPBL(__tmp__ISGK);
    } break;
    case __PUT_TO__: {
      __tmp__JSGK=execute_link__BOPK(__tmp__ISGK);
    } break;
    case __ITEM__: {
      __tmp__JSGK=execute_link__5TBL(__tmp__ISGK);
    } break;
    case __SIZE_OF__: {
      __tmp__JSGK=execute_link__GUBL(__tmp__ISGK);
    } break;
    case __CAST__: {
      __tmp__JSGK=execute_link__LUBL(__tmp__ISGK);
    } break;
    case __CALL_SLOT__: {
      __tmp__JSGK=execute_link__A2TL(__tmp__ISGK);
    } break;
    case __READ_SLOT__: {
      __tmp__JSGK=execute_link__EYBL(__tmp__ISGK);
    } break;
    case __READ_GLOBAL__: {
      __tmp__JSGK=execute_link__U2BL(__tmp__ISGK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JSGK=execute_link__SRZM(__tmp__ISGK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JSGK=execute_link__OBFO(__tmp__ISGK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JSGK=execute_link__GJLO(__tmp__ISGK);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JSGK=execute_link__HHFO(__tmp__ISGK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JSGK=execute_link__KPLO(__tmp__ISGK);
    } break;
    case __EXPR_NEG__: {
      __tmp__JSGK=execute_link__0GKM(__tmp__ISGK);
    } break;
    case __EXPR_ADD__: {
      __tmp__JSGK=execute_link__RROL(__tmp__ISGK);
    } break;
    case __EXPR_NOT__: {
      __tmp__JSGK=execute_link__GUZM(__tmp__ISGK);
    } break;
    case __EXPR_MOD__: {
      __tmp__JSGK=execute_link__ANFO(__tmp__ISGK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JSGK=execute_link__YLEP(__tmp__ISGK);
    } break;
    case __EXPR_INF__: {
      __tmp__JSGK=execute_link__VQQN(__tmp__ISGK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JSGK=execute_link__4UQN(__tmp__ISGK);
    } break;
    case __EXPR_OR__: {
      __tmp__JSGK=execute_link__1HQN(__tmp__ISGK);
    } break;
    case __EXPR_XOR__: {
      __tmp__JSGK=execute_link__IYUO(__tmp__ISGK);
    } break;
    };
    Self__4OGK->parent_write__X50I.value__HBEH=__tmp__JSGK;
    seq_index__SIGK=(__UINTEGER_32)(seq_index__SIGK +  1);
    Self__LCUL=((__LOCAL *)Self__4OGK->local__2RIJ);
    if (((void *)Self__LCUL->last_seq__LRJJ == (void *)NULL)) {
      result__TPAM=NULL;
      if ((((__FAST_ARRAYoLOCAL_SEQo *)list_free__JRJJ)->parent_arrayed_collection__IRJJ.upper__FAJK <  0)) {
        result__QSEM=NULL;
        ptr__RSEM=((__POINTER )(NULL));
        typ_id__WSEM= 0;
        sz__TSEM=((__UINTEGER_32 )sizeof(__LOCAL_SEQ));
        if ((sz__TSEM ==  0)) {
          result__QSEM=LOCAL_SEQ__;
        } else {
          typ_id__WSEM=__LOCAL_SEQ__;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__TSEM);
          if ((typ_id__WSEM == (__INTEGER)(-  1))) {
            a__JQ2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__HQ2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__TSEM + a__JQ2Q) & (__UINTEGER_32)(~ a__JQ2Q));
            ptr__RSEM=micro_alloc__table__lab__BOI(new_size__HQ2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HQ2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__HQ2Q);
          } else {
            t__NQ2Q=((__UINTEGER_32 )typ_id__WSEM);
            a__PQ2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__RSEM=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__TSEM + a__PQ2Q) & (__UINTEGER_32)(~ a__PQ2Q)),((__POINTER )(&(table_type[(t__NQ2Q)]))),(__UINTEGER_32)(t__NQ2Q |  1));
          };
          result__QSEM=((__LOCAL_SEQ *)ptr__RSEM);
          *(result__QSEM) = *(LOCAL_SEQ__);
        };
        result__TPAM=result__QSEM;
      } else {
        Self__A44K=((__FAST_ARRAYoLOCAL_SEQo *)list_free__JRJJ);
        result__TPAM=((void **)Self__A44K->parent_arrayed_collection__IRJJ.storage__DBJK)[Self__A44K->parent_arrayed_collection__IRJJ.upper__FAJK];
        Self__1TEM=((__FAST_ARRAYoLOCAL_SEQo *)list_free__JRJJ);
        Self__1TEM->parent_arrayed_collection__IRJJ.upper__FAJK=(__INTEGER)(Self__1TEM->parent_arrayed_collection__IRJJ.upper__FAJK -  1);
      };
      ((__LOCAL_SEQ *)result__TPAM)->last_write__G1IL=NULL;
      add_last__T2FH(list_busy__WQJJ,Self__LCUL);
      Self__LCUL->last_seq__LRJJ=result__TPAM;
    };
    if (((((((((! mode_recursive__WYUC) && ((void *)loop_invariant__RKAL == (void *)NULL)) && ((void *)((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_write__G1IL != (void *)NULL)) && (((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_index__MDUL != (__INTEGER)(-  1))) && ((void *)((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_list_current__T1IL == (void *)list_current__IF1)) && (((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_index__MDUL < ((__LIST *)list_current__IF1)->index__PXRG)) && (((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_seq_call_local_and_loop__31IL == seq_call_local_and_loop__51IL)) && ((void *)((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_index__MDUL -  1)] == (void *)((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_write__G1IL))) {
      ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_index__MDUL -  1)]=((__WRITE_LOCAL *)((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_write__G1IL)->parent_write__X50I.value__HBEH;
      unwrite__OGNL(Self__LCUL,((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ)->last_write__G1IL);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    };
    Self__O2KM=((__LOCAL_SEQ *)Self__LCUL->last_seq__LRJJ);
    Self__O2KM->last_write__G1IL=Self__4OGK;
    Self__O2KM->last_seq_index__43IL=seq_index__SIGK;
    Self__O2KM->last_seq_or_and__1BJL=seq_or_and__AYRG;
    Self__O2KM->last_seq_call_and_loop__LAJL=seq_call_and_loop__VREJ;
    Self__O2KM->last_seq_call_local_and_loop__31IL=seq_call_local_and_loop__51IL;
    Self__O2KM->last_list_current__T1IL=list_current__IF1;
    Self__O2KM->last_index__MDUL=((__LIST *)list_current__IF1)->index__PXRG;
    result__APGK=Self__4OGK;
  };
  return(result__APGK);
}

static void* execute_access_unlink__VMDL(__READ_GLOBAL *Self__WMDL)
// ({READ_GLOBAL}) With resultNo recursive, No inlinable.
{
  if (((void *)((__SLOT_DATA *)Self__WMDL->global__RHJK)->value__M4OG != (void *)NULL)) {
    execute__UPHL(Self__WMDL->global__RHJK);
  };
  return(NULL);
}

static void* execute_unlink__CRZM(__EXPR_NOT_LOGIC *Self__DRZM)
// ({EXPR_NOT_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__FRZM;
  void *__tmp__GRZM;
  __READ_LOCAL *Self__KGFQ,*Self__ICKQ;
  __READ_GLOBAL *Self__NGFQ;
  __tmp__FRZM=Self__DRZM->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__FRZM)->__id) {
  case __LIST__: {
    __tmp__GRZM=execute_unlink__0SRJ(__tmp__FRZM);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__GRZM=execute_unlink__42LK(__tmp__FRZM);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__KGFQ=((__READ_LOCAL *)__tmp__FRZM);
    unread__YVJK(Self__KGFQ->local__ALZD,Self__KGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__GRZM=execute_unlink__PBMK(__tmp__FRZM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__GRZM=execute_unlink__WGMK(__tmp__FRZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__GRZM=execute_unlink__HHMK(__tmp__FRZM);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__ICKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__FRZM)->receiver__OO2H);
    unread__YVJK(Self__ICKQ->local__ALZD,Self__ICKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__FRZM));
    __tmp__GRZM=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__GRZM=execute_unlink__IIMK(__tmp__FRZM);
  } break;
  case __EXPR_SUB__: {
    __tmp__GRZM=execute_unlink__ZIMK(__tmp__FRZM);
  } break;
  case __EXPR_MUL__: {
    __tmp__GRZM=execute_unlink__KJMK(__tmp__FRZM);
  } break;
  case __EXPR_DIV__: {
    __tmp__GRZM=execute_unlink__1JMK(__tmp__FRZM);
  } break;
  case __EXPR_AND__: {
    __tmp__GRZM=execute_unlink__MKMK(__tmp__FRZM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__GRZM=execute_unlink__3KMK(__tmp__FRZM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__GRZM=execute_unlink__OLMK(__tmp__FRZM);
  } break;
  case __PUT_TO__: {
    __tmp__GRZM=execute_link__BOPK(((__PUT_TO *)__tmp__FRZM));
  } break;
  case __ITEM__: {
    __tmp__GRZM=execute_unlink__CMMK(__tmp__FRZM);
  } break;
  case __SIZE_OF__: {
    __tmp__GRZM=execute_unlink__SMMK(__tmp__FRZM);
  } break;
  case __CAST__: {
    __tmp__GRZM=execute_unlink__XMMK(__tmp__FRZM);
  } break;
  case __CALL_SLOT__: {
    __tmp__GRZM=execute_unlink__2NQL(__tmp__FRZM);
  } break;
  case __READ_SLOT__: {
    __tmp__GRZM=execute_unlink__WDAL(__tmp__FRZM);
  } break;
  case __READ_GLOBAL__: {
    Self__NGFQ=((__READ_GLOBAL *)__tmp__FRZM);
    unread__15ML(Self__NGFQ->global__RHJK,Self__NGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__GRZM=execute_access_unlink__VMDL(Self__NGFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__GRZM=execute_unlink__CRZM(__tmp__FRZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__GRZM=execute_unlink__B2EO(__tmp__FRZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__GRZM=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__FRZM));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__GRZM=execute_unlink__R2EO(__tmp__FRZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__GRZM=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__FRZM));
  } break;
  case __EXPR_NEG__: {
    __tmp__GRZM=execute_unlink__XYJM(__tmp__FRZM);
  } break;
  case __EXPR_ADD__: {
    __tmp__GRZM=execute_unlink__3NNL(__tmp__FRZM);
  } break;
  case __EXPR_NOT__: {
    __tmp__GRZM=execute_unlink__YLZM(__tmp__FRZM);
  } break;
  case __EXPR_MOD__: {
    __tmp__GRZM=execute_unlink__B3EO(__tmp__FRZM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__GRZM=execute_unlink__AJEP(__tmp__FRZM);
  } break;
  case __EXPR_INF__: {
    __tmp__GRZM=execute_unlink__CPQN(__tmp__FRZM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__GRZM=execute_unlink__SPQN(__tmp__FRZM);
  } break;
  case __EXPR_OR__: {
    __tmp__GRZM=execute_unlink__JDQN(__tmp__FRZM);
  } break;
  case __EXPR_XOR__: {
    __tmp__GRZM=execute_unlink__YNUO(__tmp__FRZM);
  } break;
  };
  return(__tmp__GRZM);
}

static void* execute__SALM(__LOOP *Self__TALM)
// ({LOOP}) With resultNo recursive, No inlinable.
{
  __UINTEGER_32 __tmp__CCLM,__tmp__LBLM,__tmp__SBLM;
  void *result__VALM;
  __INTEGER cur_seq_call_local_and_loop__WALM;
  __INTEGER cur_seq_call_and_loop__XALM;
  __tmp__CCLM=seq_index__SIGK;
  result__VALM=NULL;
  cur_seq_call_local_and_loop__WALM= 0;
  cur_seq_call_and_loop__XALM= 0;
  if ((Self__TALM->link_count__YALM ==  0)) {
    result__VALM=execute_unlink__0SRJ(Self__TALM->body__5ALM);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  } else {
    __tmp__LBLM=(__UINTEGER_32)(seq_call_local_and_loop__51IL + ((__UINTEGER_32 )Self__TALM->link_count__YALM));
    seq_call_local_and_loop__51IL=__tmp__LBLM;
    cur_seq_call_local_and_loop__WALM=((__INTEGER )__tmp__LBLM);
    __tmp__SBLM=(__UINTEGER_32)(seq_call_and_loop__VREJ + ((__UINTEGER_32 )Self__TALM->link_count__YALM));
    seq_call_and_loop__VREJ=__tmp__SBLM;
    cur_seq_call_and_loop__XALM=((__INTEGER )__tmp__SBLM);
    seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
    result__VALM=Self__TALM;
    execute_case__0WRG(Self__TALM->body__5ALM);
    if (((void *)loop_invariant__RKAL == (void *)Self__TALM)) {
      loop_list__ILAL=list_current__IF1;
      loop_seq_index__IK2L=((__INTEGER )__tmp__CCLM);
      loop_seq_call_local_and_loop__Q3DM=cur_seq_call_local_and_loop__WALM;
      loop_seq_call_and_loop__4J2L=cur_seq_call_and_loop__XALM;
      seq_call_local_and_loop__51IL=(__UINTEGER_32)(seq_call_local_and_loop__51IL + ((__UINTEGER_32 )Self__TALM->link_count__YALM));
      seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ + ((__UINTEGER_32 )Self__TALM->link_count__YALM));
      execute_case__0WRG(Self__TALM->body__5ALM);
      loop_invariant__RKAL=NULL;
    };
  };
  return(result__VALM);
}

static void* execute_unlink__B2EO(__EXPR_OR_LOGIC *Self__C2EO)
// ({EXPR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__F2EO,*__tmp__P2EO;
  void *__tmp__G2EO,*__tmp__Q2EO;
  __READ_LOCAL *Self__OGFQ,*Self__OCKQ,*Self__SGFQ,*Self__UCKQ;
  __READ_GLOBAL *Self__RGFQ,*Self__VGFQ;
  __LIST *Self__VMZQ;
  __tmp__F2EO=Self__C2EO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__F2EO)->__id) {
  case __LIST__: {
    __tmp__G2EO=execute_unlink__0SRJ(__tmp__F2EO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__G2EO=execute_unlink__42LK(__tmp__F2EO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__OGFQ=((__READ_LOCAL *)__tmp__F2EO);
    unread__YVJK(Self__OGFQ->local__ALZD,Self__OGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__G2EO=execute_unlink__PBMK(__tmp__F2EO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__G2EO=execute_unlink__WGMK(__tmp__F2EO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__G2EO=execute_unlink__HHMK(__tmp__F2EO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__OCKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__F2EO)->receiver__OO2H);
    unread__YVJK(Self__OCKQ->local__ALZD,Self__OCKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__F2EO));
    __tmp__G2EO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__G2EO=execute_unlink__IIMK(__tmp__F2EO);
  } break;
  case __EXPR_SUB__: {
    __tmp__G2EO=execute_unlink__ZIMK(__tmp__F2EO);
  } break;
  case __EXPR_MUL__: {
    __tmp__G2EO=execute_unlink__KJMK(__tmp__F2EO);
  } break;
  case __EXPR_DIV__: {
    __tmp__G2EO=execute_unlink__1JMK(__tmp__F2EO);
  } break;
  case __EXPR_AND__: {
    __tmp__G2EO=execute_unlink__MKMK(__tmp__F2EO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__G2EO=execute_unlink__3KMK(__tmp__F2EO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__G2EO=execute_unlink__OLMK(__tmp__F2EO);
  } break;
  case __PUT_TO__: {
    __tmp__G2EO=execute_link__BOPK(((__PUT_TO *)__tmp__F2EO));
  } break;
  case __ITEM__: {
    __tmp__G2EO=execute_unlink__CMMK(__tmp__F2EO);
  } break;
  case __SIZE_OF__: {
    __tmp__G2EO=execute_unlink__SMMK(__tmp__F2EO);
  } break;
  case __CAST__: {
    __tmp__G2EO=execute_unlink__XMMK(__tmp__F2EO);
  } break;
  case __CALL_SLOT__: {
    __tmp__G2EO=execute_unlink__2NQL(__tmp__F2EO);
  } break;
  case __READ_SLOT__: {
    __tmp__G2EO=execute_unlink__WDAL(__tmp__F2EO);
  } break;
  case __READ_GLOBAL__: {
    Self__RGFQ=((__READ_GLOBAL *)__tmp__F2EO);
    unread__15ML(Self__RGFQ->global__RHJK,Self__RGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G2EO=execute_access_unlink__VMDL(Self__RGFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__G2EO=execute_unlink__CRZM(__tmp__F2EO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__G2EO=execute_unlink__B2EO(__tmp__F2EO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__G2EO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__F2EO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__G2EO=execute_unlink__R2EO(__tmp__F2EO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__G2EO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__F2EO));
  } break;
  case __EXPR_NEG__: {
    __tmp__G2EO=execute_unlink__XYJM(__tmp__F2EO);
  } break;
  case __EXPR_ADD__: {
    __tmp__G2EO=execute_unlink__3NNL(__tmp__F2EO);
  } break;
  case __EXPR_NOT__: {
    __tmp__G2EO=execute_unlink__YLZM(__tmp__F2EO);
  } break;
  case __EXPR_MOD__: {
    __tmp__G2EO=execute_unlink__B3EO(__tmp__F2EO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__G2EO=execute_unlink__AJEP(__tmp__F2EO);
  } break;
  case __EXPR_INF__: {
    __tmp__G2EO=execute_unlink__CPQN(__tmp__F2EO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__G2EO=execute_unlink__SPQN(__tmp__F2EO);
  } break;
  case __EXPR_OR__: {
    __tmp__G2EO=execute_unlink__JDQN(__tmp__F2EO);
  } break;
  case __EXPR_XOR__: {
    __tmp__G2EO=execute_unlink__YNUO(__tmp__F2EO);
  } break;
  };
  if (((void *)__tmp__G2EO != (void *)NULL)) {
    Self__VMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__VMZQ->expr_list__JUOG,__tmp__G2EO,(__INTEGER)(Self__VMZQ->index__PXRG -  1));
    Self__VMZQ->index__PXRG=(__INTEGER)(Self__VMZQ->index__PXRG +  1);
  };
  __tmp__P2EO=Self__C2EO->parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__P2EO)->__id) {
  case __LIST__: {
    __tmp__Q2EO=execute_unlink__0SRJ(__tmp__P2EO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__Q2EO=execute_unlink__42LK(__tmp__P2EO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__SGFQ=((__READ_LOCAL *)__tmp__P2EO);
    unread__YVJK(Self__SGFQ->local__ALZD,Self__SGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__Q2EO=execute_unlink__PBMK(__tmp__P2EO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__Q2EO=execute_unlink__WGMK(__tmp__P2EO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__Q2EO=execute_unlink__HHMK(__tmp__P2EO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__UCKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__P2EO)->receiver__OO2H);
    unread__YVJK(Self__UCKQ->local__ALZD,Self__UCKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__P2EO));
    __tmp__Q2EO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__Q2EO=execute_unlink__IIMK(__tmp__P2EO);
  } break;
  case __EXPR_SUB__: {
    __tmp__Q2EO=execute_unlink__ZIMK(__tmp__P2EO);
  } break;
  case __EXPR_MUL__: {
    __tmp__Q2EO=execute_unlink__KJMK(__tmp__P2EO);
  } break;
  case __EXPR_DIV__: {
    __tmp__Q2EO=execute_unlink__1JMK(__tmp__P2EO);
  } break;
  case __EXPR_AND__: {
    __tmp__Q2EO=execute_unlink__MKMK(__tmp__P2EO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__Q2EO=execute_unlink__3KMK(__tmp__P2EO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__Q2EO=execute_unlink__OLMK(__tmp__P2EO);
  } break;
  case __PUT_TO__: {
    __tmp__Q2EO=execute_link__BOPK(((__PUT_TO *)__tmp__P2EO));
  } break;
  case __ITEM__: {
    __tmp__Q2EO=execute_unlink__CMMK(__tmp__P2EO);
  } break;
  case __SIZE_OF__: {
    __tmp__Q2EO=execute_unlink__SMMK(__tmp__P2EO);
  } break;
  case __CAST__: {
    __tmp__Q2EO=execute_unlink__XMMK(__tmp__P2EO);
  } break;
  case __CALL_SLOT__: {
    __tmp__Q2EO=execute_unlink__2NQL(__tmp__P2EO);
  } break;
  case __READ_SLOT__: {
    __tmp__Q2EO=execute_unlink__WDAL(__tmp__P2EO);
  } break;
  case __READ_GLOBAL__: {
    Self__VGFQ=((__READ_GLOBAL *)__tmp__P2EO);
    unread__15ML(Self__VGFQ->global__RHJK,Self__VGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q2EO=execute_access_unlink__VMDL(Self__VGFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__Q2EO=execute_unlink__CRZM(__tmp__P2EO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__Q2EO=execute_unlink__B2EO(__tmp__P2EO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__Q2EO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__P2EO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__Q2EO=execute_unlink__R2EO(__tmp__P2EO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__Q2EO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__P2EO));
  } break;
  case __EXPR_NEG__: {
    __tmp__Q2EO=execute_unlink__XYJM(__tmp__P2EO);
  } break;
  case __EXPR_ADD__: {
    __tmp__Q2EO=execute_unlink__3NNL(__tmp__P2EO);
  } break;
  case __EXPR_NOT__: {
    __tmp__Q2EO=execute_unlink__YLZM(__tmp__P2EO);
  } break;
  case __EXPR_MOD__: {
    __tmp__Q2EO=execute_unlink__B3EO(__tmp__P2EO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__Q2EO=execute_unlink__AJEP(__tmp__P2EO);
  } break;
  case __EXPR_INF__: {
    __tmp__Q2EO=execute_unlink__CPQN(__tmp__P2EO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__Q2EO=execute_unlink__SPQN(__tmp__P2EO);
  } break;
  case __EXPR_OR__: {
    __tmp__Q2EO=execute_unlink__JDQN(__tmp__P2EO);
  } break;
  case __EXPR_XOR__: {
    __tmp__Q2EO=execute_unlink__YNUO(__tmp__P2EO);
  } break;
  };
  return(__tmp__Q2EO);
}

static void* execute_link__GJLO(__EXPR_OR_OR_LOGIC *Self__HJLO)
// ({EXPR_OR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  void *left_t__PJLO,*right_t__QJLO;
  __UINTEGER_32 old_seq__KJLO;
  void *__tmp__SJLO,*__tmp__TJLO,*__tmp__2JLO,*__tmp__3JLO,*__tmp__5JLO;
  void *__tmp__CKLO,*result__V4OO,*__tmp__X4OO,*result__JJLO;
  void *result__NYZO,*__tmp__VYZO,*result__U0YO,*__tmp__G1YO;
  void *result__O1YO,*__tmp__W1YO,*result__HDAP,*__tmp__PDAP;
  void *__tmp__WDAP,*result__31YO,*__tmp__A2YO,*__tmp__B2YO,*__tmp__J2YO;
  void *__tmp__Q2YO,*__tmp__T2YO,*__tmp__C3YO,*__tmp__D3YO,*__tmp__K3YO;
  void *__tmp__L3YO,*__tmp__13YO,*result__1JAP,*__tmp__DKAP;
  void *result__LKAP,*__tmp__TKAP;
  void *__tmp__AKLO,*left_cst__NJLO,*__tmp__DKLO,*right_cst__OJLO;
  void *__tmp__Y4OO,*rd__U4OO;
  __READ_LOCAL *Self__PHDQ,*Self__RHDQ,*Self__THDQ,*Self__VHDQ;
  __READ_LOCAL *Self__XHDQ,*Self__ZHDQ,*Self__1HDQ,*Self__3HDQ;
  __READ_LOCAL *Self__5HDQ,*Self__BIDQ,*Self__JIDQ,*Self__LIDQ;
  __READ_LOCAL *Self__NIDQ,*Self__PIDQ,*Self__RIDQ,*Self__TIDQ;
  __READ_LOCAL *Self__VIDQ,*Self__XIDQ;
  __READ_GLOBAL *Self__SHDQ,*Self__WHDQ,*Self__0HDQ,*Self__4HDQ;
  __READ_GLOBAL *Self__CIDQ,*Self__MIDQ,*Self__QIDQ,*Self__UIDQ;
  __READ_GLOBAL *Self__YIDQ;
  void *sup__41YO,*__tmp__R2YO;
  void *eq__51YO,*__tmp__U2YO;
  __BOOLEAN __tmp__C2YO,__tmp__E3YO,__tmp__M3YO,__tmp__P3YO;
  left_t__PJLO=NULL;
  right_t__QJLO=NULL;
  old_seq__KJLO=seq_call_and_loop__VREJ;
  __tmp__SJLO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__SJLO)->__id) {
  case __LIST__: {
    __tmp__TJLO=execute_link__LUOG(__tmp__SJLO);
  } break;
  case __STRING_CST__: {
    __tmp__TJLO=((__STRING_CST *)__tmp__SJLO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__TJLO=execute_link__U5ZK(__tmp__SJLO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__TJLO=((__PROTOTYPE_CST *)__tmp__SJLO);
  } break;
  case __INTEGER_CST__: {
    __tmp__TJLO=((__INTEGER_CST *)__tmp__SJLO);
  } break;
  case __READ_LOCAL__: {
    __tmp__TJLO=execute_link__EHAL(__tmp__SJLO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TJLO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TJLO=execute_link__2LAL(__tmp__SJLO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TJLO=execute_link__FQAL(__tmp__SJLO);
  } break;
  case __REAL_CST__: {
    __tmp__TJLO=((__REAL_CST *)__tmp__SJLO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__TJLO=((__CHARACTER_CST *)__tmp__SJLO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__TJLO=execute_link__UUAL(__tmp__SJLO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TJLO=execute_link__1VAL(__tmp__SJLO);
  } break;
  case __EXPR_SUP__: {
    __tmp__TJLO=execute_link__AWAL(__tmp__SJLO);
  } break;
  case __EXPR_SUB__: {
    __tmp__TJLO=execute_link__J0AL(__tmp__SJLO);
  } break;
  case __EXPR_MUL__: {
    __tmp__TJLO=execute_link__S4AL(__tmp__SJLO);
  } break;
  case __EXPR_DIV__: {
    __tmp__TJLO=execute_link__1CBL(__tmp__SJLO);
  } break;
  case __EXPR_AND__: {
    __tmp__TJLO=execute_link__EHBL(__tmp__SJLO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TJLO=execute_link__NLBL(__tmp__SJLO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TJLO=execute_link__WPBL(__tmp__SJLO);
  } break;
  case __PUT_TO__: {
    __tmp__TJLO=execute_link__BOPK(__tmp__SJLO);
  } break;
  case __ITEM__: {
    __tmp__TJLO=execute_link__5TBL(__tmp__SJLO);
  } break;
  case __SIZE_OF__: {
    __tmp__TJLO=execute_link__GUBL(__tmp__SJLO);
  } break;
  case __CAST__: {
    __tmp__TJLO=execute_link__LUBL(__tmp__SJLO);
  } break;
  case __CALL_SLOT__: {
    __tmp__TJLO=execute_link__A2TL(__tmp__SJLO);
  } break;
  case __READ_SLOT__: {
    __tmp__TJLO=execute_link__EYBL(__tmp__SJLO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__TJLO=execute_link__U2BL(__tmp__SJLO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TJLO=execute_link__SRZM(__tmp__SJLO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TJLO=execute_link__OBFO(__tmp__SJLO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TJLO=execute_link__GJLO(__tmp__SJLO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TJLO=execute_link__HHFO(__tmp__SJLO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TJLO=execute_link__KPLO(__tmp__SJLO);
  } break;
  case __EXPR_NEG__: {
    __tmp__TJLO=execute_link__0GKM(__tmp__SJLO);
  } break;
  case __EXPR_ADD__: {
    __tmp__TJLO=execute_link__RROL(__tmp__SJLO);
  } break;
  case __EXPR_NOT__: {
    __tmp__TJLO=execute_link__GUZM(__tmp__SJLO);
  } break;
  case __EXPR_MOD__: {
    __tmp__TJLO=execute_link__ANFO(__tmp__SJLO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TJLO=execute_link__YLEP(__tmp__SJLO);
  } break;
  case __EXPR_INF__: {
    __tmp__TJLO=execute_link__VQQN(__tmp__SJLO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TJLO=execute_link__4UQN(__tmp__SJLO);
  } break;
  case __EXPR_OR__: {
    __tmp__TJLO=execute_link__1HQN(__tmp__SJLO);
  } break;
  case __EXPR_XOR__: {
    __tmp__TJLO=execute_link__IYUO(__tmp__SJLO);
  } break;
  };
  Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO=__tmp__TJLO;
  seq_or_and__AYRG=(__UINTEGER_32)(seq_or_and__AYRG +  1);
  seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
  __tmp__2JLO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__2JLO)->__id) {
  case __LIST__: {
    __tmp__3JLO=execute_link__LUOG(__tmp__2JLO);
  } break;
  case __STRING_CST__: {
    __tmp__3JLO=((__STRING_CST *)__tmp__2JLO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__3JLO=execute_link__U5ZK(__tmp__2JLO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__3JLO=((__PROTOTYPE_CST *)__tmp__2JLO);
  } break;
  case __INTEGER_CST__: {
    __tmp__3JLO=((__INTEGER_CST *)__tmp__2JLO);
  } break;
  case __READ_LOCAL__: {
    __tmp__3JLO=execute_link__EHAL(__tmp__2JLO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3JLO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3JLO=execute_link__2LAL(__tmp__2JLO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3JLO=execute_link__FQAL(__tmp__2JLO);
  } break;
  case __REAL_CST__: {
    __tmp__3JLO=((__REAL_CST *)__tmp__2JLO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__3JLO=((__CHARACTER_CST *)__tmp__2JLO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__3JLO=execute_link__UUAL(__tmp__2JLO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3JLO=execute_link__1VAL(__tmp__2JLO);
  } break;
  case __EXPR_SUP__: {
    __tmp__3JLO=execute_link__AWAL(__tmp__2JLO);
  } break;
  case __EXPR_SUB__: {
    __tmp__3JLO=execute_link__J0AL(__tmp__2JLO);
  } break;
  case __EXPR_MUL__: {
    __tmp__3JLO=execute_link__S4AL(__tmp__2JLO);
  } break;
  case __EXPR_DIV__: {
    __tmp__3JLO=execute_link__1CBL(__tmp__2JLO);
  } break;
  case __EXPR_AND__: {
    __tmp__3JLO=execute_link__EHBL(__tmp__2JLO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3JLO=execute_link__NLBL(__tmp__2JLO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3JLO=execute_link__WPBL(__tmp__2JLO);
  } break;
  case __PUT_TO__: {
    __tmp__3JLO=execute_link__BOPK(__tmp__2JLO);
  } break;
  case __ITEM__: {
    __tmp__3JLO=execute_link__5TBL(__tmp__2JLO);
  } break;
  case __SIZE_OF__: {
    __tmp__3JLO=execute_link__GUBL(__tmp__2JLO);
  } break;
  case __CAST__: {
    __tmp__3JLO=execute_link__LUBL(__tmp__2JLO);
  } break;
  case __CALL_SLOT__: {
    __tmp__3JLO=execute_link__A2TL(__tmp__2JLO);
  } break;
  case __READ_SLOT__: {
    __tmp__3JLO=execute_link__EYBL(__tmp__2JLO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__3JLO=execute_link__U2BL(__tmp__2JLO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3JLO=execute_link__SRZM(__tmp__2JLO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3JLO=execute_link__OBFO(__tmp__2JLO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3JLO=execute_link__GJLO(__tmp__2JLO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3JLO=execute_link__HHFO(__tmp__2JLO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3JLO=execute_link__KPLO(__tmp__2JLO);
  } break;
  case __EXPR_NEG__: {
    __tmp__3JLO=execute_link__0GKM(__tmp__2JLO);
  } break;
  case __EXPR_ADD__: {
    __tmp__3JLO=execute_link__RROL(__tmp__2JLO);
  } break;
  case __EXPR_NOT__: {
    __tmp__3JLO=execute_link__GUZM(__tmp__2JLO);
  } break;
  case __EXPR_MOD__: {
    __tmp__3JLO=execute_link__ANFO(__tmp__2JLO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3JLO=execute_link__YLEP(__tmp__2JLO);
  } break;
  case __EXPR_INF__: {
    __tmp__3JLO=execute_link__VQQN(__tmp__2JLO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3JLO=execute_link__4UQN(__tmp__2JLO);
  } break;
  case __EXPR_OR__: {
    __tmp__3JLO=execute_link__1HQN(__tmp__2JLO);
  } break;
  case __EXPR_XOR__: {
    __tmp__3JLO=execute_link__IYUO(__tmp__2JLO);
  } break;
  };
  Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO=__tmp__3JLO;
  __tmp__5JLO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  if (__tmp__5JLO==NULL) {
    __tmp__AKLO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__5JLO)->__id) {
    case __LIST__: {
      __tmp__AKLO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__AKLO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__AKLO=((void *)__tmp__5JLO);
    } break;
    case __INTEGER_CST__: {
      __tmp__AKLO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__AKLO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__AKLO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__AKLO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__AKLO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__AKLO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__AKLO=NULL;
    } break;
    case __ITEM__: {
      __tmp__AKLO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__AKLO=NULL;
    } break;
    case __CAST__: {
      __tmp__AKLO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__AKLO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__AKLO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__AKLO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__AKLO=NULL;
    } break;
    }
  };
  left_cst__NJLO=__tmp__AKLO;
  __tmp__CKLO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  if (__tmp__CKLO==NULL) {
    __tmp__DKLO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__CKLO)->__id) {
    case __LIST__: {
      __tmp__DKLO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__DKLO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DKLO=((void *)__tmp__CKLO);
    } break;
    case __INTEGER_CST__: {
      __tmp__DKLO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DKLO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__DKLO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__DKLO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__DKLO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DKLO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__DKLO=NULL;
    } break;
    case __ITEM__: {
      __tmp__DKLO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__DKLO=NULL;
    } break;
    case __CAST__: {
      __tmp__DKLO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__DKLO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__DKLO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__DKLO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__DKLO=NULL;
    } break;
    }
  };
  right_cst__OJLO=__tmp__DKLO;
  if (((void *)__tmp__AKLO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__AKLO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      left_t__PJLO=type_true__FJB;
    } else {
      left_t__PJLO=type_false__NJB;
    };
  };
  if (((void *)__tmp__DKLO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__DKLO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      right_t__QJLO=type_true__FJB;
    } else {
      right_t__QJLO=type_false__NJB;
    };
  };
  result__V4OO=NULL;
  __tmp__X4OO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
  if (__tmp__X4OO==NULL) {
    __tmp__Y4OO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__X4OO)->__id) {
    case __LIST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__Y4OO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__Y4OO=((void *)__tmp__X4OO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__Y4OO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__Y4OO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__Y4OO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__Y4OO=NULL;
    } break;
    case __ITEM__: {
      __tmp__Y4OO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__Y4OO=NULL;
    } break;
    case __CAST__: {
      __tmp__Y4OO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__Y4OO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__Y4OO=((void *)__tmp__X4OO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__Y4OO=((void *)__tmp__X4OO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__Y4OO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__Y4OO=NULL;
    } break;
    }
  };
  rd__U4OO=__tmp__Y4OO;
  if (((void *)__tmp__Y4OO != (void *)NULL)) {
    result__V4OO=create__with__and__2TDO(Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO,Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO);
  };
  result__JJLO=result__V4OO;
  if ((((void *)result__V4OO == (void *)NULL) && ((void *)__tmp__AKLO != (void *)NULL))) {
    result__NYZO=NULL;
    if (((void *)left_t__PJLO == (void *)type_false__NJB)) {
      result__NYZO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      __tmp__VYZO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__VYZO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__VYZO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__VYZO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__PHDQ=((__READ_LOCAL *)__tmp__VYZO);
        unread__YVJK(Self__PHDQ->local__ALZD,Self__PHDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__VYZO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__VYZO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__VYZO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__RHDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__VYZO)->receiver__OO2H);
        unread__YVJK(Self__RHDQ->local__ALZD,Self__RHDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__VYZO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__VYZO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__VYZO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__VYZO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__VYZO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__VYZO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__VYZO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__VYZO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__VYZO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__VYZO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__VYZO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__VYZO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__VYZO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__VYZO);
      } break;
      case __READ_GLOBAL__: {
        Self__SHDQ=((__READ_GLOBAL *)__tmp__VYZO);
        unread__15ML(Self__SHDQ->global__RHJK,Self__SHDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__VYZO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__VYZO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__VYZO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__VYZO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__VYZO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__VYZO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__VYZO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__VYZO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__VYZO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__VYZO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__VYZO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__VYZO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__VYZO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__VYZO);
      } break;
      };
    };
    result__U0YO=result__NYZO;
    if ((((void *)result__NYZO == (void *)NULL) && ((void *)left_t__PJLO == (void *)type_true__FJB))) {
      result__U0YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__G1YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__G1YO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__G1YO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__G1YO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__THDQ=((__READ_LOCAL *)__tmp__G1YO);
        unread__YVJK(Self__THDQ->local__ALZD,Self__THDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__G1YO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__G1YO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__G1YO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__VHDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__G1YO)->receiver__OO2H);
        unread__YVJK(Self__VHDQ->local__ALZD,Self__VHDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__G1YO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__G1YO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__G1YO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__G1YO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__G1YO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__G1YO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__G1YO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__G1YO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__G1YO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__G1YO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__G1YO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__G1YO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__G1YO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__G1YO);
      } break;
      case __READ_GLOBAL__: {
        Self__WHDQ=((__READ_GLOBAL *)__tmp__G1YO);
        unread__15ML(Self__WHDQ->global__RHJK,Self__WHDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__G1YO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__G1YO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__G1YO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__G1YO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__G1YO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__G1YO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__G1YO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__G1YO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__G1YO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__G1YO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__G1YO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__G1YO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__G1YO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__G1YO);
      } break;
      };
    };
    result__JJLO=result__U0YO;
  };
  if ((((void *)result__JJLO == (void *)NULL) && ((void *)__tmp__DKLO != (void *)NULL))) {
    result__O1YO=NULL;
    if (((void *)right_t__QJLO == (void *)type_false__NJB)) {
      result__O1YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__W1YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__W1YO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__W1YO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__W1YO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__XHDQ=((__READ_LOCAL *)__tmp__W1YO);
        unread__YVJK(Self__XHDQ->local__ALZD,Self__XHDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__W1YO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__W1YO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__W1YO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__ZHDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__W1YO)->receiver__OO2H);
        unread__YVJK(Self__ZHDQ->local__ALZD,Self__ZHDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__W1YO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__W1YO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__W1YO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__W1YO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__W1YO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__W1YO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__W1YO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__W1YO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__W1YO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__W1YO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__W1YO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__W1YO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__W1YO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__W1YO);
      } break;
      case __READ_GLOBAL__: {
        Self__0HDQ=((__READ_GLOBAL *)__tmp__W1YO);
        unread__15ML(Self__0HDQ->global__RHJK,Self__0HDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__W1YO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__W1YO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__W1YO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__W1YO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__W1YO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__W1YO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__W1YO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__W1YO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__W1YO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__W1YO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__W1YO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__W1YO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__W1YO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__W1YO);
      } break;
      };
    };
    result__JJLO=result__O1YO;
  };
  if (((((void *)result__JJLO == (void *)NULL) && ((void *)__tmp__DKLO != (void *)NULL)) && ((void *)__tmp__AKLO != (void *)NULL))) {
    result__HDAP=NULL;
    if (((void *)left_t__PJLO == (void *)type_true__FJB)) {
      result__HDAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__PDAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__PDAP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__PDAP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__PDAP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__1HDQ=((__READ_LOCAL *)__tmp__PDAP);
        unread__YVJK(Self__1HDQ->local__ALZD,Self__1HDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__PDAP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__PDAP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__PDAP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__3HDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__PDAP)->receiver__OO2H);
        unread__YVJK(Self__3HDQ->local__ALZD,Self__3HDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__PDAP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__PDAP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__PDAP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__PDAP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__PDAP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__PDAP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__PDAP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__PDAP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__PDAP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__PDAP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__PDAP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__PDAP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__PDAP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__PDAP);
      } break;
      case __READ_GLOBAL__: {
        Self__4HDQ=((__READ_GLOBAL *)__tmp__PDAP);
        unread__15ML(Self__4HDQ->global__RHJK,Self__4HDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__PDAP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__PDAP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__PDAP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__PDAP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__PDAP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__PDAP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__PDAP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__PDAP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__PDAP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__PDAP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__PDAP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__PDAP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__PDAP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__PDAP);
      } break;
      };
    } else {
      result__HDAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      __tmp__WDAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__WDAP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__WDAP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__WDAP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__5HDQ=((__READ_LOCAL *)__tmp__WDAP);
        unread__YVJK(Self__5HDQ->local__ALZD,Self__5HDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__WDAP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__WDAP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__WDAP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__BIDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__WDAP)->receiver__OO2H);
        unread__YVJK(Self__BIDQ->local__ALZD,Self__BIDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__WDAP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__WDAP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__WDAP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__WDAP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__WDAP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__WDAP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__WDAP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__WDAP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__WDAP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__WDAP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__WDAP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__WDAP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__WDAP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__WDAP);
      } break;
      case __READ_GLOBAL__: {
        Self__CIDQ=((__READ_GLOBAL *)__tmp__WDAP);
        unread__15ML(Self__CIDQ->global__RHJK,Self__CIDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__WDAP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__WDAP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__WDAP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__WDAP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__WDAP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__WDAP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__WDAP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__WDAP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__WDAP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__WDAP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__WDAP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__WDAP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__WDAP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__WDAP);
      } break;
      };
    };
    result__JJLO=result__HDAP;
  };
  if ((((void *)result__JJLO == (void *)NULL) && ((__UINTEGER_32)(old_seq__KJLO +  1) == seq_call_and_loop__VREJ))) {
    result__31YO=NULL;
    sup__41YO=NULL;
    eq__51YO=NULL;
    __tmp__A2YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
    __tmp__B2YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__A2YO)->__id) {
    case __LIST__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__C2YO=__infix_equal_equal__WF1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__C2YO=__infix_equal_equal__LG1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __INTEGER_CST__: {
      __tmp__C2YO=__infix_equal_equal__2G1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __READ_LOCAL__: {
      __tmp__C2YO=__infix_equal_equal__WH1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__C2YO=__infix_equal_equal__MI1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__C2YO=__infix_equal_equal__IJ1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __REAL_CST__: {
      __tmp__C2YO=__infix_equal_equal__EK1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__C2YO=__infix_equal_equal__4K1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__C2YO=__infix_equal_equal__XL1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_SUB__: {
      __tmp__C2YO=__infix_equal_equal__TM1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_MUL__: {
      __tmp__C2YO=__infix_equal_equal__PN1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_DIV__: {
      __tmp__C2YO=__infix_equal_equal__LO1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_AND__: {
      __tmp__C2YO=__infix_equal_equal__HP1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__C2YO=__infix_equal_equal__DQ1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__C2YO=__infix_equal_equal__5Q1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __PUT_TO__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__C2YO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__C2YO=__infix_equal_equal__LS1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__C2YO=__infix_equal_equal__HT1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__C2YO=__infix_equal_equal__CZHO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__C2YO=__infix_equal_equal__SXFO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__C2YO=__infix_equal_equal__TBMO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__C2YO=__infix_equal_equal__OYFO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__C2YO=__infix_equal_equal__QCMO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_NEG__: {
      __tmp__C2YO=__infix_equal_equal__J5KM(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_ADD__: {
      __tmp__C2YO=__infix_equal_equal__ZT1L(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_NOT__: {
      __tmp__C2YO=__infix_equal_equal__QB0M(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_MOD__: {
      __tmp__C2YO=__infix_equal_equal__KZFO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__C2YO=__infix_equal_equal__OTEP(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_INF__: {
      __tmp__C2YO=__infix_equal_equal__UZHO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__C2YO=__infix_equal_equal__Q0HO(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_OR__: {
      __tmp__C2YO=__infix_equal_equal__32QN(__tmp__A2YO,__tmp__B2YO);
    } break;
    case __EXPR_XOR__: {
      __tmp__C2YO=__infix_equal_equal__GOVO(__tmp__A2YO,__tmp__B2YO);
    } break;
    };
    if (__tmp__C2YO) {
      result__31YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__J2YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__J2YO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__J2YO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__J2YO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__JIDQ=((__READ_LOCAL *)__tmp__J2YO);
        unread__YVJK(Self__JIDQ->local__ALZD,Self__JIDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__J2YO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__J2YO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__J2YO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__LIDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__J2YO)->receiver__OO2H);
        unread__YVJK(Self__LIDQ->local__ALZD,Self__LIDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__J2YO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__J2YO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__J2YO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__J2YO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__J2YO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__J2YO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__J2YO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__J2YO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__J2YO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__J2YO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__J2YO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__J2YO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__J2YO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__J2YO);
      } break;
      case __READ_GLOBAL__: {
        Self__MIDQ=((__READ_GLOBAL *)__tmp__J2YO);
        unread__15ML(Self__MIDQ->global__RHJK,Self__MIDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__J2YO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__J2YO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__J2YO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__J2YO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__J2YO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__J2YO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__J2YO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__J2YO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__J2YO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__J2YO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__J2YO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__J2YO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__J2YO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__J2YO);
      } break;
      };
    } else {
      __tmp__Q2YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
      if (__tmp__Q2YO==NULL) {
        __tmp__R2YO=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__Q2YO)->__id) {
        case __LIST__: {
          __tmp__R2YO=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__R2YO=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__R2YO=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__R2YO=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__R2YO=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__R2YO=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__R2YO=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__R2YO=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__R2YO=((void *)__tmp__Q2YO);
        } break;
        case __EXPR_SUB__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__R2YO=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__R2YO=NULL;
        } break;
        case __ITEM__: {
          __tmp__R2YO=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__R2YO=NULL;
        } break;
        case __CAST__: {
          __tmp__R2YO=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__R2YO=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__R2YO=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__R2YO=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__R2YO=NULL;
        } break;
        }
      };
      sup__41YO=__tmp__R2YO;
      __tmp__T2YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
      if (__tmp__T2YO==NULL) {
        __tmp__U2YO=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__T2YO)->__id) {
        case __LIST__: {
          __tmp__U2YO=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__U2YO=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__U2YO=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__U2YO=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__U2YO=((void *)__tmp__T2YO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__U2YO=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__U2YO=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__U2YO=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__U2YO=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__U2YO=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__U2YO=NULL;
        } break;
        case __ITEM__: {
          __tmp__U2YO=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__U2YO=NULL;
        } break;
        case __CAST__: {
          __tmp__U2YO=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__U2YO=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__U2YO=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__U2YO=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__U2YO=NULL;
        } break;
        }
      };
      eq__51YO=__tmp__U2YO;
      if ((((void *)__tmp__R2YO != (void *)NULL) && ((void *)__tmp__U2YO != (void *)NULL))) {
        __tmp__C3YO=((__EXPR_SUP *)__tmp__R2YO)->parent_expr_binary_cmp__TAKH.left__HN2H;
        __tmp__D3YO=((__EXPR_EQUAL *)__tmp__U2YO)->parent_expr_binary_cmp__1LJH.left__HN2H;
        switch (((struct ___OBJ *)__tmp__C3YO)->__id) {
        case __LIST__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__E3YO=__infix_equal_equal__WF1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXTERNAL_C__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__E3YO=__infix_equal_equal__LG1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __INTEGER_CST__: {
          __tmp__E3YO=__infix_equal_equal__2G1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __READ_LOCAL__: {
          __tmp__E3YO=__infix_equal_equal__WH1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__E3YO=__infix_equal_equal__MI1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__E3YO=__infix_equal_equal__IJ1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __REAL_CST__: {
          __tmp__E3YO=__infix_equal_equal__EK1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __CHARACTER_CST__: {
          __tmp__E3YO=__infix_equal_equal__4K1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __IS_EXPANDED__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__E3YO=__infix_equal_equal__XL1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_SUB__: {
          __tmp__E3YO=__infix_equal_equal__TM1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_MUL__: {
          __tmp__E3YO=__infix_equal_equal__PN1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_DIV__: {
          __tmp__E3YO=__infix_equal_equal__LO1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_AND__: {
          __tmp__E3YO=__infix_equal_equal__HP1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__E3YO=__infix_equal_equal__DQ1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__E3YO=__infix_equal_equal__5Q1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __PUT_TO__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __CAST__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__E3YO=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__E3YO=__infix_equal_equal__LS1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__E3YO=__infix_equal_equal__HT1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__E3YO=__infix_equal_equal__CZHO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__E3YO=__infix_equal_equal__SXFO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__E3YO=__infix_equal_equal__TBMO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__E3YO=__infix_equal_equal__OYFO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__E3YO=__infix_equal_equal__QCMO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_NEG__: {
          __tmp__E3YO=__infix_equal_equal__J5KM(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_ADD__: {
          __tmp__E3YO=__infix_equal_equal__ZT1L(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_NOT__: {
          __tmp__E3YO=__infix_equal_equal__QB0M(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_MOD__: {
          __tmp__E3YO=__infix_equal_equal__KZFO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__E3YO=__infix_equal_equal__OTEP(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_INF__: {
          __tmp__E3YO=__infix_equal_equal__UZHO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__E3YO=__infix_equal_equal__Q0HO(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_OR__: {
          __tmp__E3YO=__infix_equal_equal__32QN(__tmp__C3YO,__tmp__D3YO);
        } break;
        case __EXPR_XOR__: {
          __tmp__E3YO=__infix_equal_equal__GOVO(__tmp__C3YO,__tmp__D3YO);
        } break;
        };
        if (__tmp__E3YO) {
          __tmp__K3YO=((__EXPR_SUP *)__tmp__R2YO)->parent_expr_binary_cmp__TAKH.right__LN2H;
          __tmp__L3YO=((__EXPR_EQUAL *)__tmp__U2YO)->parent_expr_binary_cmp__1LJH.right__LN2H;
          switch (((struct ___OBJ *)__tmp__K3YO)->__id) {
          case __LIST__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__M3YO=__infix_equal_equal__WF1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXTERNAL_C__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__M3YO=__infix_equal_equal__LG1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __INTEGER_CST__: {
            __tmp__M3YO=__infix_equal_equal__2G1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __READ_LOCAL__: {
            __tmp__M3YO=__infix_equal_equal__WH1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__M3YO=__infix_equal_equal__MI1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__M3YO=__infix_equal_equal__IJ1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __REAL_CST__: {
            __tmp__M3YO=__infix_equal_equal__EK1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __CHARACTER_CST__: {
            __tmp__M3YO=__infix_equal_equal__4K1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __IS_EXPANDED__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__M3YO=__infix_equal_equal__XL1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_SUB__: {
            __tmp__M3YO=__infix_equal_equal__TM1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_MUL__: {
            __tmp__M3YO=__infix_equal_equal__PN1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_DIV__: {
            __tmp__M3YO=__infix_equal_equal__LO1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_AND__: {
            __tmp__M3YO=__infix_equal_equal__HP1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__M3YO=__infix_equal_equal__DQ1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__M3YO=__infix_equal_equal__5Q1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __PUT_TO__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __CAST__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__M3YO=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__M3YO=__infix_equal_equal__LS1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __READ_GLOBAL__: {
            __tmp__M3YO=__infix_equal_equal__HT1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__M3YO=__infix_equal_equal__CZHO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__M3YO=__infix_equal_equal__SXFO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__M3YO=__infix_equal_equal__TBMO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__M3YO=__infix_equal_equal__OYFO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__M3YO=__infix_equal_equal__QCMO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_NEG__: {
            __tmp__M3YO=__infix_equal_equal__J5KM(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_ADD__: {
            __tmp__M3YO=__infix_equal_equal__ZT1L(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_NOT__: {
            __tmp__M3YO=__infix_equal_equal__QB0M(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_MOD__: {
            __tmp__M3YO=__infix_equal_equal__KZFO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__M3YO=__infix_equal_equal__OTEP(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_INF__: {
            __tmp__M3YO=__infix_equal_equal__UZHO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__M3YO=__infix_equal_equal__Q0HO(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_OR__: {
            __tmp__M3YO=__infix_equal_equal__32QN(__tmp__K3YO,__tmp__L3YO);
          } break;
          case __EXPR_XOR__: {
            __tmp__M3YO=__infix_equal_equal__GOVO(__tmp__K3YO,__tmp__L3YO);
          } break;
          };
          __tmp__P3YO=__tmp__M3YO;
        } else {
          __tmp__P3YO=FALSE__;
        };
        if (__tmp__P3YO) {
          result__31YO=create__with__and__4LAP(Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_SUP *)__tmp__R2YO)->parent_expr_binary_cmp__TAKH.left__HN2H,((__EXPR_SUP *)__tmp__R2YO)->parent_expr_binary_cmp__TAKH.right__LN2H);
          __tmp__13YO=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
          switch (((struct ___OBJ *)__tmp__13YO)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__13YO);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__13YO);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__NIDQ=((__READ_LOCAL *)__tmp__13YO);
            unread__YVJK(Self__NIDQ->local__ALZD,Self__NIDQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__13YO);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__13YO);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__13YO);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__PIDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__13YO)->receiver__OO2H);
            unread__YVJK(Self__PIDQ->local__ALZD,Self__PIDQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__13YO);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__13YO);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__13YO);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__13YO);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__13YO);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__13YO);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__13YO);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__13YO);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__13YO);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__13YO);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__13YO);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__13YO);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__13YO);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__13YO);
          } break;
          case __READ_GLOBAL__: {
            Self__QIDQ=((__READ_GLOBAL *)__tmp__13YO);
            unread__15ML(Self__QIDQ->global__RHJK,Self__QIDQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__13YO);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__13YO);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__13YO);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__13YO);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__13YO);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__13YO);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__13YO);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__13YO);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__13YO);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__13YO);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__13YO);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__13YO);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__13YO);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__13YO);
          } break;
          };
        };
      };
    };
    result__JJLO=result__31YO;
    if ((((void *)result__31YO == (void *)NULL) && ((void *)__tmp__AKLO != (void *)NULL))) {
      result__1JAP=NULL;
      if (((void *)left_t__PJLO == (void *)type_true__FJB)) {
        result__1JAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
        __tmp__DKAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
        switch (((struct ___OBJ *)__tmp__DKAP)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__DKAP);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__DKAP);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__RIDQ=((__READ_LOCAL *)__tmp__DKAP);
          unread__YVJK(Self__RIDQ->local__ALZD,Self__RIDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__DKAP);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__DKAP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__DKAP);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__TIDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__DKAP)->receiver__OO2H);
          unread__YVJK(Self__TIDQ->local__ALZD,Self__TIDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__DKAP);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__DKAP);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__DKAP);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__DKAP);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__DKAP);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__DKAP);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__DKAP);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__DKAP);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__DKAP);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__DKAP);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__DKAP);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__DKAP);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__DKAP);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__DKAP);
        } break;
        case __READ_GLOBAL__: {
          Self__UIDQ=((__READ_GLOBAL *)__tmp__DKAP);
          unread__15ML(Self__UIDQ->global__RHJK,Self__UIDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__DKAP);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__DKAP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__DKAP);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__DKAP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__DKAP);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__DKAP);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__DKAP);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__DKAP);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__DKAP);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__DKAP);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__DKAP);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__DKAP);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__DKAP);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__DKAP);
        } break;
        };
      };
      result__JJLO=result__1JAP;
    };
    if ((((void *)result__JJLO == (void *)NULL) && ((void *)__tmp__DKLO != (void *)NULL))) {
      result__LKAP=NULL;
      if (((void *)right_t__QJLO == (void *)type_true__FJB)) {
        result__LKAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
        __tmp__TKAP=Self__HJLO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
        switch (((struct ___OBJ *)__tmp__TKAP)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__TKAP);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__TKAP);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__VIDQ=((__READ_LOCAL *)__tmp__TKAP);
          unread__YVJK(Self__VIDQ->local__ALZD,Self__VIDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__TKAP);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__TKAP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__TKAP);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__XIDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__TKAP)->receiver__OO2H);
          unread__YVJK(Self__XIDQ->local__ALZD,Self__XIDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__TKAP);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__TKAP);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__TKAP);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__TKAP);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__TKAP);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__TKAP);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__TKAP);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__TKAP);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__TKAP);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__TKAP);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__TKAP);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__TKAP);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__TKAP);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__TKAP);
        } break;
        case __READ_GLOBAL__: {
          Self__YIDQ=((__READ_GLOBAL *)__tmp__TKAP);
          unread__15ML(Self__YIDQ->global__RHJK,Self__YIDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__TKAP);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__TKAP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__TKAP);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__TKAP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__TKAP);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__TKAP);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__TKAP);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__TKAP);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__TKAP);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__TKAP);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__TKAP);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__TKAP);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__TKAP);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__TKAP);
        } break;
        };
      };
      result__JJLO=result__LKAP;
    };
  };
  if (((void *)result__JJLO == (void *)NULL)) {
    result__JJLO=Self__HJLO;
  } else {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__JJLO);
}

static void* execute_unlink__R2EO(__EXPR_AND_LOGIC *Self__S2EO)
// ({EXPR_AND_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__V2EO,*__tmp__52EO;
  void *__tmp__W2EO,*__tmp__A3EO;
  __READ_LOCAL *Self__WGFQ,*Self__ZCKQ,*Self__1GFQ,*Self__4CKQ;
  __READ_GLOBAL *Self__ZGFQ,*Self__4GFQ;
  __LIST *Self__XMZQ;
  __tmp__V2EO=Self__S2EO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__V2EO)->__id) {
  case __LIST__: {
    __tmp__W2EO=execute_unlink__0SRJ(__tmp__V2EO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__W2EO=execute_unlink__42LK(__tmp__V2EO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__WGFQ=((__READ_LOCAL *)__tmp__V2EO);
    unread__YVJK(Self__WGFQ->local__ALZD,Self__WGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__W2EO=execute_unlink__PBMK(__tmp__V2EO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__W2EO=execute_unlink__WGMK(__tmp__V2EO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__W2EO=execute_unlink__HHMK(__tmp__V2EO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__ZCKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__V2EO)->receiver__OO2H);
    unread__YVJK(Self__ZCKQ->local__ALZD,Self__ZCKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__V2EO));
    __tmp__W2EO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__W2EO=execute_unlink__IIMK(__tmp__V2EO);
  } break;
  case __EXPR_SUB__: {
    __tmp__W2EO=execute_unlink__ZIMK(__tmp__V2EO);
  } break;
  case __EXPR_MUL__: {
    __tmp__W2EO=execute_unlink__KJMK(__tmp__V2EO);
  } break;
  case __EXPR_DIV__: {
    __tmp__W2EO=execute_unlink__1JMK(__tmp__V2EO);
  } break;
  case __EXPR_AND__: {
    __tmp__W2EO=execute_unlink__MKMK(__tmp__V2EO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__W2EO=execute_unlink__3KMK(__tmp__V2EO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__W2EO=execute_unlink__OLMK(__tmp__V2EO);
  } break;
  case __PUT_TO__: {
    __tmp__W2EO=execute_link__BOPK(((__PUT_TO *)__tmp__V2EO));
  } break;
  case __ITEM__: {
    __tmp__W2EO=execute_unlink__CMMK(__tmp__V2EO);
  } break;
  case __SIZE_OF__: {
    __tmp__W2EO=execute_unlink__SMMK(__tmp__V2EO);
  } break;
  case __CAST__: {
    __tmp__W2EO=execute_unlink__XMMK(__tmp__V2EO);
  } break;
  case __CALL_SLOT__: {
    __tmp__W2EO=execute_unlink__2NQL(__tmp__V2EO);
  } break;
  case __READ_SLOT__: {
    __tmp__W2EO=execute_unlink__WDAL(__tmp__V2EO);
  } break;
  case __READ_GLOBAL__: {
    Self__ZGFQ=((__READ_GLOBAL *)__tmp__V2EO);
    unread__15ML(Self__ZGFQ->global__RHJK,Self__ZGFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__W2EO=execute_access_unlink__VMDL(Self__ZGFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__W2EO=execute_unlink__CRZM(__tmp__V2EO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__W2EO=execute_unlink__B2EO(__tmp__V2EO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__W2EO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__V2EO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__W2EO=execute_unlink__R2EO(__tmp__V2EO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__W2EO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__V2EO));
  } break;
  case __EXPR_NEG__: {
    __tmp__W2EO=execute_unlink__XYJM(__tmp__V2EO);
  } break;
  case __EXPR_ADD__: {
    __tmp__W2EO=execute_unlink__3NNL(__tmp__V2EO);
  } break;
  case __EXPR_NOT__: {
    __tmp__W2EO=execute_unlink__YLZM(__tmp__V2EO);
  } break;
  case __EXPR_MOD__: {
    __tmp__W2EO=execute_unlink__B3EO(__tmp__V2EO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__W2EO=execute_unlink__AJEP(__tmp__V2EO);
  } break;
  case __EXPR_INF__: {
    __tmp__W2EO=execute_unlink__CPQN(__tmp__V2EO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__W2EO=execute_unlink__SPQN(__tmp__V2EO);
  } break;
  case __EXPR_OR__: {
    __tmp__W2EO=execute_unlink__JDQN(__tmp__V2EO);
  } break;
  case __EXPR_XOR__: {
    __tmp__W2EO=execute_unlink__YNUO(__tmp__V2EO);
  } break;
  };
  if (((void *)__tmp__W2EO != (void *)NULL)) {
    Self__XMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__XMZQ->expr_list__JUOG,__tmp__W2EO,(__INTEGER)(Self__XMZQ->index__PXRG -  1));
    Self__XMZQ->index__PXRG=(__INTEGER)(Self__XMZQ->index__PXRG +  1);
  };
  __tmp__52EO=Self__S2EO->parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__52EO)->__id) {
  case __LIST__: {
    __tmp__A3EO=execute_unlink__0SRJ(__tmp__52EO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__A3EO=execute_unlink__42LK(__tmp__52EO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__1GFQ=((__READ_LOCAL *)__tmp__52EO);
    unread__YVJK(Self__1GFQ->local__ALZD,Self__1GFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__A3EO=execute_unlink__PBMK(__tmp__52EO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__A3EO=execute_unlink__WGMK(__tmp__52EO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__A3EO=execute_unlink__HHMK(__tmp__52EO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__4CKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__52EO)->receiver__OO2H);
    unread__YVJK(Self__4CKQ->local__ALZD,Self__4CKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__52EO));
    __tmp__A3EO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__A3EO=execute_unlink__IIMK(__tmp__52EO);
  } break;
  case __EXPR_SUB__: {
    __tmp__A3EO=execute_unlink__ZIMK(__tmp__52EO);
  } break;
  case __EXPR_MUL__: {
    __tmp__A3EO=execute_unlink__KJMK(__tmp__52EO);
  } break;
  case __EXPR_DIV__: {
    __tmp__A3EO=execute_unlink__1JMK(__tmp__52EO);
  } break;
  case __EXPR_AND__: {
    __tmp__A3EO=execute_unlink__MKMK(__tmp__52EO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__A3EO=execute_unlink__3KMK(__tmp__52EO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__A3EO=execute_unlink__OLMK(__tmp__52EO);
  } break;
  case __PUT_TO__: {
    __tmp__A3EO=execute_link__BOPK(((__PUT_TO *)__tmp__52EO));
  } break;
  case __ITEM__: {
    __tmp__A3EO=execute_unlink__CMMK(__tmp__52EO);
  } break;
  case __SIZE_OF__: {
    __tmp__A3EO=execute_unlink__SMMK(__tmp__52EO);
  } break;
  case __CAST__: {
    __tmp__A3EO=execute_unlink__XMMK(__tmp__52EO);
  } break;
  case __CALL_SLOT__: {
    __tmp__A3EO=execute_unlink__2NQL(__tmp__52EO);
  } break;
  case __READ_SLOT__: {
    __tmp__A3EO=execute_unlink__WDAL(__tmp__52EO);
  } break;
  case __READ_GLOBAL__: {
    Self__4GFQ=((__READ_GLOBAL *)__tmp__52EO);
    unread__15ML(Self__4GFQ->global__RHJK,Self__4GFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__A3EO=execute_access_unlink__VMDL(Self__4GFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__A3EO=execute_unlink__CRZM(__tmp__52EO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__A3EO=execute_unlink__B2EO(__tmp__52EO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__A3EO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__52EO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__A3EO=execute_unlink__R2EO(__tmp__52EO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__A3EO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__52EO));
  } break;
  case __EXPR_NEG__: {
    __tmp__A3EO=execute_unlink__XYJM(__tmp__52EO);
  } break;
  case __EXPR_ADD__: {
    __tmp__A3EO=execute_unlink__3NNL(__tmp__52EO);
  } break;
  case __EXPR_NOT__: {
    __tmp__A3EO=execute_unlink__YLZM(__tmp__52EO);
  } break;
  case __EXPR_MOD__: {
    __tmp__A3EO=execute_unlink__B3EO(__tmp__52EO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__A3EO=execute_unlink__AJEP(__tmp__52EO);
  } break;
  case __EXPR_INF__: {
    __tmp__A3EO=execute_unlink__CPQN(__tmp__52EO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__A3EO=execute_unlink__SPQN(__tmp__52EO);
  } break;
  case __EXPR_OR__: {
    __tmp__A3EO=execute_unlink__JDQN(__tmp__52EO);
  } break;
  case __EXPR_XOR__: {
    __tmp__A3EO=execute_unlink__YNUO(__tmp__52EO);
  } break;
  };
  return(__tmp__A3EO);
}

static void* execute_link__KPLO(__EXPR_AND_AND_LOGIC *Self__LPLO)
// ({EXPR_AND_AND_LOGIC}) With resultRecursive, No inlinable.
{
  void *left_t__TPLO,*right_t__UPLO;
  __UINTEGER_32 old_seq__OPLO;
  void *__tmp__WPLO,*__tmp__XPLO,*__tmp__AQLO,*__tmp__BQLO,*__tmp__DQLO;
  void *__tmp__GQLO,*result__2EPO,*__tmp__4EPO,*result__NPLO;
  void *result__F1ZO,*__tmp__N1ZO,*result__54YO,*__tmp__R5YO;
  void *result__Z5YO,*__tmp__BAZO,*result__4DAP,*__tmp__GEAP;
  void *__tmp__NEAP,*result__IAZO,*__tmp__JAZO,*__tmp__KAZO,*__tmp__SAZO;
  void *result__1KAP,*__tmp__DLAP,*result__LLAP,*__tmp__TLAP;
  void *__tmp__EQLO,*left_cst__RPLO,*__tmp__HQLO,*right_cst__SPLO;
  void *__tmp__5EPO,*rd__1EPO;
  __READ_LOCAL *Self__YMDQ,*Self__0MDQ,*Self__2MDQ,*Self__4MDQ;
  __READ_LOCAL *Self__ANDQ,*Self__CNDQ,*Self__ENDQ,*Self__GNDQ;
  __READ_LOCAL *Self__INDQ,*Self__KNDQ,*Self__SNDQ,*Self__UNDQ;
  __READ_LOCAL *Self__WNDQ,*Self__YNDQ,*Self__0NDQ,*Self__2NDQ;
  __READ_GLOBAL *Self__1MDQ,*Self__5MDQ,*Self__DNDQ,*Self__HNDQ;
  __READ_GLOBAL *Self__LNDQ,*Self__VNDQ,*Self__ZNDQ,*Self__3NDQ;
  __BOOLEAN __tmp__LAZO;
  left_t__TPLO=NULL;
  right_t__UPLO=NULL;
  old_seq__OPLO=seq_call_and_loop__VREJ;
  __tmp__WPLO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__WPLO)->__id) {
  case __LIST__: {
    __tmp__XPLO=execute_link__LUOG(__tmp__WPLO);
  } break;
  case __STRING_CST__: {
    __tmp__XPLO=((__STRING_CST *)__tmp__WPLO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__XPLO=execute_link__U5ZK(__tmp__WPLO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__XPLO=((__PROTOTYPE_CST *)__tmp__WPLO);
  } break;
  case __INTEGER_CST__: {
    __tmp__XPLO=((__INTEGER_CST *)__tmp__WPLO);
  } break;
  case __READ_LOCAL__: {
    __tmp__XPLO=execute_link__EHAL(__tmp__WPLO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__XPLO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__XPLO=execute_link__2LAL(__tmp__WPLO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__XPLO=execute_link__FQAL(__tmp__WPLO);
  } break;
  case __REAL_CST__: {
    __tmp__XPLO=((__REAL_CST *)__tmp__WPLO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__XPLO=((__CHARACTER_CST *)__tmp__WPLO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__XPLO=execute_link__UUAL(__tmp__WPLO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__XPLO=execute_link__1VAL(__tmp__WPLO);
  } break;
  case __EXPR_SUP__: {
    __tmp__XPLO=execute_link__AWAL(__tmp__WPLO);
  } break;
  case __EXPR_SUB__: {
    __tmp__XPLO=execute_link__J0AL(__tmp__WPLO);
  } break;
  case __EXPR_MUL__: {
    __tmp__XPLO=execute_link__S4AL(__tmp__WPLO);
  } break;
  case __EXPR_DIV__: {
    __tmp__XPLO=execute_link__1CBL(__tmp__WPLO);
  } break;
  case __EXPR_AND__: {
    __tmp__XPLO=execute_link__EHBL(__tmp__WPLO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__XPLO=execute_link__NLBL(__tmp__WPLO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__XPLO=execute_link__WPBL(__tmp__WPLO);
  } break;
  case __PUT_TO__: {
    __tmp__XPLO=execute_link__BOPK(__tmp__WPLO);
  } break;
  case __ITEM__: {
    __tmp__XPLO=execute_link__5TBL(__tmp__WPLO);
  } break;
  case __SIZE_OF__: {
    __tmp__XPLO=execute_link__GUBL(__tmp__WPLO);
  } break;
  case __CAST__: {
    __tmp__XPLO=execute_link__LUBL(__tmp__WPLO);
  } break;
  case __CALL_SLOT__: {
    __tmp__XPLO=execute_link__A2TL(__tmp__WPLO);
  } break;
  case __READ_SLOT__: {
    __tmp__XPLO=execute_link__EYBL(__tmp__WPLO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__XPLO=execute_link__U2BL(__tmp__WPLO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__XPLO=execute_link__SRZM(__tmp__WPLO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__XPLO=execute_link__OBFO(__tmp__WPLO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__XPLO=execute_link__GJLO(__tmp__WPLO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__XPLO=execute_link__HHFO(__tmp__WPLO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__XPLO=execute_link__KPLO(__tmp__WPLO);
  } break;
  case __EXPR_NEG__: {
    __tmp__XPLO=execute_link__0GKM(__tmp__WPLO);
  } break;
  case __EXPR_ADD__: {
    __tmp__XPLO=execute_link__RROL(__tmp__WPLO);
  } break;
  case __EXPR_NOT__: {
    __tmp__XPLO=execute_link__GUZM(__tmp__WPLO);
  } break;
  case __EXPR_MOD__: {
    __tmp__XPLO=execute_link__ANFO(__tmp__WPLO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__XPLO=execute_link__YLEP(__tmp__WPLO);
  } break;
  case __EXPR_INF__: {
    __tmp__XPLO=execute_link__VQQN(__tmp__WPLO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__XPLO=execute_link__4UQN(__tmp__WPLO);
  } break;
  case __EXPR_OR__: {
    __tmp__XPLO=execute_link__1HQN(__tmp__WPLO);
  } break;
  case __EXPR_XOR__: {
    __tmp__XPLO=execute_link__IYUO(__tmp__WPLO);
  } break;
  };
  Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO=__tmp__XPLO;
  seq_or_and__AYRG=(__UINTEGER_32)(seq_or_and__AYRG +  1);
  seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
  __tmp__AQLO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__AQLO)->__id) {
  case __LIST__: {
    __tmp__BQLO=execute_link__LUOG(__tmp__AQLO);
  } break;
  case __STRING_CST__: {
    __tmp__BQLO=((__STRING_CST *)__tmp__AQLO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__BQLO=execute_link__U5ZK(__tmp__AQLO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__BQLO=((__PROTOTYPE_CST *)__tmp__AQLO);
  } break;
  case __INTEGER_CST__: {
    __tmp__BQLO=((__INTEGER_CST *)__tmp__AQLO);
  } break;
  case __READ_LOCAL__: {
    __tmp__BQLO=execute_link__EHAL(__tmp__AQLO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BQLO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BQLO=execute_link__2LAL(__tmp__AQLO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BQLO=execute_link__FQAL(__tmp__AQLO);
  } break;
  case __REAL_CST__: {
    __tmp__BQLO=((__REAL_CST *)__tmp__AQLO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__BQLO=((__CHARACTER_CST *)__tmp__AQLO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__BQLO=execute_link__UUAL(__tmp__AQLO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BQLO=execute_link__1VAL(__tmp__AQLO);
  } break;
  case __EXPR_SUP__: {
    __tmp__BQLO=execute_link__AWAL(__tmp__AQLO);
  } break;
  case __EXPR_SUB__: {
    __tmp__BQLO=execute_link__J0AL(__tmp__AQLO);
  } break;
  case __EXPR_MUL__: {
    __tmp__BQLO=execute_link__S4AL(__tmp__AQLO);
  } break;
  case __EXPR_DIV__: {
    __tmp__BQLO=execute_link__1CBL(__tmp__AQLO);
  } break;
  case __EXPR_AND__: {
    __tmp__BQLO=execute_link__EHBL(__tmp__AQLO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BQLO=execute_link__NLBL(__tmp__AQLO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BQLO=execute_link__WPBL(__tmp__AQLO);
  } break;
  case __PUT_TO__: {
    __tmp__BQLO=execute_link__BOPK(__tmp__AQLO);
  } break;
  case __ITEM__: {
    __tmp__BQLO=execute_link__5TBL(__tmp__AQLO);
  } break;
  case __SIZE_OF__: {
    __tmp__BQLO=execute_link__GUBL(__tmp__AQLO);
  } break;
  case __CAST__: {
    __tmp__BQLO=execute_link__LUBL(__tmp__AQLO);
  } break;
  case __CALL_SLOT__: {
    __tmp__BQLO=execute_link__A2TL(__tmp__AQLO);
  } break;
  case __READ_SLOT__: {
    __tmp__BQLO=execute_link__EYBL(__tmp__AQLO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__BQLO=execute_link__U2BL(__tmp__AQLO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BQLO=execute_link__SRZM(__tmp__AQLO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BQLO=execute_link__OBFO(__tmp__AQLO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BQLO=execute_link__GJLO(__tmp__AQLO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BQLO=execute_link__HHFO(__tmp__AQLO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BQLO=execute_link__KPLO(__tmp__AQLO);
  } break;
  case __EXPR_NEG__: {
    __tmp__BQLO=execute_link__0GKM(__tmp__AQLO);
  } break;
  case __EXPR_ADD__: {
    __tmp__BQLO=execute_link__RROL(__tmp__AQLO);
  } break;
  case __EXPR_NOT__: {
    __tmp__BQLO=execute_link__GUZM(__tmp__AQLO);
  } break;
  case __EXPR_MOD__: {
    __tmp__BQLO=execute_link__ANFO(__tmp__AQLO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BQLO=execute_link__YLEP(__tmp__AQLO);
  } break;
  case __EXPR_INF__: {
    __tmp__BQLO=execute_link__VQQN(__tmp__AQLO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BQLO=execute_link__4UQN(__tmp__AQLO);
  } break;
  case __EXPR_OR__: {
    __tmp__BQLO=execute_link__1HQN(__tmp__AQLO);
  } break;
  case __EXPR_XOR__: {
    __tmp__BQLO=execute_link__IYUO(__tmp__AQLO);
  } break;
  };
  Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO=__tmp__BQLO;
  __tmp__DQLO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  if (__tmp__DQLO==NULL) {
    __tmp__EQLO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__DQLO)->__id) {
    case __LIST__: {
      __tmp__EQLO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__EQLO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__EQLO=((void *)__tmp__DQLO);
    } break;
    case __INTEGER_CST__: {
      __tmp__EQLO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__EQLO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__EQLO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__EQLO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__EQLO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__EQLO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__EQLO=NULL;
    } break;
    case __ITEM__: {
      __tmp__EQLO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__EQLO=NULL;
    } break;
    case __CAST__: {
      __tmp__EQLO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__EQLO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__EQLO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__EQLO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__EQLO=NULL;
    } break;
    }
  };
  left_cst__RPLO=__tmp__EQLO;
  __tmp__GQLO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  if (__tmp__GQLO==NULL) {
    __tmp__HQLO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__GQLO)->__id) {
    case __LIST__: {
      __tmp__HQLO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__HQLO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__HQLO=((void *)__tmp__GQLO);
    } break;
    case __INTEGER_CST__: {
      __tmp__HQLO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HQLO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__HQLO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__HQLO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__HQLO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HQLO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__HQLO=NULL;
    } break;
    case __ITEM__: {
      __tmp__HQLO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__HQLO=NULL;
    } break;
    case __CAST__: {
      __tmp__HQLO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__HQLO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__HQLO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__HQLO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__HQLO=NULL;
    } break;
    }
  };
  right_cst__SPLO=__tmp__HQLO;
  if (((void *)__tmp__EQLO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__EQLO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      left_t__TPLO=type_true__FJB;
    } else {
      left_t__TPLO=type_false__NJB;
    };
  };
  if (((void *)__tmp__HQLO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__HQLO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      right_t__UPLO=type_true__FJB;
    } else {
      right_t__UPLO=type_false__NJB;
    };
  };
  result__2EPO=NULL;
  __tmp__4EPO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
  if (__tmp__4EPO==NULL) {
    __tmp__5EPO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__4EPO)->__id) {
    case __LIST__: {
      __tmp__5EPO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__5EPO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__5EPO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__5EPO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__5EPO=((void *)__tmp__4EPO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__5EPO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__5EPO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__5EPO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__5EPO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__5EPO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__5EPO=NULL;
    } break;
    case __ITEM__: {
      __tmp__5EPO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__5EPO=NULL;
    } break;
    case __CAST__: {
      __tmp__5EPO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__5EPO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__5EPO=((void *)__tmp__4EPO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__5EPO=((void *)__tmp__4EPO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__5EPO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__5EPO=NULL;
    } break;
    }
  };
  rd__1EPO=__tmp__5EPO;
  if (((void *)__tmp__5EPO != (void *)NULL)) {
    result__2EPO=create__with__and__B3DO(Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO,Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO);
  };
  result__NPLO=result__2EPO;
  if ((((void *)result__2EPO == (void *)NULL) && ((void *)__tmp__EQLO != (void *)NULL))) {
    result__F1ZO=NULL;
    if (((void *)left_t__TPLO == (void *)type_true__FJB)) {
      result__F1ZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
      __tmp__N1ZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__N1ZO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__N1ZO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__N1ZO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__YMDQ=((__READ_LOCAL *)__tmp__N1ZO);
        unread__YVJK(Self__YMDQ->local__ALZD,Self__YMDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__N1ZO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__N1ZO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__N1ZO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__0MDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__N1ZO)->receiver__OO2H);
        unread__YVJK(Self__0MDQ->local__ALZD,Self__0MDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__N1ZO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__N1ZO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__N1ZO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__N1ZO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__N1ZO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__N1ZO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__N1ZO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__N1ZO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__N1ZO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__N1ZO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__N1ZO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__N1ZO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__N1ZO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__N1ZO);
      } break;
      case __READ_GLOBAL__: {
        Self__1MDQ=((__READ_GLOBAL *)__tmp__N1ZO);
        unread__15ML(Self__1MDQ->global__RHJK,Self__1MDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__N1ZO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__N1ZO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__N1ZO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__N1ZO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__N1ZO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__N1ZO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__N1ZO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__N1ZO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__N1ZO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__N1ZO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__N1ZO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__N1ZO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__N1ZO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__N1ZO);
      } break;
      };
    };
    result__54YO=result__F1ZO;
    if ((((void *)result__F1ZO == (void *)NULL) && ((void *)left_t__TPLO == (void *)type_false__NJB))) {
      result__54YO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__R5YO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__R5YO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__R5YO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__R5YO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__2MDQ=((__READ_LOCAL *)__tmp__R5YO);
        unread__YVJK(Self__2MDQ->local__ALZD,Self__2MDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__R5YO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__R5YO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__R5YO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__4MDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__R5YO)->receiver__OO2H);
        unread__YVJK(Self__4MDQ->local__ALZD,Self__4MDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__R5YO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__R5YO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__R5YO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__R5YO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__R5YO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__R5YO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__R5YO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__R5YO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__R5YO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__R5YO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__R5YO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__R5YO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__R5YO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__R5YO);
      } break;
      case __READ_GLOBAL__: {
        Self__5MDQ=((__READ_GLOBAL *)__tmp__R5YO);
        unread__15ML(Self__5MDQ->global__RHJK,Self__5MDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__R5YO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__R5YO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__R5YO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__R5YO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__R5YO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__R5YO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__R5YO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__R5YO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__R5YO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__R5YO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__R5YO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__R5YO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__R5YO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__R5YO);
      } break;
      };
    };
    result__NPLO=result__54YO;
  };
  if ((((void *)result__NPLO == (void *)NULL) && ((void *)__tmp__HQLO != (void *)NULL))) {
    result__Z5YO=NULL;
    if (((void *)right_t__UPLO == (void *)type_true__FJB)) {
      result__Z5YO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__BAZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__BAZO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__BAZO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__BAZO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__ANDQ=((__READ_LOCAL *)__tmp__BAZO);
        unread__YVJK(Self__ANDQ->local__ALZD,Self__ANDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__BAZO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__BAZO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__BAZO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__CNDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BAZO)->receiver__OO2H);
        unread__YVJK(Self__CNDQ->local__ALZD,Self__CNDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__BAZO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__BAZO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__BAZO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__BAZO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__BAZO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__BAZO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__BAZO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__BAZO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__BAZO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__BAZO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__BAZO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__BAZO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__BAZO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__BAZO);
      } break;
      case __READ_GLOBAL__: {
        Self__DNDQ=((__READ_GLOBAL *)__tmp__BAZO);
        unread__15ML(Self__DNDQ->global__RHJK,Self__DNDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__BAZO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__BAZO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__BAZO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__BAZO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__BAZO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__BAZO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__BAZO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__BAZO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__BAZO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__BAZO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__BAZO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__BAZO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__BAZO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__BAZO);
      } break;
      };
    };
    result__NPLO=result__Z5YO;
  };
  if (((((void *)result__NPLO == (void *)NULL) && ((void *)__tmp__HQLO != (void *)NULL)) && ((void *)__tmp__EQLO != (void *)NULL))) {
    result__4DAP=NULL;
    if (((void *)left_t__TPLO == (void *)type_true__FJB)) {
      result__4DAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
      __tmp__GEAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__GEAP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__GEAP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__GEAP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__ENDQ=((__READ_LOCAL *)__tmp__GEAP);
        unread__YVJK(Self__ENDQ->local__ALZD,Self__ENDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__GEAP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__GEAP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__GEAP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__GNDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GEAP)->receiver__OO2H);
        unread__YVJK(Self__GNDQ->local__ALZD,Self__GNDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__GEAP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__GEAP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__GEAP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__GEAP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__GEAP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__GEAP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__GEAP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__GEAP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__GEAP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__GEAP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__GEAP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__GEAP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__GEAP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__GEAP);
      } break;
      case __READ_GLOBAL__: {
        Self__HNDQ=((__READ_GLOBAL *)__tmp__GEAP);
        unread__15ML(Self__HNDQ->global__RHJK,Self__HNDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__GEAP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__GEAP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__GEAP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__GEAP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__GEAP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__GEAP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__GEAP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__GEAP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__GEAP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__GEAP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__GEAP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__GEAP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__GEAP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__GEAP);
      } break;
      };
    } else {
      result__4DAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__NEAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__NEAP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__NEAP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__NEAP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__INDQ=((__READ_LOCAL *)__tmp__NEAP);
        unread__YVJK(Self__INDQ->local__ALZD,Self__INDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__NEAP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__NEAP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__NEAP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__KNDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__NEAP)->receiver__OO2H);
        unread__YVJK(Self__KNDQ->local__ALZD,Self__KNDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__NEAP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__NEAP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__NEAP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__NEAP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__NEAP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__NEAP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__NEAP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__NEAP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__NEAP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__NEAP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__NEAP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__NEAP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__NEAP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__NEAP);
      } break;
      case __READ_GLOBAL__: {
        Self__LNDQ=((__READ_GLOBAL *)__tmp__NEAP);
        unread__15ML(Self__LNDQ->global__RHJK,Self__LNDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__NEAP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__NEAP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__NEAP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__NEAP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__NEAP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__NEAP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__NEAP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__NEAP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__NEAP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__NEAP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__NEAP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__NEAP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__NEAP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__NEAP);
      } break;
      };
    };
    result__NPLO=result__4DAP;
  };
  if ((((void *)result__NPLO == (void *)NULL) && ((__UINTEGER_32)(old_seq__OPLO +  1) == seq_call_and_loop__VREJ))) {
    result__IAZO=NULL;
    __tmp__JAZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
    __tmp__KAZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__JAZO)->__id) {
    case __LIST__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__LAZO=__infix_equal_equal__WF1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LAZO=__infix_equal_equal__LG1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __INTEGER_CST__: {
      __tmp__LAZO=__infix_equal_equal__2G1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __READ_LOCAL__: {
      __tmp__LAZO=__infix_equal_equal__WH1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LAZO=__infix_equal_equal__MI1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LAZO=__infix_equal_equal__IJ1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __REAL_CST__: {
      __tmp__LAZO=__infix_equal_equal__EK1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__LAZO=__infix_equal_equal__4K1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__LAZO=__infix_equal_equal__XL1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_SUB__: {
      __tmp__LAZO=__infix_equal_equal__TM1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_MUL__: {
      __tmp__LAZO=__infix_equal_equal__PN1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_DIV__: {
      __tmp__LAZO=__infix_equal_equal__LO1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_AND__: {
      __tmp__LAZO=__infix_equal_equal__HP1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LAZO=__infix_equal_equal__DQ1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LAZO=__infix_equal_equal__5Q1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __PUT_TO__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__LAZO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__LAZO=__infix_equal_equal__LS1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__LAZO=__infix_equal_equal__HT1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LAZO=__infix_equal_equal__CZHO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LAZO=__infix_equal_equal__SXFO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LAZO=__infix_equal_equal__TBMO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LAZO=__infix_equal_equal__OYFO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LAZO=__infix_equal_equal__QCMO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_NEG__: {
      __tmp__LAZO=__infix_equal_equal__J5KM(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_ADD__: {
      __tmp__LAZO=__infix_equal_equal__ZT1L(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_NOT__: {
      __tmp__LAZO=__infix_equal_equal__QB0M(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_MOD__: {
      __tmp__LAZO=__infix_equal_equal__KZFO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LAZO=__infix_equal_equal__OTEP(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_INF__: {
      __tmp__LAZO=__infix_equal_equal__UZHO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LAZO=__infix_equal_equal__Q0HO(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_OR__: {
      __tmp__LAZO=__infix_equal_equal__32QN(__tmp__JAZO,__tmp__KAZO);
    } break;
    case __EXPR_XOR__: {
      __tmp__LAZO=__infix_equal_equal__GOVO(__tmp__JAZO,__tmp__KAZO);
    } break;
    };
    if (__tmp__LAZO) {
      result__IAZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__SAZO=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__SAZO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__SAZO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__SAZO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__SNDQ=((__READ_LOCAL *)__tmp__SAZO);
        unread__YVJK(Self__SNDQ->local__ALZD,Self__SNDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__SAZO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__SAZO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__SAZO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__UNDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__SAZO)->receiver__OO2H);
        unread__YVJK(Self__UNDQ->local__ALZD,Self__UNDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__SAZO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__SAZO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__SAZO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__SAZO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__SAZO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__SAZO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__SAZO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__SAZO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__SAZO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__SAZO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__SAZO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__SAZO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__SAZO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__SAZO);
      } break;
      case __READ_GLOBAL__: {
        Self__VNDQ=((__READ_GLOBAL *)__tmp__SAZO);
        unread__15ML(Self__VNDQ->global__RHJK,Self__VNDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__SAZO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__SAZO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__SAZO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__SAZO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__SAZO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__SAZO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__SAZO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__SAZO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__SAZO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__SAZO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__SAZO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__SAZO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__SAZO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__SAZO);
      } break;
      };
    };
    result__NPLO=result__IAZO;
    if ((((void *)result__IAZO == (void *)NULL) && ((void *)__tmp__EQLO != (void *)NULL))) {
      result__1KAP=NULL;
      if (((void *)left_t__TPLO == (void *)type_false__NJB)) {
        result__1KAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
        __tmp__DLAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
        switch (((struct ___OBJ *)__tmp__DLAP)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__DLAP);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__DLAP);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__WNDQ=((__READ_LOCAL *)__tmp__DLAP);
          unread__YVJK(Self__WNDQ->local__ALZD,Self__WNDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__DLAP);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__DLAP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__DLAP);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__YNDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__DLAP)->receiver__OO2H);
          unread__YVJK(Self__YNDQ->local__ALZD,Self__YNDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__DLAP);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__DLAP);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__DLAP);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__DLAP);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__DLAP);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__DLAP);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__DLAP);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__DLAP);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__DLAP);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__DLAP);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__DLAP);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__DLAP);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__DLAP);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__DLAP);
        } break;
        case __READ_GLOBAL__: {
          Self__ZNDQ=((__READ_GLOBAL *)__tmp__DLAP);
          unread__15ML(Self__ZNDQ->global__RHJK,Self__ZNDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__DLAP);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__DLAP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__DLAP);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__DLAP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__DLAP);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__DLAP);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__DLAP);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__DLAP);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__DLAP);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__DLAP);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__DLAP);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__DLAP);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__DLAP);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__DLAP);
        } break;
        };
      };
      result__NPLO=result__1KAP;
    };
    if ((((void *)result__NPLO == (void *)NULL) && ((void *)__tmp__HQLO != (void *)NULL))) {
      result__LLAP=NULL;
      if (((void *)right_t__UPLO == (void *)type_false__NJB)) {
        result__LLAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
        __tmp__TLAP=Self__LPLO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
        switch (((struct ___OBJ *)__tmp__TLAP)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__TLAP);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__TLAP);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__0NDQ=((__READ_LOCAL *)__tmp__TLAP);
          unread__YVJK(Self__0NDQ->local__ALZD,Self__0NDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__TLAP);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__TLAP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__TLAP);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__2NDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__TLAP)->receiver__OO2H);
          unread__YVJK(Self__2NDQ->local__ALZD,Self__2NDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__TLAP);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__TLAP);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__TLAP);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__TLAP);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__TLAP);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__TLAP);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__TLAP);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__TLAP);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__TLAP);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__TLAP);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__TLAP);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__TLAP);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__TLAP);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__TLAP);
        } break;
        case __READ_GLOBAL__: {
          Self__3NDQ=((__READ_GLOBAL *)__tmp__TLAP);
          unread__15ML(Self__3NDQ->global__RHJK,Self__3NDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__TLAP);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__TLAP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__TLAP);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__TLAP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__TLAP);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__TLAP);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__TLAP);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__TLAP);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__TLAP);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__TLAP);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__TLAP);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__TLAP);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__TLAP);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__TLAP);
        } break;
        };
      };
      result__NPLO=result__LLAP;
    };
  };
  if (((void *)result__NPLO == (void *)NULL)) {
    result__NPLO=Self__LPLO;
  } else {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__NPLO);
}

static void* execute_unlink__XYJM(__EXPR_NEG *Self__YYJM)
// ({EXPR_NEG}) With resultRecursive, No inlinable.
{
  void *__tmp__0YJM;
  void *__tmp__1YJM;
  __READ_LOCAL *Self__AHFQ,*Self__CDKQ;
  __READ_GLOBAL *Self__DHFQ;
  __tmp__0YJM=Self__YYJM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__0YJM)->__id) {
  case __LIST__: {
    __tmp__1YJM=execute_unlink__0SRJ(__tmp__0YJM);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1YJM=execute_unlink__42LK(__tmp__0YJM);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__AHFQ=((__READ_LOCAL *)__tmp__0YJM);
    unread__YVJK(Self__AHFQ->local__ALZD,Self__AHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1YJM=execute_unlink__PBMK(__tmp__0YJM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1YJM=execute_unlink__WGMK(__tmp__0YJM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1YJM=execute_unlink__HHMK(__tmp__0YJM);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__CDKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0YJM)->receiver__OO2H);
    unread__YVJK(Self__CDKQ->local__ALZD,Self__CDKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__0YJM));
    __tmp__1YJM=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__1YJM=execute_unlink__IIMK(__tmp__0YJM);
  } break;
  case __EXPR_SUB__: {
    __tmp__1YJM=execute_unlink__ZIMK(__tmp__0YJM);
  } break;
  case __EXPR_MUL__: {
    __tmp__1YJM=execute_unlink__KJMK(__tmp__0YJM);
  } break;
  case __EXPR_DIV__: {
    __tmp__1YJM=execute_unlink__1JMK(__tmp__0YJM);
  } break;
  case __EXPR_AND__: {
    __tmp__1YJM=execute_unlink__MKMK(__tmp__0YJM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1YJM=execute_unlink__3KMK(__tmp__0YJM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1YJM=execute_unlink__OLMK(__tmp__0YJM);
  } break;
  case __PUT_TO__: {
    __tmp__1YJM=execute_link__BOPK(((__PUT_TO *)__tmp__0YJM));
  } break;
  case __ITEM__: {
    __tmp__1YJM=execute_unlink__CMMK(__tmp__0YJM);
  } break;
  case __SIZE_OF__: {
    __tmp__1YJM=execute_unlink__SMMK(__tmp__0YJM);
  } break;
  case __CAST__: {
    __tmp__1YJM=execute_unlink__XMMK(__tmp__0YJM);
  } break;
  case __CALL_SLOT__: {
    __tmp__1YJM=execute_unlink__2NQL(__tmp__0YJM);
  } break;
  case __READ_SLOT__: {
    __tmp__1YJM=execute_unlink__WDAL(__tmp__0YJM);
  } break;
  case __READ_GLOBAL__: {
    Self__DHFQ=((__READ_GLOBAL *)__tmp__0YJM);
    unread__15ML(Self__DHFQ->global__RHJK,Self__DHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__1YJM=execute_access_unlink__VMDL(Self__DHFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1YJM=execute_unlink__CRZM(__tmp__0YJM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1YJM=execute_unlink__B2EO(__tmp__0YJM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1YJM=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__0YJM));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1YJM=execute_unlink__R2EO(__tmp__0YJM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1YJM=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__0YJM));
  } break;
  case __EXPR_NEG__: {
    __tmp__1YJM=execute_unlink__XYJM(__tmp__0YJM);
  } break;
  case __EXPR_ADD__: {
    __tmp__1YJM=execute_unlink__3NNL(__tmp__0YJM);
  } break;
  case __EXPR_NOT__: {
    __tmp__1YJM=execute_unlink__YLZM(__tmp__0YJM);
  } break;
  case __EXPR_MOD__: {
    __tmp__1YJM=execute_unlink__B3EO(__tmp__0YJM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1YJM=execute_unlink__AJEP(__tmp__0YJM);
  } break;
  case __EXPR_INF__: {
    __tmp__1YJM=execute_unlink__CPQN(__tmp__0YJM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1YJM=execute_unlink__SPQN(__tmp__0YJM);
  } break;
  case __EXPR_OR__: {
    __tmp__1YJM=execute_unlink__JDQN(__tmp__0YJM);
  } break;
  case __EXPR_XOR__: {
    __tmp__1YJM=execute_unlink__YNUO(__tmp__0YJM);
  } break;
  };
  return(__tmp__1YJM);
}

static void* execute_unlink__3NNL(__EXPR_ADD *Self__4NNL)
// ({EXPR_ADD}) With resultRecursive, No inlinable.
{
  void *__tmp__BONL,*__tmp__LONL;
  void *__tmp__CONL,*__tmp__MONL;
  __READ_LOCAL *Self__GHFQ,*Self__GDKQ,*Self__MHFQ,*Self__KDKQ;
  __READ_GLOBAL *Self__JHFQ,*Self__PHFQ;
  __LIST *Self__ZMZQ;
  __tmp__BONL=Self__4NNL->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__BONL)->__id) {
  case __LIST__: {
    __tmp__CONL=execute_unlink__0SRJ(__tmp__BONL);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__CONL=execute_unlink__42LK(__tmp__BONL);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__GHFQ=((__READ_LOCAL *)__tmp__BONL);
    unread__YVJK(Self__GHFQ->local__ALZD,Self__GHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__CONL=execute_unlink__PBMK(__tmp__BONL);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__CONL=execute_unlink__WGMK(__tmp__BONL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__CONL=execute_unlink__HHMK(__tmp__BONL);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__GDKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BONL)->receiver__OO2H);
    unread__YVJK(Self__GDKQ->local__ALZD,Self__GDKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__BONL));
    __tmp__CONL=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__CONL=execute_unlink__IIMK(__tmp__BONL);
  } break;
  case __EXPR_SUB__: {
    __tmp__CONL=execute_unlink__ZIMK(__tmp__BONL);
  } break;
  case __EXPR_MUL__: {
    __tmp__CONL=execute_unlink__KJMK(__tmp__BONL);
  } break;
  case __EXPR_DIV__: {
    __tmp__CONL=execute_unlink__1JMK(__tmp__BONL);
  } break;
  case __EXPR_AND__: {
    __tmp__CONL=execute_unlink__MKMK(__tmp__BONL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__CONL=execute_unlink__3KMK(__tmp__BONL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__CONL=execute_unlink__OLMK(__tmp__BONL);
  } break;
  case __PUT_TO__: {
    __tmp__CONL=execute_link__BOPK(((__PUT_TO *)__tmp__BONL));
  } break;
  case __ITEM__: {
    __tmp__CONL=execute_unlink__CMMK(__tmp__BONL);
  } break;
  case __SIZE_OF__: {
    __tmp__CONL=execute_unlink__SMMK(__tmp__BONL);
  } break;
  case __CAST__: {
    __tmp__CONL=execute_unlink__XMMK(__tmp__BONL);
  } break;
  case __CALL_SLOT__: {
    __tmp__CONL=execute_unlink__2NQL(__tmp__BONL);
  } break;
  case __READ_SLOT__: {
    __tmp__CONL=execute_unlink__WDAL(__tmp__BONL);
  } break;
  case __READ_GLOBAL__: {
    Self__JHFQ=((__READ_GLOBAL *)__tmp__BONL);
    unread__15ML(Self__JHFQ->global__RHJK,Self__JHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__CONL=execute_access_unlink__VMDL(Self__JHFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__CONL=execute_unlink__CRZM(__tmp__BONL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__CONL=execute_unlink__B2EO(__tmp__BONL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__CONL=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__BONL));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__CONL=execute_unlink__R2EO(__tmp__BONL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__CONL=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__BONL));
  } break;
  case __EXPR_NEG__: {
    __tmp__CONL=execute_unlink__XYJM(__tmp__BONL);
  } break;
  case __EXPR_ADD__: {
    __tmp__CONL=execute_unlink__3NNL(__tmp__BONL);
  } break;
  case __EXPR_NOT__: {
    __tmp__CONL=execute_unlink__YLZM(__tmp__BONL);
  } break;
  case __EXPR_MOD__: {
    __tmp__CONL=execute_unlink__B3EO(__tmp__BONL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__CONL=execute_unlink__AJEP(__tmp__BONL);
  } break;
  case __EXPR_INF__: {
    __tmp__CONL=execute_unlink__CPQN(__tmp__BONL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__CONL=execute_unlink__SPQN(__tmp__BONL);
  } break;
  case __EXPR_OR__: {
    __tmp__CONL=execute_unlink__JDQN(__tmp__BONL);
  } break;
  case __EXPR_XOR__: {
    __tmp__CONL=execute_unlink__YNUO(__tmp__BONL);
  } break;
  };
  if (((void *)__tmp__CONL != (void *)NULL)) {
    Self__ZMZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__ZMZQ->expr_list__JUOG,__tmp__CONL,(__INTEGER)(Self__ZMZQ->index__PXRG -  1));
    Self__ZMZQ->index__PXRG=(__INTEGER)(Self__ZMZQ->index__PXRG +  1);
  };
  __tmp__LONL=Self__4NNL->parent_expr_binary__UZDL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__LONL)->__id) {
  case __LIST__: {
    __tmp__MONL=execute_unlink__0SRJ(__tmp__LONL);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__MONL=execute_unlink__42LK(__tmp__LONL);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__MHFQ=((__READ_LOCAL *)__tmp__LONL);
    unread__YVJK(Self__MHFQ->local__ALZD,Self__MHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__MONL=execute_unlink__PBMK(__tmp__LONL);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__MONL=execute_unlink__WGMK(__tmp__LONL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__MONL=execute_unlink__HHMK(__tmp__LONL);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__KDKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LONL)->receiver__OO2H);
    unread__YVJK(Self__KDKQ->local__ALZD,Self__KDKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__LONL));
    __tmp__MONL=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__MONL=execute_unlink__IIMK(__tmp__LONL);
  } break;
  case __EXPR_SUB__: {
    __tmp__MONL=execute_unlink__ZIMK(__tmp__LONL);
  } break;
  case __EXPR_MUL__: {
    __tmp__MONL=execute_unlink__KJMK(__tmp__LONL);
  } break;
  case __EXPR_DIV__: {
    __tmp__MONL=execute_unlink__1JMK(__tmp__LONL);
  } break;
  case __EXPR_AND__: {
    __tmp__MONL=execute_unlink__MKMK(__tmp__LONL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__MONL=execute_unlink__3KMK(__tmp__LONL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__MONL=execute_unlink__OLMK(__tmp__LONL);
  } break;
  case __PUT_TO__: {
    __tmp__MONL=execute_link__BOPK(((__PUT_TO *)__tmp__LONL));
  } break;
  case __ITEM__: {
    __tmp__MONL=execute_unlink__CMMK(__tmp__LONL);
  } break;
  case __SIZE_OF__: {
    __tmp__MONL=execute_unlink__SMMK(__tmp__LONL);
  } break;
  case __CAST__: {
    __tmp__MONL=execute_unlink__XMMK(__tmp__LONL);
  } break;
  case __CALL_SLOT__: {
    __tmp__MONL=execute_unlink__2NQL(__tmp__LONL);
  } break;
  case __READ_SLOT__: {
    __tmp__MONL=execute_unlink__WDAL(__tmp__LONL);
  } break;
  case __READ_GLOBAL__: {
    Self__PHFQ=((__READ_GLOBAL *)__tmp__LONL);
    unread__15ML(Self__PHFQ->global__RHJK,Self__PHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__MONL=execute_access_unlink__VMDL(Self__PHFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__MONL=execute_unlink__CRZM(__tmp__LONL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__MONL=execute_unlink__B2EO(__tmp__LONL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__MONL=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__LONL));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__MONL=execute_unlink__R2EO(__tmp__LONL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__MONL=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__LONL));
  } break;
  case __EXPR_NEG__: {
    __tmp__MONL=execute_unlink__XYJM(__tmp__LONL);
  } break;
  case __EXPR_ADD__: {
    __tmp__MONL=execute_unlink__3NNL(__tmp__LONL);
  } break;
  case __EXPR_NOT__: {
    __tmp__MONL=execute_unlink__YLZM(__tmp__LONL);
  } break;
  case __EXPR_MOD__: {
    __tmp__MONL=execute_unlink__B3EO(__tmp__LONL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__MONL=execute_unlink__AJEP(__tmp__LONL);
  } break;
  case __EXPR_INF__: {
    __tmp__MONL=execute_unlink__CPQN(__tmp__LONL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__MONL=execute_unlink__SPQN(__tmp__LONL);
  } break;
  case __EXPR_OR__: {
    __tmp__MONL=execute_unlink__JDQN(__tmp__LONL);
  } break;
  case __EXPR_XOR__: {
    __tmp__MONL=execute_unlink__YNUO(__tmp__LONL);
  } break;
  };
  return(__tmp__MONL);
}

static void* execute_unlink__YLZM(__EXPR_NOT *Self__ZLZM)
// ({EXPR_NOT}) With resultRecursive, No inlinable.
{
  void *__tmp__1LZM;
  void *__tmp__2LZM;
  __READ_LOCAL *Self__SHFQ,*Self__ODKQ;
  __READ_GLOBAL *Self__VHFQ;
  __tmp__1LZM=Self__ZLZM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__1LZM)->__id) {
  case __LIST__: {
    __tmp__2LZM=execute_unlink__0SRJ(__tmp__1LZM);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__2LZM=execute_unlink__42LK(__tmp__1LZM);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__SHFQ=((__READ_LOCAL *)__tmp__1LZM);
    unread__YVJK(Self__SHFQ->local__ALZD,Self__SHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2LZM=execute_unlink__PBMK(__tmp__1LZM);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2LZM=execute_unlink__WGMK(__tmp__1LZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2LZM=execute_unlink__HHMK(__tmp__1LZM);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__ODKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__1LZM)->receiver__OO2H);
    unread__YVJK(Self__ODKQ->local__ALZD,Self__ODKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__1LZM));
    __tmp__2LZM=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__2LZM=execute_unlink__IIMK(__tmp__1LZM);
  } break;
  case __EXPR_SUB__: {
    __tmp__2LZM=execute_unlink__ZIMK(__tmp__1LZM);
  } break;
  case __EXPR_MUL__: {
    __tmp__2LZM=execute_unlink__KJMK(__tmp__1LZM);
  } break;
  case __EXPR_DIV__: {
    __tmp__2LZM=execute_unlink__1JMK(__tmp__1LZM);
  } break;
  case __EXPR_AND__: {
    __tmp__2LZM=execute_unlink__MKMK(__tmp__1LZM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2LZM=execute_unlink__3KMK(__tmp__1LZM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2LZM=execute_unlink__OLMK(__tmp__1LZM);
  } break;
  case __PUT_TO__: {
    __tmp__2LZM=execute_link__BOPK(((__PUT_TO *)__tmp__1LZM));
  } break;
  case __ITEM__: {
    __tmp__2LZM=execute_unlink__CMMK(__tmp__1LZM);
  } break;
  case __SIZE_OF__: {
    __tmp__2LZM=execute_unlink__SMMK(__tmp__1LZM);
  } break;
  case __CAST__: {
    __tmp__2LZM=execute_unlink__XMMK(__tmp__1LZM);
  } break;
  case __CALL_SLOT__: {
    __tmp__2LZM=execute_unlink__2NQL(__tmp__1LZM);
  } break;
  case __READ_SLOT__: {
    __tmp__2LZM=execute_unlink__WDAL(__tmp__1LZM);
  } break;
  case __READ_GLOBAL__: {
    Self__VHFQ=((__READ_GLOBAL *)__tmp__1LZM);
    unread__15ML(Self__VHFQ->global__RHJK,Self__VHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__2LZM=execute_access_unlink__VMDL(Self__VHFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2LZM=execute_unlink__CRZM(__tmp__1LZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2LZM=execute_unlink__B2EO(__tmp__1LZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2LZM=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__1LZM));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2LZM=execute_unlink__R2EO(__tmp__1LZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2LZM=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__1LZM));
  } break;
  case __EXPR_NEG__: {
    __tmp__2LZM=execute_unlink__XYJM(__tmp__1LZM);
  } break;
  case __EXPR_ADD__: {
    __tmp__2LZM=execute_unlink__3NNL(__tmp__1LZM);
  } break;
  case __EXPR_NOT__: {
    __tmp__2LZM=execute_unlink__YLZM(__tmp__1LZM);
  } break;
  case __EXPR_MOD__: {
    __tmp__2LZM=execute_unlink__B3EO(__tmp__1LZM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2LZM=execute_unlink__AJEP(__tmp__1LZM);
  } break;
  case __EXPR_INF__: {
    __tmp__2LZM=execute_unlink__CPQN(__tmp__1LZM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2LZM=execute_unlink__SPQN(__tmp__1LZM);
  } break;
  case __EXPR_OR__: {
    __tmp__2LZM=execute_unlink__JDQN(__tmp__1LZM);
  } break;
  case __EXPR_XOR__: {
    __tmp__2LZM=execute_unlink__YNUO(__tmp__1LZM);
  } break;
  };
  return(__tmp__2LZM);
}

static void* execute_unlink__B3EO(__EXPR_MOD *Self__C3EO)
// ({EXPR_MOD}) With resultRecursive, No inlinable.
{
  void *__tmp__F3EO,*__tmp__P3EO;
  void *__tmp__G3EO,*__tmp__Q3EO;
  __READ_LOCAL *Self__YHFQ,*Self__SDKQ,*Self__4HFQ,*Self__WDKQ;
  __READ_GLOBAL *Self__1HFQ,*Self__BIFQ;
  __LIST *Self__1MZQ;
  __tmp__F3EO=Self__C3EO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__F3EO)->__id) {
  case __LIST__: {
    __tmp__G3EO=execute_unlink__0SRJ(__tmp__F3EO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__G3EO=execute_unlink__42LK(__tmp__F3EO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__YHFQ=((__READ_LOCAL *)__tmp__F3EO);
    unread__YVJK(Self__YHFQ->local__ALZD,Self__YHFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__G3EO=execute_unlink__PBMK(__tmp__F3EO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__G3EO=execute_unlink__WGMK(__tmp__F3EO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__G3EO=execute_unlink__HHMK(__tmp__F3EO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__SDKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__F3EO)->receiver__OO2H);
    unread__YVJK(Self__SDKQ->local__ALZD,Self__SDKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__F3EO));
    __tmp__G3EO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__G3EO=execute_unlink__IIMK(__tmp__F3EO);
  } break;
  case __EXPR_SUB__: {
    __tmp__G3EO=execute_unlink__ZIMK(__tmp__F3EO);
  } break;
  case __EXPR_MUL__: {
    __tmp__G3EO=execute_unlink__KJMK(__tmp__F3EO);
  } break;
  case __EXPR_DIV__: {
    __tmp__G3EO=execute_unlink__1JMK(__tmp__F3EO);
  } break;
  case __EXPR_AND__: {
    __tmp__G3EO=execute_unlink__MKMK(__tmp__F3EO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__G3EO=execute_unlink__3KMK(__tmp__F3EO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__G3EO=execute_unlink__OLMK(__tmp__F3EO);
  } break;
  case __PUT_TO__: {
    __tmp__G3EO=execute_link__BOPK(((__PUT_TO *)__tmp__F3EO));
  } break;
  case __ITEM__: {
    __tmp__G3EO=execute_unlink__CMMK(__tmp__F3EO);
  } break;
  case __SIZE_OF__: {
    __tmp__G3EO=execute_unlink__SMMK(__tmp__F3EO);
  } break;
  case __CAST__: {
    __tmp__G3EO=execute_unlink__XMMK(__tmp__F3EO);
  } break;
  case __CALL_SLOT__: {
    __tmp__G3EO=execute_unlink__2NQL(__tmp__F3EO);
  } break;
  case __READ_SLOT__: {
    __tmp__G3EO=execute_unlink__WDAL(__tmp__F3EO);
  } break;
  case __READ_GLOBAL__: {
    Self__1HFQ=((__READ_GLOBAL *)__tmp__F3EO);
    unread__15ML(Self__1HFQ->global__RHJK,Self__1HFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__G3EO=execute_access_unlink__VMDL(Self__1HFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__G3EO=execute_unlink__CRZM(__tmp__F3EO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__G3EO=execute_unlink__B2EO(__tmp__F3EO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__G3EO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__F3EO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__G3EO=execute_unlink__R2EO(__tmp__F3EO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__G3EO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__F3EO));
  } break;
  case __EXPR_NEG__: {
    __tmp__G3EO=execute_unlink__XYJM(__tmp__F3EO);
  } break;
  case __EXPR_ADD__: {
    __tmp__G3EO=execute_unlink__3NNL(__tmp__F3EO);
  } break;
  case __EXPR_NOT__: {
    __tmp__G3EO=execute_unlink__YLZM(__tmp__F3EO);
  } break;
  case __EXPR_MOD__: {
    __tmp__G3EO=execute_unlink__B3EO(__tmp__F3EO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__G3EO=execute_unlink__AJEP(__tmp__F3EO);
  } break;
  case __EXPR_INF__: {
    __tmp__G3EO=execute_unlink__CPQN(__tmp__F3EO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__G3EO=execute_unlink__SPQN(__tmp__F3EO);
  } break;
  case __EXPR_OR__: {
    __tmp__G3EO=execute_unlink__JDQN(__tmp__F3EO);
  } break;
  case __EXPR_XOR__: {
    __tmp__G3EO=execute_unlink__YNUO(__tmp__F3EO);
  } break;
  };
  if (((void *)__tmp__G3EO != (void *)NULL)) {
    Self__1MZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__1MZQ->expr_list__JUOG,__tmp__G3EO,(__INTEGER)(Self__1MZQ->index__PXRG -  1));
    Self__1MZQ->index__PXRG=(__INTEGER)(Self__1MZQ->index__PXRG +  1);
  };
  __tmp__P3EO=Self__C3EO->parent_expr_binary__PDWL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__P3EO)->__id) {
  case __LIST__: {
    __tmp__Q3EO=execute_unlink__0SRJ(__tmp__P3EO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__Q3EO=execute_unlink__42LK(__tmp__P3EO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__4HFQ=((__READ_LOCAL *)__tmp__P3EO);
    unread__YVJK(Self__4HFQ->local__ALZD,Self__4HFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__Q3EO=execute_unlink__PBMK(__tmp__P3EO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__Q3EO=execute_unlink__WGMK(__tmp__P3EO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__Q3EO=execute_unlink__HHMK(__tmp__P3EO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__WDKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__P3EO)->receiver__OO2H);
    unread__YVJK(Self__WDKQ->local__ALZD,Self__WDKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__P3EO));
    __tmp__Q3EO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__Q3EO=execute_unlink__IIMK(__tmp__P3EO);
  } break;
  case __EXPR_SUB__: {
    __tmp__Q3EO=execute_unlink__ZIMK(__tmp__P3EO);
  } break;
  case __EXPR_MUL__: {
    __tmp__Q3EO=execute_unlink__KJMK(__tmp__P3EO);
  } break;
  case __EXPR_DIV__: {
    __tmp__Q3EO=execute_unlink__1JMK(__tmp__P3EO);
  } break;
  case __EXPR_AND__: {
    __tmp__Q3EO=execute_unlink__MKMK(__tmp__P3EO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__Q3EO=execute_unlink__3KMK(__tmp__P3EO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__Q3EO=execute_unlink__OLMK(__tmp__P3EO);
  } break;
  case __PUT_TO__: {
    __tmp__Q3EO=execute_link__BOPK(((__PUT_TO *)__tmp__P3EO));
  } break;
  case __ITEM__: {
    __tmp__Q3EO=execute_unlink__CMMK(__tmp__P3EO);
  } break;
  case __SIZE_OF__: {
    __tmp__Q3EO=execute_unlink__SMMK(__tmp__P3EO);
  } break;
  case __CAST__: {
    __tmp__Q3EO=execute_unlink__XMMK(__tmp__P3EO);
  } break;
  case __CALL_SLOT__: {
    __tmp__Q3EO=execute_unlink__2NQL(__tmp__P3EO);
  } break;
  case __READ_SLOT__: {
    __tmp__Q3EO=execute_unlink__WDAL(__tmp__P3EO);
  } break;
  case __READ_GLOBAL__: {
    Self__BIFQ=((__READ_GLOBAL *)__tmp__P3EO);
    unread__15ML(Self__BIFQ->global__RHJK,Self__BIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__Q3EO=execute_access_unlink__VMDL(Self__BIFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__Q3EO=execute_unlink__CRZM(__tmp__P3EO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__Q3EO=execute_unlink__B2EO(__tmp__P3EO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__Q3EO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__P3EO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__Q3EO=execute_unlink__R2EO(__tmp__P3EO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__Q3EO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__P3EO));
  } break;
  case __EXPR_NEG__: {
    __tmp__Q3EO=execute_unlink__XYJM(__tmp__P3EO);
  } break;
  case __EXPR_ADD__: {
    __tmp__Q3EO=execute_unlink__3NNL(__tmp__P3EO);
  } break;
  case __EXPR_NOT__: {
    __tmp__Q3EO=execute_unlink__YLZM(__tmp__P3EO);
  } break;
  case __EXPR_MOD__: {
    __tmp__Q3EO=execute_unlink__B3EO(__tmp__P3EO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__Q3EO=execute_unlink__AJEP(__tmp__P3EO);
  } break;
  case __EXPR_INF__: {
    __tmp__Q3EO=execute_unlink__CPQN(__tmp__P3EO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__Q3EO=execute_unlink__SPQN(__tmp__P3EO);
  } break;
  case __EXPR_OR__: {
    __tmp__Q3EO=execute_unlink__JDQN(__tmp__P3EO);
  } break;
  case __EXPR_XOR__: {
    __tmp__Q3EO=execute_unlink__YNUO(__tmp__P3EO);
  } break;
  };
  return(__tmp__Q3EO);
}

static void* execute_unlink__AJEP(__EXPR_SUP_EQ *Self__BJEP)
// ({EXPR_SUP_EQ}) With resultRecursive, No inlinable.
{
  void *__tmp__EJEP,*__tmp__OJEP;
  void *__tmp__FJEP,*__tmp__PJEP;
  __READ_LOCAL *Self__EIFQ,*Self__0DKQ,*Self__KIFQ,*Self__4DKQ;
  __READ_GLOBAL *Self__HIFQ,*Self__NIFQ;
  __LIST *Self__3MZQ;
  __tmp__EJEP=Self__BJEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__EJEP)->__id) {
  case __LIST__: {
    __tmp__FJEP=execute_unlink__0SRJ(__tmp__EJEP);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__FJEP=execute_unlink__42LK(__tmp__EJEP);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__EIFQ=((__READ_LOCAL *)__tmp__EJEP);
    unread__YVJK(Self__EIFQ->local__ALZD,Self__EIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FJEP=execute_unlink__PBMK(__tmp__EJEP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FJEP=execute_unlink__WGMK(__tmp__EJEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FJEP=execute_unlink__HHMK(__tmp__EJEP);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__0DKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__EJEP)->receiver__OO2H);
    unread__YVJK(Self__0DKQ->local__ALZD,Self__0DKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__EJEP));
    __tmp__FJEP=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__FJEP=execute_unlink__IIMK(__tmp__EJEP);
  } break;
  case __EXPR_SUB__: {
    __tmp__FJEP=execute_unlink__ZIMK(__tmp__EJEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__FJEP=execute_unlink__KJMK(__tmp__EJEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__FJEP=execute_unlink__1JMK(__tmp__EJEP);
  } break;
  case __EXPR_AND__: {
    __tmp__FJEP=execute_unlink__MKMK(__tmp__EJEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FJEP=execute_unlink__3KMK(__tmp__EJEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FJEP=execute_unlink__OLMK(__tmp__EJEP);
  } break;
  case __PUT_TO__: {
    __tmp__FJEP=execute_link__BOPK(((__PUT_TO *)__tmp__EJEP));
  } break;
  case __ITEM__: {
    __tmp__FJEP=execute_unlink__CMMK(__tmp__EJEP);
  } break;
  case __SIZE_OF__: {
    __tmp__FJEP=execute_unlink__SMMK(__tmp__EJEP);
  } break;
  case __CAST__: {
    __tmp__FJEP=execute_unlink__XMMK(__tmp__EJEP);
  } break;
  case __CALL_SLOT__: {
    __tmp__FJEP=execute_unlink__2NQL(__tmp__EJEP);
  } break;
  case __READ_SLOT__: {
    __tmp__FJEP=execute_unlink__WDAL(__tmp__EJEP);
  } break;
  case __READ_GLOBAL__: {
    Self__HIFQ=((__READ_GLOBAL *)__tmp__EJEP);
    unread__15ML(Self__HIFQ->global__RHJK,Self__HIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__FJEP=execute_access_unlink__VMDL(Self__HIFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FJEP=execute_unlink__CRZM(__tmp__EJEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FJEP=execute_unlink__B2EO(__tmp__EJEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FJEP=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__EJEP));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FJEP=execute_unlink__R2EO(__tmp__EJEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FJEP=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__EJEP));
  } break;
  case __EXPR_NEG__: {
    __tmp__FJEP=execute_unlink__XYJM(__tmp__EJEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__FJEP=execute_unlink__3NNL(__tmp__EJEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__FJEP=execute_unlink__YLZM(__tmp__EJEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__FJEP=execute_unlink__B3EO(__tmp__EJEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FJEP=execute_unlink__AJEP(__tmp__EJEP);
  } break;
  case __EXPR_INF__: {
    __tmp__FJEP=execute_unlink__CPQN(__tmp__EJEP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FJEP=execute_unlink__SPQN(__tmp__EJEP);
  } break;
  case __EXPR_OR__: {
    __tmp__FJEP=execute_unlink__JDQN(__tmp__EJEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__FJEP=execute_unlink__YNUO(__tmp__EJEP);
  } break;
  };
  if (((void *)__tmp__FJEP != (void *)NULL)) {
    Self__3MZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__3MZQ->expr_list__JUOG,__tmp__FJEP,(__INTEGER)(Self__3MZQ->index__PXRG -  1));
    Self__3MZQ->index__PXRG=(__INTEGER)(Self__3MZQ->index__PXRG +  1);
  };
  __tmp__OJEP=Self__BJEP->parent_expr_binary_cmp__EP1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__OJEP)->__id) {
  case __LIST__: {
    __tmp__PJEP=execute_unlink__0SRJ(__tmp__OJEP);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__PJEP=execute_unlink__42LK(__tmp__OJEP);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__KIFQ=((__READ_LOCAL *)__tmp__OJEP);
    unread__YVJK(Self__KIFQ->local__ALZD,Self__KIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PJEP=execute_unlink__PBMK(__tmp__OJEP);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PJEP=execute_unlink__WGMK(__tmp__OJEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PJEP=execute_unlink__HHMK(__tmp__OJEP);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__4DKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__OJEP)->receiver__OO2H);
    unread__YVJK(Self__4DKQ->local__ALZD,Self__4DKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__OJEP));
    __tmp__PJEP=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__PJEP=execute_unlink__IIMK(__tmp__OJEP);
  } break;
  case __EXPR_SUB__: {
    __tmp__PJEP=execute_unlink__ZIMK(__tmp__OJEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__PJEP=execute_unlink__KJMK(__tmp__OJEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__PJEP=execute_unlink__1JMK(__tmp__OJEP);
  } break;
  case __EXPR_AND__: {
    __tmp__PJEP=execute_unlink__MKMK(__tmp__OJEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PJEP=execute_unlink__3KMK(__tmp__OJEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PJEP=execute_unlink__OLMK(__tmp__OJEP);
  } break;
  case __PUT_TO__: {
    __tmp__PJEP=execute_link__BOPK(((__PUT_TO *)__tmp__OJEP));
  } break;
  case __ITEM__: {
    __tmp__PJEP=execute_unlink__CMMK(__tmp__OJEP);
  } break;
  case __SIZE_OF__: {
    __tmp__PJEP=execute_unlink__SMMK(__tmp__OJEP);
  } break;
  case __CAST__: {
    __tmp__PJEP=execute_unlink__XMMK(__tmp__OJEP);
  } break;
  case __CALL_SLOT__: {
    __tmp__PJEP=execute_unlink__2NQL(__tmp__OJEP);
  } break;
  case __READ_SLOT__: {
    __tmp__PJEP=execute_unlink__WDAL(__tmp__OJEP);
  } break;
  case __READ_GLOBAL__: {
    Self__NIFQ=((__READ_GLOBAL *)__tmp__OJEP);
    unread__15ML(Self__NIFQ->global__RHJK,Self__NIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__PJEP=execute_access_unlink__VMDL(Self__NIFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PJEP=execute_unlink__CRZM(__tmp__OJEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PJEP=execute_unlink__B2EO(__tmp__OJEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PJEP=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__OJEP));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PJEP=execute_unlink__R2EO(__tmp__OJEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PJEP=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__OJEP));
  } break;
  case __EXPR_NEG__: {
    __tmp__PJEP=execute_unlink__XYJM(__tmp__OJEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__PJEP=execute_unlink__3NNL(__tmp__OJEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__PJEP=execute_unlink__YLZM(__tmp__OJEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__PJEP=execute_unlink__B3EO(__tmp__OJEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PJEP=execute_unlink__AJEP(__tmp__OJEP);
  } break;
  case __EXPR_INF__: {
    __tmp__PJEP=execute_unlink__CPQN(__tmp__OJEP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PJEP=execute_unlink__SPQN(__tmp__OJEP);
  } break;
  case __EXPR_OR__: {
    __tmp__PJEP=execute_unlink__JDQN(__tmp__OJEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__PJEP=execute_unlink__YNUO(__tmp__OJEP);
  } break;
  };
  return(__tmp__PJEP);
}

static void* execute_unlink__CPQN(__EXPR_INF *Self__DPQN)
// ({EXPR_INF}) With resultRecursive, No inlinable.
{
  void *__tmp__GPQN,*__tmp__QPQN;
  void *__tmp__HPQN,*__tmp__RPQN;
  __READ_LOCAL *Self__QIFQ,*Self__CEKQ,*Self__WIFQ,*Self__GEKQ;
  __READ_GLOBAL *Self__TIFQ,*Self__ZIFQ;
  __LIST *Self__5MZQ;
  __tmp__GPQN=Self__DPQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__GPQN)->__id) {
  case __LIST__: {
    __tmp__HPQN=execute_unlink__0SRJ(__tmp__GPQN);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__HPQN=execute_unlink__42LK(__tmp__GPQN);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__QIFQ=((__READ_LOCAL *)__tmp__GPQN);
    unread__YVJK(Self__QIFQ->local__ALZD,Self__QIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HPQN=execute_unlink__PBMK(__tmp__GPQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HPQN=execute_unlink__WGMK(__tmp__GPQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HPQN=execute_unlink__HHMK(__tmp__GPQN);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__CEKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GPQN)->receiver__OO2H);
    unread__YVJK(Self__CEKQ->local__ALZD,Self__CEKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__GPQN));
    __tmp__HPQN=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__HPQN=execute_unlink__IIMK(__tmp__GPQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__HPQN=execute_unlink__ZIMK(__tmp__GPQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__HPQN=execute_unlink__KJMK(__tmp__GPQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__HPQN=execute_unlink__1JMK(__tmp__GPQN);
  } break;
  case __EXPR_AND__: {
    __tmp__HPQN=execute_unlink__MKMK(__tmp__GPQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HPQN=execute_unlink__3KMK(__tmp__GPQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HPQN=execute_unlink__OLMK(__tmp__GPQN);
  } break;
  case __PUT_TO__: {
    __tmp__HPQN=execute_link__BOPK(((__PUT_TO *)__tmp__GPQN));
  } break;
  case __ITEM__: {
    __tmp__HPQN=execute_unlink__CMMK(__tmp__GPQN);
  } break;
  case __SIZE_OF__: {
    __tmp__HPQN=execute_unlink__SMMK(__tmp__GPQN);
  } break;
  case __CAST__: {
    __tmp__HPQN=execute_unlink__XMMK(__tmp__GPQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__HPQN=execute_unlink__2NQL(__tmp__GPQN);
  } break;
  case __READ_SLOT__: {
    __tmp__HPQN=execute_unlink__WDAL(__tmp__GPQN);
  } break;
  case __READ_GLOBAL__: {
    Self__TIFQ=((__READ_GLOBAL *)__tmp__GPQN);
    unread__15ML(Self__TIFQ->global__RHJK,Self__TIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HPQN=execute_access_unlink__VMDL(Self__TIFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HPQN=execute_unlink__CRZM(__tmp__GPQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HPQN=execute_unlink__B2EO(__tmp__GPQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HPQN=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__GPQN));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HPQN=execute_unlink__R2EO(__tmp__GPQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HPQN=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__GPQN));
  } break;
  case __EXPR_NEG__: {
    __tmp__HPQN=execute_unlink__XYJM(__tmp__GPQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__HPQN=execute_unlink__3NNL(__tmp__GPQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__HPQN=execute_unlink__YLZM(__tmp__GPQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__HPQN=execute_unlink__B3EO(__tmp__GPQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HPQN=execute_unlink__AJEP(__tmp__GPQN);
  } break;
  case __EXPR_INF__: {
    __tmp__HPQN=execute_unlink__CPQN(__tmp__GPQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HPQN=execute_unlink__SPQN(__tmp__GPQN);
  } break;
  case __EXPR_OR__: {
    __tmp__HPQN=execute_unlink__JDQN(__tmp__GPQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__HPQN=execute_unlink__YNUO(__tmp__GPQN);
  } break;
  };
  if (((void *)__tmp__HPQN != (void *)NULL)) {
    Self__5MZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__5MZQ->expr_list__JUOG,__tmp__HPQN,(__INTEGER)(Self__5MZQ->index__PXRG -  1));
    Self__5MZQ->index__PXRG=(__INTEGER)(Self__5MZQ->index__PXRG +  1);
  };
  __tmp__QPQN=Self__DPQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__QPQN)->__id) {
  case __LIST__: {
    __tmp__RPQN=execute_unlink__0SRJ(__tmp__QPQN);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__RPQN=execute_unlink__42LK(__tmp__QPQN);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__WIFQ=((__READ_LOCAL *)__tmp__QPQN);
    unread__YVJK(Self__WIFQ->local__ALZD,Self__WIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RPQN=execute_unlink__PBMK(__tmp__QPQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RPQN=execute_unlink__WGMK(__tmp__QPQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RPQN=execute_unlink__HHMK(__tmp__QPQN);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__GEKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QPQN)->receiver__OO2H);
    unread__YVJK(Self__GEKQ->local__ALZD,Self__GEKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__QPQN));
    __tmp__RPQN=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__RPQN=execute_unlink__IIMK(__tmp__QPQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__RPQN=execute_unlink__ZIMK(__tmp__QPQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__RPQN=execute_unlink__KJMK(__tmp__QPQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__RPQN=execute_unlink__1JMK(__tmp__QPQN);
  } break;
  case __EXPR_AND__: {
    __tmp__RPQN=execute_unlink__MKMK(__tmp__QPQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RPQN=execute_unlink__3KMK(__tmp__QPQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RPQN=execute_unlink__OLMK(__tmp__QPQN);
  } break;
  case __PUT_TO__: {
    __tmp__RPQN=execute_link__BOPK(((__PUT_TO *)__tmp__QPQN));
  } break;
  case __ITEM__: {
    __tmp__RPQN=execute_unlink__CMMK(__tmp__QPQN);
  } break;
  case __SIZE_OF__: {
    __tmp__RPQN=execute_unlink__SMMK(__tmp__QPQN);
  } break;
  case __CAST__: {
    __tmp__RPQN=execute_unlink__XMMK(__tmp__QPQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__RPQN=execute_unlink__2NQL(__tmp__QPQN);
  } break;
  case __READ_SLOT__: {
    __tmp__RPQN=execute_unlink__WDAL(__tmp__QPQN);
  } break;
  case __READ_GLOBAL__: {
    Self__ZIFQ=((__READ_GLOBAL *)__tmp__QPQN);
    unread__15ML(Self__ZIFQ->global__RHJK,Self__ZIFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__RPQN=execute_access_unlink__VMDL(Self__ZIFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RPQN=execute_unlink__CRZM(__tmp__QPQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RPQN=execute_unlink__B2EO(__tmp__QPQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RPQN=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__QPQN));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RPQN=execute_unlink__R2EO(__tmp__QPQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RPQN=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__QPQN));
  } break;
  case __EXPR_NEG__: {
    __tmp__RPQN=execute_unlink__XYJM(__tmp__QPQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__RPQN=execute_unlink__3NNL(__tmp__QPQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__RPQN=execute_unlink__YLZM(__tmp__QPQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__RPQN=execute_unlink__B3EO(__tmp__QPQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RPQN=execute_unlink__AJEP(__tmp__QPQN);
  } break;
  case __EXPR_INF__: {
    __tmp__RPQN=execute_unlink__CPQN(__tmp__QPQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RPQN=execute_unlink__SPQN(__tmp__QPQN);
  } break;
  case __EXPR_OR__: {
    __tmp__RPQN=execute_unlink__JDQN(__tmp__QPQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__RPQN=execute_unlink__YNUO(__tmp__QPQN);
  } break;
  };
  return(__tmp__RPQN);
}

static void* execute_unlink__SPQN(__EXPR_INF_EQ *Self__TPQN)
// ({EXPR_INF_EQ}) With resultRecursive, No inlinable.
{
  void *__tmp__WPQN,*__tmp__AQQN;
  void *__tmp__XPQN,*__tmp__BQQN;
  __READ_LOCAL *Self__2IFQ,*Self__KEKQ,*Self__CJFQ,*Self__OEKQ;
  __READ_GLOBAL *Self__5IFQ,*Self__FJFQ;
  __LIST *Self__BNZQ;
  __tmp__WPQN=Self__TPQN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__WPQN)->__id) {
  case __LIST__: {
    __tmp__XPQN=execute_unlink__0SRJ(__tmp__WPQN);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__XPQN=execute_unlink__42LK(__tmp__WPQN);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__2IFQ=((__READ_LOCAL *)__tmp__WPQN);
    unread__YVJK(Self__2IFQ->local__ALZD,Self__2IFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__XPQN=execute_unlink__PBMK(__tmp__WPQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__XPQN=execute_unlink__WGMK(__tmp__WPQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__XPQN=execute_unlink__HHMK(__tmp__WPQN);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__KEKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__WPQN)->receiver__OO2H);
    unread__YVJK(Self__KEKQ->local__ALZD,Self__KEKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__WPQN));
    __tmp__XPQN=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__XPQN=execute_unlink__IIMK(__tmp__WPQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__XPQN=execute_unlink__ZIMK(__tmp__WPQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__XPQN=execute_unlink__KJMK(__tmp__WPQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__XPQN=execute_unlink__1JMK(__tmp__WPQN);
  } break;
  case __EXPR_AND__: {
    __tmp__XPQN=execute_unlink__MKMK(__tmp__WPQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__XPQN=execute_unlink__3KMK(__tmp__WPQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__XPQN=execute_unlink__OLMK(__tmp__WPQN);
  } break;
  case __PUT_TO__: {
    __tmp__XPQN=execute_link__BOPK(((__PUT_TO *)__tmp__WPQN));
  } break;
  case __ITEM__: {
    __tmp__XPQN=execute_unlink__CMMK(__tmp__WPQN);
  } break;
  case __SIZE_OF__: {
    __tmp__XPQN=execute_unlink__SMMK(__tmp__WPQN);
  } break;
  case __CAST__: {
    __tmp__XPQN=execute_unlink__XMMK(__tmp__WPQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__XPQN=execute_unlink__2NQL(__tmp__WPQN);
  } break;
  case __READ_SLOT__: {
    __tmp__XPQN=execute_unlink__WDAL(__tmp__WPQN);
  } break;
  case __READ_GLOBAL__: {
    Self__5IFQ=((__READ_GLOBAL *)__tmp__WPQN);
    unread__15ML(Self__5IFQ->global__RHJK,Self__5IFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__XPQN=execute_access_unlink__VMDL(Self__5IFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__XPQN=execute_unlink__CRZM(__tmp__WPQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__XPQN=execute_unlink__B2EO(__tmp__WPQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__XPQN=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__WPQN));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__XPQN=execute_unlink__R2EO(__tmp__WPQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__XPQN=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__WPQN));
  } break;
  case __EXPR_NEG__: {
    __tmp__XPQN=execute_unlink__XYJM(__tmp__WPQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__XPQN=execute_unlink__3NNL(__tmp__WPQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__XPQN=execute_unlink__YLZM(__tmp__WPQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__XPQN=execute_unlink__B3EO(__tmp__WPQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__XPQN=execute_unlink__AJEP(__tmp__WPQN);
  } break;
  case __EXPR_INF__: {
    __tmp__XPQN=execute_unlink__CPQN(__tmp__WPQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__XPQN=execute_unlink__SPQN(__tmp__WPQN);
  } break;
  case __EXPR_OR__: {
    __tmp__XPQN=execute_unlink__JDQN(__tmp__WPQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__XPQN=execute_unlink__YNUO(__tmp__WPQN);
  } break;
  };
  if (((void *)__tmp__XPQN != (void *)NULL)) {
    Self__BNZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__BNZQ->expr_list__JUOG,__tmp__XPQN,(__INTEGER)(Self__BNZQ->index__PXRG -  1));
    Self__BNZQ->index__PXRG=(__INTEGER)(Self__BNZQ->index__PXRG +  1);
  };
  __tmp__AQQN=Self__TPQN->parent_expr_binary_cmp__MR1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__AQQN)->__id) {
  case __LIST__: {
    __tmp__BQQN=execute_unlink__0SRJ(__tmp__AQQN);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__BQQN=execute_unlink__42LK(__tmp__AQQN);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__CJFQ=((__READ_LOCAL *)__tmp__AQQN);
    unread__YVJK(Self__CJFQ->local__ALZD,Self__CJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BQQN=execute_unlink__PBMK(__tmp__AQQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BQQN=execute_unlink__WGMK(__tmp__AQQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BQQN=execute_unlink__HHMK(__tmp__AQQN);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__OEKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__AQQN)->receiver__OO2H);
    unread__YVJK(Self__OEKQ->local__ALZD,Self__OEKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__AQQN));
    __tmp__BQQN=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__BQQN=execute_unlink__IIMK(__tmp__AQQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__BQQN=execute_unlink__ZIMK(__tmp__AQQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__BQQN=execute_unlink__KJMK(__tmp__AQQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__BQQN=execute_unlink__1JMK(__tmp__AQQN);
  } break;
  case __EXPR_AND__: {
    __tmp__BQQN=execute_unlink__MKMK(__tmp__AQQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BQQN=execute_unlink__3KMK(__tmp__AQQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BQQN=execute_unlink__OLMK(__tmp__AQQN);
  } break;
  case __PUT_TO__: {
    __tmp__BQQN=execute_link__BOPK(((__PUT_TO *)__tmp__AQQN));
  } break;
  case __ITEM__: {
    __tmp__BQQN=execute_unlink__CMMK(__tmp__AQQN);
  } break;
  case __SIZE_OF__: {
    __tmp__BQQN=execute_unlink__SMMK(__tmp__AQQN);
  } break;
  case __CAST__: {
    __tmp__BQQN=execute_unlink__XMMK(__tmp__AQQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__BQQN=execute_unlink__2NQL(__tmp__AQQN);
  } break;
  case __READ_SLOT__: {
    __tmp__BQQN=execute_unlink__WDAL(__tmp__AQQN);
  } break;
  case __READ_GLOBAL__: {
    Self__FJFQ=((__READ_GLOBAL *)__tmp__AQQN);
    unread__15ML(Self__FJFQ->global__RHJK,Self__FJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__BQQN=execute_access_unlink__VMDL(Self__FJFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BQQN=execute_unlink__CRZM(__tmp__AQQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BQQN=execute_unlink__B2EO(__tmp__AQQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BQQN=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__AQQN));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BQQN=execute_unlink__R2EO(__tmp__AQQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BQQN=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__AQQN));
  } break;
  case __EXPR_NEG__: {
    __tmp__BQQN=execute_unlink__XYJM(__tmp__AQQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__BQQN=execute_unlink__3NNL(__tmp__AQQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__BQQN=execute_unlink__YLZM(__tmp__AQQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__BQQN=execute_unlink__B3EO(__tmp__AQQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BQQN=execute_unlink__AJEP(__tmp__AQQN);
  } break;
  case __EXPR_INF__: {
    __tmp__BQQN=execute_unlink__CPQN(__tmp__AQQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BQQN=execute_unlink__SPQN(__tmp__AQQN);
  } break;
  case __EXPR_OR__: {
    __tmp__BQQN=execute_unlink__JDQN(__tmp__AQQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__BQQN=execute_unlink__YNUO(__tmp__AQQN);
  } break;
  };
  return(__tmp__BQQN);
}

static void* execute_unlink__JDQN(__EXPR_OR *Self__KDQN)
// ({EXPR_OR}) With resultRecursive, No inlinable.
{
  void *__tmp__NDQN,*__tmp__XDQN;
  void *__tmp__ODQN,*__tmp__YDQN;
  __READ_LOCAL *Self__IJFQ,*Self__SEKQ,*Self__OJFQ,*Self__WEKQ;
  __READ_GLOBAL *Self__LJFQ,*Self__RJFQ;
  __LIST *Self__DNZQ;
  __tmp__NDQN=Self__KDQN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__NDQN)->__id) {
  case __LIST__: {
    __tmp__ODQN=execute_unlink__0SRJ(__tmp__NDQN);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__ODQN=execute_unlink__42LK(__tmp__NDQN);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__IJFQ=((__READ_LOCAL *)__tmp__NDQN);
    unread__YVJK(Self__IJFQ->local__ALZD,Self__IJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ODQN=execute_unlink__PBMK(__tmp__NDQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ODQN=execute_unlink__WGMK(__tmp__NDQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ODQN=execute_unlink__HHMK(__tmp__NDQN);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__SEKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__NDQN)->receiver__OO2H);
    unread__YVJK(Self__SEKQ->local__ALZD,Self__SEKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__NDQN));
    __tmp__ODQN=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__ODQN=execute_unlink__IIMK(__tmp__NDQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__ODQN=execute_unlink__ZIMK(__tmp__NDQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__ODQN=execute_unlink__KJMK(__tmp__NDQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__ODQN=execute_unlink__1JMK(__tmp__NDQN);
  } break;
  case __EXPR_AND__: {
    __tmp__ODQN=execute_unlink__MKMK(__tmp__NDQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ODQN=execute_unlink__3KMK(__tmp__NDQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ODQN=execute_unlink__OLMK(__tmp__NDQN);
  } break;
  case __PUT_TO__: {
    __tmp__ODQN=execute_link__BOPK(((__PUT_TO *)__tmp__NDQN));
  } break;
  case __ITEM__: {
    __tmp__ODQN=execute_unlink__CMMK(__tmp__NDQN);
  } break;
  case __SIZE_OF__: {
    __tmp__ODQN=execute_unlink__SMMK(__tmp__NDQN);
  } break;
  case __CAST__: {
    __tmp__ODQN=execute_unlink__XMMK(__tmp__NDQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__ODQN=execute_unlink__2NQL(__tmp__NDQN);
  } break;
  case __READ_SLOT__: {
    __tmp__ODQN=execute_unlink__WDAL(__tmp__NDQN);
  } break;
  case __READ_GLOBAL__: {
    Self__LJFQ=((__READ_GLOBAL *)__tmp__NDQN);
    unread__15ML(Self__LJFQ->global__RHJK,Self__LJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__ODQN=execute_access_unlink__VMDL(Self__LJFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ODQN=execute_unlink__CRZM(__tmp__NDQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ODQN=execute_unlink__B2EO(__tmp__NDQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ODQN=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__NDQN));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ODQN=execute_unlink__R2EO(__tmp__NDQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ODQN=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__NDQN));
  } break;
  case __EXPR_NEG__: {
    __tmp__ODQN=execute_unlink__XYJM(__tmp__NDQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__ODQN=execute_unlink__3NNL(__tmp__NDQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__ODQN=execute_unlink__YLZM(__tmp__NDQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__ODQN=execute_unlink__B3EO(__tmp__NDQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ODQN=execute_unlink__AJEP(__tmp__NDQN);
  } break;
  case __EXPR_INF__: {
    __tmp__ODQN=execute_unlink__CPQN(__tmp__NDQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ODQN=execute_unlink__SPQN(__tmp__NDQN);
  } break;
  case __EXPR_OR__: {
    __tmp__ODQN=execute_unlink__JDQN(__tmp__NDQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__ODQN=execute_unlink__YNUO(__tmp__NDQN);
  } break;
  };
  if (((void *)__tmp__ODQN != (void *)NULL)) {
    Self__DNZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__DNZQ->expr_list__JUOG,__tmp__ODQN,(__INTEGER)(Self__DNZQ->index__PXRG -  1));
    Self__DNZQ->index__PXRG=(__INTEGER)(Self__DNZQ->index__PXRG +  1);
  };
  __tmp__XDQN=Self__KDQN->parent_expr_binary__ET1M.right__OP2H;
  switch (((struct ___OBJ *)__tmp__XDQN)->__id) {
  case __LIST__: {
    __tmp__YDQN=execute_unlink__0SRJ(__tmp__XDQN);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__YDQN=execute_unlink__42LK(__tmp__XDQN);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__OJFQ=((__READ_LOCAL *)__tmp__XDQN);
    unread__YVJK(Self__OJFQ->local__ALZD,Self__OJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__YDQN=execute_unlink__PBMK(__tmp__XDQN);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__YDQN=execute_unlink__WGMK(__tmp__XDQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__YDQN=execute_unlink__HHMK(__tmp__XDQN);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__WEKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__XDQN)->receiver__OO2H);
    unread__YVJK(Self__WEKQ->local__ALZD,Self__WEKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__XDQN));
    __tmp__YDQN=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__YDQN=execute_unlink__IIMK(__tmp__XDQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__YDQN=execute_unlink__ZIMK(__tmp__XDQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__YDQN=execute_unlink__KJMK(__tmp__XDQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__YDQN=execute_unlink__1JMK(__tmp__XDQN);
  } break;
  case __EXPR_AND__: {
    __tmp__YDQN=execute_unlink__MKMK(__tmp__XDQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__YDQN=execute_unlink__3KMK(__tmp__XDQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__YDQN=execute_unlink__OLMK(__tmp__XDQN);
  } break;
  case __PUT_TO__: {
    __tmp__YDQN=execute_link__BOPK(((__PUT_TO *)__tmp__XDQN));
  } break;
  case __ITEM__: {
    __tmp__YDQN=execute_unlink__CMMK(__tmp__XDQN);
  } break;
  case __SIZE_OF__: {
    __tmp__YDQN=execute_unlink__SMMK(__tmp__XDQN);
  } break;
  case __CAST__: {
    __tmp__YDQN=execute_unlink__XMMK(__tmp__XDQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__YDQN=execute_unlink__2NQL(__tmp__XDQN);
  } break;
  case __READ_SLOT__: {
    __tmp__YDQN=execute_unlink__WDAL(__tmp__XDQN);
  } break;
  case __READ_GLOBAL__: {
    Self__RJFQ=((__READ_GLOBAL *)__tmp__XDQN);
    unread__15ML(Self__RJFQ->global__RHJK,Self__RJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__YDQN=execute_access_unlink__VMDL(Self__RJFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__YDQN=execute_unlink__CRZM(__tmp__XDQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__YDQN=execute_unlink__B2EO(__tmp__XDQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__YDQN=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__XDQN));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__YDQN=execute_unlink__R2EO(__tmp__XDQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__YDQN=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__XDQN));
  } break;
  case __EXPR_NEG__: {
    __tmp__YDQN=execute_unlink__XYJM(__tmp__XDQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__YDQN=execute_unlink__3NNL(__tmp__XDQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__YDQN=execute_unlink__YLZM(__tmp__XDQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__YDQN=execute_unlink__B3EO(__tmp__XDQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__YDQN=execute_unlink__AJEP(__tmp__XDQN);
  } break;
  case __EXPR_INF__: {
    __tmp__YDQN=execute_unlink__CPQN(__tmp__XDQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__YDQN=execute_unlink__SPQN(__tmp__XDQN);
  } break;
  case __EXPR_OR__: {
    __tmp__YDQN=execute_unlink__JDQN(__tmp__XDQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__YDQN=execute_unlink__YNUO(__tmp__XDQN);
  } break;
  };
  return(__tmp__YDQN);
}

static void* execute_unlink__YNUO(__EXPR_XOR *Self__ZNUO)
// ({EXPR_XOR}) With resultRecursive, No inlinable.
{
  void *__tmp__2NUO,*__tmp__GOUO;
  void *__tmp__3NUO,*__tmp__HOUO;
  __READ_LOCAL *Self__UJFQ,*Self__0EKQ,*Self__0JFQ,*Self__4EKQ;
  __READ_GLOBAL *Self__XJFQ,*Self__3JFQ;
  __LIST *Self__FNZQ;
  __tmp__2NUO=Self__ZNUO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__2NUO)->__id) {
  case __LIST__: {
    __tmp__3NUO=execute_unlink__0SRJ(__tmp__2NUO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__3NUO=execute_unlink__42LK(__tmp__2NUO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__UJFQ=((__READ_LOCAL *)__tmp__2NUO);
    unread__YVJK(Self__UJFQ->local__ALZD,Self__UJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3NUO=execute_unlink__PBMK(__tmp__2NUO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3NUO=execute_unlink__WGMK(__tmp__2NUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3NUO=execute_unlink__HHMK(__tmp__2NUO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__0EKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2NUO)->receiver__OO2H);
    unread__YVJK(Self__0EKQ->local__ALZD,Self__0EKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__2NUO));
    __tmp__3NUO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__3NUO=execute_unlink__IIMK(__tmp__2NUO);
  } break;
  case __EXPR_SUB__: {
    __tmp__3NUO=execute_unlink__ZIMK(__tmp__2NUO);
  } break;
  case __EXPR_MUL__: {
    __tmp__3NUO=execute_unlink__KJMK(__tmp__2NUO);
  } break;
  case __EXPR_DIV__: {
    __tmp__3NUO=execute_unlink__1JMK(__tmp__2NUO);
  } break;
  case __EXPR_AND__: {
    __tmp__3NUO=execute_unlink__MKMK(__tmp__2NUO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3NUO=execute_unlink__3KMK(__tmp__2NUO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3NUO=execute_unlink__OLMK(__tmp__2NUO);
  } break;
  case __PUT_TO__: {
    __tmp__3NUO=execute_link__BOPK(((__PUT_TO *)__tmp__2NUO));
  } break;
  case __ITEM__: {
    __tmp__3NUO=execute_unlink__CMMK(__tmp__2NUO);
  } break;
  case __SIZE_OF__: {
    __tmp__3NUO=execute_unlink__SMMK(__tmp__2NUO);
  } break;
  case __CAST__: {
    __tmp__3NUO=execute_unlink__XMMK(__tmp__2NUO);
  } break;
  case __CALL_SLOT__: {
    __tmp__3NUO=execute_unlink__2NQL(__tmp__2NUO);
  } break;
  case __READ_SLOT__: {
    __tmp__3NUO=execute_unlink__WDAL(__tmp__2NUO);
  } break;
  case __READ_GLOBAL__: {
    Self__XJFQ=((__READ_GLOBAL *)__tmp__2NUO);
    unread__15ML(Self__XJFQ->global__RHJK,Self__XJFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__3NUO=execute_access_unlink__VMDL(Self__XJFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3NUO=execute_unlink__CRZM(__tmp__2NUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3NUO=execute_unlink__B2EO(__tmp__2NUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3NUO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__2NUO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3NUO=execute_unlink__R2EO(__tmp__2NUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3NUO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__2NUO));
  } break;
  case __EXPR_NEG__: {
    __tmp__3NUO=execute_unlink__XYJM(__tmp__2NUO);
  } break;
  case __EXPR_ADD__: {
    __tmp__3NUO=execute_unlink__3NNL(__tmp__2NUO);
  } break;
  case __EXPR_NOT__: {
    __tmp__3NUO=execute_unlink__YLZM(__tmp__2NUO);
  } break;
  case __EXPR_MOD__: {
    __tmp__3NUO=execute_unlink__B3EO(__tmp__2NUO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3NUO=execute_unlink__AJEP(__tmp__2NUO);
  } break;
  case __EXPR_INF__: {
    __tmp__3NUO=execute_unlink__CPQN(__tmp__2NUO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3NUO=execute_unlink__SPQN(__tmp__2NUO);
  } break;
  case __EXPR_OR__: {
    __tmp__3NUO=execute_unlink__JDQN(__tmp__2NUO);
  } break;
  case __EXPR_XOR__: {
    __tmp__3NUO=execute_unlink__YNUO(__tmp__2NUO);
  } break;
  };
  if (((void *)__tmp__3NUO != (void *)NULL)) {
    Self__FNZQ=((__LIST *)list_current__IF1);
    add__to__1H5G(Self__FNZQ->expr_list__JUOG,__tmp__3NUO,(__INTEGER)(Self__FNZQ->index__PXRG -  1));
    Self__FNZQ->index__PXRG=(__INTEGER)(Self__FNZQ->index__PXRG +  1);
  };
  __tmp__GOUO=Self__ZNUO->parent_expr_binary__UA5N.right__OP2H;
  switch (((struct ___OBJ *)__tmp__GOUO)->__id) {
  case __LIST__: {
    __tmp__HOUO=execute_unlink__0SRJ(__tmp__GOUO);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__HOUO=execute_unlink__42LK(__tmp__GOUO);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__0JFQ=((__READ_LOCAL *)__tmp__GOUO);
    unread__YVJK(Self__0JFQ->local__ALZD,Self__0JFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HOUO=execute_unlink__PBMK(__tmp__GOUO);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HOUO=execute_unlink__WGMK(__tmp__GOUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HOUO=execute_unlink__HHMK(__tmp__GOUO);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__4EKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GOUO)->receiver__OO2H);
    unread__YVJK(Self__4EKQ->local__ALZD,Self__4EKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__GOUO));
    __tmp__HOUO=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__HOUO=execute_unlink__IIMK(__tmp__GOUO);
  } break;
  case __EXPR_SUB__: {
    __tmp__HOUO=execute_unlink__ZIMK(__tmp__GOUO);
  } break;
  case __EXPR_MUL__: {
    __tmp__HOUO=execute_unlink__KJMK(__tmp__GOUO);
  } break;
  case __EXPR_DIV__: {
    __tmp__HOUO=execute_unlink__1JMK(__tmp__GOUO);
  } break;
  case __EXPR_AND__: {
    __tmp__HOUO=execute_unlink__MKMK(__tmp__GOUO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HOUO=execute_unlink__3KMK(__tmp__GOUO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HOUO=execute_unlink__OLMK(__tmp__GOUO);
  } break;
  case __PUT_TO__: {
    __tmp__HOUO=execute_link__BOPK(((__PUT_TO *)__tmp__GOUO));
  } break;
  case __ITEM__: {
    __tmp__HOUO=execute_unlink__CMMK(__tmp__GOUO);
  } break;
  case __SIZE_OF__: {
    __tmp__HOUO=execute_unlink__SMMK(__tmp__GOUO);
  } break;
  case __CAST__: {
    __tmp__HOUO=execute_unlink__XMMK(__tmp__GOUO);
  } break;
  case __CALL_SLOT__: {
    __tmp__HOUO=execute_unlink__2NQL(__tmp__GOUO);
  } break;
  case __READ_SLOT__: {
    __tmp__HOUO=execute_unlink__WDAL(__tmp__GOUO);
  } break;
  case __READ_GLOBAL__: {
    Self__3JFQ=((__READ_GLOBAL *)__tmp__GOUO);
    unread__15ML(Self__3JFQ->global__RHJK,Self__3JFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__HOUO=execute_access_unlink__VMDL(Self__3JFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HOUO=execute_unlink__CRZM(__tmp__GOUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HOUO=execute_unlink__B2EO(__tmp__GOUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HOUO=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__GOUO));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HOUO=execute_unlink__R2EO(__tmp__GOUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HOUO=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__GOUO));
  } break;
  case __EXPR_NEG__: {
    __tmp__HOUO=execute_unlink__XYJM(__tmp__GOUO);
  } break;
  case __EXPR_ADD__: {
    __tmp__HOUO=execute_unlink__3NNL(__tmp__GOUO);
  } break;
  case __EXPR_NOT__: {
    __tmp__HOUO=execute_unlink__YLZM(__tmp__GOUO);
  } break;
  case __EXPR_MOD__: {
    __tmp__HOUO=execute_unlink__B3EO(__tmp__GOUO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HOUO=execute_unlink__AJEP(__tmp__GOUO);
  } break;
  case __EXPR_INF__: {
    __tmp__HOUO=execute_unlink__CPQN(__tmp__GOUO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HOUO=execute_unlink__SPQN(__tmp__GOUO);
  } break;
  case __EXPR_OR__: {
    __tmp__HOUO=execute_unlink__JDQN(__tmp__GOUO);
  } break;
  case __EXPR_XOR__: {
    __tmp__HOUO=execute_unlink__YNUO(__tmp__GOUO);
  } break;
  };
  return(__tmp__HOUO);
}

static void* execute_link__U5ZK(__EXTERNAL_C *Self__V5ZK)
// ({EXTERNAL_C}) With resultRecursive, No inlinable.
{
  __INTEGER __tmp__DA0K,Self__HKDL;
  void *__tmp__KA0K,*__tmp__LA0K;
  if (((void *)Self__V5ZK->access_list__XXZD != (void *)NULL)) {
    __tmp__DA0K=((__FAST_ARRAYoEXPRo *)Self__V5ZK->access_list__XXZD)->parent_arrayed_collection__42LC.upper__USSH;
    Self__HKDL= 0;
    while ((Self__HKDL <= __tmp__DA0K)) {
      __tmp__KA0K=((void **)((__FAST_ARRAYoEXPRo *)Self__V5ZK->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__HKDL];
      switch (((struct ___OBJ *)__tmp__KA0K)->__id) {
      case __LIST__: {
        __tmp__LA0K=execute_link__LUOG(__tmp__KA0K);
      } break;
      case __STRING_CST__: {
        __tmp__LA0K=((__STRING_CST *)__tmp__KA0K);
      } break;
      case __EXTERNAL_C__: {
        __tmp__LA0K=execute_link__U5ZK(__tmp__KA0K);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__LA0K=((__PROTOTYPE_CST *)__tmp__KA0K);
      } break;
      case __INTEGER_CST__: {
        __tmp__LA0K=((__INTEGER_CST *)__tmp__KA0K);
      } break;
      case __READ_LOCAL__: {
        __tmp__LA0K=execute_link__EHAL(__tmp__KA0K);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__LA0K=execute_link__YLAL();
      } break;
      case __EXPR_EQUAL__: {
        __tmp__LA0K=execute_link__2LAL(__tmp__KA0K);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__LA0K=execute_link__FQAL(__tmp__KA0K);
      } break;
      case __REAL_CST__: {
        __tmp__LA0K=((__REAL_CST *)__tmp__KA0K);
      } break;
      case __CHARACTER_CST__: {
        __tmp__LA0K=((__CHARACTER_CST *)__tmp__KA0K);
      } break;
      case __IS_EXPANDED__: {
        __tmp__LA0K=execute_link__UUAL(__tmp__KA0K);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__LA0K=execute_link__1VAL(__tmp__KA0K);
      } break;
      case __EXPR_SUP__: {
        __tmp__LA0K=execute_link__AWAL(__tmp__KA0K);
      } break;
      case __EXPR_SUB__: {
        __tmp__LA0K=execute_link__J0AL(__tmp__KA0K);
      } break;
      case __EXPR_MUL__: {
        __tmp__LA0K=execute_link__S4AL(__tmp__KA0K);
      } break;
      case __EXPR_DIV__: {
        __tmp__LA0K=execute_link__1CBL(__tmp__KA0K);
      } break;
      case __EXPR_AND__: {
        __tmp__LA0K=execute_link__EHBL(__tmp__KA0K);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__LA0K=execute_link__NLBL(__tmp__KA0K);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__LA0K=execute_link__WPBL(__tmp__KA0K);
      } break;
      case __PUT_TO__: {
        __tmp__LA0K=execute_link__BOPK(__tmp__KA0K);
      } break;
      case __ITEM__: {
        __tmp__LA0K=execute_link__5TBL(__tmp__KA0K);
      } break;
      case __SIZE_OF__: {
        __tmp__LA0K=execute_link__GUBL(__tmp__KA0K);
      } break;
      case __CAST__: {
        __tmp__LA0K=execute_link__LUBL(__tmp__KA0K);
      } break;
      case __CALL_SLOT__: {
        __tmp__LA0K=execute_link__A2TL(__tmp__KA0K);
      } break;
      case __READ_SLOT__: {
        __tmp__LA0K=execute_link__EYBL(__tmp__KA0K);
      } break;
      case __READ_GLOBAL__: {
        __tmp__LA0K=execute_link__U2BL(__tmp__KA0K);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__LA0K=execute_link__SRZM(__tmp__KA0K);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__LA0K=execute_link__OBFO(__tmp__KA0K);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__LA0K=execute_link__GJLO(__tmp__KA0K);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__LA0K=execute_link__HHFO(__tmp__KA0K);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__LA0K=execute_link__KPLO(__tmp__KA0K);
      } break;
      case __EXPR_NEG__: {
        __tmp__LA0K=execute_link__0GKM(__tmp__KA0K);
      } break;
      case __EXPR_ADD__: {
        __tmp__LA0K=execute_link__RROL(__tmp__KA0K);
      } break;
      case __EXPR_NOT__: {
        __tmp__LA0K=execute_link__GUZM(__tmp__KA0K);
      } break;
      case __EXPR_MOD__: {
        __tmp__LA0K=execute_link__ANFO(__tmp__KA0K);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__LA0K=execute_link__YLEP(__tmp__KA0K);
      } break;
      case __EXPR_INF__: {
        __tmp__LA0K=execute_link__VQQN(__tmp__KA0K);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__LA0K=execute_link__4UQN(__tmp__KA0K);
      } break;
      case __EXPR_OR__: {
        __tmp__LA0K=execute_link__1HQN(__tmp__KA0K);
      } break;
      case __EXPR_XOR__: {
        __tmp__LA0K=execute_link__IYUO(__tmp__KA0K);
      } break;
      };
      ((void **)((__FAST_ARRAYoEXPRo *)Self__V5ZK->access_list__XXZD)->parent_arrayed_collection__42LC.storage__1SDI)[Self__HKDL]=__tmp__LA0K;
      Self__HKDL=(__INTEGER)(Self__HKDL +  1);
    };
  };
  return(Self__V5ZK);
}

static void* execute_link__EHAL(__READ_LOCAL *Self__FHAL)
// ({READ_LOCAL}) With resultNo recursive, No inlinable.
{
  void *result__JHAL,*__tmp__RFGL,*__tmp__XGGL,*result__L0IL,*val__M0IL;
  void *__tmp__TBJL;
  void *s__LHAL,*g__P0IL,*__tmp__B3IL;
  void *result__HEGL,*__tmp__ZFGL,*__tmp__RJAL;
  __INTEGER j__IEGL;
  __POSITION __tmp__DFGL;
  __LIST *Self__BFKQ;
  void *voir__AFKQ;
  void *__tmp__QFGL,*__tmp__WGGL;
  __STRING_CST *Self__DGCQ,*Self__QGCQ;
  __PROTOTYPE_CST *Self__EGCQ,*Self__RGCQ;
  __INTEGER_CST *Self__FGCQ,*Self__SGCQ;
  __REAL_CST *Self__HGCQ,*Self__UGCQ;
  __CHARACTER_CST *Self__JGCQ,*Self__WGCQ;
  __LOCAL *Self__C0IL,*Self__THIL;
  void *rd__N0IL,*__tmp__W2IL;
  void *l__O0IL,*__tmp__42IL;
  void *__tmp__22IL,*__tmp__52IL;
  __IS_EXPANDED *Self__XGCQ;
  void *req_list__KEGL;
  __BOOLEAN __tmp__SFGL,__tmp__YGGL,__tmp__CHGL,__tmp__5GGL,__tmp__TJAL;
  __BOOLEAN __tmp__E3IL,__tmp__VBJL;
  result__JHAL=NULL;
  s__LHAL=NULL;
  result__HEGL=NULL;
  j__IEGL= 0;
  req_list__KEGL=NULL;
  if ((((void *)((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.require_first__DAEH == (void *)NULL) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0)))) {
    print__1ZE(((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.intern_name__025F);
    fputc((int)('\n'),stdout);
    print__1ZE((&__string_556));
    fputc((int)(((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.parent_named__A2LC.style__LDGC),stdout);
    print__1ZE((&__string_377));
    __tmp__DFGL=Self__FHAL->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    put_error__text__0AH( 2,(&__string_557));
    put_position__ECH(__tmp__DFGL);
    send_error__2FH();
    Self__BFKQ=((__LIST *)list_current__IF1);
    voir__AFKQ=create__AXB( 250);
    display__2QQG(Self__BFKQ,voir__AFKQ);
    put_string__2EG(((__STRING *)voir__AFKQ));
    fputc((int)('\n'),stdout);
    exit(( 0));
  };
  if (((void *)((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.require_first__DAEH != (void *)NULL)) {
    __tmp__QFGL=((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.require_first__DAEH;
    switch (((struct ___OBJ *)__tmp__QFGL)->__id) {
    case __WRITE_GLOBAL__: {
      __tmp__RFGL=((__WRITE_GLOBAL *)__tmp__QFGL)->parent_write__QBGH.value__HBEH;
    } break;
    case __WRITE_SLOT__: {
      __tmp__RFGL=((__WRITE_SLOT *)__tmp__QFGL)->parent_write__3BGH.value__HBEH;
    } break;
    case __WRITE_LOCAL__: {
      __tmp__RFGL=((__WRITE_LOCAL *)__tmp__QFGL)->parent_write__X50I.value__HBEH;
    } break;
    };
    switch (((struct ___OBJ *)__tmp__RFGL)->__id) {
    case __LIST__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__SFGL=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__SFGL=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__SFGL=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __REAL_CST__: {
      __tmp__SFGL=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__SFGL=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_SUB__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_MUL__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_DIV__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_AND__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __PUT_TO__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __READ_GLOBAL__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_NEG__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_ADD__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_NOT__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_MOD__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_INF__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_OR__: {
      __tmp__SFGL=FALSE__;
    } break;
    case __EXPR_XOR__: {
      __tmp__SFGL=FALSE__;
    } break;
    };
    if (__tmp__SFGL) {
      if (__tmp__RFGL==NULL) {
        __tmp__ZFGL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__RFGL)->__id) {
        case __LIST__: {
          __tmp__ZFGL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__ZFGL=((void *)__tmp__RFGL);
        } break;
        case __EXTERNAL_C__: {
          __tmp__ZFGL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__ZFGL=((void *)__tmp__RFGL);
        } break;
        case __INTEGER_CST__: {
          __tmp__ZFGL=((void *)__tmp__RFGL);
        } break;
        case __READ_LOCAL__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__ZFGL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__ZFGL=((void *)__tmp__RFGL);
        } break;
        case __CHARACTER_CST__: {
          __tmp__ZFGL=((void *)__tmp__RFGL);
        } break;
        case __IS_EXPANDED__: {
          __tmp__ZFGL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__ZFGL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__ZFGL=NULL;
        } break;
        case __ITEM__: {
          __tmp__ZFGL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__ZFGL=NULL;
        } break;
        case __CAST__: {
          __tmp__ZFGL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__ZFGL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__ZFGL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__ZFGL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__ZFGL=NULL;
        } break;
        }
      };
      result__HEGL=__tmp__ZFGL;
      req_list__KEGL=((__LOCAL *)Self__FHAL->local__ALZD)->parent_variable__B2LC.require_list__UAEH;
      if (((void *)req_list__KEGL != (void *)NULL)) {
        j__IEGL= 0;
        while ((! ((j__IEGL > ((__FAST_ARRAYoWRITEo *)req_list__KEGL)->parent_arrayed_collection__TAEH.upper__NPDI) || ((void *)result__HEGL == (void *)NULL)))) {
          __tmp__WGGL=((void **)((__FAST_ARRAYoWRITEo *)req_list__KEGL)->parent_arrayed_collection__TAEH.storage__LQDI)[j__IEGL];
          switch (((struct ___OBJ *)__tmp__WGGL)->__id) {
          case __WRITE_GLOBAL__: {
            __tmp__XGGL=((__WRITE_GLOBAL *)__tmp__WGGL)->parent_write__QBGH.value__HBEH;
          } break;
          case __WRITE_SLOT__: {
            __tmp__XGGL=((__WRITE_SLOT *)__tmp__WGGL)->parent_write__3BGH.value__HBEH;
          } break;
          case __WRITE_LOCAL__: {
            __tmp__XGGL=((__WRITE_LOCAL *)__tmp__WGGL)->parent_write__X50I.value__HBEH;
          } break;
          };
          switch (((struct ___OBJ *)__tmp__XGGL)->__id) {
          case __LIST__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__YGGL=TRUE__;
          } break;
          case __EXTERNAL_C__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__YGGL=TRUE__;
          } break;
          case __INTEGER_CST__: {
            __tmp__YGGL=TRUE__;
          } break;
          case __READ_LOCAL__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __REAL_CST__: {
            __tmp__YGGL=TRUE__;
          } break;
          case __CHARACTER_CST__: {
            __tmp__YGGL=TRUE__;
          } break;
          case __IS_EXPANDED__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_SUB__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_MUL__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_DIV__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_AND__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __PUT_TO__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __CAST__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __READ_GLOBAL__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_NEG__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_ADD__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_NOT__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_MOD__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_INF__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_OR__: {
            __tmp__YGGL=FALSE__;
          } break;
          case __EXPR_XOR__: {
            __tmp__YGGL=FALSE__;
          } break;
          };
          if ((! __tmp__YGGL)) {
            __tmp__CHGL=TRUE__;
          } else {
            switch (((struct ___OBJ *)result__HEGL)->__id) {
            case __STRING_CST__: {
              __tmp__5GGL=(! __infix_equal_equal__WF1L(((__STRING_CST *)result__HEGL),__tmp__XGGL));
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__5GGL=(! __infix_equal_equal__LG1L(((__PROTOTYPE_CST *)result__HEGL),__tmp__XGGL));
            } break;
            case __INTEGER_CST__: {
              __tmp__5GGL=(! __infix_equal_equal__2G1L(((__INTEGER_CST *)result__HEGL),__tmp__XGGL));
            } break;
            case __REAL_CST__: {
              __tmp__5GGL=(! __infix_equal_equal__EK1L(((__REAL_CST *)result__HEGL),__tmp__XGGL));
            } break;
            case __CHARACTER_CST__: {
              __tmp__5GGL=(! __infix_equal_equal__4K1L(((__CHARACTER_CST *)result__HEGL),__tmp__XGGL));
            } break;
            };
            __tmp__CHGL=__tmp__5GGL;
          };
          if (__tmp__CHGL) {
            result__HEGL=NULL;
          };
          j__IEGL=(__INTEGER)(j__IEGL +  1);
        };
      };
    };
  };
  if (((void *)result__HEGL != (void *)NULL)) {
    unread__YVJK(Self__FHAL->local__ALZD,Self__FHAL);
    switch (((struct ___OBJ *)result__HEGL)->__id) {
    case __STRING_CST__: {
      Self__DGCQ=((__STRING_CST *)result__HEGL);
      __tmp__RJAL=create__text__AUMH(Self__DGCQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__DGCQ->string__ZK2H);
    } break;
    case __PROTOTYPE_CST__: {
      Self__EGCQ=((__PROTOTYPE_CST *)result__HEGL);
      __tmp__RJAL=create__type__CLQC(Self__EGCQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__EGCQ->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__FGCQ=((__INTEGER_CST *)result__HEGL);
      __tmp__RJAL=create__value__type__DNQC(Self__FGCQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FGCQ->value__PAZD,Self__FGCQ->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __REAL_CST__: {
      Self__HGCQ=((__REAL_CST *)result__HEGL);
      __tmp__RJAL=create__value__type__1SMH(Self__HGCQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__HGCQ->value__5N2H,Self__HGCQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__JGCQ=((__CHARACTER_CST *)result__HEGL);
      __tmp__RJAL=create__char__WTMH(Self__JGCQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JGCQ->text__HO2H);
    } break;
    };
    result__JHAL=__tmp__RJAL;
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__TJAL=TRUE__;
  } else {
    __tmp__TJAL=FALSE__;
  };
  if ((! __tmp__TJAL)) {
    Self__C0IL=((__LOCAL *)Self__FHAL->local__ALZD);
    result__L0IL=NULL;
    val__M0IL=NULL;
    rd__N0IL=NULL;
    l__O0IL=NULL;
    g__P0IL=NULL;
    if (((((! mode_recursive__WYUC) && ((void *)loop_invariant__RKAL == (void *)NULL)) && ((void *)Self__C0IL->last_seq__LRJJ != (void *)NULL)) && ((void *)((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_write__G1IL != (void *)NULL))) {
      if ((is_seq_list__PK2M(((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_list_current__T1IL) && ((((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_seq_call_local_and_loop__31IL == seq_call_local_and_loop__51IL) || (require_count__MNCN(Self__C0IL) ==  1)))) {
        val__M0IL=((__WRITE_LOCAL *)((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_write__G1IL)->parent_write__X50I.value__HBEH;
        if (val__M0IL==NULL) {
          __tmp__W2IL=NULL;
        } else {
          switch (((struct ___OBJ *)val__M0IL)->__id) {
          case __LIST__: {
            __tmp__W2IL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__W2IL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__W2IL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__W2IL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__W2IL=((void *)val__M0IL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__W2IL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__W2IL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__W2IL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__W2IL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__W2IL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__W2IL=NULL;
          } break;
          case __ITEM__: {
            __tmp__W2IL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__W2IL=NULL;
          } break;
          case __CAST__: {
            __tmp__W2IL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__W2IL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__W2IL=((void *)val__M0IL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__W2IL=((void *)val__M0IL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__W2IL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__W2IL=NULL;
          } break;
          }
        };
        rd__N0IL=__tmp__W2IL;
        if (((void *)__tmp__W2IL != (void *)NULL)) {
          switch (((struct ___OBJ *)__tmp__W2IL)->__id) {
          case __READ_LOCAL__: {
            __tmp__22IL=((__READ_LOCAL *)__tmp__W2IL)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__22IL=((__READ_SLOT *)__tmp__W2IL)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__22IL=((__READ_GLOBAL *)__tmp__W2IL)->global__RHJK;
          } break;
          };
          if (__tmp__22IL==NULL) {
            __tmp__42IL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__22IL)->__id) {
            case __LOCAL__: {
              __tmp__42IL=((void *)__tmp__22IL);
            } break;
            case __SLOT_DATA__: {
              __tmp__42IL=NULL;
            } break;
            }
          };
          l__O0IL=__tmp__42IL;
          switch (((struct ___OBJ *)__tmp__W2IL)->__id) {
          case __READ_LOCAL__: {
            __tmp__52IL=((__READ_LOCAL *)__tmp__W2IL)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__52IL=((__READ_SLOT *)__tmp__W2IL)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__52IL=((__READ_GLOBAL *)__tmp__W2IL)->global__RHJK;
          } break;
          };
          if (__tmp__52IL==NULL) {
            __tmp__B3IL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__52IL)->__id) {
            case __LOCAL__: {
              __tmp__B3IL=NULL;
            } break;
            case __SLOT_DATA__: {
              __tmp__B3IL=((void *)__tmp__52IL);
            } break;
            }
          };
          g__P0IL=__tmp__B3IL;
        };
        switch (((struct ___OBJ *)val__M0IL)->__id) {
        case __LIST__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__E3IL=TRUE__;
        } break;
        case __EXTERNAL_C__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__E3IL=TRUE__;
        } break;
        case __INTEGER_CST__: {
          __tmp__E3IL=TRUE__;
        } break;
        case __READ_LOCAL__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __REAL_CST__: {
          __tmp__E3IL=TRUE__;
        } break;
        case __CHARACTER_CST__: {
          __tmp__E3IL=TRUE__;
        } break;
        case __IS_EXPANDED__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_SUB__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_MUL__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_DIV__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_AND__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __PUT_TO__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __CAST__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __READ_GLOBAL__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_NEG__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_ADD__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_NOT__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_MOD__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_INF__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_OR__: {
          __tmp__E3IL=FALSE__;
        } break;
        case __EXPR_XOR__: {
          __tmp__E3IL=FALSE__;
        } break;
        };
        if (((__tmp__E3IL || (((void *)l__O0IL != (void *)NULL) && (((((((void *)((__LOCAL *)l__O0IL)->last_seq__LRJJ != (void *)NULL) && ((void *)((__LOCAL_SEQ *)((__LOCAL *)l__O0IL)->last_seq__LRJJ)->last_write__G1IL != (void *)NULL)) && (((__LOCAL_SEQ *)((__LOCAL *)l__O0IL)->last_seq__LRJJ)->last_seq_index__43IL < ((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_seq_index__43IL)) && (((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_seq_call_local_and_loop__31IL == seq_call_local_and_loop__51IL)) || (require_count__MNCN(l__O0IL) <=  1)) || (((__LOCAL *)l__O0IL)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == ' ')))) || ((((void *)g__P0IL != (void *)NULL) && (((__SLOT_DATA *)g__P0IL)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) && ((((((void *)((__SLOT_DATA *)g__P0IL)->last_write__Y5IL != (void *)NULL) && (((__SLOT_DATA *)g__P0IL)->last_seq_index__55IL < ((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_seq_index__43IL)) && (((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_seq_call_and_loop__LAJL == seq_call_and_loop__VREJ)) && is_seq_list__PK2M(((__SLOT_DATA *)g__P0IL)->last_list_current__UAJL)) || (require_count__IM2M(g__P0IL) ==  1))))) {
          switch (((struct ___OBJ *)val__M0IL)->__id) {
          case __LIST__: {
            __tmp__TBJL=my_copy__2HYM(val__M0IL);
          } break;
          case __STRING_CST__: {
            Self__QGCQ=((__STRING_CST *)val__M0IL);
            __tmp__TBJL=create__text__AUMH(Self__QGCQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QGCQ->string__ZK2H);
          } break;
          case __EXTERNAL_C__: {
            __tmp__TBJL=my_copy__2K2H(val__M0IL);
          } break;
          case __PROTOTYPE_CST__: {
            Self__RGCQ=((__PROTOTYPE_CST *)val__M0IL);
            __tmp__TBJL=create__type__CLQC(Self__RGCQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__RGCQ->parent_constant__E3LC.static_type__F4YD);
          } break;
          case __INTEGER_CST__: {
            Self__SGCQ=((__INTEGER_CST *)val__M0IL);
            __tmp__TBJL=create__value__type__DNQC(Self__SGCQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SGCQ->value__PAZD,Self__SGCQ->parent_constant__P3LC.static_type__F4YD);
          } break;
          case __READ_LOCAL__: {
            __tmp__TBJL=my_copy__OAFJ(val__M0IL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__TBJL=my_copy__KM2H(val__M0IL);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__TBJL=my_copy__DN2H(val__M0IL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__TBJL=my_copy__QN2H(val__M0IL);
          } break;
          case __REAL_CST__: {
            Self__UGCQ=((__REAL_CST *)val__M0IL);
            __tmp__TBJL=create__value__type__1SMH(Self__UGCQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UGCQ->value__5N2H,Self__UGCQ->parent_constant__M3JH.static_type__F4YD);
          } break;
          case __CHARACTER_CST__: {
            Self__WGCQ=((__CHARACTER_CST *)val__M0IL);
            __tmp__TBJL=create__char__WTMH(Self__WGCQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WGCQ->text__HO2H);
          } break;
          case __IS_EXPANDED__: {
            Self__XGCQ=((__IS_EXPANDED *)val__M0IL);
            __tmp__TBJL=create__receiver__WRWH(Self__XGCQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__XGCQ->receiver__OO2H));
          } break;
          case __GET_TYPE_ID__: {
            __tmp__TBJL=my_copy__TO2H(val__M0IL);
          } break;
          case __EXPR_SUP__: {
            __tmp__TBJL=my_copy__2O2H(val__M0IL);
          } break;
          case __EXPR_SUB__: {
            __tmp__TBJL=my_copy__HP2H(val__M0IL);
          } break;
          case __EXPR_MUL__: {
            __tmp__TBJL=my_copy__TP2H(val__M0IL);
          } break;
          case __EXPR_DIV__: {
            __tmp__TBJL=my_copy__4P2H(val__M0IL);
          } break;
          case __EXPR_AND__: {
            __tmp__TBJL=my_copy__JQ2H(val__M0IL);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__TBJL=my_copy__UQ2H(val__M0IL);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__TBJL=my_copy__5Q2H(val__M0IL);
          } break;
          case __PUT_TO__: {
            __tmp__TBJL=my_copy__KR2H(val__M0IL);
          } break;
          case __ITEM__: {
            __tmp__TBJL=my_copy__1R2H(val__M0IL);
          } break;
          case __SIZE_OF__: {
            __tmp__TBJL=my_copy__HS2H(val__M0IL);
          } break;
          case __CAST__: {
            __tmp__TBJL=my_copy__QS2H(val__M0IL);
          } break;
          case __CALL_SLOT__: {
            __tmp__TBJL=my_copy__PIYM(val__M0IL);
          } break;
          case __READ_SLOT__: {
            __tmp__TBJL=my_copy__AVGK(val__M0IL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__TBJL=my_copy__NVGK(val__M0IL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__TBJL=my_copy__RFCN(val__M0IL);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__TBJL=my_copy__JMEO(val__M0IL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__TBJL=my_copy__RTJO(val__M0IL);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__TBJL=my_copy__WMEO(val__M0IL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__TBJL=my_copy__3TJO(val__M0IL);
          } break;
          case __EXPR_NEG__: {
            __tmp__TBJL=my_copy__YEJM(val__M0IL);
          } break;
          case __EXPR_ADD__: {
            __tmp__TBJL=my_copy__YRLL(val__M0IL);
          } break;
          case __EXPR_NOT__: {
            __tmp__TBJL=my_copy__GLYM(val__M0IL);
          } break;
          case __EXPR_MOD__: {
            __tmp__TBJL=my_copy__BNEO(val__M0IL);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__TBJL=my_copy__M3DP(val__M0IL);
          } break;
          case __EXPR_INF__: {
            __tmp__TBJL=my_copy__PBSN(val__M0IL);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__TBJL=my_copy__0BSN(val__M0IL);
          } break;
          case __EXPR_OR__: {
            __tmp__TBJL=my_copy__ZOPN(val__M0IL);
          } break;
          case __EXPR_XOR__: {
            __tmp__TBJL=my_copy__CYSO(val__M0IL);
          } break;
          };
          result__L0IL=__tmp__TBJL;
          __tmp__VBJL=TRUE__;
        } else {
          __tmp__VBJL=FALSE__;
        };
        if ((! __tmp__VBJL)) {
          if (((((((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_seq_or_and__1BJL == seq_or_and__AYRG) && (Self__C0IL->parent_variable__B2LC.ensure_count__QEAG ==  1)) && (((__LIST *)list_current__IF1)->index__PXRG >  1)) && ((void *)((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)(((__LIST *)list_current__IF1)->index__PXRG -  1) -  1)] == (void *)((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_write__G1IL))) {
            unwrite__OGNL(Self__C0IL,((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_write__G1IL);
            ((__LOCAL_SEQ *)Self__C0IL->last_seq__LRJJ)->last_write__G1IL=NULL;
            ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)(((__LIST *)list_current__IF1)->index__PXRG -  1) -  1)]=NOP__;
            result__L0IL=val__M0IL;
          };
        };
      };
    };
    if (((void *)result__L0IL != (void *)NULL)) {
      result__JHAL=result__L0IL;
      unread__YVJK(Self__FHAL->local__ALZD,Self__FHAL);
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    };
  };
  if (((void *)result__JHAL == (void *)NULL)) {
    Self__THIL=((__LOCAL *)Self__FHAL->local__ALZD);
    if (((void *)Self__THIL->last_seq__LRJJ != (void *)NULL)) {
      ((__LOCAL_SEQ *)Self__THIL->last_seq__LRJJ)->last_index__MDUL=(__INTEGER)(-  1);
    };
    result__JHAL=Self__FHAL;
  };
  return(result__JHAL);
}

static void* execute_link__YLAL()
// () With resultNo recursive, No inlinable.
{
  __LIST *Self__VFKQ;
  void *voir__UFKQ;
  Self__VFKQ=((__LIST *)list_current__IF1);
  voir__UFKQ=create__AXB( 250);
  display__2QQG(Self__VFKQ,voir__UFKQ);
  put_string__2EG(((__STRING *)voir__UFKQ));
  fputc((int)('\n'),stdout);
  print__1ZE((&__string_558));
  fputc((int)('\n'),stdout);
  exit(( 1));
  return(NULL);
}

static void* execute_link__2LAL(__EXPR_EQUAL *Self__3LAL)
// ({EXPR_EQUAL}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__AMAL;
  void *__tmp__GMAL,*__tmp__HMAL,*__tmp__IMAL,*__tmp__JMAL,*__tmp__LMAL;
  void *__tmp__OMAL,*result__5LAL,*__tmp__PWVL,*__tmp__QWVL,*__tmp__2WVL;
  void *__tmp__3WVL,*__tmp__EXVL,*__tmp__TXVL,*__tmp__2XVL;
  void *__tmp__MMAL,*left_cst__DMAL,*__tmp__PMAL,*right_cst__EMAL;
  void *result__JRNM,*result__NWVL,*r__OWVL,*__tmp__FXVL;
  __POSITION __tmp__RRNM,__tmp__1RNM,__tmp__XWVL,__tmp__KYVL;
  __POSITION __tmp__DQAL;
  void *__tmp__SRNM,*__tmp__2RNM,*__tmp__YWVL,*__tmp__LYVL;
  void *__tmp__TRNM,*__tmp__3RNM,*__tmp__ZWVL,*__tmp__UXVL,*__tmp__3XVL;
  void *__tmp__MYVL;
  __READ_LOCAL *Self__KHCQ,*Self__MHCQ,*Self__OHCQ,*Self__QHCQ;
  __READ_GLOBAL *Self__NHCQ,*Self__RHCQ;
  __BOOLEAN __tmp__RWVL,__tmp__DYVL,__tmp__EYVL;
  old_seq__AMAL=seq_call_and_loop__VREJ;
  __tmp__GMAL=Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__GMAL)->__id) {
  case __LIST__: {
    __tmp__HMAL=execute_link__LUOG(__tmp__GMAL);
  } break;
  case __STRING_CST__: {
    __tmp__HMAL=((__STRING_CST *)__tmp__GMAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__HMAL=execute_link__U5ZK(__tmp__GMAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__HMAL=((__PROTOTYPE_CST *)__tmp__GMAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__HMAL=((__INTEGER_CST *)__tmp__GMAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__HMAL=execute_link__EHAL(__tmp__GMAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__HMAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__HMAL=execute_link__2LAL(__tmp__GMAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__HMAL=execute_link__FQAL(__tmp__GMAL);
  } break;
  case __REAL_CST__: {
    __tmp__HMAL=((__REAL_CST *)__tmp__GMAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__HMAL=((__CHARACTER_CST *)__tmp__GMAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__HMAL=execute_link__UUAL(__tmp__GMAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__HMAL=execute_link__1VAL(__tmp__GMAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__HMAL=execute_link__AWAL(__tmp__GMAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__HMAL=execute_link__J0AL(__tmp__GMAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__HMAL=execute_link__S4AL(__tmp__GMAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__HMAL=execute_link__1CBL(__tmp__GMAL);
  } break;
  case __EXPR_AND__: {
    __tmp__HMAL=execute_link__EHBL(__tmp__GMAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__HMAL=execute_link__NLBL(__tmp__GMAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__HMAL=execute_link__WPBL(__tmp__GMAL);
  } break;
  case __PUT_TO__: {
    __tmp__HMAL=execute_link__BOPK(__tmp__GMAL);
  } break;
  case __ITEM__: {
    __tmp__HMAL=execute_link__5TBL(__tmp__GMAL);
  } break;
  case __SIZE_OF__: {
    __tmp__HMAL=execute_link__GUBL(__tmp__GMAL);
  } break;
  case __CAST__: {
    __tmp__HMAL=execute_link__LUBL(__tmp__GMAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__HMAL=execute_link__A2TL(__tmp__GMAL);
  } break;
  case __READ_SLOT__: {
    __tmp__HMAL=execute_link__EYBL(__tmp__GMAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__HMAL=execute_link__U2BL(__tmp__GMAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__HMAL=execute_link__SRZM(__tmp__GMAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__HMAL=execute_link__OBFO(__tmp__GMAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__HMAL=execute_link__GJLO(__tmp__GMAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__HMAL=execute_link__HHFO(__tmp__GMAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__HMAL=execute_link__KPLO(__tmp__GMAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__HMAL=execute_link__0GKM(__tmp__GMAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__HMAL=execute_link__RROL(__tmp__GMAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__HMAL=execute_link__GUZM(__tmp__GMAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__HMAL=execute_link__ANFO(__tmp__GMAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__HMAL=execute_link__YLEP(__tmp__GMAL);
  } break;
  case __EXPR_INF__: {
    __tmp__HMAL=execute_link__VQQN(__tmp__GMAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__HMAL=execute_link__4UQN(__tmp__GMAL);
  } break;
  case __EXPR_OR__: {
    __tmp__HMAL=execute_link__1HQN(__tmp__GMAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__HMAL=execute_link__IYUO(__tmp__GMAL);
  } break;
  };
  Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H=__tmp__HMAL;
  __tmp__IMAL=Self__3LAL->parent_expr_binary_cmp__1LJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__IMAL)->__id) {
  case __LIST__: {
    __tmp__JMAL=execute_link__LUOG(__tmp__IMAL);
  } break;
  case __STRING_CST__: {
    __tmp__JMAL=((__STRING_CST *)__tmp__IMAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__JMAL=execute_link__U5ZK(__tmp__IMAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__JMAL=((__PROTOTYPE_CST *)__tmp__IMAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__JMAL=((__INTEGER_CST *)__tmp__IMAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__JMAL=execute_link__EHAL(__tmp__IMAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__JMAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__JMAL=execute_link__2LAL(__tmp__IMAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__JMAL=execute_link__FQAL(__tmp__IMAL);
  } break;
  case __REAL_CST__: {
    __tmp__JMAL=((__REAL_CST *)__tmp__IMAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__JMAL=((__CHARACTER_CST *)__tmp__IMAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__JMAL=execute_link__UUAL(__tmp__IMAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__JMAL=execute_link__1VAL(__tmp__IMAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__JMAL=execute_link__AWAL(__tmp__IMAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__JMAL=execute_link__J0AL(__tmp__IMAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__JMAL=execute_link__S4AL(__tmp__IMAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__JMAL=execute_link__1CBL(__tmp__IMAL);
  } break;
  case __EXPR_AND__: {
    __tmp__JMAL=execute_link__EHBL(__tmp__IMAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__JMAL=execute_link__NLBL(__tmp__IMAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__JMAL=execute_link__WPBL(__tmp__IMAL);
  } break;
  case __PUT_TO__: {
    __tmp__JMAL=execute_link__BOPK(__tmp__IMAL);
  } break;
  case __ITEM__: {
    __tmp__JMAL=execute_link__5TBL(__tmp__IMAL);
  } break;
  case __SIZE_OF__: {
    __tmp__JMAL=execute_link__GUBL(__tmp__IMAL);
  } break;
  case __CAST__: {
    __tmp__JMAL=execute_link__LUBL(__tmp__IMAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__JMAL=execute_link__A2TL(__tmp__IMAL);
  } break;
  case __READ_SLOT__: {
    __tmp__JMAL=execute_link__EYBL(__tmp__IMAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__JMAL=execute_link__U2BL(__tmp__IMAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__JMAL=execute_link__SRZM(__tmp__IMAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__JMAL=execute_link__OBFO(__tmp__IMAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__JMAL=execute_link__GJLO(__tmp__IMAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__JMAL=execute_link__HHFO(__tmp__IMAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__JMAL=execute_link__KPLO(__tmp__IMAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__JMAL=execute_link__0GKM(__tmp__IMAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__JMAL=execute_link__RROL(__tmp__IMAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__JMAL=execute_link__GUZM(__tmp__IMAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__JMAL=execute_link__ANFO(__tmp__IMAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__JMAL=execute_link__YLEP(__tmp__IMAL);
  } break;
  case __EXPR_INF__: {
    __tmp__JMAL=execute_link__VQQN(__tmp__IMAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__JMAL=execute_link__4UQN(__tmp__IMAL);
  } break;
  case __EXPR_OR__: {
    __tmp__JMAL=execute_link__1HQN(__tmp__IMAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__JMAL=execute_link__IYUO(__tmp__IMAL);
  } break;
  };
  Self__3LAL->parent_expr_binary_cmp__1LJH.right__LN2H=__tmp__JMAL;
  __tmp__LMAL=Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H;
  if (__tmp__LMAL==NULL) {
    __tmp__MMAL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__LMAL)->__id) {
    case __LIST__: {
      __tmp__MMAL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__MMAL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__MMAL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__MMAL=((void *)__tmp__LMAL);
    } break;
    case __READ_LOCAL__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__MMAL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__MMAL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__MMAL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__MMAL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__MMAL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__MMAL=NULL;
    } break;
    case __ITEM__: {
      __tmp__MMAL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__MMAL=NULL;
    } break;
    case __CAST__: {
      __tmp__MMAL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__MMAL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__MMAL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__MMAL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__MMAL=NULL;
    } break;
    }
  };
  left_cst__DMAL=__tmp__MMAL;
  __tmp__OMAL=Self__3LAL->parent_expr_binary_cmp__1LJH.right__LN2H;
  if (__tmp__OMAL==NULL) {
    __tmp__PMAL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__OMAL)->__id) {
    case __LIST__: {
      __tmp__PMAL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__PMAL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__PMAL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__PMAL=((void *)__tmp__OMAL);
    } break;
    case __READ_LOCAL__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__PMAL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__PMAL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__PMAL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__PMAL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__PMAL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__PMAL=NULL;
    } break;
    case __ITEM__: {
      __tmp__PMAL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__PMAL=NULL;
    } break;
    case __CAST__: {
      __tmp__PMAL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__PMAL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__PMAL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__PMAL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__PMAL=NULL;
    } break;
    }
  };
  right_cst__EMAL=__tmp__PMAL;
  result__5LAL=NULL;
  if (((void *)__tmp__MMAL != (void *)NULL)) {
    result__5LAL=NULL;
  };
  if ((((void *)result__5LAL == (void *)NULL) && ((void *)__tmp__PMAL != (void *)NULL))) {
    result__5LAL=NULL;
  };
  if (((((void *)result__5LAL == (void *)NULL) && ((void *)__tmp__PMAL != (void *)NULL)) && ((void *)__tmp__MMAL != (void *)NULL))) {
    result__JRNM=NULL;
    if ((((__INTEGER_CST *)__tmp__MMAL)->value__PAZD == ((__INTEGER_CST *)__tmp__PMAL)->value__PAZD)) {
      __tmp__RRNM=Self__3LAL->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__SRNM=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__SRNM)->__id) {
      case __TYPE__: {
        __tmp__TRNM=((__TYPE *)__tmp__SRNM)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__TRNM=((__TYPE_NULL *)__tmp__SRNM)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__TRNM=((__TYPE_VOID *)__tmp__SRNM)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__TRNM=((__TYPE_CONTEXT *)__tmp__SRNM)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__TRNM=((__TYPE_ID *)__tmp__SRNM)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__TRNM=((__TYPE_GENERIC *)__tmp__SRNM)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__TRNM=((__PROFIL_BLOCK *)__tmp__SRNM)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__JRNM=create__type__CLQC(__tmp__RRNM,__tmp__TRNM);
    } else {
      __tmp__1RNM=Self__3LAL->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__2RNM=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__2RNM)->__id) {
      case __TYPE__: {
        __tmp__3RNM=((__TYPE *)__tmp__2RNM)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__3RNM=((__TYPE_NULL *)__tmp__2RNM)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__3RNM=((__TYPE_VOID *)__tmp__2RNM)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__3RNM=((__TYPE_CONTEXT *)__tmp__2RNM)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__3RNM=((__TYPE_ID *)__tmp__2RNM)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__3RNM=((__TYPE_GENERIC *)__tmp__2RNM)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__3RNM=((__PROFIL_BLOCK *)__tmp__2RNM)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__JRNM=create__type__CLQC(__tmp__1RNM,__tmp__3RNM);
    };
    result__5LAL=result__JRNM;
  };
  if ((((void *)result__5LAL == (void *)NULL) && (old_seq__AMAL == seq_call_and_loop__VREJ))) {
    result__NWVL=NULL;
    r__OWVL=NULL;
    __tmp__PWVL=Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H;
    __tmp__QWVL=Self__3LAL->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__PWVL)->__id) {
    case __LIST__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__RWVL=__infix_equal_equal__WF1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RWVL=__infix_equal_equal__LG1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __INTEGER_CST__: {
      __tmp__RWVL=__infix_equal_equal__2G1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __READ_LOCAL__: {
      __tmp__RWVL=__infix_equal_equal__WH1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RWVL=__infix_equal_equal__MI1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RWVL=__infix_equal_equal__IJ1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __REAL_CST__: {
      __tmp__RWVL=__infix_equal_equal__EK1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__RWVL=__infix_equal_equal__4K1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__RWVL=__infix_equal_equal__XL1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_SUB__: {
      __tmp__RWVL=__infix_equal_equal__TM1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_MUL__: {
      __tmp__RWVL=__infix_equal_equal__PN1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_DIV__: {
      __tmp__RWVL=__infix_equal_equal__LO1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_AND__: {
      __tmp__RWVL=__infix_equal_equal__HP1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RWVL=__infix_equal_equal__DQ1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RWVL=__infix_equal_equal__5Q1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __PUT_TO__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__RWVL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__RWVL=__infix_equal_equal__LS1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__RWVL=__infix_equal_equal__HT1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RWVL=__infix_equal_equal__CZHO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RWVL=__infix_equal_equal__SXFO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RWVL=__infix_equal_equal__TBMO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RWVL=__infix_equal_equal__OYFO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RWVL=__infix_equal_equal__QCMO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_NEG__: {
      __tmp__RWVL=__infix_equal_equal__J5KM(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_ADD__: {
      __tmp__RWVL=__infix_equal_equal__ZT1L(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_NOT__: {
      __tmp__RWVL=__infix_equal_equal__QB0M(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_MOD__: {
      __tmp__RWVL=__infix_equal_equal__KZFO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RWVL=__infix_equal_equal__OTEP(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_INF__: {
      __tmp__RWVL=__infix_equal_equal__UZHO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RWVL=__infix_equal_equal__Q0HO(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_OR__: {
      __tmp__RWVL=__infix_equal_equal__32QN(__tmp__PWVL,__tmp__QWVL);
    } break;
    case __EXPR_XOR__: {
      __tmp__RWVL=__infix_equal_equal__GOVO(__tmp__PWVL,__tmp__QWVL);
    } break;
    };
    if (__tmp__RWVL) {
      __tmp__XWVL=Self__3LAL->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__YWVL=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__YWVL)->__id) {
      case __TYPE__: {
        __tmp__ZWVL=((__TYPE *)__tmp__YWVL)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__ZWVL=((__TYPE_NULL *)__tmp__YWVL)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__ZWVL=((__TYPE_VOID *)__tmp__YWVL)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__ZWVL=((__TYPE_CONTEXT *)__tmp__YWVL)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__ZWVL=((__TYPE_ID *)__tmp__YWVL)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__ZWVL=((__TYPE_GENERIC *)__tmp__YWVL)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__ZWVL=((__PROFIL_BLOCK *)__tmp__YWVL)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__NWVL=create__type__CLQC(__tmp__XWVL,__tmp__ZWVL);
      __tmp__2WVL=Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H;
      switch (((struct ___OBJ *)__tmp__2WVL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__2WVL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__2WVL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__KHCQ=((__READ_LOCAL *)__tmp__2WVL);
        unread__YVJK(Self__KHCQ->local__ALZD,Self__KHCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__2WVL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__2WVL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__2WVL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__MHCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2WVL)->receiver__OO2H);
        unread__YVJK(Self__MHCQ->local__ALZD,Self__MHCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__2WVL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__2WVL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__2WVL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__2WVL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__2WVL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__2WVL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__2WVL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__2WVL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__2WVL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__2WVL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__2WVL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__2WVL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__2WVL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__2WVL);
      } break;
      case __READ_GLOBAL__: {
        Self__NHCQ=((__READ_GLOBAL *)__tmp__2WVL);
        unread__15ML(Self__NHCQ->global__RHJK,Self__NHCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__2WVL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__2WVL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__2WVL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__2WVL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__2WVL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__2WVL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__2WVL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__2WVL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__2WVL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__2WVL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__2WVL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__2WVL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__2WVL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__2WVL);
      } break;
      };
      __tmp__3WVL=Self__3LAL->parent_expr_binary_cmp__1LJH.right__LN2H;
      switch (((struct ___OBJ *)__tmp__3WVL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__3WVL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__3WVL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__OHCQ=((__READ_LOCAL *)__tmp__3WVL);
        unread__YVJK(Self__OHCQ->local__ALZD,Self__OHCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__3WVL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__3WVL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__3WVL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__QHCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3WVL)->receiver__OO2H);
        unread__YVJK(Self__QHCQ->local__ALZD,Self__QHCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__3WVL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__3WVL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__3WVL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__3WVL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__3WVL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__3WVL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__3WVL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__3WVL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__3WVL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__3WVL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__3WVL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__3WVL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__3WVL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__3WVL);
      } break;
      case __READ_GLOBAL__: {
        Self__RHCQ=((__READ_GLOBAL *)__tmp__3WVL);
        unread__15ML(Self__RHCQ->global__RHJK,Self__RHCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__3WVL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__3WVL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__3WVL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__3WVL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__3WVL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__3WVL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__3WVL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__3WVL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__3WVL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__3WVL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__3WVL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__3WVL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__3WVL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__3WVL);
      } break;
      };
    } else {
      __tmp__EXVL=Self__3LAL->parent_expr_binary_cmp__1LJH.right__LN2H;
      if (__tmp__EXVL==NULL) {
        __tmp__FXVL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__EXVL)->__id) {
        case __LIST__: {
          __tmp__FXVL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__FXVL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__FXVL=((void *)__tmp__EXVL);
        } break;
        case __INTEGER_CST__: {
          __tmp__FXVL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__FXVL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__FXVL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__FXVL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__FXVL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__FXVL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__FXVL=NULL;
        } break;
        case __ITEM__: {
          __tmp__FXVL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__FXVL=NULL;
        } break;
        case __CAST__: {
          __tmp__FXVL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__FXVL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__FXVL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__FXVL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__FXVL=NULL;
        } break;
        }
      };
      r__OWVL=__tmp__FXVL;
      if ((((void *)__tmp__FXVL != (void *)NULL) && ((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__FXVL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)TYPE_NULL__))) {
        __tmp__TXVL=Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H;
        switch (((struct ___OBJ *)__tmp__TXVL)->__id) {
        case __LIST__: {
          __tmp__UXVL=static_type__GIQG(__tmp__TXVL);
        } break;
        case __STRING_CST__: {
          __tmp__UXVL=((__STRING_CST *)__tmp__TXVL)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__UXVL=((__EXTERNAL_C *)__tmp__TXVL)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__UXVL=((__PROTOTYPE_CST *)__tmp__TXVL)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__UXVL=((__INTEGER_CST *)__tmp__TXVL)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__UXVL=((__LOCAL *)((__READ_LOCAL *)__tmp__TXVL)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__UXVL=static_type__0N1H(__tmp__TXVL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__UXVL=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__UXVL=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__UXVL=((__REAL_CST *)__tmp__TXVL)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__UXVL=((__CHARACTER_CST *)__tmp__TXVL)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__UXVL=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__UXVL=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__UXVL=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__UXVL=static_type__MP1H(__tmp__TXVL);
        } break;
        case __EXPR_MUL__: {
          __tmp__UXVL=static_type__SP1H(__tmp__TXVL);
        } break;
        case __EXPR_DIV__: {
          __tmp__UXVL=static_type__XP1H(__tmp__TXVL);
        } break;
        case __EXPR_AND__: {
          __tmp__UXVL=static_type__2P1H(__tmp__TXVL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__UXVL=static_type__BQ1H(__tmp__TXVL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__UXVL=static_type__GQ1H(__tmp__TXVL);
        } break;
        case __PUT_TO__: {
          __tmp__UXVL=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__UXVL=static_type__PQ1H(__tmp__TXVL);
        } break;
        case __SIZE_OF__: {
          __tmp__UXVL=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__UXVL=((__CAST *)__tmp__TXVL)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__UXVL=static_type__GIKL(__tmp__TXVL);
        } break;
        case __READ_SLOT__: {
          __tmp__UXVL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__TXVL)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__UXVL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__TXVL)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__UXVL=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__UXVL=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__UXVL=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__UXVL=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__UXVL=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__UXVL=static_type__Z2IM(__tmp__TXVL);
        } break;
        case __EXPR_ADD__: {
          __tmp__UXVL=static_type__IXML(__tmp__TXVL);
        } break;
        case __EXPR_NOT__: {
          __tmp__UXVL=static_type__BTXM(__tmp__TXVL);
        } break;
        case __EXPR_MOD__: {
          __tmp__UXVL=static_type__5LEO(__tmp__TXVL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__UXVL=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__UXVL=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__UXVL=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__UXVL=static_type__NOPN(__tmp__TXVL);
        } break;
        case __EXPR_XOR__: {
          __tmp__UXVL=static_type__XCSO(__tmp__TXVL);
        } break;
        };
        __tmp__DYVL=((__UINTEGER_8)(((__TYPE_FULL *)__tmp__UXVL)->flag__LTL &  1) !=  0);
      } else {
        __tmp__DYVL=FALSE__;
      };
      if (__tmp__DYVL) {
        __tmp__2XVL=Self__3LAL->parent_expr_binary_cmp__1LJH.left__HN2H;
        switch (((struct ___OBJ *)__tmp__2XVL)->__id) {
        case __LIST__: {
          __tmp__3XVL=static_type__GIQG(__tmp__2XVL);
        } break;
        case __STRING_CST__: {
          __tmp__3XVL=((__STRING_CST *)__tmp__2XVL)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__3XVL=((__EXTERNAL_C *)__tmp__2XVL)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__3XVL=((__PROTOTYPE_CST *)__tmp__2XVL)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__3XVL=((__INTEGER_CST *)__tmp__2XVL)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__3XVL=((__LOCAL *)((__READ_LOCAL *)__tmp__2XVL)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__3XVL=static_type__0N1H(__tmp__2XVL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__3XVL=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__3XVL=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__3XVL=((__REAL_CST *)__tmp__2XVL)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__3XVL=((__CHARACTER_CST *)__tmp__2XVL)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__3XVL=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__3XVL=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__3XVL=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__3XVL=static_type__MP1H(__tmp__2XVL);
        } break;
        case __EXPR_MUL__: {
          __tmp__3XVL=static_type__SP1H(__tmp__2XVL);
        } break;
        case __EXPR_DIV__: {
          __tmp__3XVL=static_type__XP1H(__tmp__2XVL);
        } break;
        case __EXPR_AND__: {
          __tmp__3XVL=static_type__2P1H(__tmp__2XVL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__3XVL=static_type__BQ1H(__tmp__2XVL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__3XVL=static_type__GQ1H(__tmp__2XVL);
        } break;
        case __PUT_TO__: {
          __tmp__3XVL=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__3XVL=static_type__PQ1H(__tmp__2XVL);
        } break;
        case __SIZE_OF__: {
          __tmp__3XVL=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__3XVL=((__CAST *)__tmp__2XVL)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__3XVL=static_type__GIKL(__tmp__2XVL);
        } break;
        case __READ_SLOT__: {
          __tmp__3XVL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__2XVL)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__3XVL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__2XVL)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__3XVL=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__3XVL=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__3XVL=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__3XVL=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__3XVL=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__3XVL=static_type__Z2IM(__tmp__2XVL);
        } break;
        case __EXPR_ADD__: {
          __tmp__3XVL=static_type__IXML(__tmp__2XVL);
        } break;
        case __EXPR_NOT__: {
          __tmp__3XVL=static_type__BTXM(__tmp__2XVL);
        } break;
        case __EXPR_MOD__: {
          __tmp__3XVL=static_type__5LEO(__tmp__2XVL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__3XVL=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__3XVL=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__3XVL=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__3XVL=static_type__NOPN(__tmp__2XVL);
        } break;
        case __EXPR_XOR__: {
          __tmp__3XVL=static_type__XCSO(__tmp__2XVL);
        } break;
        };
        __tmp__EYVL=((void *)((__TYPE_FULL *)__tmp__3XVL)->parent_type__KTL != (void *)type_pointer__HLB);
      } else {
        __tmp__EYVL=FALSE__;
      };
      if (__tmp__EYVL) {
        __tmp__KYVL=Self__3LAL->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__LYVL=type_false__NJB;
        switch (((struct ___OBJ *)__tmp__LYVL)->__id) {
        case __TYPE__: {
          __tmp__MYVL=((__TYPE *)__tmp__LYVL)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__MYVL=((__TYPE_NULL *)__tmp__LYVL)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__MYVL=((__TYPE_VOID *)__tmp__LYVL)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__MYVL=((__TYPE_CONTEXT *)__tmp__LYVL)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__MYVL=((__TYPE_ID *)__tmp__LYVL)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__MYVL=((__TYPE_GENERIC *)__tmp__LYVL)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__MYVL=((__PROFIL_BLOCK *)__tmp__LYVL)->parent_type__HHAG.default__AKC;
        } break;
        };
        result__NWVL=create__type__CLQC(__tmp__KYVL,__tmp__MYVL);
      };
    };
    result__5LAL=result__NWVL;
    if ((((void *)result__NWVL == (void *)NULL) && ((void *)__tmp__MMAL != (void *)NULL))) {
      result__5LAL=NULL;
    };
    if ((((void *)result__5LAL == (void *)NULL) && ((void *)__tmp__PMAL != (void *)NULL))) {
      result__5LAL=NULL;
    };
  };
  if (((void *)result__5LAL == (void *)NULL)) {
    result__5LAL=Self__3LAL;
  } else {
    __tmp__DQAL=Self__3LAL->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    if (((struct ___OBJ *)result__5LAL)->__id==__PROTOTYPE_CST__) {
      ((__PROTOTYPE_CST *)result__5LAL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__DQAL;
    } else {
      ((__EXPR_EQUAL *)result__5LAL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__DQAL;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__5LAL);
}

static void* execute_link__FQAL(__EXPR_NOT_EQUAL *Self__GQAL)
// ({EXPR_NOT_EQUAL}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__JQAL;
  void *__tmp__PQAL,*__tmp__QQAL,*__tmp__RQAL,*__tmp__SQAL,*__tmp__UQAL;
  void *__tmp__XQAL,*result__IQAL,*__tmp__1ZVL,*__tmp__2ZVL,*__tmp__I0VL;
  void *__tmp__J0VL,*__tmp__Q0VL,*__tmp__50VL,*__tmp__I1VL;
  void *__tmp__VQAL,*left_cst__MQAL,*__tmp__YQAL,*right_cst__NQAL;
  void *result__GSNM,*result__ZZVL,*r__0ZVL,*__tmp__R0VL;
  __POSITION __tmp__OSNM,__tmp__YSNM,__tmp__D0VL,__tmp__W1VL;
  __POSITION __tmp__MUAL;
  void *__tmp__PSNM,*__tmp__ZSNM,*__tmp__E0VL,*__tmp__X1VL;
  void *__tmp__QSNM,*__tmp__0SNM,*__tmp__F0VL,*__tmp__A1VL,*__tmp__J1VL;
  void *__tmp__Y1VL;
  __READ_LOCAL *Self__NICQ,*Self__PICQ,*Self__RICQ,*Self__TICQ;
  __READ_GLOBAL *Self__QICQ,*Self__UICQ;
  __BOOLEAN __tmp__3ZVL,__tmp__P1VL,__tmp__Q1VL;
  old_seq__JQAL=seq_call_and_loop__VREJ;
  __tmp__PQAL=Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__PQAL)->__id) {
  case __LIST__: {
    __tmp__QQAL=execute_link__LUOG(__tmp__PQAL);
  } break;
  case __STRING_CST__: {
    __tmp__QQAL=((__STRING_CST *)__tmp__PQAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__QQAL=execute_link__U5ZK(__tmp__PQAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__QQAL=((__PROTOTYPE_CST *)__tmp__PQAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__QQAL=((__INTEGER_CST *)__tmp__PQAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__QQAL=execute_link__EHAL(__tmp__PQAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__QQAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__QQAL=execute_link__2LAL(__tmp__PQAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__QQAL=execute_link__FQAL(__tmp__PQAL);
  } break;
  case __REAL_CST__: {
    __tmp__QQAL=((__REAL_CST *)__tmp__PQAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__QQAL=((__CHARACTER_CST *)__tmp__PQAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__QQAL=execute_link__UUAL(__tmp__PQAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__QQAL=execute_link__1VAL(__tmp__PQAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__QQAL=execute_link__AWAL(__tmp__PQAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__QQAL=execute_link__J0AL(__tmp__PQAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__QQAL=execute_link__S4AL(__tmp__PQAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__QQAL=execute_link__1CBL(__tmp__PQAL);
  } break;
  case __EXPR_AND__: {
    __tmp__QQAL=execute_link__EHBL(__tmp__PQAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__QQAL=execute_link__NLBL(__tmp__PQAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__QQAL=execute_link__WPBL(__tmp__PQAL);
  } break;
  case __PUT_TO__: {
    __tmp__QQAL=execute_link__BOPK(__tmp__PQAL);
  } break;
  case __ITEM__: {
    __tmp__QQAL=execute_link__5TBL(__tmp__PQAL);
  } break;
  case __SIZE_OF__: {
    __tmp__QQAL=execute_link__GUBL(__tmp__PQAL);
  } break;
  case __CAST__: {
    __tmp__QQAL=execute_link__LUBL(__tmp__PQAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__QQAL=execute_link__A2TL(__tmp__PQAL);
  } break;
  case __READ_SLOT__: {
    __tmp__QQAL=execute_link__EYBL(__tmp__PQAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__QQAL=execute_link__U2BL(__tmp__PQAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__QQAL=execute_link__SRZM(__tmp__PQAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__QQAL=execute_link__OBFO(__tmp__PQAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__QQAL=execute_link__GJLO(__tmp__PQAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__QQAL=execute_link__HHFO(__tmp__PQAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__QQAL=execute_link__KPLO(__tmp__PQAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__QQAL=execute_link__0GKM(__tmp__PQAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__QQAL=execute_link__RROL(__tmp__PQAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__QQAL=execute_link__GUZM(__tmp__PQAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__QQAL=execute_link__ANFO(__tmp__PQAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__QQAL=execute_link__YLEP(__tmp__PQAL);
  } break;
  case __EXPR_INF__: {
    __tmp__QQAL=execute_link__VQQN(__tmp__PQAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__QQAL=execute_link__4UQN(__tmp__PQAL);
  } break;
  case __EXPR_OR__: {
    __tmp__QQAL=execute_link__1HQN(__tmp__PQAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__QQAL=execute_link__IYUO(__tmp__PQAL);
  } break;
  };
  Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H=__tmp__QQAL;
  __tmp__RQAL=Self__GQAL->parent_expr_binary_cmp__DMJH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__RQAL)->__id) {
  case __LIST__: {
    __tmp__SQAL=execute_link__LUOG(__tmp__RQAL);
  } break;
  case __STRING_CST__: {
    __tmp__SQAL=((__STRING_CST *)__tmp__RQAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__SQAL=execute_link__U5ZK(__tmp__RQAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__SQAL=((__PROTOTYPE_CST *)__tmp__RQAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__SQAL=((__INTEGER_CST *)__tmp__RQAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__SQAL=execute_link__EHAL(__tmp__RQAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__SQAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__SQAL=execute_link__2LAL(__tmp__RQAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__SQAL=execute_link__FQAL(__tmp__RQAL);
  } break;
  case __REAL_CST__: {
    __tmp__SQAL=((__REAL_CST *)__tmp__RQAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__SQAL=((__CHARACTER_CST *)__tmp__RQAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__SQAL=execute_link__UUAL(__tmp__RQAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__SQAL=execute_link__1VAL(__tmp__RQAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__SQAL=execute_link__AWAL(__tmp__RQAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__SQAL=execute_link__J0AL(__tmp__RQAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__SQAL=execute_link__S4AL(__tmp__RQAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__SQAL=execute_link__1CBL(__tmp__RQAL);
  } break;
  case __EXPR_AND__: {
    __tmp__SQAL=execute_link__EHBL(__tmp__RQAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__SQAL=execute_link__NLBL(__tmp__RQAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__SQAL=execute_link__WPBL(__tmp__RQAL);
  } break;
  case __PUT_TO__: {
    __tmp__SQAL=execute_link__BOPK(__tmp__RQAL);
  } break;
  case __ITEM__: {
    __tmp__SQAL=execute_link__5TBL(__tmp__RQAL);
  } break;
  case __SIZE_OF__: {
    __tmp__SQAL=execute_link__GUBL(__tmp__RQAL);
  } break;
  case __CAST__: {
    __tmp__SQAL=execute_link__LUBL(__tmp__RQAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__SQAL=execute_link__A2TL(__tmp__RQAL);
  } break;
  case __READ_SLOT__: {
    __tmp__SQAL=execute_link__EYBL(__tmp__RQAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__SQAL=execute_link__U2BL(__tmp__RQAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__SQAL=execute_link__SRZM(__tmp__RQAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__SQAL=execute_link__OBFO(__tmp__RQAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__SQAL=execute_link__GJLO(__tmp__RQAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__SQAL=execute_link__HHFO(__tmp__RQAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__SQAL=execute_link__KPLO(__tmp__RQAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__SQAL=execute_link__0GKM(__tmp__RQAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__SQAL=execute_link__RROL(__tmp__RQAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__SQAL=execute_link__GUZM(__tmp__RQAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__SQAL=execute_link__ANFO(__tmp__RQAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__SQAL=execute_link__YLEP(__tmp__RQAL);
  } break;
  case __EXPR_INF__: {
    __tmp__SQAL=execute_link__VQQN(__tmp__RQAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__SQAL=execute_link__4UQN(__tmp__RQAL);
  } break;
  case __EXPR_OR__: {
    __tmp__SQAL=execute_link__1HQN(__tmp__RQAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__SQAL=execute_link__IYUO(__tmp__RQAL);
  } break;
  };
  Self__GQAL->parent_expr_binary_cmp__DMJH.right__LN2H=__tmp__SQAL;
  __tmp__UQAL=Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H;
  if (__tmp__UQAL==NULL) {
    __tmp__VQAL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__UQAL)->__id) {
    case __LIST__: {
      __tmp__VQAL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VQAL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VQAL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__VQAL=((void *)__tmp__UQAL);
    } break;
    case __READ_LOCAL__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VQAL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__VQAL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VQAL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VQAL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VQAL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__VQAL=NULL;
    } break;
    case __ITEM__: {
      __tmp__VQAL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__VQAL=NULL;
    } break;
    case __CAST__: {
      __tmp__VQAL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__VQAL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__VQAL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__VQAL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__VQAL=NULL;
    } break;
    }
  };
  left_cst__MQAL=__tmp__VQAL;
  __tmp__XQAL=Self__GQAL->parent_expr_binary_cmp__DMJH.right__LN2H;
  if (__tmp__XQAL==NULL) {
    __tmp__YQAL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__XQAL)->__id) {
    case __LIST__: {
      __tmp__YQAL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YQAL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YQAL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__YQAL=((void *)__tmp__XQAL);
    } break;
    case __READ_LOCAL__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YQAL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__YQAL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YQAL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YQAL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YQAL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__YQAL=NULL;
    } break;
    case __ITEM__: {
      __tmp__YQAL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__YQAL=NULL;
    } break;
    case __CAST__: {
      __tmp__YQAL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__YQAL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__YQAL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__YQAL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__YQAL=NULL;
    } break;
    }
  };
  right_cst__NQAL=__tmp__YQAL;
  result__IQAL=NULL;
  if (((void *)__tmp__VQAL != (void *)NULL)) {
    result__IQAL=NULL;
  };
  if ((((void *)result__IQAL == (void *)NULL) && ((void *)__tmp__YQAL != (void *)NULL))) {
    result__IQAL=NULL;
  };
  if (((((void *)result__IQAL == (void *)NULL) && ((void *)__tmp__YQAL != (void *)NULL)) && ((void *)__tmp__VQAL != (void *)NULL))) {
    result__GSNM=NULL;
    if ((((__INTEGER_CST *)__tmp__VQAL)->value__PAZD != ((__INTEGER_CST *)__tmp__YQAL)->value__PAZD)) {
      __tmp__OSNM=Self__GQAL->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__PSNM=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__PSNM)->__id) {
      case __TYPE__: {
        __tmp__QSNM=((__TYPE *)__tmp__PSNM)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__QSNM=((__TYPE_NULL *)__tmp__PSNM)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__QSNM=((__TYPE_VOID *)__tmp__PSNM)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__QSNM=((__TYPE_CONTEXT *)__tmp__PSNM)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__QSNM=((__TYPE_ID *)__tmp__PSNM)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__QSNM=((__TYPE_GENERIC *)__tmp__PSNM)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__QSNM=((__PROFIL_BLOCK *)__tmp__PSNM)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__GSNM=create__type__CLQC(__tmp__OSNM,__tmp__QSNM);
    } else {
      __tmp__YSNM=Self__GQAL->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__ZSNM=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__ZSNM)->__id) {
      case __TYPE__: {
        __tmp__0SNM=((__TYPE *)__tmp__ZSNM)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__0SNM=((__TYPE_NULL *)__tmp__ZSNM)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__0SNM=((__TYPE_VOID *)__tmp__ZSNM)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__0SNM=((__TYPE_CONTEXT *)__tmp__ZSNM)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__0SNM=((__TYPE_ID *)__tmp__ZSNM)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__0SNM=((__TYPE_GENERIC *)__tmp__ZSNM)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__0SNM=((__PROFIL_BLOCK *)__tmp__ZSNM)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__GSNM=create__type__CLQC(__tmp__YSNM,__tmp__0SNM);
    };
    result__IQAL=result__GSNM;
  };
  if ((((void *)result__IQAL == (void *)NULL) && (old_seq__JQAL == seq_call_and_loop__VREJ))) {
    result__ZZVL=NULL;
    r__0ZVL=NULL;
    __tmp__1ZVL=Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H;
    __tmp__2ZVL=Self__GQAL->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__1ZVL)->__id) {
    case __LIST__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__3ZVL=__infix_equal_equal__WF1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__3ZVL=__infix_equal_equal__LG1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __INTEGER_CST__: {
      __tmp__3ZVL=__infix_equal_equal__2G1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __READ_LOCAL__: {
      __tmp__3ZVL=__infix_equal_equal__WH1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3ZVL=__infix_equal_equal__MI1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3ZVL=__infix_equal_equal__IJ1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __REAL_CST__: {
      __tmp__3ZVL=__infix_equal_equal__EK1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__3ZVL=__infix_equal_equal__4K1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__3ZVL=__infix_equal_equal__XL1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_SUB__: {
      __tmp__3ZVL=__infix_equal_equal__TM1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_MUL__: {
      __tmp__3ZVL=__infix_equal_equal__PN1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_DIV__: {
      __tmp__3ZVL=__infix_equal_equal__LO1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_AND__: {
      __tmp__3ZVL=__infix_equal_equal__HP1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3ZVL=__infix_equal_equal__DQ1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3ZVL=__infix_equal_equal__5Q1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __PUT_TO__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__3ZVL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__3ZVL=__infix_equal_equal__LS1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__3ZVL=__infix_equal_equal__HT1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3ZVL=__infix_equal_equal__CZHO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3ZVL=__infix_equal_equal__SXFO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3ZVL=__infix_equal_equal__TBMO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3ZVL=__infix_equal_equal__OYFO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3ZVL=__infix_equal_equal__QCMO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_NEG__: {
      __tmp__3ZVL=__infix_equal_equal__J5KM(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_ADD__: {
      __tmp__3ZVL=__infix_equal_equal__ZT1L(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_NOT__: {
      __tmp__3ZVL=__infix_equal_equal__QB0M(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_MOD__: {
      __tmp__3ZVL=__infix_equal_equal__KZFO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3ZVL=__infix_equal_equal__OTEP(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_INF__: {
      __tmp__3ZVL=__infix_equal_equal__UZHO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3ZVL=__infix_equal_equal__Q0HO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_OR__: {
      __tmp__3ZVL=__infix_equal_equal__32QN(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    case __EXPR_XOR__: {
      __tmp__3ZVL=__infix_equal_equal__GOVO(__tmp__1ZVL,__tmp__2ZVL);
    } break;
    };
    if (__tmp__3ZVL) {
      __tmp__D0VL=Self__GQAL->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__E0VL=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__E0VL)->__id) {
      case __TYPE__: {
        __tmp__F0VL=((__TYPE *)__tmp__E0VL)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__F0VL=((__TYPE_NULL *)__tmp__E0VL)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__F0VL=((__TYPE_VOID *)__tmp__E0VL)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__F0VL=((__TYPE_CONTEXT *)__tmp__E0VL)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__F0VL=((__TYPE_ID *)__tmp__E0VL)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__F0VL=((__TYPE_GENERIC *)__tmp__E0VL)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__F0VL=((__PROFIL_BLOCK *)__tmp__E0VL)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__ZZVL=create__type__CLQC(__tmp__D0VL,__tmp__F0VL);
      __tmp__I0VL=Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H;
      switch (((struct ___OBJ *)__tmp__I0VL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__I0VL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__I0VL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__NICQ=((__READ_LOCAL *)__tmp__I0VL);
        unread__YVJK(Self__NICQ->local__ALZD,Self__NICQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__I0VL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__I0VL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__I0VL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__PICQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__I0VL)->receiver__OO2H);
        unread__YVJK(Self__PICQ->local__ALZD,Self__PICQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__I0VL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__I0VL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__I0VL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__I0VL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__I0VL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__I0VL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__I0VL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__I0VL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__I0VL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__I0VL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__I0VL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__I0VL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__I0VL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__I0VL);
      } break;
      case __READ_GLOBAL__: {
        Self__QICQ=((__READ_GLOBAL *)__tmp__I0VL);
        unread__15ML(Self__QICQ->global__RHJK,Self__QICQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__I0VL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__I0VL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__I0VL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__I0VL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__I0VL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__I0VL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__I0VL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__I0VL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__I0VL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__I0VL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__I0VL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__I0VL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__I0VL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__I0VL);
      } break;
      };
      __tmp__J0VL=Self__GQAL->parent_expr_binary_cmp__DMJH.right__LN2H;
      switch (((struct ___OBJ *)__tmp__J0VL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__J0VL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__J0VL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__RICQ=((__READ_LOCAL *)__tmp__J0VL);
        unread__YVJK(Self__RICQ->local__ALZD,Self__RICQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__J0VL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__J0VL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__J0VL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__TICQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__J0VL)->receiver__OO2H);
        unread__YVJK(Self__TICQ->local__ALZD,Self__TICQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__J0VL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__J0VL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__J0VL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__J0VL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__J0VL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__J0VL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__J0VL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__J0VL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__J0VL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__J0VL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__J0VL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__J0VL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__J0VL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__J0VL);
      } break;
      case __READ_GLOBAL__: {
        Self__UICQ=((__READ_GLOBAL *)__tmp__J0VL);
        unread__15ML(Self__UICQ->global__RHJK,Self__UICQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__J0VL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__J0VL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__J0VL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__J0VL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__J0VL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__J0VL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__J0VL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__J0VL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__J0VL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__J0VL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__J0VL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__J0VL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__J0VL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__J0VL);
      } break;
      };
    } else {
      __tmp__Q0VL=Self__GQAL->parent_expr_binary_cmp__DMJH.right__LN2H;
      if (__tmp__Q0VL==NULL) {
        __tmp__R0VL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__Q0VL)->__id) {
        case __LIST__: {
          __tmp__R0VL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__R0VL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__R0VL=((void *)__tmp__Q0VL);
        } break;
        case __INTEGER_CST__: {
          __tmp__R0VL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__R0VL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__R0VL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__R0VL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__R0VL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__R0VL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__R0VL=NULL;
        } break;
        case __ITEM__: {
          __tmp__R0VL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__R0VL=NULL;
        } break;
        case __CAST__: {
          __tmp__R0VL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__R0VL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__R0VL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__R0VL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__R0VL=NULL;
        } break;
        }
      };
      r__0ZVL=__tmp__R0VL;
      if ((((void *)__tmp__R0VL != (void *)NULL) && ((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__R0VL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)TYPE_NULL__))) {
        __tmp__50VL=Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H;
        switch (((struct ___OBJ *)__tmp__50VL)->__id) {
        case __LIST__: {
          __tmp__A1VL=static_type__GIQG(__tmp__50VL);
        } break;
        case __STRING_CST__: {
          __tmp__A1VL=((__STRING_CST *)__tmp__50VL)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__A1VL=((__EXTERNAL_C *)__tmp__50VL)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__A1VL=((__PROTOTYPE_CST *)__tmp__50VL)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__A1VL=((__INTEGER_CST *)__tmp__50VL)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__A1VL=((__LOCAL *)((__READ_LOCAL *)__tmp__50VL)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__A1VL=static_type__0N1H(__tmp__50VL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__A1VL=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__A1VL=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__A1VL=((__REAL_CST *)__tmp__50VL)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__A1VL=((__CHARACTER_CST *)__tmp__50VL)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__A1VL=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__A1VL=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__A1VL=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__A1VL=static_type__MP1H(__tmp__50VL);
        } break;
        case __EXPR_MUL__: {
          __tmp__A1VL=static_type__SP1H(__tmp__50VL);
        } break;
        case __EXPR_DIV__: {
          __tmp__A1VL=static_type__XP1H(__tmp__50VL);
        } break;
        case __EXPR_AND__: {
          __tmp__A1VL=static_type__2P1H(__tmp__50VL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__A1VL=static_type__BQ1H(__tmp__50VL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__A1VL=static_type__GQ1H(__tmp__50VL);
        } break;
        case __PUT_TO__: {
          __tmp__A1VL=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__A1VL=static_type__PQ1H(__tmp__50VL);
        } break;
        case __SIZE_OF__: {
          __tmp__A1VL=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__A1VL=((__CAST *)__tmp__50VL)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__A1VL=static_type__GIKL(__tmp__50VL);
        } break;
        case __READ_SLOT__: {
          __tmp__A1VL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__50VL)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__A1VL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__50VL)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__A1VL=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__A1VL=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__A1VL=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__A1VL=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__A1VL=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__A1VL=static_type__Z2IM(__tmp__50VL);
        } break;
        case __EXPR_ADD__: {
          __tmp__A1VL=static_type__IXML(__tmp__50VL);
        } break;
        case __EXPR_NOT__: {
          __tmp__A1VL=static_type__BTXM(__tmp__50VL);
        } break;
        case __EXPR_MOD__: {
          __tmp__A1VL=static_type__5LEO(__tmp__50VL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__A1VL=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__A1VL=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__A1VL=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__A1VL=static_type__NOPN(__tmp__50VL);
        } break;
        case __EXPR_XOR__: {
          __tmp__A1VL=static_type__XCSO(__tmp__50VL);
        } break;
        };
        __tmp__P1VL=((__UINTEGER_8)(((__TYPE_FULL *)__tmp__A1VL)->flag__LTL &  1) !=  0);
      } else {
        __tmp__P1VL=FALSE__;
      };
      if (__tmp__P1VL) {
        __tmp__I1VL=Self__GQAL->parent_expr_binary_cmp__DMJH.left__HN2H;
        switch (((struct ___OBJ *)__tmp__I1VL)->__id) {
        case __LIST__: {
          __tmp__J1VL=static_type__GIQG(__tmp__I1VL);
        } break;
        case __STRING_CST__: {
          __tmp__J1VL=((__STRING_CST *)__tmp__I1VL)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__J1VL=((__EXTERNAL_C *)__tmp__I1VL)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__J1VL=((__PROTOTYPE_CST *)__tmp__I1VL)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__J1VL=((__INTEGER_CST *)__tmp__I1VL)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__J1VL=((__LOCAL *)((__READ_LOCAL *)__tmp__I1VL)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__J1VL=static_type__0N1H(__tmp__I1VL);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__J1VL=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__J1VL=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__J1VL=((__REAL_CST *)__tmp__I1VL)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__J1VL=((__CHARACTER_CST *)__tmp__I1VL)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__J1VL=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__J1VL=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__J1VL=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__J1VL=static_type__MP1H(__tmp__I1VL);
        } break;
        case __EXPR_MUL__: {
          __tmp__J1VL=static_type__SP1H(__tmp__I1VL);
        } break;
        case __EXPR_DIV__: {
          __tmp__J1VL=static_type__XP1H(__tmp__I1VL);
        } break;
        case __EXPR_AND__: {
          __tmp__J1VL=static_type__2P1H(__tmp__I1VL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__J1VL=static_type__BQ1H(__tmp__I1VL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__J1VL=static_type__GQ1H(__tmp__I1VL);
        } break;
        case __PUT_TO__: {
          __tmp__J1VL=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__J1VL=static_type__PQ1H(__tmp__I1VL);
        } break;
        case __SIZE_OF__: {
          __tmp__J1VL=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__J1VL=((__CAST *)__tmp__I1VL)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__J1VL=static_type__GIKL(__tmp__I1VL);
        } break;
        case __READ_SLOT__: {
          __tmp__J1VL=((__SLOT_DATA *)((__READ_SLOT *)__tmp__I1VL)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__J1VL=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__I1VL)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__J1VL=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__J1VL=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__J1VL=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__J1VL=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__J1VL=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__J1VL=static_type__Z2IM(__tmp__I1VL);
        } break;
        case __EXPR_ADD__: {
          __tmp__J1VL=static_type__IXML(__tmp__I1VL);
        } break;
        case __EXPR_NOT__: {
          __tmp__J1VL=static_type__BTXM(__tmp__I1VL);
        } break;
        case __EXPR_MOD__: {
          __tmp__J1VL=static_type__5LEO(__tmp__I1VL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__J1VL=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__J1VL=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__J1VL=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__J1VL=static_type__NOPN(__tmp__I1VL);
        } break;
        case __EXPR_XOR__: {
          __tmp__J1VL=static_type__XCSO(__tmp__I1VL);
        } break;
        };
        __tmp__Q1VL=((void *)((__TYPE_FULL *)__tmp__J1VL)->parent_type__KTL != (void *)type_pointer__HLB);
      } else {
        __tmp__Q1VL=FALSE__;
      };
      if (__tmp__Q1VL) {
        __tmp__W1VL=Self__GQAL->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__X1VL=type_true__FJB;
        switch (((struct ___OBJ *)__tmp__X1VL)->__id) {
        case __TYPE__: {
          __tmp__Y1VL=((__TYPE *)__tmp__X1VL)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__Y1VL=((__TYPE_NULL *)__tmp__X1VL)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__Y1VL=((__TYPE_VOID *)__tmp__X1VL)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__Y1VL=((__TYPE_CONTEXT *)__tmp__X1VL)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__Y1VL=((__TYPE_ID *)__tmp__X1VL)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__Y1VL=((__TYPE_GENERIC *)__tmp__X1VL)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__Y1VL=((__PROFIL_BLOCK *)__tmp__X1VL)->parent_type__HHAG.default__AKC;
        } break;
        };
        result__ZZVL=create__type__CLQC(__tmp__W1VL,__tmp__Y1VL);
      };
    };
    result__IQAL=result__ZZVL;
    if ((((void *)result__ZZVL == (void *)NULL) && ((void *)__tmp__VQAL != (void *)NULL))) {
      result__IQAL=NULL;
    };
    if ((((void *)result__IQAL == (void *)NULL) && ((void *)__tmp__YQAL != (void *)NULL))) {
      result__IQAL=NULL;
    };
  };
  if (((void *)result__IQAL == (void *)NULL)) {
    result__IQAL=Self__GQAL;
  } else {
    __tmp__MUAL=Self__GQAL->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    if (((struct ___OBJ *)result__IQAL)->__id==__PROTOTYPE_CST__) {
      ((__PROTOTYPE_CST *)result__IQAL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__MUAL;
    } else {
      ((__EXPR_NOT_EQUAL *)result__IQAL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__MUAL;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__IQAL);
}

static void* execute_link__UUAL(__IS_EXPANDED *Self__VUAL)
// ({IS_EXPANDED}) With resultNo recursive, No inlinable.
{
  void *result__XUAL;
  __POSITION __tmp__BVAL,__tmp__LVAL;
  void *__tmp__CVAL,*__tmp__MVAL;
  void *__tmp__DVAL,*__tmp__NVAL;
  __READ_LOCAL *Self__LBMK;
  result__XUAL=NULL;
  if (((__UINTEGER_8)(((__TYPE_FULL *)((__LOCAL *)((__READ_LOCAL *)Self__VUAL->receiver__OO2H)->local__ALZD)->parent_variable__B2LC.type__125F)->flag__LTL &  1) !=  0)) {
    __tmp__BVAL=Self__VUAL->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    __tmp__CVAL=type_true__FJB;
    switch (((struct ___OBJ *)__tmp__CVAL)->__id) {
    case __TYPE__: {
      __tmp__DVAL=((__TYPE *)__tmp__CVAL)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__DVAL=((__TYPE_NULL *)__tmp__CVAL)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__DVAL=((__TYPE_VOID *)__tmp__CVAL)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__DVAL=((__TYPE_CONTEXT *)__tmp__CVAL)->parent_type__VIB.default__AKC;
    } break;
    case __TYPE_ID__: {
      __tmp__DVAL=((__TYPE_ID *)__tmp__CVAL)->parent_type__WIB.default__AKC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__DVAL=((__TYPE_GENERIC *)__tmp__CVAL)->parent_type__T2IB.default__AKC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__DVAL=((__PROFIL_BLOCK *)__tmp__CVAL)->parent_type__HHAG.default__AKC;
    } break;
    };
    result__XUAL=create__type__CLQC(__tmp__BVAL,__tmp__DVAL);
  } else {
    __tmp__LVAL=Self__VUAL->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    __tmp__MVAL=type_false__NJB;
    switch (((struct ___OBJ *)__tmp__MVAL)->__id) {
    case __TYPE__: {
      __tmp__NVAL=((__TYPE *)__tmp__MVAL)->default__AKC;
    } break;
    case __TYPE_NULL__: {
      __tmp__NVAL=((__TYPE_NULL *)__tmp__MVAL)->parent_type__TIB.default__AKC;
    } break;
    case __TYPE_VOID__: {
      __tmp__NVAL=((__TYPE_VOID *)__tmp__MVAL)->parent_type__UIB.default__AKC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__NVAL=((__TYPE_CONTEXT *)__tmp__MVAL)->parent_type__VIB.default__AKC;
    } break;
    case __TYPE_ID__: {
      __tmp__NVAL=((__TYPE_ID *)__tmp__MVAL)->parent_type__WIB.default__AKC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__NVAL=((__TYPE_GENERIC *)__tmp__MVAL)->parent_type__T2IB.default__AKC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__NVAL=((__PROFIL_BLOCK *)__tmp__MVAL)->parent_type__HHAG.default__AKC;
    } break;
    };
    result__XUAL=create__type__CLQC(__tmp__LVAL,__tmp__NVAL);
  };
  Self__LBMK=((__READ_LOCAL *)Self__VUAL->receiver__OO2H);
  unread__YVJK(Self__LBMK->local__ALZD,Self__LBMK);
  modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  return(result__XUAL);
}

static void* execute_link__1VAL(__GET_TYPE_ID *Self__2VAL)
// ({GET_TYPE_ID}) With resultRecursive, No inlinable.
{
  void *__tmp__4VAL,*__tmp__5VAL;
  __tmp__4VAL=Self__2VAL->receiver__XO2H;
  switch (((struct ___OBJ *)__tmp__4VAL)->__id) {
  case __LIST__: {
    __tmp__5VAL=execute_link__LUOG(__tmp__4VAL);
  } break;
  case __STRING_CST__: {
    __tmp__5VAL=((__STRING_CST *)__tmp__4VAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__5VAL=execute_link__U5ZK(__tmp__4VAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__5VAL=((__PROTOTYPE_CST *)__tmp__4VAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__5VAL=((__INTEGER_CST *)__tmp__4VAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__5VAL=execute_link__EHAL(__tmp__4VAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__5VAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__5VAL=execute_link__2LAL(__tmp__4VAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__5VAL=execute_link__FQAL(__tmp__4VAL);
  } break;
  case __REAL_CST__: {
    __tmp__5VAL=((__REAL_CST *)__tmp__4VAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__5VAL=((__CHARACTER_CST *)__tmp__4VAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__5VAL=execute_link__UUAL(__tmp__4VAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__5VAL=execute_link__1VAL(__tmp__4VAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__5VAL=execute_link__AWAL(__tmp__4VAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__5VAL=execute_link__J0AL(__tmp__4VAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__5VAL=execute_link__S4AL(__tmp__4VAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__5VAL=execute_link__1CBL(__tmp__4VAL);
  } break;
  case __EXPR_AND__: {
    __tmp__5VAL=execute_link__EHBL(__tmp__4VAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__5VAL=execute_link__NLBL(__tmp__4VAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__5VAL=execute_link__WPBL(__tmp__4VAL);
  } break;
  case __PUT_TO__: {
    __tmp__5VAL=execute_link__BOPK(__tmp__4VAL);
  } break;
  case __ITEM__: {
    __tmp__5VAL=execute_link__5TBL(__tmp__4VAL);
  } break;
  case __SIZE_OF__: {
    __tmp__5VAL=execute_link__GUBL(__tmp__4VAL);
  } break;
  case __CAST__: {
    __tmp__5VAL=execute_link__LUBL(__tmp__4VAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__5VAL=execute_link__A2TL(__tmp__4VAL);
  } break;
  case __READ_SLOT__: {
    __tmp__5VAL=execute_link__EYBL(__tmp__4VAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__5VAL=execute_link__U2BL(__tmp__4VAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__5VAL=execute_link__SRZM(__tmp__4VAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__5VAL=execute_link__OBFO(__tmp__4VAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__5VAL=execute_link__GJLO(__tmp__4VAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__5VAL=execute_link__HHFO(__tmp__4VAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__5VAL=execute_link__KPLO(__tmp__4VAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__5VAL=execute_link__0GKM(__tmp__4VAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__5VAL=execute_link__RROL(__tmp__4VAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__5VAL=execute_link__GUZM(__tmp__4VAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__5VAL=execute_link__ANFO(__tmp__4VAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__5VAL=execute_link__YLEP(__tmp__4VAL);
  } break;
  case __EXPR_INF__: {
    __tmp__5VAL=execute_link__VQQN(__tmp__4VAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__5VAL=execute_link__4UQN(__tmp__4VAL);
  } break;
  case __EXPR_OR__: {
    __tmp__5VAL=execute_link__1HQN(__tmp__4VAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__5VAL=execute_link__IYUO(__tmp__4VAL);
  } break;
  };
  Self__2VAL->receiver__XO2H=__tmp__5VAL;
  return(Self__2VAL);
}

static void* execute_link__AWAL(__EXPR_SUP *Self__BWAL)
// ({EXPR_SUP}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__EWAL;
  void *__tmp__KWAL,*__tmp__LWAL,*__tmp__MWAL,*__tmp__NWAL,*__tmp__PWAL;
  void *__tmp__SWAL,*result__DWAL,*__tmp__G3VL,*__tmp__H3VL,*__tmp__T3VL;
  void *__tmp__U3VL;
  void *__tmp__QWAL,*left_cst__HWAL,*__tmp__TWAL,*right_cst__IWAL;
  void *result__DTNM,*result__F3VL;
  __POSITION __tmp__MTNM,__tmp__WTNM,__tmp__O3VL,__tmp__H0AL;
  void *__tmp__NTNM,*__tmp__XTNM,*__tmp__P3VL;
  void *__tmp__OTNM,*__tmp__YTNM,*__tmp__Q3VL;
  __READ_LOCAL *Self__VJCQ,*Self__XJCQ,*Self__ZJCQ,*Self__1JCQ;
  __READ_GLOBAL *Self__YJCQ,*Self__2JCQ;
  __BOOLEAN __tmp__I3VL;
  old_seq__EWAL=seq_call_and_loop__VREJ;
  __tmp__KWAL=Self__BWAL->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__KWAL)->__id) {
  case __LIST__: {
    __tmp__LWAL=execute_link__LUOG(__tmp__KWAL);
  } break;
  case __STRING_CST__: {
    __tmp__LWAL=((__STRING_CST *)__tmp__KWAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__LWAL=execute_link__U5ZK(__tmp__KWAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__LWAL=((__PROTOTYPE_CST *)__tmp__KWAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__LWAL=((__INTEGER_CST *)__tmp__KWAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__LWAL=execute_link__EHAL(__tmp__KWAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__LWAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__LWAL=execute_link__2LAL(__tmp__KWAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__LWAL=execute_link__FQAL(__tmp__KWAL);
  } break;
  case __REAL_CST__: {
    __tmp__LWAL=((__REAL_CST *)__tmp__KWAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__LWAL=((__CHARACTER_CST *)__tmp__KWAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__LWAL=execute_link__UUAL(__tmp__KWAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__LWAL=execute_link__1VAL(__tmp__KWAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__LWAL=execute_link__AWAL(__tmp__KWAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__LWAL=execute_link__J0AL(__tmp__KWAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__LWAL=execute_link__S4AL(__tmp__KWAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__LWAL=execute_link__1CBL(__tmp__KWAL);
  } break;
  case __EXPR_AND__: {
    __tmp__LWAL=execute_link__EHBL(__tmp__KWAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__LWAL=execute_link__NLBL(__tmp__KWAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__LWAL=execute_link__WPBL(__tmp__KWAL);
  } break;
  case __PUT_TO__: {
    __tmp__LWAL=execute_link__BOPK(__tmp__KWAL);
  } break;
  case __ITEM__: {
    __tmp__LWAL=execute_link__5TBL(__tmp__KWAL);
  } break;
  case __SIZE_OF__: {
    __tmp__LWAL=execute_link__GUBL(__tmp__KWAL);
  } break;
  case __CAST__: {
    __tmp__LWAL=execute_link__LUBL(__tmp__KWAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__LWAL=execute_link__A2TL(__tmp__KWAL);
  } break;
  case __READ_SLOT__: {
    __tmp__LWAL=execute_link__EYBL(__tmp__KWAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__LWAL=execute_link__U2BL(__tmp__KWAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__LWAL=execute_link__SRZM(__tmp__KWAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__LWAL=execute_link__OBFO(__tmp__KWAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__LWAL=execute_link__GJLO(__tmp__KWAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__LWAL=execute_link__HHFO(__tmp__KWAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__LWAL=execute_link__KPLO(__tmp__KWAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__LWAL=execute_link__0GKM(__tmp__KWAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__LWAL=execute_link__RROL(__tmp__KWAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__LWAL=execute_link__GUZM(__tmp__KWAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__LWAL=execute_link__ANFO(__tmp__KWAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__LWAL=execute_link__YLEP(__tmp__KWAL);
  } break;
  case __EXPR_INF__: {
    __tmp__LWAL=execute_link__VQQN(__tmp__KWAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__LWAL=execute_link__4UQN(__tmp__KWAL);
  } break;
  case __EXPR_OR__: {
    __tmp__LWAL=execute_link__1HQN(__tmp__KWAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__LWAL=execute_link__IYUO(__tmp__KWAL);
  } break;
  };
  Self__BWAL->parent_expr_binary_cmp__TAKH.left__HN2H=__tmp__LWAL;
  __tmp__MWAL=Self__BWAL->parent_expr_binary_cmp__TAKH.right__LN2H;
  switch (((struct ___OBJ *)__tmp__MWAL)->__id) {
  case __LIST__: {
    __tmp__NWAL=execute_link__LUOG(__tmp__MWAL);
  } break;
  case __STRING_CST__: {
    __tmp__NWAL=((__STRING_CST *)__tmp__MWAL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__NWAL=execute_link__U5ZK(__tmp__MWAL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__NWAL=((__PROTOTYPE_CST *)__tmp__MWAL);
  } break;
  case __INTEGER_CST__: {
    __tmp__NWAL=((__INTEGER_CST *)__tmp__MWAL);
  } break;
  case __READ_LOCAL__: {
    __tmp__NWAL=execute_link__EHAL(__tmp__MWAL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NWAL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NWAL=execute_link__2LAL(__tmp__MWAL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NWAL=execute_link__FQAL(__tmp__MWAL);
  } break;
  case __REAL_CST__: {
    __tmp__NWAL=((__REAL_CST *)__tmp__MWAL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__NWAL=((__CHARACTER_CST *)__tmp__MWAL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__NWAL=execute_link__UUAL(__tmp__MWAL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__NWAL=execute_link__1VAL(__tmp__MWAL);
  } break;
  case __EXPR_SUP__: {
    __tmp__NWAL=execute_link__AWAL(__tmp__MWAL);
  } break;
  case __EXPR_SUB__: {
    __tmp__NWAL=execute_link__J0AL(__tmp__MWAL);
  } break;
  case __EXPR_MUL__: {
    __tmp__NWAL=execute_link__S4AL(__tmp__MWAL);
  } break;
  case __EXPR_DIV__: {
    __tmp__NWAL=execute_link__1CBL(__tmp__MWAL);
  } break;
  case __EXPR_AND__: {
    __tmp__NWAL=execute_link__EHBL(__tmp__MWAL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NWAL=execute_link__NLBL(__tmp__MWAL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NWAL=execute_link__WPBL(__tmp__MWAL);
  } break;
  case __PUT_TO__: {
    __tmp__NWAL=execute_link__BOPK(__tmp__MWAL);
  } break;
  case __ITEM__: {
    __tmp__NWAL=execute_link__5TBL(__tmp__MWAL);
  } break;
  case __SIZE_OF__: {
    __tmp__NWAL=execute_link__GUBL(__tmp__MWAL);
  } break;
  case __CAST__: {
    __tmp__NWAL=execute_link__LUBL(__tmp__MWAL);
  } break;
  case __CALL_SLOT__: {
    __tmp__NWAL=execute_link__A2TL(__tmp__MWAL);
  } break;
  case __READ_SLOT__: {
    __tmp__NWAL=execute_link__EYBL(__tmp__MWAL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__NWAL=execute_link__U2BL(__tmp__MWAL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NWAL=execute_link__SRZM(__tmp__MWAL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NWAL=execute_link__OBFO(__tmp__MWAL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NWAL=execute_link__GJLO(__tmp__MWAL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NWAL=execute_link__HHFO(__tmp__MWAL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NWAL=execute_link__KPLO(__tmp__MWAL);
  } break;
  case __EXPR_NEG__: {
    __tmp__NWAL=execute_link__0GKM(__tmp__MWAL);
  } break;
  case __EXPR_ADD__: {
    __tmp__NWAL=execute_link__RROL(__tmp__MWAL);
  } break;
  case __EXPR_NOT__: {
    __tmp__NWAL=execute_link__GUZM(__tmp__MWAL);
  } break;
  case __EXPR_MOD__: {
    __tmp__NWAL=execute_link__ANFO(__tmp__MWAL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NWAL=execute_link__YLEP(__tmp__MWAL);
  } break;
  case __EXPR_INF__: {
    __tmp__NWAL=execute_link__VQQN(__tmp__MWAL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NWAL=execute_link__4UQN(__tmp__MWAL);
  } break;
  case __EXPR_OR__: {
    __tmp__NWAL=execute_link__1HQN(__tmp__MWAL);
  } break;
  case __EXPR_XOR__: {
    __tmp__NWAL=execute_link__IYUO(__tmp__MWAL);
  } break;
  };
  Self__BWAL->parent_expr_binary_cmp__TAKH.right__LN2H=__tmp__NWAL;
  __tmp__PWAL=Self__BWAL->parent_expr_binary_cmp__TAKH.left__HN2H;
  if (__tmp__PWAL==NULL) {
    __tmp__QWAL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__PWAL)->__id) {
    case __LIST__: {
      __tmp__QWAL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__QWAL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QWAL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__QWAL=((void *)__tmp__PWAL);
    } break;
    case __READ_LOCAL__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QWAL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__QWAL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__QWAL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__QWAL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QWAL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__QWAL=NULL;
    } break;
    case __ITEM__: {
      __tmp__QWAL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__QWAL=NULL;
    } break;
    case __CAST__: {
      __tmp__QWAL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__QWAL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__QWAL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__QWAL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__QWAL=NULL;
    } break;
    }
  };
  left_cst__HWAL=__tmp__QWAL;
  __tmp__SWAL=Self__BWAL->parent_expr_binary_cmp__TAKH.right__LN2H;
  if (__tmp__SWAL==NULL) {
    __tmp__TWAL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__SWAL)->__id) {
    case __LIST__: {
      __tmp__TWAL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__TWAL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__TWAL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__TWAL=((void *)__tmp__SWAL);
    } break;
    case __READ_LOCAL__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__TWAL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__TWAL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__TWAL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__TWAL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__TWAL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__TWAL=NULL;
    } break;
    case __ITEM__: {
      __tmp__TWAL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__TWAL=NULL;
    } break;
    case __CAST__: {
      __tmp__TWAL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__TWAL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__TWAL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__TWAL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__TWAL=NULL;
    } break;
    }
  };
  right_cst__IWAL=__tmp__TWAL;
  result__DWAL=NULL;
  if (((void *)__tmp__QWAL != (void *)NULL)) {
    result__DWAL=NULL;
  };
  if ((((void *)result__DWAL == (void *)NULL) && ((void *)__tmp__TWAL != (void *)NULL))) {
    result__DWAL=NULL;
  };
  if (((((void *)result__DWAL == (void *)NULL) && ((void *)__tmp__TWAL != (void *)NULL)) && ((void *)__tmp__QWAL != (void *)NULL))) {
    result__DTNM=NULL;
    if ((((__INTEGER_CST *)__tmp__QWAL)->value__PAZD > ((__INTEGER_CST *)__tmp__TWAL)->value__PAZD)) {
      __tmp__MTNM=Self__BWAL->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__NTNM=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__NTNM)->__id) {
      case __TYPE__: {
        __tmp__OTNM=((__TYPE *)__tmp__NTNM)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__OTNM=((__TYPE_NULL *)__tmp__NTNM)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__OTNM=((__TYPE_VOID *)__tmp__NTNM)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__OTNM=((__TYPE_CONTEXT *)__tmp__NTNM)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__OTNM=((__TYPE_ID *)__tmp__NTNM)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__OTNM=((__TYPE_GENERIC *)__tmp__NTNM)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__OTNM=((__PROFIL_BLOCK *)__tmp__NTNM)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__DTNM=create__type__CLQC(__tmp__MTNM,__tmp__OTNM);
    } else {
      __tmp__WTNM=Self__BWAL->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__XTNM=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__XTNM)->__id) {
      case __TYPE__: {
        __tmp__YTNM=((__TYPE *)__tmp__XTNM)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__YTNM=((__TYPE_NULL *)__tmp__XTNM)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__YTNM=((__TYPE_VOID *)__tmp__XTNM)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__YTNM=((__TYPE_CONTEXT *)__tmp__XTNM)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__YTNM=((__TYPE_ID *)__tmp__XTNM)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__YTNM=((__TYPE_GENERIC *)__tmp__XTNM)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__YTNM=((__PROFIL_BLOCK *)__tmp__XTNM)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__DTNM=create__type__CLQC(__tmp__WTNM,__tmp__YTNM);
    };
    result__DWAL=result__DTNM;
  };
  if ((((void *)result__DWAL == (void *)NULL) && (old_seq__EWAL == seq_call_and_loop__VREJ))) {
    result__F3VL=NULL;
    __tmp__G3VL=Self__BWAL->parent_expr_binary_cmp__TAKH.left__HN2H;
    __tmp__H3VL=Self__BWAL->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__G3VL)->__id) {
    case __LIST__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__I3VL=__infix_equal_equal__WF1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__I3VL=__infix_equal_equal__LG1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __INTEGER_CST__: {
      __tmp__I3VL=__infix_equal_equal__2G1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __READ_LOCAL__: {
      __tmp__I3VL=__infix_equal_equal__WH1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__I3VL=__infix_equal_equal__MI1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__I3VL=__infix_equal_equal__IJ1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __REAL_CST__: {
      __tmp__I3VL=__infix_equal_equal__EK1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__I3VL=__infix_equal_equal__4K1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__I3VL=__infix_equal_equal__XL1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_SUB__: {
      __tmp__I3VL=__infix_equal_equal__TM1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_MUL__: {
      __tmp__I3VL=__infix_equal_equal__PN1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_DIV__: {
      __tmp__I3VL=__infix_equal_equal__LO1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_AND__: {
      __tmp__I3VL=__infix_equal_equal__HP1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__I3VL=__infix_equal_equal__DQ1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__I3VL=__infix_equal_equal__5Q1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __PUT_TO__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__I3VL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__I3VL=__infix_equal_equal__LS1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__I3VL=__infix_equal_equal__HT1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__I3VL=__infix_equal_equal__CZHO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__I3VL=__infix_equal_equal__SXFO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__I3VL=__infix_equal_equal__TBMO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__I3VL=__infix_equal_equal__OYFO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__I3VL=__infix_equal_equal__QCMO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_NEG__: {
      __tmp__I3VL=__infix_equal_equal__J5KM(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_ADD__: {
      __tmp__I3VL=__infix_equal_equal__ZT1L(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_NOT__: {
      __tmp__I3VL=__infix_equal_equal__QB0M(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_MOD__: {
      __tmp__I3VL=__infix_equal_equal__KZFO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__I3VL=__infix_equal_equal__OTEP(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_INF__: {
      __tmp__I3VL=__infix_equal_equal__UZHO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__I3VL=__infix_equal_equal__Q0HO(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_OR__: {
      __tmp__I3VL=__infix_equal_equal__32QN(__tmp__G3VL,__tmp__H3VL);
    } break;
    case __EXPR_XOR__: {
      __tmp__I3VL=__infix_equal_equal__GOVO(__tmp__G3VL,__tmp__H3VL);
    } break;
    };
    if (__tmp__I3VL) {
      __tmp__O3VL=Self__BWAL->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__P3VL=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__P3VL)->__id) {
      case __TYPE__: {
        __tmp__Q3VL=((__TYPE *)__tmp__P3VL)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__Q3VL=((__TYPE_NULL *)__tmp__P3VL)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__Q3VL=((__TYPE_VOID *)__tmp__P3VL)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__Q3VL=((__TYPE_CONTEXT *)__tmp__P3VL)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__Q3VL=((__TYPE_ID *)__tmp__P3VL)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__Q3VL=((__TYPE_GENERIC *)__tmp__P3VL)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__Q3VL=((__PROFIL_BLOCK *)__tmp__P3VL)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__F3VL=create__type__CLQC(__tmp__O3VL,__tmp__Q3VL);
      __tmp__T3VL=Self__BWAL->parent_expr_binary_cmp__TAKH.left__HN2H;
      switch (((struct ___OBJ *)__tmp__T3VL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__T3VL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__T3VL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__VJCQ=((__READ_LOCAL *)__tmp__T3VL);
        unread__YVJK(Self__VJCQ->local__ALZD,Self__VJCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__T3VL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__T3VL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__T3VL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__XJCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__T3VL)->receiver__OO2H);
        unread__YVJK(Self__XJCQ->local__ALZD,Self__XJCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__T3VL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__T3VL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__T3VL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__T3VL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__T3VL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__T3VL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__T3VL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__T3VL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__T3VL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__T3VL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__T3VL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__T3VL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__T3VL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__T3VL);
      } break;
      case __READ_GLOBAL__: {
        Self__YJCQ=((__READ_GLOBAL *)__tmp__T3VL);
        unread__15ML(Self__YJCQ->global__RHJK,Self__YJCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__T3VL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__T3VL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__T3VL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__T3VL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__T3VL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__T3VL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__T3VL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__T3VL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__T3VL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__T3VL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__T3VL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__T3VL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__T3VL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__T3VL);
      } break;
      };
      __tmp__U3VL=Self__BWAL->parent_expr_binary_cmp__TAKH.right__LN2H;
      switch (((struct ___OBJ *)__tmp__U3VL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__U3VL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__U3VL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__ZJCQ=((__READ_LOCAL *)__tmp__U3VL);
        unread__YVJK(Self__ZJCQ->local__ALZD,Self__ZJCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__U3VL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__U3VL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__U3VL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__1JCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__U3VL)->receiver__OO2H);
        unread__YVJK(Self__1JCQ->local__ALZD,Self__1JCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__U3VL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__U3VL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__U3VL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__U3VL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__U3VL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__U3VL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__U3VL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__U3VL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__U3VL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__U3VL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__U3VL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__U3VL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__U3VL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__U3VL);
      } break;
      case __READ_GLOBAL__: {
        Self__2JCQ=((__READ_GLOBAL *)__tmp__U3VL);
        unread__15ML(Self__2JCQ->global__RHJK,Self__2JCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__U3VL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__U3VL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__U3VL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__U3VL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__U3VL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__U3VL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__U3VL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__U3VL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__U3VL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__U3VL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__U3VL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__U3VL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__U3VL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__U3VL);
      } break;
      };
    };
    result__DWAL=result__F3VL;
    if ((((void *)result__F3VL == (void *)NULL) && ((void *)__tmp__QWAL != (void *)NULL))) {
      result__DWAL=NULL;
    };
    if ((((void *)result__DWAL == (void *)NULL) && ((void *)__tmp__TWAL != (void *)NULL))) {
      result__DWAL=NULL;
    };
  };
  if (((void *)result__DWAL == (void *)NULL)) {
    result__DWAL=Self__BWAL;
  } else {
    __tmp__H0AL=Self__BWAL->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    if (((struct ___OBJ *)result__DWAL)->__id==__PROTOTYPE_CST__) {
      ((__PROTOTYPE_CST *)result__DWAL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__H0AL;
    } else {
      ((__EXPR_SUP *)result__DWAL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__H0AL;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__DWAL);
}

static void* execute_link__J0AL(__EXPR_SUB *Self__K0AL)
// ({EXPR_SUB}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__BUNM;
  __UINTEGER_32 old_seq__N0AL;
  void *__tmp__T0AL,*__tmp__U0AL,*__tmp__V0AL,*__tmp__W0AL,*__tmp__Y0AL;
  void *__tmp__10AL,*result__LZDL,*__tmp__NZDL,*result__M0AL;
  void *result__V4VL,*result__W5VL,*__tmp__NAWL,*result__VBWL;
  void *__tmp__YBWL,*__tmp__ZBWL,*__tmp__ACWL,*__tmp__BCWL,*__tmp__NCWL;
  void *__tmp__VCWL,*__tmp__2CWL,*__tmp__3CWL,*__tmp__EDWL,*__tmp__FDWL;
  void *__tmp__Z0AL,*left_cst__Q0AL,*__tmp__20AL,*right_cst__R0AL;
  void *__tmp__OZDL,*neg__KZDL,*neg__X5VL,*__tmp__OAWL;
  __INTEGER_CST *Self__1FKQ,*Self__4FKQ;
  void *mul__WBWL,*__tmp__OCWL;
  void *div__XBWL,*__tmp__WCWL;
  __READ_LOCAL *Self__HKCQ,*Self__JKCQ,*Self__LKCQ,*Self__NKCQ;
  __READ_GLOBAL *Self__KKCQ,*Self__OKCQ;
  __POSITION __tmp__Q4AL;
  __BOOLEAN __tmp__A5VL,__tmp__AAWL,__tmp__1AWL,result__ZX1L;
  __BOOLEAN __tmp__0BWL,__tmp__4CWL,__tmp__GDWL,__tmp__JDWL;
  old_seq__N0AL=seq_call_and_loop__VREJ;
  __tmp__T0AL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__T0AL)->__id) {
  case __LIST__: {
    __tmp__U0AL=execute_link__LUOG(__tmp__T0AL);
  } break;
  case __STRING_CST__: {
    __tmp__U0AL=((__STRING_CST *)__tmp__T0AL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__U0AL=execute_link__U5ZK(__tmp__T0AL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__U0AL=((__PROTOTYPE_CST *)__tmp__T0AL);
  } break;
  case __INTEGER_CST__: {
    __tmp__U0AL=((__INTEGER_CST *)__tmp__T0AL);
  } break;
  case __READ_LOCAL__: {
    __tmp__U0AL=execute_link__EHAL(__tmp__T0AL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__U0AL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__U0AL=execute_link__2LAL(__tmp__T0AL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__U0AL=execute_link__FQAL(__tmp__T0AL);
  } break;
  case __REAL_CST__: {
    __tmp__U0AL=((__REAL_CST *)__tmp__T0AL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__U0AL=((__CHARACTER_CST *)__tmp__T0AL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__U0AL=execute_link__UUAL(__tmp__T0AL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__U0AL=execute_link__1VAL(__tmp__T0AL);
  } break;
  case __EXPR_SUP__: {
    __tmp__U0AL=execute_link__AWAL(__tmp__T0AL);
  } break;
  case __EXPR_SUB__: {
    __tmp__U0AL=execute_link__J0AL(__tmp__T0AL);
  } break;
  case __EXPR_MUL__: {
    __tmp__U0AL=execute_link__S4AL(__tmp__T0AL);
  } break;
  case __EXPR_DIV__: {
    __tmp__U0AL=execute_link__1CBL(__tmp__T0AL);
  } break;
  case __EXPR_AND__: {
    __tmp__U0AL=execute_link__EHBL(__tmp__T0AL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__U0AL=execute_link__NLBL(__tmp__T0AL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__U0AL=execute_link__WPBL(__tmp__T0AL);
  } break;
  case __PUT_TO__: {
    __tmp__U0AL=execute_link__BOPK(__tmp__T0AL);
  } break;
  case __ITEM__: {
    __tmp__U0AL=execute_link__5TBL(__tmp__T0AL);
  } break;
  case __SIZE_OF__: {
    __tmp__U0AL=execute_link__GUBL(__tmp__T0AL);
  } break;
  case __CAST__: {
    __tmp__U0AL=execute_link__LUBL(__tmp__T0AL);
  } break;
  case __CALL_SLOT__: {
    __tmp__U0AL=execute_link__A2TL(__tmp__T0AL);
  } break;
  case __READ_SLOT__: {
    __tmp__U0AL=execute_link__EYBL(__tmp__T0AL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__U0AL=execute_link__U2BL(__tmp__T0AL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__U0AL=execute_link__SRZM(__tmp__T0AL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__U0AL=execute_link__OBFO(__tmp__T0AL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__U0AL=execute_link__GJLO(__tmp__T0AL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__U0AL=execute_link__HHFO(__tmp__T0AL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__U0AL=execute_link__KPLO(__tmp__T0AL);
  } break;
  case __EXPR_NEG__: {
    __tmp__U0AL=execute_link__0GKM(__tmp__T0AL);
  } break;
  case __EXPR_ADD__: {
    __tmp__U0AL=execute_link__RROL(__tmp__T0AL);
  } break;
  case __EXPR_NOT__: {
    __tmp__U0AL=execute_link__GUZM(__tmp__T0AL);
  } break;
  case __EXPR_MOD__: {
    __tmp__U0AL=execute_link__ANFO(__tmp__T0AL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__U0AL=execute_link__YLEP(__tmp__T0AL);
  } break;
  case __EXPR_INF__: {
    __tmp__U0AL=execute_link__VQQN(__tmp__T0AL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__U0AL=execute_link__4UQN(__tmp__T0AL);
  } break;
  case __EXPR_OR__: {
    __tmp__U0AL=execute_link__1HQN(__tmp__T0AL);
  } break;
  case __EXPR_XOR__: {
    __tmp__U0AL=execute_link__IYUO(__tmp__T0AL);
  } break;
  };
  Self__K0AL->parent_expr_binary__HBKH.left__PP1H=__tmp__U0AL;
  __tmp__V0AL=Self__K0AL->parent_expr_binary__HBKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__V0AL)->__id) {
  case __LIST__: {
    __tmp__W0AL=execute_link__LUOG(__tmp__V0AL);
  } break;
  case __STRING_CST__: {
    __tmp__W0AL=((__STRING_CST *)__tmp__V0AL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__W0AL=execute_link__U5ZK(__tmp__V0AL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__W0AL=((__PROTOTYPE_CST *)__tmp__V0AL);
  } break;
  case __INTEGER_CST__: {
    __tmp__W0AL=((__INTEGER_CST *)__tmp__V0AL);
  } break;
  case __READ_LOCAL__: {
    __tmp__W0AL=execute_link__EHAL(__tmp__V0AL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__W0AL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__W0AL=execute_link__2LAL(__tmp__V0AL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__W0AL=execute_link__FQAL(__tmp__V0AL);
  } break;
  case __REAL_CST__: {
    __tmp__W0AL=((__REAL_CST *)__tmp__V0AL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__W0AL=((__CHARACTER_CST *)__tmp__V0AL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__W0AL=execute_link__UUAL(__tmp__V0AL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__W0AL=execute_link__1VAL(__tmp__V0AL);
  } break;
  case __EXPR_SUP__: {
    __tmp__W0AL=execute_link__AWAL(__tmp__V0AL);
  } break;
  case __EXPR_SUB__: {
    __tmp__W0AL=execute_link__J0AL(__tmp__V0AL);
  } break;
  case __EXPR_MUL__: {
    __tmp__W0AL=execute_link__S4AL(__tmp__V0AL);
  } break;
  case __EXPR_DIV__: {
    __tmp__W0AL=execute_link__1CBL(__tmp__V0AL);
  } break;
  case __EXPR_AND__: {
    __tmp__W0AL=execute_link__EHBL(__tmp__V0AL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__W0AL=execute_link__NLBL(__tmp__V0AL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__W0AL=execute_link__WPBL(__tmp__V0AL);
  } break;
  case __PUT_TO__: {
    __tmp__W0AL=execute_link__BOPK(__tmp__V0AL);
  } break;
  case __ITEM__: {
    __tmp__W0AL=execute_link__5TBL(__tmp__V0AL);
  } break;
  case __SIZE_OF__: {
    __tmp__W0AL=execute_link__GUBL(__tmp__V0AL);
  } break;
  case __CAST__: {
    __tmp__W0AL=execute_link__LUBL(__tmp__V0AL);
  } break;
  case __CALL_SLOT__: {
    __tmp__W0AL=execute_link__A2TL(__tmp__V0AL);
  } break;
  case __READ_SLOT__: {
    __tmp__W0AL=execute_link__EYBL(__tmp__V0AL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__W0AL=execute_link__U2BL(__tmp__V0AL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__W0AL=execute_link__SRZM(__tmp__V0AL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__W0AL=execute_link__OBFO(__tmp__V0AL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__W0AL=execute_link__GJLO(__tmp__V0AL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__W0AL=execute_link__HHFO(__tmp__V0AL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__W0AL=execute_link__KPLO(__tmp__V0AL);
  } break;
  case __EXPR_NEG__: {
    __tmp__W0AL=execute_link__0GKM(__tmp__V0AL);
  } break;
  case __EXPR_ADD__: {
    __tmp__W0AL=execute_link__RROL(__tmp__V0AL);
  } break;
  case __EXPR_NOT__: {
    __tmp__W0AL=execute_link__GUZM(__tmp__V0AL);
  } break;
  case __EXPR_MOD__: {
    __tmp__W0AL=execute_link__ANFO(__tmp__V0AL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__W0AL=execute_link__YLEP(__tmp__V0AL);
  } break;
  case __EXPR_INF__: {
    __tmp__W0AL=execute_link__VQQN(__tmp__V0AL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__W0AL=execute_link__4UQN(__tmp__V0AL);
  } break;
  case __EXPR_OR__: {
    __tmp__W0AL=execute_link__1HQN(__tmp__V0AL);
  } break;
  case __EXPR_XOR__: {
    __tmp__W0AL=execute_link__IYUO(__tmp__V0AL);
  } break;
  };
  Self__K0AL->parent_expr_binary__HBKH.right__OP2H=__tmp__W0AL;
  __tmp__Y0AL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
  if (__tmp__Y0AL==NULL) {
    __tmp__Z0AL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__Y0AL)->__id) {
    case __LIST__: {
      __tmp__Z0AL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__Z0AL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__Z0AL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__Z0AL=((void *)__tmp__Y0AL);
    } break;
    case __READ_LOCAL__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__Z0AL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__Z0AL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__Z0AL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__Z0AL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__Z0AL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__Z0AL=NULL;
    } break;
    case __ITEM__: {
      __tmp__Z0AL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__Z0AL=NULL;
    } break;
    case __CAST__: {
      __tmp__Z0AL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__Z0AL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__Z0AL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__Z0AL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__Z0AL=NULL;
    } break;
    }
  };
  left_cst__Q0AL=__tmp__Z0AL;
  __tmp__10AL=Self__K0AL->parent_expr_binary__HBKH.right__OP2H;
  if (__tmp__10AL==NULL) {
    __tmp__20AL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__10AL)->__id) {
    case __LIST__: {
      __tmp__20AL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__20AL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__20AL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__20AL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__20AL=((void *)__tmp__10AL);
    } break;
    case __READ_LOCAL__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__20AL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__20AL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__20AL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__20AL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__20AL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__20AL=NULL;
    } break;
    case __ITEM__: {
      __tmp__20AL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__20AL=NULL;
    } break;
    case __CAST__: {
      __tmp__20AL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__20AL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__20AL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__20AL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__20AL=NULL;
    } break;
    }
  };
  right_cst__R0AL=__tmp__20AL;
  result__LZDL=NULL;
  __tmp__NZDL=Self__K0AL->parent_expr_binary__HBKH.right__OP2H;
  if (__tmp__NZDL==NULL) {
    __tmp__OZDL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__NZDL)->__id) {
    case __LIST__: {
      __tmp__OZDL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OZDL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OZDL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__OZDL=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OZDL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__OZDL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OZDL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OZDL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OZDL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__OZDL=NULL;
    } break;
    case __ITEM__: {
      __tmp__OZDL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__OZDL=NULL;
    } break;
    case __CAST__: {
      __tmp__OZDL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__OZDL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__OZDL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__OZDL=((void *)__tmp__NZDL);
    } break;
    case __EXPR_ADD__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__OZDL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__OZDL=NULL;
    } break;
    }
  };
  neg__KZDL=__tmp__OZDL;
  if (((void *)__tmp__OZDL != (void *)NULL)) {
    result__LZDL=create__with__and__TUHL(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__K0AL->parent_expr_binary__HBKH.left__PP1H,((__EXPR_NEG *)__tmp__OZDL)->parent_expr_unary__JZDL.right__XZDL);
  };
  result__M0AL=result__LZDL;
  if ((((void *)result__LZDL == (void *)NULL) && ((void *)__tmp__Z0AL != (void *)NULL))) {
    result__V4VL=NULL;
    if ((((__INTEGER_CST *)__tmp__Z0AL)->value__PAZD ==  0)) {
      result__V4VL=create__with__2RBM(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__K0AL->parent_expr_binary__HBKH.right__OP2H);
      __tmp__A5VL=TRUE__;
    } else {
      __tmp__A5VL=FALSE__;
    };
    if ((! __tmp__A5VL)) {
      if (is_saturated__13QN(__tmp__Z0AL)) {
        result__V4VL=create__with__0YVM(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__K0AL->parent_expr_binary__HBKH.right__OP2H);
      };
    };
    result__M0AL=result__V4VL;
  };
  if ((((void *)result__M0AL == (void *)NULL) && ((void *)__tmp__20AL != (void *)NULL))) {
    result__W5VL=NULL;
    neg__X5VL=NULL;
    if ((((__INTEGER_CST *)__tmp__20AL)->value__PAZD ==  0)) {
      result__W5VL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
      __tmp__AAWL=TRUE__;
    } else {
      __tmp__AAWL=FALSE__;
    };
    if (__tmp__AAWL) {
      __tmp__1AWL=TRUE__;
    } else {
      result__ZX1L=(((__INTEGER_CST *)__tmp__20AL)->value__PAZD ==  1);
      if (result__ZX1L) {
        __tmp__NAWL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
        if (__tmp__NAWL==NULL) {
          __tmp__OAWL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__NAWL)->__id) {
          case __LIST__: {
            __tmp__OAWL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__OAWL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__OAWL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__OAWL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__OAWL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__OAWL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__OAWL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__OAWL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__OAWL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__OAWL=NULL;
          } break;
          case __ITEM__: {
            __tmp__OAWL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__OAWL=NULL;
          } break;
          case __CAST__: {
            __tmp__OAWL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__OAWL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__OAWL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__OAWL=((void *)__tmp__NAWL);
          } break;
          case __EXPR_ADD__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__OAWL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__OAWL=NULL;
          } break;
          }
        };
        neg__X5VL=__tmp__OAWL;
        if (((void *)__tmp__OAWL != (void *)NULL)) {
          result__W5VL=create__with__0YVM(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_NEG *)__tmp__OAWL)->parent_expr_unary__JZDL.right__XZDL);
        };
      };
      __tmp__1AWL=result__ZX1L;
    };
    if ((! __tmp__1AWL)) {
      if ((((__INTEGER_CST *)__tmp__20AL)->value__PAZD <  0)) {
        Self__1FKQ=((__INTEGER_CST *)__tmp__20AL);
        Self__1FKQ->value__PAZD=(__INTEGER_64)(- ((__INTEGER_CST *)__tmp__20AL)->value__PAZD);
        check_type__RI5D(Self__1FKQ);
        result__W5VL=create__with__and__TUHL(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__K0AL->parent_expr_binary__HBKH.left__PP1H,__tmp__20AL);
      };
    };
    result__M0AL=result__W5VL;
  };
  if (((((void *)result__M0AL == (void *)NULL) && ((void *)__tmp__20AL != (void *)NULL)) && ((void *)__tmp__Z0AL != (void *)NULL))) {
    __tmp__BUNM=((__INTEGER_CST *)__tmp__Z0AL)->value__PAZD;
    Self__4FKQ=((__INTEGER_CST *)__tmp__Z0AL);
    Self__4FKQ->value__PAZD=(__INTEGER_64)(__tmp__BUNM - ((__INTEGER_CST *)__tmp__20AL)->value__PAZD);
    check_type__RI5D(Self__4FKQ);
    result__M0AL=__tmp__Z0AL;
  };
  if ((((void *)result__M0AL == (void *)NULL) && (old_seq__N0AL == seq_call_and_loop__VREJ))) {
    result__VBWL=NULL;
    mul__WBWL=NULL;
    div__XBWL=NULL;
    __tmp__YBWL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
    __tmp__ZBWL=Self__K0AL->parent_expr_binary__HBKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__YBWL)->__id) {
    case __LIST__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__0BWL=__infix_equal_equal__WF1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0BWL=__infix_equal_equal__LG1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __INTEGER_CST__: {
      __tmp__0BWL=__infix_equal_equal__2G1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __READ_LOCAL__: {
      __tmp__0BWL=__infix_equal_equal__WH1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0BWL=__infix_equal_equal__MI1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0BWL=__infix_equal_equal__IJ1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __REAL_CST__: {
      __tmp__0BWL=__infix_equal_equal__EK1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__0BWL=__infix_equal_equal__4K1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__0BWL=__infix_equal_equal__XL1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_SUB__: {
      __tmp__0BWL=__infix_equal_equal__TM1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_MUL__: {
      __tmp__0BWL=__infix_equal_equal__PN1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_DIV__: {
      __tmp__0BWL=__infix_equal_equal__LO1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_AND__: {
      __tmp__0BWL=__infix_equal_equal__HP1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0BWL=__infix_equal_equal__DQ1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0BWL=__infix_equal_equal__5Q1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __PUT_TO__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__0BWL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__0BWL=__infix_equal_equal__LS1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__0BWL=__infix_equal_equal__HT1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0BWL=__infix_equal_equal__CZHO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0BWL=__infix_equal_equal__SXFO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0BWL=__infix_equal_equal__TBMO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0BWL=__infix_equal_equal__OYFO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0BWL=__infix_equal_equal__QCMO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_NEG__: {
      __tmp__0BWL=__infix_equal_equal__J5KM(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_ADD__: {
      __tmp__0BWL=__infix_equal_equal__ZT1L(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_NOT__: {
      __tmp__0BWL=__infix_equal_equal__QB0M(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_MOD__: {
      __tmp__0BWL=__infix_equal_equal__KZFO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0BWL=__infix_equal_equal__OTEP(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_INF__: {
      __tmp__0BWL=__infix_equal_equal__UZHO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0BWL=__infix_equal_equal__Q0HO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_OR__: {
      __tmp__0BWL=__infix_equal_equal__32QN(__tmp__YBWL,__tmp__ZBWL);
    } break;
    case __EXPR_XOR__: {
      __tmp__0BWL=__infix_equal_equal__GOVO(__tmp__YBWL,__tmp__ZBWL);
    } break;
    };
    if (__tmp__0BWL) {
      __tmp__ACWL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
      switch (((struct ___OBJ *)__tmp__ACWL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__ACWL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__ACWL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__HKCQ=((__READ_LOCAL *)__tmp__ACWL);
        unread__YVJK(Self__HKCQ->local__ALZD,Self__HKCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__ACWL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__ACWL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__ACWL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__JKCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ACWL)->receiver__OO2H);
        unread__YVJK(Self__JKCQ->local__ALZD,Self__JKCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__ACWL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__ACWL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__ACWL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__ACWL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__ACWL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__ACWL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__ACWL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__ACWL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__ACWL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__ACWL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__ACWL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__ACWL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__ACWL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__ACWL);
      } break;
      case __READ_GLOBAL__: {
        Self__KKCQ=((__READ_GLOBAL *)__tmp__ACWL);
        unread__15ML(Self__KKCQ->global__RHJK,Self__KKCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__ACWL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__ACWL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__ACWL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__ACWL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__ACWL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__ACWL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__ACWL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__ACWL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__ACWL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__ACWL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__ACWL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__ACWL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__ACWL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__ACWL);
      } break;
      };
      __tmp__BCWL=Self__K0AL->parent_expr_binary__HBKH.right__OP2H;
      switch (((struct ___OBJ *)__tmp__BCWL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__BCWL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__BCWL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__LKCQ=((__READ_LOCAL *)__tmp__BCWL);
        unread__YVJK(Self__LKCQ->local__ALZD,Self__LKCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__BCWL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__BCWL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__BCWL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__NKCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BCWL)->receiver__OO2H);
        unread__YVJK(Self__NKCQ->local__ALZD,Self__NKCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__BCWL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__BCWL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__BCWL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__BCWL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__BCWL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__BCWL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__BCWL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__BCWL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__BCWL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__BCWL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__BCWL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__BCWL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__BCWL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__BCWL);
      } break;
      case __READ_GLOBAL__: {
        Self__OKCQ=((__READ_GLOBAL *)__tmp__BCWL);
        unread__15ML(Self__OKCQ->global__RHJK,Self__OKCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__BCWL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__BCWL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__BCWL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__BCWL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__BCWL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__BCWL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__BCWL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__BCWL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__BCWL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__BCWL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__BCWL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__BCWL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__BCWL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__BCWL);
      } break;
      };
      result__VBWL=create__value__type__DNQC(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM, 0,static_type__MP1H(Self__K0AL));
    } else {
      __tmp__NCWL=Self__K0AL->parent_expr_binary__HBKH.right__OP2H;
      if (__tmp__NCWL==NULL) {
        __tmp__OCWL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__NCWL)->__id) {
        case __LIST__: {
          __tmp__OCWL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__OCWL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__OCWL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__OCWL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__OCWL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__OCWL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__OCWL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__OCWL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__OCWL=((void *)__tmp__NCWL);
        } break;
        case __EXPR_DIV__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__OCWL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__OCWL=NULL;
        } break;
        case __ITEM__: {
          __tmp__OCWL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__OCWL=NULL;
        } break;
        case __CAST__: {
          __tmp__OCWL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__OCWL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__OCWL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__OCWL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__OCWL=NULL;
        } break;
        }
      };
      mul__WBWL=__tmp__OCWL;
      if (((void *)__tmp__OCWL != (void *)NULL)) {
        __tmp__VCWL=((__EXPR_MUL *)__tmp__OCWL)->parent_expr_binary__0BKH.left__PP1H;
        if (__tmp__VCWL==NULL) {
          __tmp__WCWL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__VCWL)->__id) {
          case __LIST__: {
            __tmp__WCWL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__WCWL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__WCWL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__WCWL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__WCWL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__WCWL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__WCWL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__WCWL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__WCWL=((void *)__tmp__VCWL);
          } break;
          case __EXPR_AND__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__WCWL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__WCWL=NULL;
          } break;
          case __ITEM__: {
            __tmp__WCWL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__WCWL=NULL;
          } break;
          case __CAST__: {
            __tmp__WCWL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__WCWL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__WCWL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__WCWL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__WCWL=NULL;
          } break;
          }
        };
        div__XBWL=__tmp__WCWL;
        if (((void *)__tmp__WCWL != (void *)NULL)) {
          __tmp__2CWL=Self__K0AL->parent_expr_binary__HBKH.left__PP1H;
          __tmp__3CWL=((__EXPR_DIV *)__tmp__WCWL)->parent_expr_binary__NCKH.left__PP1H;
          switch (((struct ___OBJ *)__tmp__2CWL)->__id) {
          case __LIST__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__4CWL=__infix_equal_equal__WF1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXTERNAL_C__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__4CWL=__infix_equal_equal__LG1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __INTEGER_CST__: {
            __tmp__4CWL=__infix_equal_equal__2G1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __READ_LOCAL__: {
            __tmp__4CWL=__infix_equal_equal__WH1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__4CWL=__infix_equal_equal__MI1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__4CWL=__infix_equal_equal__IJ1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __REAL_CST__: {
            __tmp__4CWL=__infix_equal_equal__EK1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __CHARACTER_CST__: {
            __tmp__4CWL=__infix_equal_equal__4K1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __IS_EXPANDED__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__4CWL=__infix_equal_equal__XL1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_SUB__: {
            __tmp__4CWL=__infix_equal_equal__TM1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_MUL__: {
            __tmp__4CWL=__infix_equal_equal__PN1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_DIV__: {
            __tmp__4CWL=__infix_equal_equal__LO1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_AND__: {
            __tmp__4CWL=__infix_equal_equal__HP1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__4CWL=__infix_equal_equal__DQ1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__4CWL=__infix_equal_equal__5Q1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __PUT_TO__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __CAST__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__4CWL=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__4CWL=__infix_equal_equal__LS1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__4CWL=__infix_equal_equal__HT1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__4CWL=__infix_equal_equal__CZHO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__4CWL=__infix_equal_equal__SXFO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__4CWL=__infix_equal_equal__TBMO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__4CWL=__infix_equal_equal__OYFO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__4CWL=__infix_equal_equal__QCMO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_NEG__: {
            __tmp__4CWL=__infix_equal_equal__J5KM(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_ADD__: {
            __tmp__4CWL=__infix_equal_equal__ZT1L(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_NOT__: {
            __tmp__4CWL=__infix_equal_equal__QB0M(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_MOD__: {
            __tmp__4CWL=__infix_equal_equal__KZFO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__4CWL=__infix_equal_equal__OTEP(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_INF__: {
            __tmp__4CWL=__infix_equal_equal__UZHO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__4CWL=__infix_equal_equal__Q0HO(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_OR__: {
            __tmp__4CWL=__infix_equal_equal__32QN(__tmp__2CWL,__tmp__3CWL);
          } break;
          case __EXPR_XOR__: {
            __tmp__4CWL=__infix_equal_equal__GOVO(__tmp__2CWL,__tmp__3CWL);
          } break;
          };
          if (__tmp__4CWL) {
            __tmp__EDWL=((__EXPR_DIV *)__tmp__WCWL)->parent_expr_binary__NCKH.right__OP2H;
            __tmp__FDWL=((__EXPR_MUL *)__tmp__OCWL)->parent_expr_binary__0BKH.right__OP2H;
            switch (((struct ___OBJ *)__tmp__EDWL)->__id) {
            case __LIST__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __STRING_CST__: {
              __tmp__GDWL=__infix_equal_equal__WF1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXTERNAL_C__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__GDWL=__infix_equal_equal__LG1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __INTEGER_CST__: {
              __tmp__GDWL=__infix_equal_equal__2G1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __READ_LOCAL__: {
              __tmp__GDWL=__infix_equal_equal__WH1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__GDWL=__infix_equal_equal__MI1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__GDWL=__infix_equal_equal__IJ1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __REAL_CST__: {
              __tmp__GDWL=__infix_equal_equal__EK1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __CHARACTER_CST__: {
              __tmp__GDWL=__infix_equal_equal__4K1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __IS_EXPANDED__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __EXPR_SUP__: {
              __tmp__GDWL=__infix_equal_equal__XL1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_SUB__: {
              __tmp__GDWL=__infix_equal_equal__TM1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_MUL__: {
              __tmp__GDWL=__infix_equal_equal__PN1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_DIV__: {
              __tmp__GDWL=__infix_equal_equal__LO1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_AND__: {
              __tmp__GDWL=__infix_equal_equal__HP1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__GDWL=__infix_equal_equal__DQ1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__GDWL=__infix_equal_equal__5Q1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __PUT_TO__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __ITEM__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __SIZE_OF__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __CAST__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __CALL_SLOT__: {
              __tmp__GDWL=FALSE__;
            } break;
            case __READ_SLOT__: {
              __tmp__GDWL=__infix_equal_equal__LS1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __READ_GLOBAL__: {
              __tmp__GDWL=__infix_equal_equal__HT1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__GDWL=__infix_equal_equal__CZHO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__GDWL=__infix_equal_equal__SXFO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__GDWL=__infix_equal_equal__TBMO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__GDWL=__infix_equal_equal__OYFO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__GDWL=__infix_equal_equal__QCMO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_NEG__: {
              __tmp__GDWL=__infix_equal_equal__J5KM(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_ADD__: {
              __tmp__GDWL=__infix_equal_equal__ZT1L(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_NOT__: {
              __tmp__GDWL=__infix_equal_equal__QB0M(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_MOD__: {
              __tmp__GDWL=__infix_equal_equal__KZFO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__GDWL=__infix_equal_equal__OTEP(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_INF__: {
              __tmp__GDWL=__infix_equal_equal__UZHO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__GDWL=__infix_equal_equal__Q0HO(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_OR__: {
              __tmp__GDWL=__infix_equal_equal__32QN(__tmp__EDWL,__tmp__FDWL);
            } break;
            case __EXPR_XOR__: {
              __tmp__GDWL=__infix_equal_equal__GOVO(__tmp__EDWL,__tmp__FDWL);
            } break;
            };
            __tmp__JDWL=__tmp__GDWL;
          } else {
            __tmp__JDWL=FALSE__;
          };
          if (__tmp__JDWL) {
            remove__BXAK(__tmp__WCWL);
            result__VBWL=create__with__and__ZCCO(Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__K0AL->parent_expr_binary__HBKH.left__PP1H,((__EXPR_MUL *)__tmp__OCWL)->parent_expr_binary__0BKH.right__OP2H);
          };
        };
      };
    };
    result__M0AL=result__VBWL;
    if ((((void *)result__VBWL == (void *)NULL) && ((void *)__tmp__Z0AL != (void *)NULL))) {
      result__M0AL=NULL;
    };
    if ((((void *)result__M0AL == (void *)NULL) && ((void *)__tmp__20AL != (void *)NULL))) {
      result__M0AL=NULL;
    };
  };
  if (((void *)result__M0AL == (void *)NULL)) {
    result__M0AL=Self__K0AL;
  } else {
    __tmp__Q4AL=Self__K0AL->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__M0AL)->__id) {
    case __LIST__: {
      ((__LIST *)result__M0AL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__M0AL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__M0AL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__M0AL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__M0AL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__M0AL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__M0AL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__M0AL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__M0AL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__M0AL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__M0AL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__M0AL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__M0AL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__M0AL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__M0AL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__M0AL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__M0AL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__M0AL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__M0AL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__M0AL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__M0AL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__M0AL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __CAST__: {
      ((__CAST *)result__M0AL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__M0AL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__M0AL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__M0AL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__M0AL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__M0AL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__M0AL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__M0AL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__M0AL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__M0AL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__M0AL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__M0AL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__M0AL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__M0AL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__M0AL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__M0AL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__M0AL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__M0AL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__Q4AL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__M0AL);
}

static void* execute_link__S4AL(__EXPR_MUL *Self__T4AL)
// ({EXPR_MUL}) With resultRecursive, No inlinable.
{
  __INTEGER_64 v__0EWL,v__PGWL,__tmp__KUNM;
  __UINTEGER_32 old_seq__W4AL;
  void *__tmp__24AL,*__tmp__34AL,*__tmp__44AL,*__tmp__54AL,*__tmp__B5AL;
  void *__tmp__E5AL,*result__V4AL,*result__3EWL,*result__OGWL;
  void *result__WJOM,*__tmp__3JOM,*result__EKOM,*__tmp__LKOM;
  void *__tmp__C5AL,*left_cst__Z4AL,*__tmp__F5AL,*right_cst__04AL;
  __INTEGER_CST *Self__AGKQ,*Self__CGKQ,*Self__EGKQ;
  __READ_LOCAL *Self__INCQ,*Self__KNCQ,*Self__MNCQ,*Self__ONCQ;
  __READ_GLOBAL *Self__LNCQ,*Self__PNCQ;
  __POSITION __tmp__ZCBL;
  __BOOLEAN __tmp__GFWL,__tmp__XFWL,result__OZ1L,__tmp__0GWL;
  __BOOLEAN __tmp__LHWL,result__301L;
  old_seq__W4AL=seq_call_and_loop__VREJ;
  __tmp__24AL=Self__T4AL->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__24AL)->__id) {
  case __LIST__: {
    __tmp__34AL=execute_link__LUOG(__tmp__24AL);
  } break;
  case __STRING_CST__: {
    __tmp__34AL=((__STRING_CST *)__tmp__24AL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__34AL=execute_link__U5ZK(__tmp__24AL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__34AL=((__PROTOTYPE_CST *)__tmp__24AL);
  } break;
  case __INTEGER_CST__: {
    __tmp__34AL=((__INTEGER_CST *)__tmp__24AL);
  } break;
  case __READ_LOCAL__: {
    __tmp__34AL=execute_link__EHAL(__tmp__24AL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__34AL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__34AL=execute_link__2LAL(__tmp__24AL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__34AL=execute_link__FQAL(__tmp__24AL);
  } break;
  case __REAL_CST__: {
    __tmp__34AL=((__REAL_CST *)__tmp__24AL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__34AL=((__CHARACTER_CST *)__tmp__24AL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__34AL=execute_link__UUAL(__tmp__24AL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__34AL=execute_link__1VAL(__tmp__24AL);
  } break;
  case __EXPR_SUP__: {
    __tmp__34AL=execute_link__AWAL(__tmp__24AL);
  } break;
  case __EXPR_SUB__: {
    __tmp__34AL=execute_link__J0AL(__tmp__24AL);
  } break;
  case __EXPR_MUL__: {
    __tmp__34AL=execute_link__S4AL(__tmp__24AL);
  } break;
  case __EXPR_DIV__: {
    __tmp__34AL=execute_link__1CBL(__tmp__24AL);
  } break;
  case __EXPR_AND__: {
    __tmp__34AL=execute_link__EHBL(__tmp__24AL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__34AL=execute_link__NLBL(__tmp__24AL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__34AL=execute_link__WPBL(__tmp__24AL);
  } break;
  case __PUT_TO__: {
    __tmp__34AL=execute_link__BOPK(__tmp__24AL);
  } break;
  case __ITEM__: {
    __tmp__34AL=execute_link__5TBL(__tmp__24AL);
  } break;
  case __SIZE_OF__: {
    __tmp__34AL=execute_link__GUBL(__tmp__24AL);
  } break;
  case __CAST__: {
    __tmp__34AL=execute_link__LUBL(__tmp__24AL);
  } break;
  case __CALL_SLOT__: {
    __tmp__34AL=execute_link__A2TL(__tmp__24AL);
  } break;
  case __READ_SLOT__: {
    __tmp__34AL=execute_link__EYBL(__tmp__24AL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__34AL=execute_link__U2BL(__tmp__24AL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__34AL=execute_link__SRZM(__tmp__24AL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__34AL=execute_link__OBFO(__tmp__24AL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__34AL=execute_link__GJLO(__tmp__24AL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__34AL=execute_link__HHFO(__tmp__24AL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__34AL=execute_link__KPLO(__tmp__24AL);
  } break;
  case __EXPR_NEG__: {
    __tmp__34AL=execute_link__0GKM(__tmp__24AL);
  } break;
  case __EXPR_ADD__: {
    __tmp__34AL=execute_link__RROL(__tmp__24AL);
  } break;
  case __EXPR_NOT__: {
    __tmp__34AL=execute_link__GUZM(__tmp__24AL);
  } break;
  case __EXPR_MOD__: {
    __tmp__34AL=execute_link__ANFO(__tmp__24AL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__34AL=execute_link__YLEP(__tmp__24AL);
  } break;
  case __EXPR_INF__: {
    __tmp__34AL=execute_link__VQQN(__tmp__24AL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__34AL=execute_link__4UQN(__tmp__24AL);
  } break;
  case __EXPR_OR__: {
    __tmp__34AL=execute_link__1HQN(__tmp__24AL);
  } break;
  case __EXPR_XOR__: {
    __tmp__34AL=execute_link__IYUO(__tmp__24AL);
  } break;
  };
  Self__T4AL->parent_expr_binary__0BKH.left__PP1H=__tmp__34AL;
  __tmp__44AL=Self__T4AL->parent_expr_binary__0BKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__44AL)->__id) {
  case __LIST__: {
    __tmp__54AL=execute_link__LUOG(__tmp__44AL);
  } break;
  case __STRING_CST__: {
    __tmp__54AL=((__STRING_CST *)__tmp__44AL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__54AL=execute_link__U5ZK(__tmp__44AL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__54AL=((__PROTOTYPE_CST *)__tmp__44AL);
  } break;
  case __INTEGER_CST__: {
    __tmp__54AL=((__INTEGER_CST *)__tmp__44AL);
  } break;
  case __READ_LOCAL__: {
    __tmp__54AL=execute_link__EHAL(__tmp__44AL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__54AL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__54AL=execute_link__2LAL(__tmp__44AL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__54AL=execute_link__FQAL(__tmp__44AL);
  } break;
  case __REAL_CST__: {
    __tmp__54AL=((__REAL_CST *)__tmp__44AL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__54AL=((__CHARACTER_CST *)__tmp__44AL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__54AL=execute_link__UUAL(__tmp__44AL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__54AL=execute_link__1VAL(__tmp__44AL);
  } break;
  case __EXPR_SUP__: {
    __tmp__54AL=execute_link__AWAL(__tmp__44AL);
  } break;
  case __EXPR_SUB__: {
    __tmp__54AL=execute_link__J0AL(__tmp__44AL);
  } break;
  case __EXPR_MUL__: {
    __tmp__54AL=execute_link__S4AL(__tmp__44AL);
  } break;
  case __EXPR_DIV__: {
    __tmp__54AL=execute_link__1CBL(__tmp__44AL);
  } break;
  case __EXPR_AND__: {
    __tmp__54AL=execute_link__EHBL(__tmp__44AL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__54AL=execute_link__NLBL(__tmp__44AL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__54AL=execute_link__WPBL(__tmp__44AL);
  } break;
  case __PUT_TO__: {
    __tmp__54AL=execute_link__BOPK(__tmp__44AL);
  } break;
  case __ITEM__: {
    __tmp__54AL=execute_link__5TBL(__tmp__44AL);
  } break;
  case __SIZE_OF__: {
    __tmp__54AL=execute_link__GUBL(__tmp__44AL);
  } break;
  case __CAST__: {
    __tmp__54AL=execute_link__LUBL(__tmp__44AL);
  } break;
  case __CALL_SLOT__: {
    __tmp__54AL=execute_link__A2TL(__tmp__44AL);
  } break;
  case __READ_SLOT__: {
    __tmp__54AL=execute_link__EYBL(__tmp__44AL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__54AL=execute_link__U2BL(__tmp__44AL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__54AL=execute_link__SRZM(__tmp__44AL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__54AL=execute_link__OBFO(__tmp__44AL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__54AL=execute_link__GJLO(__tmp__44AL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__54AL=execute_link__HHFO(__tmp__44AL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__54AL=execute_link__KPLO(__tmp__44AL);
  } break;
  case __EXPR_NEG__: {
    __tmp__54AL=execute_link__0GKM(__tmp__44AL);
  } break;
  case __EXPR_ADD__: {
    __tmp__54AL=execute_link__RROL(__tmp__44AL);
  } break;
  case __EXPR_NOT__: {
    __tmp__54AL=execute_link__GUZM(__tmp__44AL);
  } break;
  case __EXPR_MOD__: {
    __tmp__54AL=execute_link__ANFO(__tmp__44AL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__54AL=execute_link__YLEP(__tmp__44AL);
  } break;
  case __EXPR_INF__: {
    __tmp__54AL=execute_link__VQQN(__tmp__44AL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__54AL=execute_link__4UQN(__tmp__44AL);
  } break;
  case __EXPR_OR__: {
    __tmp__54AL=execute_link__1HQN(__tmp__44AL);
  } break;
  case __EXPR_XOR__: {
    __tmp__54AL=execute_link__IYUO(__tmp__44AL);
  } break;
  };
  Self__T4AL->parent_expr_binary__0BKH.right__OP2H=__tmp__54AL;
  __tmp__B5AL=Self__T4AL->parent_expr_binary__0BKH.left__PP1H;
  if (__tmp__B5AL==NULL) {
    __tmp__C5AL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__B5AL)->__id) {
    case __LIST__: {
      __tmp__C5AL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__C5AL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__C5AL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__C5AL=((void *)__tmp__B5AL);
    } break;
    case __READ_LOCAL__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__C5AL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__C5AL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__C5AL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__C5AL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__C5AL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__C5AL=NULL;
    } break;
    case __ITEM__: {
      __tmp__C5AL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__C5AL=NULL;
    } break;
    case __CAST__: {
      __tmp__C5AL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__C5AL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__C5AL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__C5AL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__C5AL=NULL;
    } break;
    }
  };
  left_cst__Z4AL=__tmp__C5AL;
  __tmp__E5AL=Self__T4AL->parent_expr_binary__0BKH.right__OP2H;
  if (__tmp__E5AL==NULL) {
    __tmp__F5AL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__E5AL)->__id) {
    case __LIST__: {
      __tmp__F5AL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__F5AL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__F5AL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__F5AL=((void *)__tmp__E5AL);
    } break;
    case __READ_LOCAL__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__F5AL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__F5AL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__F5AL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__F5AL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__F5AL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__F5AL=NULL;
    } break;
    case __ITEM__: {
      __tmp__F5AL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__F5AL=NULL;
    } break;
    case __CAST__: {
      __tmp__F5AL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__F5AL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__F5AL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__F5AL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__F5AL=NULL;
    } break;
    }
  };
  right_cst__04AL=__tmp__F5AL;
  result__V4AL=NULL;
  if (((void *)__tmp__C5AL != (void *)NULL)) {
    v__0EWL= 0;
    result__3EWL=NULL;
    if ((((__INTEGER_CST *)__tmp__C5AL)->value__PAZD ==  1)) {
      result__3EWL=Self__T4AL->parent_expr_binary__0BKH.right__OP2H;
      __tmp__GFWL=TRUE__;
    } else {
      __tmp__GFWL=FALSE__;
    };
    if (__tmp__GFWL) {
      __tmp__XFWL=TRUE__;
    } else {
      result__OZ1L=(((__INTEGER_CST *)__tmp__C5AL)->value__PAZD == (__INTEGER)(-  1));
      if (result__OZ1L) {
        result__3EWL=create__with__2RBM(Self__T4AL->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T4AL->parent_expr_binary__0BKH.right__OP2H);
      };
      __tmp__XFWL=result__OZ1L;
    };
    if ((! __tmp__XFWL)) {
      v__0EWL=to_power__PCRN(__tmp__C5AL);
      if ((v__0EWL != (__INTEGER)(-  1))) {
        Self__AGKQ=((__INTEGER_CST *)__tmp__C5AL);
        Self__AGKQ->value__PAZD=v__0EWL;
        check_type__RI5D(Self__AGKQ);
        result__3EWL=create__with__and__DYWH(Self__T4AL->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T4AL->parent_expr_binary__0BKH.right__OP2H,__tmp__C5AL);
      };
    };
    result__V4AL=result__3EWL;
  };
  if ((((void *)result__V4AL == (void *)NULL) && ((void *)__tmp__F5AL != (void *)NULL))) {
    result__OGWL=NULL;
    v__PGWL= 0;
    if ((((__INTEGER_CST *)__tmp__F5AL)->value__PAZD ==  1)) {
      result__OGWL=Self__T4AL->parent_expr_binary__0BKH.left__PP1H;
      __tmp__0GWL=TRUE__;
    } else {
      __tmp__0GWL=FALSE__;
    };
    if (__tmp__0GWL) {
      __tmp__LHWL=TRUE__;
    } else {
      result__301L=(((__INTEGER_CST *)__tmp__F5AL)->value__PAZD == (__INTEGER)(-  1));
      if (result__301L) {
        result__OGWL=create__with__2RBM(Self__T4AL->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T4AL->parent_expr_binary__0BKH.left__PP1H);
      };
      __tmp__LHWL=result__301L;
    };
    if ((! __tmp__LHWL)) {
      v__PGWL=to_power__PCRN(__tmp__F5AL);
      if ((v__PGWL != (__INTEGER)(-  1))) {
        Self__CGKQ=((__INTEGER_CST *)__tmp__F5AL);
        Self__CGKQ->value__PAZD=v__PGWL;
        check_type__RI5D(Self__CGKQ);
        result__OGWL=create__with__and__DYWH(Self__T4AL->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T4AL->parent_expr_binary__0BKH.left__PP1H,__tmp__F5AL);
      };
    };
    result__V4AL=result__OGWL;
  };
  if (((((void *)result__V4AL == (void *)NULL) && ((void *)__tmp__F5AL != (void *)NULL)) && ((void *)__tmp__C5AL != (void *)NULL))) {
    __tmp__KUNM=((__INTEGER_CST *)__tmp__C5AL)->value__PAZD;
    Self__EGKQ=((__INTEGER_CST *)__tmp__C5AL);
    Self__EGKQ->value__PAZD=(__INTEGER_64)(__tmp__KUNM * ((__INTEGER_CST *)__tmp__F5AL)->value__PAZD);
    check_type__RI5D(Self__EGKQ);
    result__V4AL=__tmp__C5AL;
  };
  if ((((void *)result__V4AL == (void *)NULL) && (old_seq__W4AL == seq_call_and_loop__VREJ))) {
    result__V4AL=NULL;
    if (((void *)__tmp__C5AL != (void *)NULL)) {
      result__WJOM=NULL;
      if ((((__INTEGER_CST *)__tmp__C5AL)->value__PAZD ==  0)) {
        result__WJOM=__tmp__C5AL;
        __tmp__3JOM=Self__T4AL->parent_expr_binary__0BKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__3JOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__3JOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__3JOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__INCQ=((__READ_LOCAL *)__tmp__3JOM);
          unread__YVJK(Self__INCQ->local__ALZD,Self__INCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__3JOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__3JOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__3JOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__KNCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3JOM)->receiver__OO2H);
          unread__YVJK(Self__KNCQ->local__ALZD,Self__KNCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__3JOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__3JOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__3JOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__3JOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__3JOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__3JOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__3JOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__3JOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__3JOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__3JOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__3JOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__3JOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__3JOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__3JOM);
        } break;
        case __READ_GLOBAL__: {
          Self__LNCQ=((__READ_GLOBAL *)__tmp__3JOM);
          unread__15ML(Self__LNCQ->global__RHJK,Self__LNCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__3JOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__3JOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__3JOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__3JOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__3JOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__3JOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__3JOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__3JOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__3JOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__3JOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__3JOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__3JOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__3JOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__3JOM);
        } break;
        };
      };
      result__V4AL=result__WJOM;
    };
    if ((((void *)result__V4AL == (void *)NULL) && ((void *)__tmp__F5AL != (void *)NULL))) {
      result__EKOM=NULL;
      if ((((__INTEGER_CST *)__tmp__F5AL)->value__PAZD ==  0)) {
        result__EKOM=__tmp__F5AL;
        __tmp__LKOM=Self__T4AL->parent_expr_binary__0BKH.left__PP1H;
        switch (((struct ___OBJ *)__tmp__LKOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__LKOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__LKOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__MNCQ=((__READ_LOCAL *)__tmp__LKOM);
          unread__YVJK(Self__MNCQ->local__ALZD,Self__MNCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__LKOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__LKOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__LKOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__ONCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LKOM)->receiver__OO2H);
          unread__YVJK(Self__ONCQ->local__ALZD,Self__ONCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__LKOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__LKOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__LKOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__LKOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__LKOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__LKOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__LKOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__LKOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__LKOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__LKOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__LKOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__LKOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__LKOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__LKOM);
        } break;
        case __READ_GLOBAL__: {
          Self__PNCQ=((__READ_GLOBAL *)__tmp__LKOM);
          unread__15ML(Self__PNCQ->global__RHJK,Self__PNCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__LKOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__LKOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__LKOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__LKOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__LKOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__LKOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__LKOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__LKOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__LKOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__LKOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__LKOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__LKOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__LKOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__LKOM);
        } break;
        };
      };
      result__V4AL=result__EKOM;
    };
  };
  if (((void *)result__V4AL == (void *)NULL)) {
    result__V4AL=Self__T4AL;
  } else {
    __tmp__ZCBL=Self__T4AL->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__V4AL)->__id) {
    case __LIST__: {
      ((__LIST *)result__V4AL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__V4AL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__V4AL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__V4AL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__V4AL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__V4AL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__V4AL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__V4AL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__V4AL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__V4AL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__V4AL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__V4AL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__V4AL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__V4AL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__V4AL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__V4AL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__V4AL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__V4AL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__V4AL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__V4AL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__V4AL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__V4AL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __CAST__: {
      ((__CAST *)result__V4AL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__V4AL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__V4AL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__V4AL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__V4AL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__V4AL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__V4AL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__V4AL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__V4AL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__V4AL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__V4AL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__V4AL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__V4AL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__V4AL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__V4AL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__V4AL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__V4AL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__V4AL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__ZCBL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__V4AL);
}

static void* execute_link__1CBL(__EXPR_DIV *Self__2CBL)
// ({EXPR_DIV}) With resultRecursive, No inlinable.
{
  __INTEGER_64 v__GJWL,__tmp__0UNM;
  __UINTEGER_32 old_seq__5CBL;
  void *__tmp__FDBL,*__tmp__GDBL,*__tmp__HDBL,*__tmp__IDBL,*__tmp__KDBL;
  void *__tmp__NDBL,*result__4CBL,*result__FJWL,*result__TUNM;
  void *result__ILWL,*__tmp__KLWL,*__tmp__LLWL,*__tmp__XLWL,*__tmp__YLWL;
  void *__tmp__5LWL,*__tmp__GMWL,*__tmp__HMWL,*__tmp__YMWL,*__tmp__ZMWL;
  void *__tmp__ANWL,*__tmp__HNWL,*__tmp__INWL,*__tmp__ZNWL,*__tmp__0NWL;
  void *result__SKOM,*__tmp__ZKOM;
  void *__tmp__LDBL,*left_cst__CDBL,*__tmp__ODBL,*right_cst__DDBL;
  __POSITION __tmp__QJWL,__tmp__CHBL;
  __INTEGER_CST *Self__GGKQ,*Self__IGKQ;
  void *neg__JLWL,*__tmp__AMWL,*__tmp__BNWL;
  __READ_LOCAL *Self__HQCQ,*Self__JQCQ,*Self__LQCQ,*Self__NQCQ;
  __READ_LOCAL *Self__RQCQ,*Self__TQCQ,*Self__VQCQ,*Self__XQCQ;
  __READ_LOCAL *Self__1QCQ,*Self__3QCQ,*Self__5QCQ,*Self__BRCQ;
  __READ_LOCAL *Self__DRCQ,*Self__FRCQ;
  __READ_GLOBAL *Self__KQCQ,*Self__OQCQ,*Self__UQCQ,*Self__YQCQ;
  __READ_GLOBAL *Self__4QCQ,*Self__CRCQ,*Self__GRCQ;
  __BOOLEAN __tmp__TJWL,__tmp__BKWL,result__M21L,__tmp__SKWL;
  __BOOLEAN result__421L,__tmp__MLWL,__tmp__IMWL,__tmp__LMWL;
  __BOOLEAN __tmp__JNWL,__tmp__MNWL;
  old_seq__5CBL=seq_call_and_loop__VREJ;
  __tmp__FDBL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__FDBL)->__id) {
  case __LIST__: {
    __tmp__GDBL=execute_link__LUOG(__tmp__FDBL);
  } break;
  case __STRING_CST__: {
    __tmp__GDBL=((__STRING_CST *)__tmp__FDBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__GDBL=execute_link__U5ZK(__tmp__FDBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__GDBL=((__PROTOTYPE_CST *)__tmp__FDBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__GDBL=((__INTEGER_CST *)__tmp__FDBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__GDBL=execute_link__EHAL(__tmp__FDBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__GDBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__GDBL=execute_link__2LAL(__tmp__FDBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__GDBL=execute_link__FQAL(__tmp__FDBL);
  } break;
  case __REAL_CST__: {
    __tmp__GDBL=((__REAL_CST *)__tmp__FDBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__GDBL=((__CHARACTER_CST *)__tmp__FDBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__GDBL=execute_link__UUAL(__tmp__FDBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__GDBL=execute_link__1VAL(__tmp__FDBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__GDBL=execute_link__AWAL(__tmp__FDBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__GDBL=execute_link__J0AL(__tmp__FDBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__GDBL=execute_link__S4AL(__tmp__FDBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__GDBL=execute_link__1CBL(__tmp__FDBL);
  } break;
  case __EXPR_AND__: {
    __tmp__GDBL=execute_link__EHBL(__tmp__FDBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__GDBL=execute_link__NLBL(__tmp__FDBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__GDBL=execute_link__WPBL(__tmp__FDBL);
  } break;
  case __PUT_TO__: {
    __tmp__GDBL=execute_link__BOPK(__tmp__FDBL);
  } break;
  case __ITEM__: {
    __tmp__GDBL=execute_link__5TBL(__tmp__FDBL);
  } break;
  case __SIZE_OF__: {
    __tmp__GDBL=execute_link__GUBL(__tmp__FDBL);
  } break;
  case __CAST__: {
    __tmp__GDBL=execute_link__LUBL(__tmp__FDBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__GDBL=execute_link__A2TL(__tmp__FDBL);
  } break;
  case __READ_SLOT__: {
    __tmp__GDBL=execute_link__EYBL(__tmp__FDBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__GDBL=execute_link__U2BL(__tmp__FDBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__GDBL=execute_link__SRZM(__tmp__FDBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__GDBL=execute_link__OBFO(__tmp__FDBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__GDBL=execute_link__GJLO(__tmp__FDBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__GDBL=execute_link__HHFO(__tmp__FDBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__GDBL=execute_link__KPLO(__tmp__FDBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__GDBL=execute_link__0GKM(__tmp__FDBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__GDBL=execute_link__RROL(__tmp__FDBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__GDBL=execute_link__GUZM(__tmp__FDBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__GDBL=execute_link__ANFO(__tmp__FDBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__GDBL=execute_link__YLEP(__tmp__FDBL);
  } break;
  case __EXPR_INF__: {
    __tmp__GDBL=execute_link__VQQN(__tmp__FDBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__GDBL=execute_link__4UQN(__tmp__FDBL);
  } break;
  case __EXPR_OR__: {
    __tmp__GDBL=execute_link__1HQN(__tmp__FDBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__GDBL=execute_link__IYUO(__tmp__FDBL);
  } break;
  };
  Self__2CBL->parent_expr_binary__NCKH.left__PP1H=__tmp__GDBL;
  __tmp__HDBL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__HDBL)->__id) {
  case __LIST__: {
    __tmp__IDBL=execute_link__LUOG(__tmp__HDBL);
  } break;
  case __STRING_CST__: {
    __tmp__IDBL=((__STRING_CST *)__tmp__HDBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__IDBL=execute_link__U5ZK(__tmp__HDBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__IDBL=((__PROTOTYPE_CST *)__tmp__HDBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__IDBL=((__INTEGER_CST *)__tmp__HDBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__IDBL=execute_link__EHAL(__tmp__HDBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IDBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IDBL=execute_link__2LAL(__tmp__HDBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IDBL=execute_link__FQAL(__tmp__HDBL);
  } break;
  case __REAL_CST__: {
    __tmp__IDBL=((__REAL_CST *)__tmp__HDBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__IDBL=((__CHARACTER_CST *)__tmp__HDBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__IDBL=execute_link__UUAL(__tmp__HDBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IDBL=execute_link__1VAL(__tmp__HDBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__IDBL=execute_link__AWAL(__tmp__HDBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__IDBL=execute_link__J0AL(__tmp__HDBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__IDBL=execute_link__S4AL(__tmp__HDBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__IDBL=execute_link__1CBL(__tmp__HDBL);
  } break;
  case __EXPR_AND__: {
    __tmp__IDBL=execute_link__EHBL(__tmp__HDBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IDBL=execute_link__NLBL(__tmp__HDBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IDBL=execute_link__WPBL(__tmp__HDBL);
  } break;
  case __PUT_TO__: {
    __tmp__IDBL=execute_link__BOPK(__tmp__HDBL);
  } break;
  case __ITEM__: {
    __tmp__IDBL=execute_link__5TBL(__tmp__HDBL);
  } break;
  case __SIZE_OF__: {
    __tmp__IDBL=execute_link__GUBL(__tmp__HDBL);
  } break;
  case __CAST__: {
    __tmp__IDBL=execute_link__LUBL(__tmp__HDBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__IDBL=execute_link__A2TL(__tmp__HDBL);
  } break;
  case __READ_SLOT__: {
    __tmp__IDBL=execute_link__EYBL(__tmp__HDBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__IDBL=execute_link__U2BL(__tmp__HDBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IDBL=execute_link__SRZM(__tmp__HDBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IDBL=execute_link__OBFO(__tmp__HDBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IDBL=execute_link__GJLO(__tmp__HDBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IDBL=execute_link__HHFO(__tmp__HDBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IDBL=execute_link__KPLO(__tmp__HDBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__IDBL=execute_link__0GKM(__tmp__HDBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__IDBL=execute_link__RROL(__tmp__HDBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__IDBL=execute_link__GUZM(__tmp__HDBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__IDBL=execute_link__ANFO(__tmp__HDBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IDBL=execute_link__YLEP(__tmp__HDBL);
  } break;
  case __EXPR_INF__: {
    __tmp__IDBL=execute_link__VQQN(__tmp__HDBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IDBL=execute_link__4UQN(__tmp__HDBL);
  } break;
  case __EXPR_OR__: {
    __tmp__IDBL=execute_link__1HQN(__tmp__HDBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__IDBL=execute_link__IYUO(__tmp__HDBL);
  } break;
  };
  Self__2CBL->parent_expr_binary__NCKH.right__OP2H=__tmp__IDBL;
  __tmp__KDBL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
  if (__tmp__KDBL==NULL) {
    __tmp__LDBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__KDBL)->__id) {
    case __LIST__: {
      __tmp__LDBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LDBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LDBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__LDBL=((void *)__tmp__KDBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LDBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__LDBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LDBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LDBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LDBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__LDBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__LDBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__LDBL=NULL;
    } break;
    case __CAST__: {
      __tmp__LDBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__LDBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__LDBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__LDBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__LDBL=NULL;
    } break;
    }
  };
  left_cst__CDBL=__tmp__LDBL;
  __tmp__NDBL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
  if (__tmp__NDBL==NULL) {
    __tmp__ODBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__NDBL)->__id) {
    case __LIST__: {
      __tmp__ODBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ODBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ODBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__ODBL=((void *)__tmp__NDBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ODBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ODBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ODBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ODBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ODBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ODBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__ODBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ODBL=NULL;
    } break;
    case __CAST__: {
      __tmp__ODBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ODBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ODBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ODBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ODBL=NULL;
    } break;
    }
  };
  right_cst__DDBL=__tmp__ODBL;
  result__4CBL=NULL;
  if (((void *)__tmp__LDBL != (void *)NULL)) {
    result__4CBL=NULL;
  };
  if ((((void *)result__4CBL == (void *)NULL) && ((void *)__tmp__ODBL != (void *)NULL))) {
    result__FJWL=NULL;
    v__GJWL= 0;
    if ((((__INTEGER_CST *)__tmp__ODBL)->value__PAZD ==  0)) {
      __tmp__QJWL=Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      put_error__text__0AH( 2,(&__string_559));
      put_position__ECH(__tmp__QJWL);
      send_error__2FH();
      __tmp__TJWL=TRUE__;
    } else {
      __tmp__TJWL=FALSE__;
    };
    if (__tmp__TJWL) {
      __tmp__BKWL=TRUE__;
    } else {
      result__M21L=(((__INTEGER_CST *)__tmp__ODBL)->value__PAZD ==  1);
      if (result__M21L) {
        result__FJWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
      };
      __tmp__BKWL=result__M21L;
    };
    if (__tmp__BKWL) {
      __tmp__SKWL=TRUE__;
    } else {
      result__421L=(((__INTEGER_CST *)__tmp__ODBL)->value__PAZD == (__INTEGER)(-  1));
      if (result__421L) {
        result__FJWL=create__with__2RBM(Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2CBL->parent_expr_binary__NCKH.left__PP1H);
      };
      __tmp__SKWL=result__421L;
    };
    if ((! __tmp__SKWL)) {
      v__GJWL=to_power__PCRN(__tmp__ODBL);
      if ((v__GJWL != (__INTEGER)(-  1))) {
        Self__GGKQ=((__INTEGER_CST *)__tmp__ODBL);
        Self__GGKQ->value__PAZD=v__GJWL;
        check_type__RI5D(Self__GGKQ);
        result__FJWL=create__with__and__IXWH(Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2CBL->parent_expr_binary__NCKH.left__PP1H,__tmp__ODBL);
      };
    };
    result__4CBL=result__FJWL;
  };
  if (((((void *)result__4CBL == (void *)NULL) && ((void *)__tmp__ODBL != (void *)NULL)) && ((void *)__tmp__LDBL != (void *)NULL))) {
    result__TUNM=NULL;
    if ((((__INTEGER_CST *)__tmp__ODBL)->value__PAZD !=  0)) {
      __tmp__0UNM=((__INTEGER_CST *)__tmp__LDBL)->value__PAZD;
      Self__IGKQ=((__INTEGER_CST *)__tmp__LDBL);
      Self__IGKQ->value__PAZD=(__INTEGER_64)(__tmp__0UNM / ((__INTEGER_CST *)__tmp__ODBL)->value__PAZD);
      check_type__RI5D(Self__IGKQ);
      result__TUNM=__tmp__LDBL;
    };
    result__4CBL=result__TUNM;
  };
  if ((((void *)result__4CBL == (void *)NULL) && (old_seq__5CBL == seq_call_and_loop__VREJ))) {
    result__ILWL=NULL;
    neg__JLWL=NULL;
    __tmp__KLWL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
    __tmp__LLWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__KLWL)->__id) {
    case __LIST__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__MLWL=__infix_equal_equal__WF1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__MLWL=__infix_equal_equal__LG1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __INTEGER_CST__: {
      __tmp__MLWL=__infix_equal_equal__2G1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __READ_LOCAL__: {
      __tmp__MLWL=__infix_equal_equal__WH1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__MLWL=__infix_equal_equal__MI1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__MLWL=__infix_equal_equal__IJ1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __REAL_CST__: {
      __tmp__MLWL=__infix_equal_equal__EK1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__MLWL=__infix_equal_equal__4K1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__MLWL=__infix_equal_equal__XL1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_SUB__: {
      __tmp__MLWL=__infix_equal_equal__TM1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_MUL__: {
      __tmp__MLWL=__infix_equal_equal__PN1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_DIV__: {
      __tmp__MLWL=__infix_equal_equal__LO1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_AND__: {
      __tmp__MLWL=__infix_equal_equal__HP1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__MLWL=__infix_equal_equal__DQ1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__MLWL=__infix_equal_equal__5Q1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __PUT_TO__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__MLWL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__MLWL=__infix_equal_equal__LS1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__MLWL=__infix_equal_equal__HT1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__MLWL=__infix_equal_equal__CZHO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__MLWL=__infix_equal_equal__SXFO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__MLWL=__infix_equal_equal__TBMO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__MLWL=__infix_equal_equal__OYFO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__MLWL=__infix_equal_equal__QCMO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_NEG__: {
      __tmp__MLWL=__infix_equal_equal__J5KM(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_ADD__: {
      __tmp__MLWL=__infix_equal_equal__ZT1L(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_NOT__: {
      __tmp__MLWL=__infix_equal_equal__QB0M(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_MOD__: {
      __tmp__MLWL=__infix_equal_equal__KZFO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__MLWL=__infix_equal_equal__OTEP(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_INF__: {
      __tmp__MLWL=__infix_equal_equal__UZHO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__MLWL=__infix_equal_equal__Q0HO(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_OR__: {
      __tmp__MLWL=__infix_equal_equal__32QN(__tmp__KLWL,__tmp__LLWL);
    } break;
    case __EXPR_XOR__: {
      __tmp__MLWL=__infix_equal_equal__GOVO(__tmp__KLWL,__tmp__LLWL);
    } break;
    };
    if (__tmp__MLWL) {
      result__ILWL=create__value__type__DNQC(Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM, 1,static_type__XP1H(Self__2CBL));
      __tmp__XLWL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
      switch (((struct ___OBJ *)__tmp__XLWL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__XLWL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__XLWL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__HQCQ=((__READ_LOCAL *)__tmp__XLWL);
        unread__YVJK(Self__HQCQ->local__ALZD,Self__HQCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__XLWL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__XLWL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__XLWL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__JQCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__XLWL)->receiver__OO2H);
        unread__YVJK(Self__JQCQ->local__ALZD,Self__JQCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__XLWL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__XLWL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__XLWL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__XLWL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__XLWL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__XLWL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__XLWL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__XLWL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__XLWL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__XLWL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__XLWL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__XLWL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__XLWL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__XLWL);
      } break;
      case __READ_GLOBAL__: {
        Self__KQCQ=((__READ_GLOBAL *)__tmp__XLWL);
        unread__15ML(Self__KQCQ->global__RHJK,Self__KQCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__XLWL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__XLWL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__XLWL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__XLWL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__XLWL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__XLWL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__XLWL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__XLWL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__XLWL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__XLWL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__XLWL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__XLWL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__XLWL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__XLWL);
      } break;
      };
      __tmp__YLWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
      switch (((struct ___OBJ *)__tmp__YLWL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__YLWL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__YLWL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__LQCQ=((__READ_LOCAL *)__tmp__YLWL);
        unread__YVJK(Self__LQCQ->local__ALZD,Self__LQCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__YLWL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__YLWL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__YLWL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__NQCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YLWL)->receiver__OO2H);
        unread__YVJK(Self__NQCQ->local__ALZD,Self__NQCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__YLWL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__YLWL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__YLWL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__YLWL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__YLWL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__YLWL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__YLWL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__YLWL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__YLWL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__YLWL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__YLWL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__YLWL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__YLWL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__YLWL);
      } break;
      case __READ_GLOBAL__: {
        Self__OQCQ=((__READ_GLOBAL *)__tmp__YLWL);
        unread__15ML(Self__OQCQ->global__RHJK,Self__OQCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__YLWL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__YLWL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__YLWL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__YLWL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__YLWL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__YLWL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__YLWL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__YLWL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__YLWL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__YLWL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__YLWL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__YLWL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__YLWL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__YLWL);
      } break;
      };
    } else {
      __tmp__5LWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
      if (__tmp__5LWL==NULL) {
        __tmp__AMWL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__5LWL)->__id) {
        case __LIST__: {
          __tmp__AMWL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__AMWL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__AMWL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__AMWL=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__AMWL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__AMWL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__AMWL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__AMWL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__AMWL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__AMWL=NULL;
        } break;
        case __ITEM__: {
          __tmp__AMWL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__AMWL=NULL;
        } break;
        case __CAST__: {
          __tmp__AMWL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__AMWL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__AMWL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__AMWL=((void *)__tmp__5LWL);
        } break;
        case __EXPR_ADD__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__AMWL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__AMWL=NULL;
        } break;
        }
      };
      neg__JLWL=__tmp__AMWL;
      if (((void *)__tmp__AMWL != (void *)NULL)) {
        __tmp__GMWL=((__EXPR_NEG *)__tmp__AMWL)->parent_expr_unary__JZDL.right__XZDL;
        __tmp__HMWL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__GMWL)->__id) {
        case __LIST__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__IMWL=__infix_equal_equal__WF1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXTERNAL_C__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__IMWL=__infix_equal_equal__LG1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __INTEGER_CST__: {
          __tmp__IMWL=__infix_equal_equal__2G1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __READ_LOCAL__: {
          __tmp__IMWL=__infix_equal_equal__WH1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__IMWL=__infix_equal_equal__MI1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__IMWL=__infix_equal_equal__IJ1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __REAL_CST__: {
          __tmp__IMWL=__infix_equal_equal__EK1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __CHARACTER_CST__: {
          __tmp__IMWL=__infix_equal_equal__4K1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __IS_EXPANDED__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__IMWL=__infix_equal_equal__XL1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_SUB__: {
          __tmp__IMWL=__infix_equal_equal__TM1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_MUL__: {
          __tmp__IMWL=__infix_equal_equal__PN1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_DIV__: {
          __tmp__IMWL=__infix_equal_equal__LO1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_AND__: {
          __tmp__IMWL=__infix_equal_equal__HP1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__IMWL=__infix_equal_equal__DQ1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__IMWL=__infix_equal_equal__5Q1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __PUT_TO__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __CAST__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__IMWL=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__IMWL=__infix_equal_equal__LS1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __READ_GLOBAL__: {
          __tmp__IMWL=__infix_equal_equal__HT1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__IMWL=__infix_equal_equal__CZHO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__IMWL=__infix_equal_equal__SXFO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__IMWL=__infix_equal_equal__TBMO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__IMWL=__infix_equal_equal__OYFO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__IMWL=__infix_equal_equal__QCMO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_NEG__: {
          __tmp__IMWL=__infix_equal_equal__J5KM(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_ADD__: {
          __tmp__IMWL=__infix_equal_equal__ZT1L(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_NOT__: {
          __tmp__IMWL=__infix_equal_equal__QB0M(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_MOD__: {
          __tmp__IMWL=__infix_equal_equal__KZFO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__IMWL=__infix_equal_equal__OTEP(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_INF__: {
          __tmp__IMWL=__infix_equal_equal__UZHO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__IMWL=__infix_equal_equal__Q0HO(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_OR__: {
          __tmp__IMWL=__infix_equal_equal__32QN(__tmp__GMWL,__tmp__HMWL);
        } break;
        case __EXPR_XOR__: {
          __tmp__IMWL=__infix_equal_equal__GOVO(__tmp__GMWL,__tmp__HMWL);
        } break;
        };
        __tmp__LMWL=__tmp__IMWL;
      } else {
        __tmp__LMWL=FALSE__;
      };
      if (__tmp__LMWL) {
        result__ILWL=create__value__type__DNQC(Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,((__INTEGER_64 )(__INTEGER)(-  1)),static_type__XP1H(Self__2CBL));
        __tmp__YMWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
        switch (((struct ___OBJ *)__tmp__YMWL)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__YMWL);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__YMWL);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__RQCQ=((__READ_LOCAL *)__tmp__YMWL);
          unread__YVJK(Self__RQCQ->local__ALZD,Self__RQCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__YMWL);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__YMWL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__YMWL);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__TQCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YMWL)->receiver__OO2H);
          unread__YVJK(Self__TQCQ->local__ALZD,Self__TQCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__YMWL);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__YMWL);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__YMWL);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__YMWL);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__YMWL);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__YMWL);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__YMWL);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__YMWL);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__YMWL);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__YMWL);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__YMWL);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__YMWL);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__YMWL);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__YMWL);
        } break;
        case __READ_GLOBAL__: {
          Self__UQCQ=((__READ_GLOBAL *)__tmp__YMWL);
          unread__15ML(Self__UQCQ->global__RHJK,Self__UQCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__YMWL);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__YMWL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__YMWL);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__YMWL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__YMWL);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__YMWL);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__YMWL);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__YMWL);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__YMWL);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__YMWL);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__YMWL);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__YMWL);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__YMWL);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__YMWL);
        } break;
        };
        __tmp__ZMWL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__ZMWL)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__ZMWL);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__ZMWL);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__VQCQ=((__READ_LOCAL *)__tmp__ZMWL);
          unread__YVJK(Self__VQCQ->local__ALZD,Self__VQCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__ZMWL);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__ZMWL);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__ZMWL);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__XQCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZMWL)->receiver__OO2H);
          unread__YVJK(Self__XQCQ->local__ALZD,Self__XQCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__ZMWL);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__ZMWL);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__ZMWL);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__ZMWL);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__ZMWL);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__ZMWL);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__ZMWL);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__ZMWL);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__ZMWL);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__ZMWL);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__ZMWL);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__ZMWL);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__ZMWL);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__ZMWL);
        } break;
        case __READ_GLOBAL__: {
          Self__YQCQ=((__READ_GLOBAL *)__tmp__ZMWL);
          unread__15ML(Self__YQCQ->global__RHJK,Self__YQCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__ZMWL);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__ZMWL);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__ZMWL);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__ZMWL);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__ZMWL);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__ZMWL);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__ZMWL);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__ZMWL);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__ZMWL);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__ZMWL);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__ZMWL);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__ZMWL);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__ZMWL);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__ZMWL);
        } break;
        };
      } else {
        __tmp__ANWL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
        if (__tmp__ANWL==NULL) {
          __tmp__BNWL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__ANWL)->__id) {
          case __LIST__: {
            __tmp__BNWL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__BNWL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__BNWL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__BNWL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__BNWL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__BNWL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__BNWL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__BNWL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__BNWL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__BNWL=NULL;
          } break;
          case __ITEM__: {
            __tmp__BNWL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__BNWL=NULL;
          } break;
          case __CAST__: {
            __tmp__BNWL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__BNWL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__BNWL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__BNWL=((void *)__tmp__ANWL);
          } break;
          case __EXPR_ADD__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__BNWL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__BNWL=NULL;
          } break;
          }
        };
        neg__JLWL=__tmp__BNWL;
        if (((void *)__tmp__BNWL != (void *)NULL)) {
          __tmp__HNWL=((__EXPR_NEG *)__tmp__BNWL)->parent_expr_unary__JZDL.right__XZDL;
          __tmp__INWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
          switch (((struct ___OBJ *)__tmp__HNWL)->__id) {
          case __LIST__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__JNWL=__infix_equal_equal__WF1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXTERNAL_C__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__JNWL=__infix_equal_equal__LG1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __INTEGER_CST__: {
            __tmp__JNWL=__infix_equal_equal__2G1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __READ_LOCAL__: {
            __tmp__JNWL=__infix_equal_equal__WH1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__JNWL=__infix_equal_equal__MI1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__JNWL=__infix_equal_equal__IJ1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __REAL_CST__: {
            __tmp__JNWL=__infix_equal_equal__EK1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __CHARACTER_CST__: {
            __tmp__JNWL=__infix_equal_equal__4K1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __IS_EXPANDED__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__JNWL=__infix_equal_equal__XL1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_SUB__: {
            __tmp__JNWL=__infix_equal_equal__TM1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_MUL__: {
            __tmp__JNWL=__infix_equal_equal__PN1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_DIV__: {
            __tmp__JNWL=__infix_equal_equal__LO1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_AND__: {
            __tmp__JNWL=__infix_equal_equal__HP1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__JNWL=__infix_equal_equal__DQ1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__JNWL=__infix_equal_equal__5Q1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __PUT_TO__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __CAST__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__JNWL=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__JNWL=__infix_equal_equal__LS1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__JNWL=__infix_equal_equal__HT1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__JNWL=__infix_equal_equal__CZHO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__JNWL=__infix_equal_equal__SXFO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__JNWL=__infix_equal_equal__TBMO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__JNWL=__infix_equal_equal__OYFO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__JNWL=__infix_equal_equal__QCMO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_NEG__: {
            __tmp__JNWL=__infix_equal_equal__J5KM(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_ADD__: {
            __tmp__JNWL=__infix_equal_equal__ZT1L(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_NOT__: {
            __tmp__JNWL=__infix_equal_equal__QB0M(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_MOD__: {
            __tmp__JNWL=__infix_equal_equal__KZFO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__JNWL=__infix_equal_equal__OTEP(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_INF__: {
            __tmp__JNWL=__infix_equal_equal__UZHO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__JNWL=__infix_equal_equal__Q0HO(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_OR__: {
            __tmp__JNWL=__infix_equal_equal__32QN(__tmp__HNWL,__tmp__INWL);
          } break;
          case __EXPR_XOR__: {
            __tmp__JNWL=__infix_equal_equal__GOVO(__tmp__HNWL,__tmp__INWL);
          } break;
          };
          __tmp__MNWL=__tmp__JNWL;
        } else {
          __tmp__MNWL=FALSE__;
        };
        if (__tmp__MNWL) {
          result__ILWL=create__value__type__DNQC(Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,((__INTEGER_64 )(__INTEGER)(-  1)),static_type__XP1H(Self__2CBL));
          __tmp__ZNWL=Self__2CBL->parent_expr_binary__NCKH.left__PP1H;
          switch (((struct ___OBJ *)__tmp__ZNWL)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__ZNWL);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__ZNWL);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__1QCQ=((__READ_LOCAL *)__tmp__ZNWL);
            unread__YVJK(Self__1QCQ->local__ALZD,Self__1QCQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__ZNWL);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__ZNWL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__ZNWL);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__3QCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZNWL)->receiver__OO2H);
            unread__YVJK(Self__3QCQ->local__ALZD,Self__3QCQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__ZNWL);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__ZNWL);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__ZNWL);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__ZNWL);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__ZNWL);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__ZNWL);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__ZNWL);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__ZNWL);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__ZNWL);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__ZNWL);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__ZNWL);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__ZNWL);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__ZNWL);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__ZNWL);
          } break;
          case __READ_GLOBAL__: {
            Self__4QCQ=((__READ_GLOBAL *)__tmp__ZNWL);
            unread__15ML(Self__4QCQ->global__RHJK,Self__4QCQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__ZNWL);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__ZNWL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__ZNWL);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__ZNWL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__ZNWL);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__ZNWL);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__ZNWL);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__ZNWL);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__ZNWL);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__ZNWL);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__ZNWL);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__ZNWL);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__ZNWL);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__ZNWL);
          } break;
          };
          __tmp__0NWL=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
          switch (((struct ___OBJ *)__tmp__0NWL)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__0NWL);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__0NWL);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__5QCQ=((__READ_LOCAL *)__tmp__0NWL);
            unread__YVJK(Self__5QCQ->local__ALZD,Self__5QCQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__0NWL);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__0NWL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__0NWL);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__BRCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0NWL)->receiver__OO2H);
            unread__YVJK(Self__BRCQ->local__ALZD,Self__BRCQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__0NWL);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__0NWL);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__0NWL);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__0NWL);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__0NWL);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__0NWL);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__0NWL);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__0NWL);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__0NWL);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__0NWL);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__0NWL);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__0NWL);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__0NWL);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__0NWL);
          } break;
          case __READ_GLOBAL__: {
            Self__CRCQ=((__READ_GLOBAL *)__tmp__0NWL);
            unread__15ML(Self__CRCQ->global__RHJK,Self__CRCQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__0NWL);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__0NWL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__0NWL);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__0NWL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__0NWL);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__0NWL);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__0NWL);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__0NWL);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__0NWL);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__0NWL);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__0NWL);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__0NWL);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__0NWL);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__0NWL);
          } break;
          };
        };
      };
    };
    result__4CBL=result__ILWL;
    if ((((void *)result__ILWL == (void *)NULL) && ((void *)__tmp__LDBL != (void *)NULL))) {
      result__SKOM=NULL;
      if ((((__INTEGER_CST *)__tmp__LDBL)->value__PAZD ==  0)) {
        result__SKOM=__tmp__LDBL;
        __tmp__ZKOM=Self__2CBL->parent_expr_binary__NCKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__ZKOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__ZKOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__ZKOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__DRCQ=((__READ_LOCAL *)__tmp__ZKOM);
          unread__YVJK(Self__DRCQ->local__ALZD,Self__DRCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__ZKOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__ZKOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__ZKOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__FRCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZKOM)->receiver__OO2H);
          unread__YVJK(Self__FRCQ->local__ALZD,Self__FRCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__ZKOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__ZKOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__ZKOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__ZKOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__ZKOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__ZKOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__ZKOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__ZKOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__ZKOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__ZKOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__ZKOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__ZKOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__ZKOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__ZKOM);
        } break;
        case __READ_GLOBAL__: {
          Self__GRCQ=((__READ_GLOBAL *)__tmp__ZKOM);
          unread__15ML(Self__GRCQ->global__RHJK,Self__GRCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__ZKOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__ZKOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__ZKOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__ZKOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__ZKOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__ZKOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__ZKOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__ZKOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__ZKOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__ZKOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__ZKOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__ZKOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__ZKOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__ZKOM);
        } break;
        };
      };
      result__4CBL=result__SKOM;
    };
    if ((((void *)result__4CBL == (void *)NULL) && ((void *)__tmp__ODBL != (void *)NULL))) {
      result__4CBL=NULL;
    };
  };
  if (((void *)result__4CBL == (void *)NULL)) {
    result__4CBL=Self__2CBL;
  } else {
    __tmp__CHBL=Self__2CBL->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__4CBL)->__id) {
    case __LIST__: {
      ((__LIST *)result__4CBL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__4CBL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__4CBL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__4CBL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__4CBL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__4CBL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__4CBL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__4CBL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__4CBL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__4CBL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__4CBL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__4CBL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__4CBL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__4CBL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__4CBL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__4CBL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__4CBL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__4CBL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__4CBL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__4CBL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__4CBL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__4CBL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __CAST__: {
      ((__CAST *)result__4CBL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__4CBL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__4CBL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__4CBL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__4CBL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__4CBL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__4CBL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__4CBL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__4CBL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__4CBL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__4CBL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__4CBL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__4CBL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__4CBL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__4CBL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__4CBL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__4CBL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__4CBL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CHBL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__4CBL);
}

static void* execute_link__EHBL(__EXPR_AND *Self__FHBL)
// ({EXPR_AND}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__FVNM;
  __UINTEGER_32 old_seq__IHBL;
  void *__tmp__OHBL,*__tmp__PHBL,*__tmp__QHBL,*__tmp__RHBL,*__tmp__THBL;
  void *__tmp__WHBL,*result__HHBL,*result__3OWL,*result__LPWL;
  void *result__YPWL,*__tmp__ZPWL,*__tmp__0PWL,*__tmp__BQWL;
  void *result__FLOM,*__tmp__MLOM,*result__TLOM,*__tmp__0LOM;
  void *__tmp__UHBL,*left_cst__LHBL,*__tmp__XHBL,*right_cst__MHBL;
  __INTEGER_CST *Self__KGKQ;
  __READ_LOCAL *Self__3TCQ,*Self__5TCQ,*Self__BUCQ,*Self__DUCQ;
  __READ_LOCAL *Self__FUCQ,*Self__HUCQ;
  __READ_GLOBAL *Self__AUCQ,*Self__EUCQ,*Self__IUCQ;
  __POSITION __tmp__LLBL;
  __BOOLEAN __tmp__1PWL;
  old_seq__IHBL=seq_call_and_loop__VREJ;
  __tmp__OHBL=Self__FHBL->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__OHBL)->__id) {
  case __LIST__: {
    __tmp__PHBL=execute_link__LUOG(__tmp__OHBL);
  } break;
  case __STRING_CST__: {
    __tmp__PHBL=((__STRING_CST *)__tmp__OHBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__PHBL=execute_link__U5ZK(__tmp__OHBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__PHBL=((__PROTOTYPE_CST *)__tmp__OHBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__PHBL=((__INTEGER_CST *)__tmp__OHBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__PHBL=execute_link__EHAL(__tmp__OHBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PHBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PHBL=execute_link__2LAL(__tmp__OHBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PHBL=execute_link__FQAL(__tmp__OHBL);
  } break;
  case __REAL_CST__: {
    __tmp__PHBL=((__REAL_CST *)__tmp__OHBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__PHBL=((__CHARACTER_CST *)__tmp__OHBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__PHBL=execute_link__UUAL(__tmp__OHBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__PHBL=execute_link__1VAL(__tmp__OHBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__PHBL=execute_link__AWAL(__tmp__OHBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__PHBL=execute_link__J0AL(__tmp__OHBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__PHBL=execute_link__S4AL(__tmp__OHBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__PHBL=execute_link__1CBL(__tmp__OHBL);
  } break;
  case __EXPR_AND__: {
    __tmp__PHBL=execute_link__EHBL(__tmp__OHBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PHBL=execute_link__NLBL(__tmp__OHBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PHBL=execute_link__WPBL(__tmp__OHBL);
  } break;
  case __PUT_TO__: {
    __tmp__PHBL=execute_link__BOPK(__tmp__OHBL);
  } break;
  case __ITEM__: {
    __tmp__PHBL=execute_link__5TBL(__tmp__OHBL);
  } break;
  case __SIZE_OF__: {
    __tmp__PHBL=execute_link__GUBL(__tmp__OHBL);
  } break;
  case __CAST__: {
    __tmp__PHBL=execute_link__LUBL(__tmp__OHBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__PHBL=execute_link__A2TL(__tmp__OHBL);
  } break;
  case __READ_SLOT__: {
    __tmp__PHBL=execute_link__EYBL(__tmp__OHBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__PHBL=execute_link__U2BL(__tmp__OHBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PHBL=execute_link__SRZM(__tmp__OHBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PHBL=execute_link__OBFO(__tmp__OHBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PHBL=execute_link__GJLO(__tmp__OHBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PHBL=execute_link__HHFO(__tmp__OHBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PHBL=execute_link__KPLO(__tmp__OHBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__PHBL=execute_link__0GKM(__tmp__OHBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__PHBL=execute_link__RROL(__tmp__OHBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__PHBL=execute_link__GUZM(__tmp__OHBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__PHBL=execute_link__ANFO(__tmp__OHBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PHBL=execute_link__YLEP(__tmp__OHBL);
  } break;
  case __EXPR_INF__: {
    __tmp__PHBL=execute_link__VQQN(__tmp__OHBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PHBL=execute_link__4UQN(__tmp__OHBL);
  } break;
  case __EXPR_OR__: {
    __tmp__PHBL=execute_link__1HQN(__tmp__OHBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__PHBL=execute_link__IYUO(__tmp__OHBL);
  } break;
  };
  Self__FHBL->parent_expr_binary__ADKH.left__PP1H=__tmp__PHBL;
  __tmp__QHBL=Self__FHBL->parent_expr_binary__ADKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__QHBL)->__id) {
  case __LIST__: {
    __tmp__RHBL=execute_link__LUOG(__tmp__QHBL);
  } break;
  case __STRING_CST__: {
    __tmp__RHBL=((__STRING_CST *)__tmp__QHBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__RHBL=execute_link__U5ZK(__tmp__QHBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__RHBL=((__PROTOTYPE_CST *)__tmp__QHBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__RHBL=((__INTEGER_CST *)__tmp__QHBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__RHBL=execute_link__EHAL(__tmp__QHBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__RHBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__RHBL=execute_link__2LAL(__tmp__QHBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__RHBL=execute_link__FQAL(__tmp__QHBL);
  } break;
  case __REAL_CST__: {
    __tmp__RHBL=((__REAL_CST *)__tmp__QHBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__RHBL=((__CHARACTER_CST *)__tmp__QHBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__RHBL=execute_link__UUAL(__tmp__QHBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__RHBL=execute_link__1VAL(__tmp__QHBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__RHBL=execute_link__AWAL(__tmp__QHBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__RHBL=execute_link__J0AL(__tmp__QHBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__RHBL=execute_link__S4AL(__tmp__QHBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__RHBL=execute_link__1CBL(__tmp__QHBL);
  } break;
  case __EXPR_AND__: {
    __tmp__RHBL=execute_link__EHBL(__tmp__QHBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__RHBL=execute_link__NLBL(__tmp__QHBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__RHBL=execute_link__WPBL(__tmp__QHBL);
  } break;
  case __PUT_TO__: {
    __tmp__RHBL=execute_link__BOPK(__tmp__QHBL);
  } break;
  case __ITEM__: {
    __tmp__RHBL=execute_link__5TBL(__tmp__QHBL);
  } break;
  case __SIZE_OF__: {
    __tmp__RHBL=execute_link__GUBL(__tmp__QHBL);
  } break;
  case __CAST__: {
    __tmp__RHBL=execute_link__LUBL(__tmp__QHBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__RHBL=execute_link__A2TL(__tmp__QHBL);
  } break;
  case __READ_SLOT__: {
    __tmp__RHBL=execute_link__EYBL(__tmp__QHBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__RHBL=execute_link__U2BL(__tmp__QHBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__RHBL=execute_link__SRZM(__tmp__QHBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__RHBL=execute_link__OBFO(__tmp__QHBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__RHBL=execute_link__GJLO(__tmp__QHBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__RHBL=execute_link__HHFO(__tmp__QHBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__RHBL=execute_link__KPLO(__tmp__QHBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__RHBL=execute_link__0GKM(__tmp__QHBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__RHBL=execute_link__RROL(__tmp__QHBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__RHBL=execute_link__GUZM(__tmp__QHBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__RHBL=execute_link__ANFO(__tmp__QHBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__RHBL=execute_link__YLEP(__tmp__QHBL);
  } break;
  case __EXPR_INF__: {
    __tmp__RHBL=execute_link__VQQN(__tmp__QHBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__RHBL=execute_link__4UQN(__tmp__QHBL);
  } break;
  case __EXPR_OR__: {
    __tmp__RHBL=execute_link__1HQN(__tmp__QHBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__RHBL=execute_link__IYUO(__tmp__QHBL);
  } break;
  };
  Self__FHBL->parent_expr_binary__ADKH.right__OP2H=__tmp__RHBL;
  __tmp__THBL=Self__FHBL->parent_expr_binary__ADKH.left__PP1H;
  if (__tmp__THBL==NULL) {
    __tmp__UHBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__THBL)->__id) {
    case __LIST__: {
      __tmp__UHBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__UHBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__UHBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__UHBL=((void *)__tmp__THBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__UHBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__UHBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__UHBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__UHBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__UHBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__UHBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__UHBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__UHBL=NULL;
    } break;
    case __CAST__: {
      __tmp__UHBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__UHBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__UHBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__UHBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__UHBL=NULL;
    } break;
    }
  };
  left_cst__LHBL=__tmp__UHBL;
  __tmp__WHBL=Self__FHBL->parent_expr_binary__ADKH.right__OP2H;
  if (__tmp__WHBL==NULL) {
    __tmp__XHBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__WHBL)->__id) {
    case __LIST__: {
      __tmp__XHBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__XHBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__XHBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__XHBL=((void *)__tmp__WHBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__XHBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__XHBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__XHBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__XHBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__XHBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__XHBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__XHBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__XHBL=NULL;
    } break;
    case __CAST__: {
      __tmp__XHBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__XHBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__XHBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__XHBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__XHBL=NULL;
    } break;
    }
  };
  right_cst__MHBL=__tmp__XHBL;
  result__HHBL=NULL;
  if (((void *)__tmp__UHBL != (void *)NULL)) {
    result__3OWL=NULL;
    if (is_saturated__13QN(__tmp__UHBL)) {
      result__3OWL=Self__FHBL->parent_expr_binary__ADKH.right__OP2H;
    };
    result__HHBL=result__3OWL;
  };
  if ((((void *)result__HHBL == (void *)NULL) && ((void *)__tmp__XHBL != (void *)NULL))) {
    result__LPWL=NULL;
    if (is_saturated__13QN(__tmp__XHBL)) {
      result__LPWL=Self__FHBL->parent_expr_binary__ADKH.left__PP1H;
    };
    result__HHBL=result__LPWL;
  };
  if (((((void *)result__HHBL == (void *)NULL) && ((void *)__tmp__XHBL != (void *)NULL)) && ((void *)__tmp__UHBL != (void *)NULL))) {
    __tmp__FVNM=((__INTEGER_CST *)__tmp__UHBL)->value__PAZD;
    Self__KGKQ=((__INTEGER_CST *)__tmp__UHBL);
    Self__KGKQ->value__PAZD=(__INTEGER_64)(__tmp__FVNM & ((__INTEGER_CST *)__tmp__XHBL)->value__PAZD);
    check_type__RI5D(Self__KGKQ);
    result__HHBL=__tmp__UHBL;
  };
  if ((((void *)result__HHBL == (void *)NULL) && (old_seq__IHBL == seq_call_and_loop__VREJ))) {
    result__YPWL=NULL;
    __tmp__ZPWL=Self__FHBL->parent_expr_binary__ADKH.left__PP1H;
    __tmp__0PWL=Self__FHBL->parent_expr_binary__ADKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__ZPWL)->__id) {
    case __LIST__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__1PWL=__infix_equal_equal__WF1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXTERNAL_C__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__1PWL=__infix_equal_equal__LG1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __INTEGER_CST__: {
      __tmp__1PWL=__infix_equal_equal__2G1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __READ_LOCAL__: {
      __tmp__1PWL=__infix_equal_equal__WH1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__1PWL=__infix_equal_equal__MI1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__1PWL=__infix_equal_equal__IJ1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __REAL_CST__: {
      __tmp__1PWL=__infix_equal_equal__EK1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __CHARACTER_CST__: {
      __tmp__1PWL=__infix_equal_equal__4K1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __IS_EXPANDED__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__1PWL=__infix_equal_equal__XL1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_SUB__: {
      __tmp__1PWL=__infix_equal_equal__TM1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_MUL__: {
      __tmp__1PWL=__infix_equal_equal__PN1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_DIV__: {
      __tmp__1PWL=__infix_equal_equal__LO1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_AND__: {
      __tmp__1PWL=__infix_equal_equal__HP1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__1PWL=__infix_equal_equal__DQ1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__1PWL=__infix_equal_equal__5Q1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __PUT_TO__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__1PWL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__1PWL=__infix_equal_equal__LS1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __READ_GLOBAL__: {
      __tmp__1PWL=__infix_equal_equal__HT1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__1PWL=__infix_equal_equal__CZHO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__1PWL=__infix_equal_equal__SXFO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__1PWL=__infix_equal_equal__TBMO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__1PWL=__infix_equal_equal__OYFO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__1PWL=__infix_equal_equal__QCMO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_NEG__: {
      __tmp__1PWL=__infix_equal_equal__J5KM(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_ADD__: {
      __tmp__1PWL=__infix_equal_equal__ZT1L(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_NOT__: {
      __tmp__1PWL=__infix_equal_equal__QB0M(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_MOD__: {
      __tmp__1PWL=__infix_equal_equal__KZFO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__1PWL=__infix_equal_equal__OTEP(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_INF__: {
      __tmp__1PWL=__infix_equal_equal__UZHO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__1PWL=__infix_equal_equal__Q0HO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_OR__: {
      __tmp__1PWL=__infix_equal_equal__32QN(__tmp__ZPWL,__tmp__0PWL);
    } break;
    case __EXPR_XOR__: {
      __tmp__1PWL=__infix_equal_equal__GOVO(__tmp__ZPWL,__tmp__0PWL);
    } break;
    };
    if (__tmp__1PWL) {
      __tmp__BQWL=Self__FHBL->parent_expr_binary__ADKH.right__OP2H;
      switch (((struct ___OBJ *)__tmp__BQWL)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__BQWL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__BQWL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__3TCQ=((__READ_LOCAL *)__tmp__BQWL);
        unread__YVJK(Self__3TCQ->local__ALZD,Self__3TCQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__BQWL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__BQWL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__BQWL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__5TCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BQWL)->receiver__OO2H);
        unread__YVJK(Self__5TCQ->local__ALZD,Self__5TCQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__BQWL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__BQWL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__BQWL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__BQWL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__BQWL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__BQWL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__BQWL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__BQWL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__BQWL);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__BQWL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__BQWL);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__BQWL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__BQWL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__BQWL);
      } break;
      case __READ_GLOBAL__: {
        Self__AUCQ=((__READ_GLOBAL *)__tmp__BQWL);
        unread__15ML(Self__AUCQ->global__RHJK,Self__AUCQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__BQWL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__BQWL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__BQWL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__BQWL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__BQWL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__BQWL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__BQWL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__BQWL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__BQWL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__BQWL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__BQWL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__BQWL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__BQWL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__BQWL);
      } break;
      };
      result__YPWL=Self__FHBL->parent_expr_binary__ADKH.left__PP1H;
    };
    result__HHBL=result__YPWL;
    if ((((void *)result__YPWL == (void *)NULL) && ((void *)__tmp__UHBL != (void *)NULL))) {
      result__FLOM=NULL;
      if ((((__INTEGER_CST *)__tmp__UHBL)->value__PAZD ==  0)) {
        result__FLOM=__tmp__UHBL;
        __tmp__MLOM=Self__FHBL->parent_expr_binary__ADKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__MLOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__MLOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__MLOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__BUCQ=((__READ_LOCAL *)__tmp__MLOM);
          unread__YVJK(Self__BUCQ->local__ALZD,Self__BUCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__MLOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__MLOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__MLOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__DUCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MLOM)->receiver__OO2H);
          unread__YVJK(Self__DUCQ->local__ALZD,Self__DUCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__MLOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__MLOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__MLOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__MLOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__MLOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__MLOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__MLOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__MLOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__MLOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__MLOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__MLOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__MLOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__MLOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__MLOM);
        } break;
        case __READ_GLOBAL__: {
          Self__EUCQ=((__READ_GLOBAL *)__tmp__MLOM);
          unread__15ML(Self__EUCQ->global__RHJK,Self__EUCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__MLOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__MLOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__MLOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__MLOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__MLOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__MLOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__MLOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__MLOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__MLOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__MLOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__MLOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__MLOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__MLOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__MLOM);
        } break;
        };
      };
      result__HHBL=result__FLOM;
    };
    if ((((void *)result__HHBL == (void *)NULL) && ((void *)__tmp__XHBL != (void *)NULL))) {
      result__TLOM=NULL;
      if ((((__INTEGER_CST *)__tmp__XHBL)->value__PAZD ==  0)) {
        result__TLOM=__tmp__XHBL;
        __tmp__0LOM=Self__FHBL->parent_expr_binary__ADKH.left__PP1H;
        switch (((struct ___OBJ *)__tmp__0LOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__0LOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__0LOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__FUCQ=((__READ_LOCAL *)__tmp__0LOM);
          unread__YVJK(Self__FUCQ->local__ALZD,Self__FUCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__0LOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__0LOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__0LOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__HUCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0LOM)->receiver__OO2H);
          unread__YVJK(Self__HUCQ->local__ALZD,Self__HUCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__0LOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__0LOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__0LOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__0LOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__0LOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__0LOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__0LOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__0LOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__0LOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__0LOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__0LOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__0LOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__0LOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__0LOM);
        } break;
        case __READ_GLOBAL__: {
          Self__IUCQ=((__READ_GLOBAL *)__tmp__0LOM);
          unread__15ML(Self__IUCQ->global__RHJK,Self__IUCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__0LOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__0LOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__0LOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__0LOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__0LOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__0LOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__0LOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__0LOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__0LOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__0LOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__0LOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__0LOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__0LOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__0LOM);
        } break;
        };
      };
      result__HHBL=result__TLOM;
    };
  };
  if (((void *)result__HHBL == (void *)NULL)) {
    result__HHBL=Self__FHBL;
  } else {
    __tmp__LLBL=Self__FHBL->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__HHBL)->__id) {
    case __LIST__: {
      ((__LIST *)result__HHBL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__HHBL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__HHBL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__HHBL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__HHBL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__HHBL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__HHBL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__HHBL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__HHBL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__HHBL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__HHBL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__HHBL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__HHBL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__HHBL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__HHBL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__HHBL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__HHBL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__HHBL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__HHBL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__HHBL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__HHBL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__HHBL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __CAST__: {
      ((__CAST *)result__HHBL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__HHBL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__HHBL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__HHBL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__HHBL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__HHBL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__HHBL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__HHBL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__HHBL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__HHBL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__HHBL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__HHBL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__HHBL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__HHBL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__HHBL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__HHBL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__HHBL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__HHBL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__LLBL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__HHBL);
}

static void* execute_link__NLBL(__EXPR_SHIFT_R *Self__OLBL)
// ({EXPR_SHIFT_R}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__BWNM,__tmp__DWNM;
  __UINTEGER_32 old_seq__RLBL;
  void *__tmp__XLBL,*__tmp__YLBL,*__tmp__ZLBL,*__tmp__0LBL,*__tmp__2LBL;
  void *__tmp__5LBL,*result__QLBL,*result__IRWL,*result__BMOM;
  void *__tmp__IMOM,*__tmp__XMOM,*result__4MOM,*__tmp__ONOM;
  void *__tmp__3LBL,*left_cst__ULBL,*__tmp__AMBL,*right_cst__VLBL;
  __POSITION pos__OGKQ,pos__SPVM,__tmp__UPBL;
  __INTEGER_CST *Self__RGKQ,*Self__TGKQ,*Self__YGKQ,*Self__KR2Q;
  __READ_LOCAL *Self__BXCQ,*Self__DXCQ,*Self__GXCQ,*Self__IXCQ;
  __READ_LOCAL *Self__OXCQ,*Self__QXCQ;
  __READ_GLOBAL *Self__EXCQ,*Self__JXCQ,*Self__RXCQ;
  __BOOLEAN __tmp__KMOM;
  old_seq__RLBL=seq_call_and_loop__VREJ;
  __tmp__XLBL=Self__OLBL->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__XLBL)->__id) {
  case __LIST__: {
    __tmp__YLBL=execute_link__LUOG(__tmp__XLBL);
  } break;
  case __STRING_CST__: {
    __tmp__YLBL=((__STRING_CST *)__tmp__XLBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__YLBL=execute_link__U5ZK(__tmp__XLBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__YLBL=((__PROTOTYPE_CST *)__tmp__XLBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__YLBL=((__INTEGER_CST *)__tmp__XLBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__YLBL=execute_link__EHAL(__tmp__XLBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__YLBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__YLBL=execute_link__2LAL(__tmp__XLBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__YLBL=execute_link__FQAL(__tmp__XLBL);
  } break;
  case __REAL_CST__: {
    __tmp__YLBL=((__REAL_CST *)__tmp__XLBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__YLBL=((__CHARACTER_CST *)__tmp__XLBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__YLBL=execute_link__UUAL(__tmp__XLBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__YLBL=execute_link__1VAL(__tmp__XLBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__YLBL=execute_link__AWAL(__tmp__XLBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__YLBL=execute_link__J0AL(__tmp__XLBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__YLBL=execute_link__S4AL(__tmp__XLBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__YLBL=execute_link__1CBL(__tmp__XLBL);
  } break;
  case __EXPR_AND__: {
    __tmp__YLBL=execute_link__EHBL(__tmp__XLBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__YLBL=execute_link__NLBL(__tmp__XLBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__YLBL=execute_link__WPBL(__tmp__XLBL);
  } break;
  case __PUT_TO__: {
    __tmp__YLBL=execute_link__BOPK(__tmp__XLBL);
  } break;
  case __ITEM__: {
    __tmp__YLBL=execute_link__5TBL(__tmp__XLBL);
  } break;
  case __SIZE_OF__: {
    __tmp__YLBL=execute_link__GUBL(__tmp__XLBL);
  } break;
  case __CAST__: {
    __tmp__YLBL=execute_link__LUBL(__tmp__XLBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__YLBL=execute_link__A2TL(__tmp__XLBL);
  } break;
  case __READ_SLOT__: {
    __tmp__YLBL=execute_link__EYBL(__tmp__XLBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__YLBL=execute_link__U2BL(__tmp__XLBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__YLBL=execute_link__SRZM(__tmp__XLBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__YLBL=execute_link__OBFO(__tmp__XLBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__YLBL=execute_link__GJLO(__tmp__XLBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__YLBL=execute_link__HHFO(__tmp__XLBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__YLBL=execute_link__KPLO(__tmp__XLBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__YLBL=execute_link__0GKM(__tmp__XLBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__YLBL=execute_link__RROL(__tmp__XLBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__YLBL=execute_link__GUZM(__tmp__XLBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__YLBL=execute_link__ANFO(__tmp__XLBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__YLBL=execute_link__YLEP(__tmp__XLBL);
  } break;
  case __EXPR_INF__: {
    __tmp__YLBL=execute_link__VQQN(__tmp__XLBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__YLBL=execute_link__4UQN(__tmp__XLBL);
  } break;
  case __EXPR_OR__: {
    __tmp__YLBL=execute_link__1HQN(__tmp__XLBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__YLBL=execute_link__IYUO(__tmp__XLBL);
  } break;
  };
  Self__OLBL->parent_expr_binary__TDKH.left__PP1H=__tmp__YLBL;
  __tmp__ZLBL=Self__OLBL->parent_expr_binary__TDKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__ZLBL)->__id) {
  case __LIST__: {
    __tmp__0LBL=execute_link__LUOG(__tmp__ZLBL);
  } break;
  case __STRING_CST__: {
    __tmp__0LBL=((__STRING_CST *)__tmp__ZLBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__0LBL=execute_link__U5ZK(__tmp__ZLBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__0LBL=((__PROTOTYPE_CST *)__tmp__ZLBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__0LBL=((__INTEGER_CST *)__tmp__ZLBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__0LBL=execute_link__EHAL(__tmp__ZLBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__0LBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__0LBL=execute_link__2LAL(__tmp__ZLBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__0LBL=execute_link__FQAL(__tmp__ZLBL);
  } break;
  case __REAL_CST__: {
    __tmp__0LBL=((__REAL_CST *)__tmp__ZLBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__0LBL=((__CHARACTER_CST *)__tmp__ZLBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__0LBL=execute_link__UUAL(__tmp__ZLBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__0LBL=execute_link__1VAL(__tmp__ZLBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__0LBL=execute_link__AWAL(__tmp__ZLBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__0LBL=execute_link__J0AL(__tmp__ZLBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__0LBL=execute_link__S4AL(__tmp__ZLBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__0LBL=execute_link__1CBL(__tmp__ZLBL);
  } break;
  case __EXPR_AND__: {
    __tmp__0LBL=execute_link__EHBL(__tmp__ZLBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__0LBL=execute_link__NLBL(__tmp__ZLBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__0LBL=execute_link__WPBL(__tmp__ZLBL);
  } break;
  case __PUT_TO__: {
    __tmp__0LBL=execute_link__BOPK(__tmp__ZLBL);
  } break;
  case __ITEM__: {
    __tmp__0LBL=execute_link__5TBL(__tmp__ZLBL);
  } break;
  case __SIZE_OF__: {
    __tmp__0LBL=execute_link__GUBL(__tmp__ZLBL);
  } break;
  case __CAST__: {
    __tmp__0LBL=execute_link__LUBL(__tmp__ZLBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__0LBL=execute_link__A2TL(__tmp__ZLBL);
  } break;
  case __READ_SLOT__: {
    __tmp__0LBL=execute_link__EYBL(__tmp__ZLBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__0LBL=execute_link__U2BL(__tmp__ZLBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__0LBL=execute_link__SRZM(__tmp__ZLBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__0LBL=execute_link__OBFO(__tmp__ZLBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__0LBL=execute_link__GJLO(__tmp__ZLBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__0LBL=execute_link__HHFO(__tmp__ZLBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__0LBL=execute_link__KPLO(__tmp__ZLBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__0LBL=execute_link__0GKM(__tmp__ZLBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__0LBL=execute_link__RROL(__tmp__ZLBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__0LBL=execute_link__GUZM(__tmp__ZLBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__0LBL=execute_link__ANFO(__tmp__ZLBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__0LBL=execute_link__YLEP(__tmp__ZLBL);
  } break;
  case __EXPR_INF__: {
    __tmp__0LBL=execute_link__VQQN(__tmp__ZLBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__0LBL=execute_link__4UQN(__tmp__ZLBL);
  } break;
  case __EXPR_OR__: {
    __tmp__0LBL=execute_link__1HQN(__tmp__ZLBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__0LBL=execute_link__IYUO(__tmp__ZLBL);
  } break;
  };
  Self__OLBL->parent_expr_binary__TDKH.right__OP2H=__tmp__0LBL;
  __tmp__2LBL=Self__OLBL->parent_expr_binary__TDKH.left__PP1H;
  if (__tmp__2LBL==NULL) {
    __tmp__3LBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__2LBL)->__id) {
    case __LIST__: {
      __tmp__3LBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__3LBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__3LBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__3LBL=((void *)__tmp__2LBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3LBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__3LBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__3LBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__3LBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3LBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__3LBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__3LBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__3LBL=NULL;
    } break;
    case __CAST__: {
      __tmp__3LBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__3LBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__3LBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__3LBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__3LBL=NULL;
    } break;
    }
  };
  left_cst__ULBL=__tmp__3LBL;
  __tmp__5LBL=Self__OLBL->parent_expr_binary__TDKH.right__OP2H;
  if (__tmp__5LBL==NULL) {
    __tmp__AMBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__5LBL)->__id) {
    case __LIST__: {
      __tmp__AMBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__AMBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__AMBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__AMBL=((void *)__tmp__5LBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__AMBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__AMBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__AMBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__AMBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__AMBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__AMBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__AMBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__AMBL=NULL;
    } break;
    case __CAST__: {
      __tmp__AMBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__AMBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__AMBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__AMBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__AMBL=NULL;
    } break;
    }
  };
  right_cst__VLBL=__tmp__AMBL;
  result__QLBL=NULL;
  if (((void *)__tmp__3LBL != (void *)NULL)) {
    result__QLBL=NULL;
  };
  if ((((void *)result__QLBL == (void *)NULL) && ((void *)__tmp__AMBL != (void *)NULL))) {
    result__IRWL=NULL;
    if ((((__INTEGER_CST *)__tmp__AMBL)->value__PAZD ==  0)) {
      result__IRWL=Self__OLBL->parent_expr_binary__TDKH.left__PP1H;
    };
    result__QLBL=result__IRWL;
  };
  if (((((void *)result__QLBL == (void *)NULL) && ((void *)__tmp__AMBL != (void *)NULL)) && ((void *)__tmp__3LBL != (void *)NULL))) {
    if ((((__INTEGER_CST *)__tmp__AMBL)->value__PAZD <  0)) {
      pos__OGKQ=Self__OLBL->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      put_error__text__0AH( 2,(&__string_560));
      put_position__ECH(pos__OGKQ);
      send_error__2FH();
      Self__RGKQ=((__INTEGER_CST *)__tmp__3LBL);
      Self__RGKQ->value__PAZD= 0;
      check_type__RI5D(Self__RGKQ);
    } else {
      __tmp__BWNM=((__INTEGER_CST *)__tmp__3LBL)->value__PAZD;
      __tmp__DWNM=((__INTEGER_CST *)__tmp__AMBL)->value__PAZD;
      Self__TGKQ=((__INTEGER_CST *)__tmp__3LBL);
      Self__TGKQ->value__PAZD=(__INTEGER_64)(__tmp__BWNM >> ((__INTEGER )__tmp__DWNM));
      check_type__RI5D(Self__TGKQ);
    };
    result__QLBL=__tmp__3LBL;
  };
  if ((((void *)result__QLBL == (void *)NULL) && (old_seq__RLBL == seq_call_and_loop__VREJ))) {
    result__QLBL=NULL;
    if (((void *)__tmp__3LBL != (void *)NULL)) {
      result__BMOM=NULL;
      if ((((__INTEGER_CST *)__tmp__3LBL)->value__PAZD ==  0)) {
        result__BMOM=__tmp__3LBL;
        __tmp__IMOM=Self__OLBL->parent_expr_binary__TDKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__IMOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__IMOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__IMOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__BXCQ=((__READ_LOCAL *)__tmp__IMOM);
          unread__YVJK(Self__BXCQ->local__ALZD,Self__BXCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__IMOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__IMOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__IMOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__DXCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__IMOM)->receiver__OO2H);
          unread__YVJK(Self__DXCQ->local__ALZD,Self__DXCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__IMOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__IMOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__IMOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__IMOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__IMOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__IMOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__IMOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__IMOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__IMOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__IMOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__IMOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__IMOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__IMOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__IMOM);
        } break;
        case __READ_GLOBAL__: {
          Self__EXCQ=((__READ_GLOBAL *)__tmp__IMOM);
          unread__15ML(Self__EXCQ->global__RHJK,Self__EXCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__IMOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__IMOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__IMOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__IMOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__IMOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__IMOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__IMOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__IMOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__IMOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__IMOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__IMOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__IMOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__IMOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__IMOM);
        } break;
        };
        __tmp__KMOM=TRUE__;
      } else {
        __tmp__KMOM=FALSE__;
      };
      if ((! __tmp__KMOM)) {
        if ((((__INTEGER_CST *)__tmp__3LBL)->value__PAZD == (__INTEGER)(-  1))) {
          result__BMOM=__tmp__3LBL;
          __tmp__XMOM=Self__OLBL->parent_expr_binary__TDKH.right__OP2H;
          switch (((struct ___OBJ *)__tmp__XMOM)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__XMOM);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__XMOM);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__GXCQ=((__READ_LOCAL *)__tmp__XMOM);
            unread__YVJK(Self__GXCQ->local__ALZD,Self__GXCQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__XMOM);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__XMOM);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__XMOM);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__IXCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__XMOM)->receiver__OO2H);
            unread__YVJK(Self__IXCQ->local__ALZD,Self__IXCQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__XMOM);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__XMOM);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__XMOM);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__XMOM);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__XMOM);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__XMOM);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__XMOM);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__XMOM);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__XMOM);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__XMOM);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__XMOM);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__XMOM);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__XMOM);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__XMOM);
          } break;
          case __READ_GLOBAL__: {
            Self__JXCQ=((__READ_GLOBAL *)__tmp__XMOM);
            unread__15ML(Self__JXCQ->global__RHJK,Self__JXCQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__XMOM);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__XMOM);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__XMOM);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__XMOM);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__XMOM);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__XMOM);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__XMOM);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__XMOM);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__XMOM);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__XMOM);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__XMOM);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__XMOM);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__XMOM);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__XMOM);
          } break;
          };
        };
      };
      result__QLBL=result__BMOM;
    };
    if ((((void *)result__QLBL == (void *)NULL) && ((void *)__tmp__AMBL != (void *)NULL))) {
      result__4MOM=NULL;
      if ((((__INTEGER_CST *)__tmp__AMBL)->value__PAZD <  0)) {
        pos__SPVM=Self__OLBL->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        put_error__text__0AH( 2,(&__string_560));
        put_position__ECH(pos__SPVM);
        send_error__2FH();
        Self__YGKQ=((__INTEGER_CST *)__tmp__AMBL);
        Self__YGKQ->value__PAZD= 0;
        check_type__RI5D(Self__YGKQ);
        Self__KR2Q=((__INTEGER_CST *)__tmp__AMBL);
        Self__KR2Q->parent_constant__P3LC.static_type__F4YD=static_type__BQ1H(Self__OLBL);
        check_type__RI5D(Self__KR2Q);
        result__4MOM=__tmp__AMBL;
        __tmp__ONOM=Self__OLBL->parent_expr_binary__TDKH.left__PP1H;
        switch (((struct ___OBJ *)__tmp__ONOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__ONOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__ONOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__OXCQ=((__READ_LOCAL *)__tmp__ONOM);
          unread__YVJK(Self__OXCQ->local__ALZD,Self__OXCQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__ONOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__ONOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__ONOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__QXCQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ONOM)->receiver__OO2H);
          unread__YVJK(Self__QXCQ->local__ALZD,Self__QXCQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__ONOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__ONOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__ONOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__ONOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__ONOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__ONOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__ONOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__ONOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__ONOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__ONOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__ONOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__ONOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__ONOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__ONOM);
        } break;
        case __READ_GLOBAL__: {
          Self__RXCQ=((__READ_GLOBAL *)__tmp__ONOM);
          unread__15ML(Self__RXCQ->global__RHJK,Self__RXCQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__ONOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__ONOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__ONOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__ONOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__ONOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__ONOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__ONOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__ONOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__ONOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__ONOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__ONOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__ONOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__ONOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__ONOM);
        } break;
        };
      };
      result__QLBL=result__4MOM;
    };
  };
  if (((void *)result__QLBL == (void *)NULL)) {
    result__QLBL=Self__OLBL;
  } else {
    __tmp__UPBL=Self__OLBL->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__QLBL)->__id) {
    case __LIST__: {
      ((__LIST *)result__QLBL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__QLBL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__QLBL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__QLBL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__QLBL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__QLBL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__QLBL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__QLBL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__QLBL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__QLBL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__QLBL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__QLBL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__QLBL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__QLBL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__QLBL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__QLBL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__QLBL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__QLBL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__QLBL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__QLBL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__QLBL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__QLBL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __CAST__: {
      ((__CAST *)result__QLBL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__QLBL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__QLBL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__QLBL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__QLBL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__QLBL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__QLBL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__QLBL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__QLBL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__QLBL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__QLBL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__QLBL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__QLBL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__QLBL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__QLBL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__QLBL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__QLBL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__QLBL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UPBL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__QLBL);
}

static void* execute_link__WPBL(__EXPR_SHIFT_L *Self__XPBL)
// ({EXPR_SHIFT_L}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__AXNM,__tmp__CXNM;
  __UINTEGER_32 old_seq__0PBL;
  void *__tmp__AQBL,*__tmp__BQBL,*__tmp__CQBL,*__tmp__DQBL,*__tmp__FQBL;
  void *__tmp__IQBL,*result__ZPBL,*result__ZSWL,*result__VNOM;
  void *__tmp__2NOM,*result__DOOM,*__tmp__TOOM;
  void *__tmp__GQBL,*left_cst__3PBL,*__tmp__JQBL,*right_cst__4PBL;
  __POSITION pos__2GKQ,pos__QQVM,__tmp__3TBL;
  __INTEGER_CST *Self__5GKQ,*Self__BHKQ,*Self__GHKQ,*Self__MR2Q;
  __READ_LOCAL *Self__K0CQ,*Self__M0CQ,*Self__S0CQ,*Self__U0CQ;
  __READ_GLOBAL *Self__N0CQ,*Self__V0CQ;
  old_seq__0PBL=seq_call_and_loop__VREJ;
  __tmp__AQBL=Self__XPBL->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__AQBL)->__id) {
  case __LIST__: {
    __tmp__BQBL=execute_link__LUOG(__tmp__AQBL);
  } break;
  case __STRING_CST__: {
    __tmp__BQBL=((__STRING_CST *)__tmp__AQBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__BQBL=execute_link__U5ZK(__tmp__AQBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__BQBL=((__PROTOTYPE_CST *)__tmp__AQBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__BQBL=((__INTEGER_CST *)__tmp__AQBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__BQBL=execute_link__EHAL(__tmp__AQBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BQBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BQBL=execute_link__2LAL(__tmp__AQBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BQBL=execute_link__FQAL(__tmp__AQBL);
  } break;
  case __REAL_CST__: {
    __tmp__BQBL=((__REAL_CST *)__tmp__AQBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__BQBL=((__CHARACTER_CST *)__tmp__AQBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__BQBL=execute_link__UUAL(__tmp__AQBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BQBL=execute_link__1VAL(__tmp__AQBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__BQBL=execute_link__AWAL(__tmp__AQBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__BQBL=execute_link__J0AL(__tmp__AQBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__BQBL=execute_link__S4AL(__tmp__AQBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__BQBL=execute_link__1CBL(__tmp__AQBL);
  } break;
  case __EXPR_AND__: {
    __tmp__BQBL=execute_link__EHBL(__tmp__AQBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BQBL=execute_link__NLBL(__tmp__AQBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BQBL=execute_link__WPBL(__tmp__AQBL);
  } break;
  case __PUT_TO__: {
    __tmp__BQBL=execute_link__BOPK(__tmp__AQBL);
  } break;
  case __ITEM__: {
    __tmp__BQBL=execute_link__5TBL(__tmp__AQBL);
  } break;
  case __SIZE_OF__: {
    __tmp__BQBL=execute_link__GUBL(__tmp__AQBL);
  } break;
  case __CAST__: {
    __tmp__BQBL=execute_link__LUBL(__tmp__AQBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__BQBL=execute_link__A2TL(__tmp__AQBL);
  } break;
  case __READ_SLOT__: {
    __tmp__BQBL=execute_link__EYBL(__tmp__AQBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__BQBL=execute_link__U2BL(__tmp__AQBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BQBL=execute_link__SRZM(__tmp__AQBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BQBL=execute_link__OBFO(__tmp__AQBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BQBL=execute_link__GJLO(__tmp__AQBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BQBL=execute_link__HHFO(__tmp__AQBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BQBL=execute_link__KPLO(__tmp__AQBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__BQBL=execute_link__0GKM(__tmp__AQBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__BQBL=execute_link__RROL(__tmp__AQBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__BQBL=execute_link__GUZM(__tmp__AQBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__BQBL=execute_link__ANFO(__tmp__AQBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BQBL=execute_link__YLEP(__tmp__AQBL);
  } break;
  case __EXPR_INF__: {
    __tmp__BQBL=execute_link__VQQN(__tmp__AQBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BQBL=execute_link__4UQN(__tmp__AQBL);
  } break;
  case __EXPR_OR__: {
    __tmp__BQBL=execute_link__1HQN(__tmp__AQBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__BQBL=execute_link__IYUO(__tmp__AQBL);
  } break;
  };
  Self__XPBL->parent_expr_binary__GEKH.left__PP1H=__tmp__BQBL;
  __tmp__CQBL=Self__XPBL->parent_expr_binary__GEKH.right__OP2H;
  switch (((struct ___OBJ *)__tmp__CQBL)->__id) {
  case __LIST__: {
    __tmp__DQBL=execute_link__LUOG(__tmp__CQBL);
  } break;
  case __STRING_CST__: {
    __tmp__DQBL=((__STRING_CST *)__tmp__CQBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__DQBL=execute_link__U5ZK(__tmp__CQBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__DQBL=((__PROTOTYPE_CST *)__tmp__CQBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__DQBL=((__INTEGER_CST *)__tmp__CQBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__DQBL=execute_link__EHAL(__tmp__CQBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__DQBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__DQBL=execute_link__2LAL(__tmp__CQBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__DQBL=execute_link__FQAL(__tmp__CQBL);
  } break;
  case __REAL_CST__: {
    __tmp__DQBL=((__REAL_CST *)__tmp__CQBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__DQBL=((__CHARACTER_CST *)__tmp__CQBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__DQBL=execute_link__UUAL(__tmp__CQBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__DQBL=execute_link__1VAL(__tmp__CQBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__DQBL=execute_link__AWAL(__tmp__CQBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__DQBL=execute_link__J0AL(__tmp__CQBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__DQBL=execute_link__S4AL(__tmp__CQBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__DQBL=execute_link__1CBL(__tmp__CQBL);
  } break;
  case __EXPR_AND__: {
    __tmp__DQBL=execute_link__EHBL(__tmp__CQBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__DQBL=execute_link__NLBL(__tmp__CQBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__DQBL=execute_link__WPBL(__tmp__CQBL);
  } break;
  case __PUT_TO__: {
    __tmp__DQBL=execute_link__BOPK(__tmp__CQBL);
  } break;
  case __ITEM__: {
    __tmp__DQBL=execute_link__5TBL(__tmp__CQBL);
  } break;
  case __SIZE_OF__: {
    __tmp__DQBL=execute_link__GUBL(__tmp__CQBL);
  } break;
  case __CAST__: {
    __tmp__DQBL=execute_link__LUBL(__tmp__CQBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__DQBL=execute_link__A2TL(__tmp__CQBL);
  } break;
  case __READ_SLOT__: {
    __tmp__DQBL=execute_link__EYBL(__tmp__CQBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__DQBL=execute_link__U2BL(__tmp__CQBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__DQBL=execute_link__SRZM(__tmp__CQBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__DQBL=execute_link__OBFO(__tmp__CQBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__DQBL=execute_link__GJLO(__tmp__CQBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__DQBL=execute_link__HHFO(__tmp__CQBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__DQBL=execute_link__KPLO(__tmp__CQBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__DQBL=execute_link__0GKM(__tmp__CQBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__DQBL=execute_link__RROL(__tmp__CQBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__DQBL=execute_link__GUZM(__tmp__CQBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__DQBL=execute_link__ANFO(__tmp__CQBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__DQBL=execute_link__YLEP(__tmp__CQBL);
  } break;
  case __EXPR_INF__: {
    __tmp__DQBL=execute_link__VQQN(__tmp__CQBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__DQBL=execute_link__4UQN(__tmp__CQBL);
  } break;
  case __EXPR_OR__: {
    __tmp__DQBL=execute_link__1HQN(__tmp__CQBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__DQBL=execute_link__IYUO(__tmp__CQBL);
  } break;
  };
  Self__XPBL->parent_expr_binary__GEKH.right__OP2H=__tmp__DQBL;
  __tmp__FQBL=Self__XPBL->parent_expr_binary__GEKH.left__PP1H;
  if (__tmp__FQBL==NULL) {
    __tmp__GQBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__FQBL)->__id) {
    case __LIST__: {
      __tmp__GQBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__GQBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GQBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__GQBL=((void *)__tmp__FQBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GQBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__GQBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__GQBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__GQBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GQBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__GQBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__GQBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__GQBL=NULL;
    } break;
    case __CAST__: {
      __tmp__GQBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__GQBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__GQBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__GQBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__GQBL=NULL;
    } break;
    }
  };
  left_cst__3PBL=__tmp__GQBL;
  __tmp__IQBL=Self__XPBL->parent_expr_binary__GEKH.right__OP2H;
  if (__tmp__IQBL==NULL) {
    __tmp__JQBL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__IQBL)->__id) {
    case __LIST__: {
      __tmp__JQBL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__JQBL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JQBL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__JQBL=((void *)__tmp__IQBL);
    } break;
    case __READ_LOCAL__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JQBL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__JQBL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__JQBL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__JQBL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JQBL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__JQBL=NULL;
    } break;
    case __ITEM__: {
      __tmp__JQBL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__JQBL=NULL;
    } break;
    case __CAST__: {
      __tmp__JQBL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__JQBL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__JQBL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__JQBL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__JQBL=NULL;
    } break;
    }
  };
  right_cst__4PBL=__tmp__JQBL;
  result__ZPBL=NULL;
  if (((void *)__tmp__GQBL != (void *)NULL)) {
    result__ZPBL=NULL;
  };
  if ((((void *)result__ZPBL == (void *)NULL) && ((void *)__tmp__JQBL != (void *)NULL))) {
    result__ZSWL=NULL;
    if ((((__INTEGER_CST *)__tmp__JQBL)->value__PAZD ==  0)) {
      result__ZSWL=Self__XPBL->parent_expr_binary__GEKH.left__PP1H;
    };
    result__ZPBL=result__ZSWL;
  };
  if (((((void *)result__ZPBL == (void *)NULL) && ((void *)__tmp__JQBL != (void *)NULL)) && ((void *)__tmp__GQBL != (void *)NULL))) {
    if ((((__INTEGER_CST *)__tmp__JQBL)->value__PAZD <  0)) {
      pos__2GKQ=Self__XPBL->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      put_error__text__0AH( 2,(&__string_561));
      put_position__ECH(pos__2GKQ);
      send_error__2FH();
      Self__5GKQ=((__INTEGER_CST *)__tmp__GQBL);
      Self__5GKQ->value__PAZD= 0;
      check_type__RI5D(Self__5GKQ);
    } else {
      __tmp__AXNM=((__INTEGER_CST *)__tmp__GQBL)->value__PAZD;
      __tmp__CXNM=((__INTEGER_CST *)__tmp__JQBL)->value__PAZD;
      Self__BHKQ=((__INTEGER_CST *)__tmp__GQBL);
      Self__BHKQ->value__PAZD=(__INTEGER_64)(__tmp__AXNM << ((__INTEGER )__tmp__CXNM));
      check_type__RI5D(Self__BHKQ);
    };
    result__ZPBL=__tmp__GQBL;
  };
  if ((((void *)result__ZPBL == (void *)NULL) && (old_seq__0PBL == seq_call_and_loop__VREJ))) {
    result__ZPBL=NULL;
    if (((void *)__tmp__GQBL != (void *)NULL)) {
      result__VNOM=NULL;
      if ((((__INTEGER_CST *)__tmp__GQBL)->value__PAZD ==  0)) {
        result__VNOM=__tmp__GQBL;
        __tmp__2NOM=Self__XPBL->parent_expr_binary__GEKH.right__OP2H;
        switch (((struct ___OBJ *)__tmp__2NOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__2NOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__2NOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__K0CQ=((__READ_LOCAL *)__tmp__2NOM);
          unread__YVJK(Self__K0CQ->local__ALZD,Self__K0CQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__2NOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__2NOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__2NOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__M0CQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2NOM)->receiver__OO2H);
          unread__YVJK(Self__M0CQ->local__ALZD,Self__M0CQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__2NOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__2NOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__2NOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__2NOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__2NOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__2NOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__2NOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__2NOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__2NOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__2NOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__2NOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__2NOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__2NOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__2NOM);
        } break;
        case __READ_GLOBAL__: {
          Self__N0CQ=((__READ_GLOBAL *)__tmp__2NOM);
          unread__15ML(Self__N0CQ->global__RHJK,Self__N0CQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__2NOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__2NOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__2NOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__2NOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__2NOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__2NOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__2NOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__2NOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__2NOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__2NOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__2NOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__2NOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__2NOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__2NOM);
        } break;
        };
      };
      result__ZPBL=result__VNOM;
    };
    if ((((void *)result__ZPBL == (void *)NULL) && ((void *)__tmp__JQBL != (void *)NULL))) {
      result__DOOM=NULL;
      if ((((__INTEGER_CST *)__tmp__JQBL)->value__PAZD <  0)) {
        pos__QQVM=Self__XPBL->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        put_error__text__0AH( 2,(&__string_561));
        put_position__ECH(pos__QQVM);
        send_error__2FH();
        Self__GHKQ=((__INTEGER_CST *)__tmp__JQBL);
        Self__GHKQ->value__PAZD= 0;
        check_type__RI5D(Self__GHKQ);
        Self__MR2Q=((__INTEGER_CST *)__tmp__JQBL);
        Self__MR2Q->parent_constant__P3LC.static_type__F4YD=static_type__GQ1H(Self__XPBL);
        check_type__RI5D(Self__MR2Q);
        result__DOOM=__tmp__JQBL;
        __tmp__TOOM=Self__XPBL->parent_expr_binary__GEKH.left__PP1H;
        switch (((struct ___OBJ *)__tmp__TOOM)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__TOOM);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__TOOM);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__S0CQ=((__READ_LOCAL *)__tmp__TOOM);
          unread__YVJK(Self__S0CQ->local__ALZD,Self__S0CQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__TOOM);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__TOOM);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__TOOM);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__U0CQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__TOOM)->receiver__OO2H);
          unread__YVJK(Self__U0CQ->local__ALZD,Self__U0CQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__TOOM);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__TOOM);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__TOOM);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__TOOM);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__TOOM);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__TOOM);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__TOOM);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__TOOM);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__TOOM);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__TOOM);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__TOOM);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__TOOM);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__TOOM);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__TOOM);
        } break;
        case __READ_GLOBAL__: {
          Self__V0CQ=((__READ_GLOBAL *)__tmp__TOOM);
          unread__15ML(Self__V0CQ->global__RHJK,Self__V0CQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__TOOM);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__TOOM);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__TOOM);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__TOOM);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__TOOM);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__TOOM);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__TOOM);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__TOOM);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__TOOM);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__TOOM);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__TOOM);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__TOOM);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__TOOM);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__TOOM);
        } break;
        };
      };
      result__ZPBL=result__DOOM;
    };
  };
  if (((void *)result__ZPBL == (void *)NULL)) {
    result__ZPBL=Self__XPBL;
  } else {
    __tmp__3TBL=Self__XPBL->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__ZPBL)->__id) {
    case __LIST__: {
      ((__LIST *)result__ZPBL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__ZPBL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__ZPBL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__ZPBL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__ZPBL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__ZPBL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__ZPBL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__ZPBL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__ZPBL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__ZPBL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__ZPBL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__ZPBL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__ZPBL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__ZPBL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__ZPBL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__ZPBL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__ZPBL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__ZPBL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__ZPBL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__ZPBL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__ZPBL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__ZPBL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __CAST__: {
      ((__CAST *)result__ZPBL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__ZPBL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__ZPBL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__ZPBL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__ZPBL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__ZPBL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__ZPBL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__ZPBL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__ZPBL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__ZPBL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__ZPBL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__ZPBL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__ZPBL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__ZPBL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__ZPBL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__ZPBL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__ZPBL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__ZPBL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__3TBL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__ZPBL);
}

static void* execute_link__5TBL(__ITEM *Self__AUBL)
// ({ITEM}) With resultRecursive, No inlinable.
{
  void *__tmp__CUBL,*__tmp__DUBL,*__tmp__EUBL,*__tmp__FUBL;
  __tmp__CUBL=Self__AUBL->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__CUBL)->__id) {
  case __LIST__: {
    __tmp__DUBL=execute_link__LUOG(__tmp__CUBL);
  } break;
  case __STRING_CST__: {
    __tmp__DUBL=((__STRING_CST *)__tmp__CUBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__DUBL=execute_link__U5ZK(__tmp__CUBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__DUBL=((__PROTOTYPE_CST *)__tmp__CUBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__DUBL=((__INTEGER_CST *)__tmp__CUBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__DUBL=execute_link__EHAL(__tmp__CUBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__DUBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__DUBL=execute_link__2LAL(__tmp__CUBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__DUBL=execute_link__FQAL(__tmp__CUBL);
  } break;
  case __REAL_CST__: {
    __tmp__DUBL=((__REAL_CST *)__tmp__CUBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__DUBL=((__CHARACTER_CST *)__tmp__CUBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__DUBL=execute_link__UUAL(__tmp__CUBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__DUBL=execute_link__1VAL(__tmp__CUBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__DUBL=execute_link__AWAL(__tmp__CUBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__DUBL=execute_link__J0AL(__tmp__CUBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__DUBL=execute_link__S4AL(__tmp__CUBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__DUBL=execute_link__1CBL(__tmp__CUBL);
  } break;
  case __EXPR_AND__: {
    __tmp__DUBL=execute_link__EHBL(__tmp__CUBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__DUBL=execute_link__NLBL(__tmp__CUBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__DUBL=execute_link__WPBL(__tmp__CUBL);
  } break;
  case __PUT_TO__: {
    __tmp__DUBL=execute_link__BOPK(__tmp__CUBL);
  } break;
  case __ITEM__: {
    __tmp__DUBL=execute_link__5TBL(__tmp__CUBL);
  } break;
  case __SIZE_OF__: {
    __tmp__DUBL=execute_link__GUBL(__tmp__CUBL);
  } break;
  case __CAST__: {
    __tmp__DUBL=execute_link__LUBL(__tmp__CUBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__DUBL=execute_link__A2TL(__tmp__CUBL);
  } break;
  case __READ_SLOT__: {
    __tmp__DUBL=execute_link__EYBL(__tmp__CUBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__DUBL=execute_link__U2BL(__tmp__CUBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__DUBL=execute_link__SRZM(__tmp__CUBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__DUBL=execute_link__OBFO(__tmp__CUBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__DUBL=execute_link__GJLO(__tmp__CUBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__DUBL=execute_link__HHFO(__tmp__CUBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__DUBL=execute_link__KPLO(__tmp__CUBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__DUBL=execute_link__0GKM(__tmp__CUBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__DUBL=execute_link__RROL(__tmp__CUBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__DUBL=execute_link__GUZM(__tmp__CUBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__DUBL=execute_link__ANFO(__tmp__CUBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__DUBL=execute_link__YLEP(__tmp__CUBL);
  } break;
  case __EXPR_INF__: {
    __tmp__DUBL=execute_link__VQQN(__tmp__CUBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__DUBL=execute_link__4UQN(__tmp__CUBL);
  } break;
  case __EXPR_OR__: {
    __tmp__DUBL=execute_link__1HQN(__tmp__CUBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__DUBL=execute_link__IYUO(__tmp__CUBL);
  } break;
  };
  Self__AUBL->receiver__TQ1H=__tmp__DUBL;
  __tmp__EUBL=Self__AUBL->index__CS2H;
  switch (((struct ___OBJ *)__tmp__EUBL)->__id) {
  case __LIST__: {
    __tmp__FUBL=execute_link__LUOG(__tmp__EUBL);
  } break;
  case __STRING_CST__: {
    __tmp__FUBL=((__STRING_CST *)__tmp__EUBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__FUBL=execute_link__U5ZK(__tmp__EUBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__FUBL=((__PROTOTYPE_CST *)__tmp__EUBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__FUBL=((__INTEGER_CST *)__tmp__EUBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__FUBL=execute_link__EHAL(__tmp__EUBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FUBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FUBL=execute_link__2LAL(__tmp__EUBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FUBL=execute_link__FQAL(__tmp__EUBL);
  } break;
  case __REAL_CST__: {
    __tmp__FUBL=((__REAL_CST *)__tmp__EUBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__FUBL=((__CHARACTER_CST *)__tmp__EUBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__FUBL=execute_link__UUAL(__tmp__EUBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FUBL=execute_link__1VAL(__tmp__EUBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__FUBL=execute_link__AWAL(__tmp__EUBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__FUBL=execute_link__J0AL(__tmp__EUBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__FUBL=execute_link__S4AL(__tmp__EUBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__FUBL=execute_link__1CBL(__tmp__EUBL);
  } break;
  case __EXPR_AND__: {
    __tmp__FUBL=execute_link__EHBL(__tmp__EUBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FUBL=execute_link__NLBL(__tmp__EUBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FUBL=execute_link__WPBL(__tmp__EUBL);
  } break;
  case __PUT_TO__: {
    __tmp__FUBL=execute_link__BOPK(__tmp__EUBL);
  } break;
  case __ITEM__: {
    __tmp__FUBL=execute_link__5TBL(__tmp__EUBL);
  } break;
  case __SIZE_OF__: {
    __tmp__FUBL=execute_link__GUBL(__tmp__EUBL);
  } break;
  case __CAST__: {
    __tmp__FUBL=execute_link__LUBL(__tmp__EUBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__FUBL=execute_link__A2TL(__tmp__EUBL);
  } break;
  case __READ_SLOT__: {
    __tmp__FUBL=execute_link__EYBL(__tmp__EUBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__FUBL=execute_link__U2BL(__tmp__EUBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FUBL=execute_link__SRZM(__tmp__EUBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FUBL=execute_link__OBFO(__tmp__EUBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FUBL=execute_link__GJLO(__tmp__EUBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FUBL=execute_link__HHFO(__tmp__EUBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FUBL=execute_link__KPLO(__tmp__EUBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__FUBL=execute_link__0GKM(__tmp__EUBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__FUBL=execute_link__RROL(__tmp__EUBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__FUBL=execute_link__GUZM(__tmp__EUBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__FUBL=execute_link__ANFO(__tmp__EUBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FUBL=execute_link__YLEP(__tmp__EUBL);
  } break;
  case __EXPR_INF__: {
    __tmp__FUBL=execute_link__VQQN(__tmp__EUBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FUBL=execute_link__4UQN(__tmp__EUBL);
  } break;
  case __EXPR_OR__: {
    __tmp__FUBL=execute_link__1HQN(__tmp__EUBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__FUBL=execute_link__IYUO(__tmp__EUBL);
  } break;
  };
  Self__AUBL->index__CS2H=__tmp__FUBL;
  return(Self__AUBL);
}

static void* execute_link__GUBL(__SIZE_OF *Self__HUBL)
// ({SIZE_OF}) With resultRecursive, No inlinable.
{
  void *__tmp__JUBL,*__tmp__KUBL;
  __tmp__JUBL=Self__HUBL->receiver__LS2H;
  switch (((struct ___OBJ *)__tmp__JUBL)->__id) {
  case __LIST__: {
    __tmp__KUBL=execute_link__LUOG(__tmp__JUBL);
  } break;
  case __STRING_CST__: {
    __tmp__KUBL=((__STRING_CST *)__tmp__JUBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__KUBL=execute_link__U5ZK(__tmp__JUBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__KUBL=((__PROTOTYPE_CST *)__tmp__JUBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__KUBL=((__INTEGER_CST *)__tmp__JUBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__KUBL=execute_link__EHAL(__tmp__JUBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KUBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KUBL=execute_link__2LAL(__tmp__JUBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KUBL=execute_link__FQAL(__tmp__JUBL);
  } break;
  case __REAL_CST__: {
    __tmp__KUBL=((__REAL_CST *)__tmp__JUBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__KUBL=((__CHARACTER_CST *)__tmp__JUBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__KUBL=execute_link__UUAL(__tmp__JUBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__KUBL=execute_link__1VAL(__tmp__JUBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__KUBL=execute_link__AWAL(__tmp__JUBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__KUBL=execute_link__J0AL(__tmp__JUBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__KUBL=execute_link__S4AL(__tmp__JUBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__KUBL=execute_link__1CBL(__tmp__JUBL);
  } break;
  case __EXPR_AND__: {
    __tmp__KUBL=execute_link__EHBL(__tmp__JUBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KUBL=execute_link__NLBL(__tmp__JUBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KUBL=execute_link__WPBL(__tmp__JUBL);
  } break;
  case __PUT_TO__: {
    __tmp__KUBL=execute_link__BOPK(__tmp__JUBL);
  } break;
  case __ITEM__: {
    __tmp__KUBL=execute_link__5TBL(__tmp__JUBL);
  } break;
  case __SIZE_OF__: {
    __tmp__KUBL=execute_link__GUBL(__tmp__JUBL);
  } break;
  case __CAST__: {
    __tmp__KUBL=execute_link__LUBL(__tmp__JUBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__KUBL=execute_link__A2TL(__tmp__JUBL);
  } break;
  case __READ_SLOT__: {
    __tmp__KUBL=execute_link__EYBL(__tmp__JUBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__KUBL=execute_link__U2BL(__tmp__JUBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KUBL=execute_link__SRZM(__tmp__JUBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KUBL=execute_link__OBFO(__tmp__JUBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KUBL=execute_link__GJLO(__tmp__JUBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KUBL=execute_link__HHFO(__tmp__JUBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KUBL=execute_link__KPLO(__tmp__JUBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__KUBL=execute_link__0GKM(__tmp__JUBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__KUBL=execute_link__RROL(__tmp__JUBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__KUBL=execute_link__GUZM(__tmp__JUBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__KUBL=execute_link__ANFO(__tmp__JUBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KUBL=execute_link__YLEP(__tmp__JUBL);
  } break;
  case __EXPR_INF__: {
    __tmp__KUBL=execute_link__VQQN(__tmp__JUBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KUBL=execute_link__4UQN(__tmp__JUBL);
  } break;
  case __EXPR_OR__: {
    __tmp__KUBL=execute_link__1HQN(__tmp__JUBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__KUBL=execute_link__IYUO(__tmp__JUBL);
  } break;
  };
  Self__HUBL->receiver__LS2H=__tmp__KUBL;
  return(Self__HUBL);
}

static void* execute_link__LUBL(__CAST *Self__MUBL)
// ({CAST}) With resultRecursive, No inlinable.
{
  void *int__PUBL,*__tmp__BWBL;
  void *lst_typ__QUBL;
  void *other__RUBL,*__tmp__WWBL;
  void *__tmp__SUBL,*__tmp__TUBL,*result__OUBL,*__tmp__AWBL,*__tmp__VWBL;
  void *__tmp__OXBL;
  void *__tmp__OVBL;
  void *__tmp__PVBL;
  __INTEGER_CST *Self__RLYJ;
  __BOOLEAN __tmp__3UBL,__tmp__AVBL,__tmp__IVBL,__tmp__PWBL,__tmp__YVBL;
  __BOOLEAN __tmp__EWBL,__tmp__FWBL;
  int__PUBL=NULL;
  lst_typ__QUBL=NULL;
  other__RUBL=NULL;
  __tmp__SUBL=Self__MUBL->value__US2H;
  switch (((struct ___OBJ *)__tmp__SUBL)->__id) {
  case __LIST__: {
    __tmp__TUBL=execute_link__LUOG(__tmp__SUBL);
  } break;
  case __STRING_CST__: {
    __tmp__TUBL=((__STRING_CST *)__tmp__SUBL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__TUBL=execute_link__U5ZK(__tmp__SUBL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__TUBL=((__PROTOTYPE_CST *)__tmp__SUBL);
  } break;
  case __INTEGER_CST__: {
    __tmp__TUBL=((__INTEGER_CST *)__tmp__SUBL);
  } break;
  case __READ_LOCAL__: {
    __tmp__TUBL=execute_link__EHAL(__tmp__SUBL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TUBL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TUBL=execute_link__2LAL(__tmp__SUBL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TUBL=execute_link__FQAL(__tmp__SUBL);
  } break;
  case __REAL_CST__: {
    __tmp__TUBL=((__REAL_CST *)__tmp__SUBL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__TUBL=((__CHARACTER_CST *)__tmp__SUBL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__TUBL=execute_link__UUAL(__tmp__SUBL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TUBL=execute_link__1VAL(__tmp__SUBL);
  } break;
  case __EXPR_SUP__: {
    __tmp__TUBL=execute_link__AWAL(__tmp__SUBL);
  } break;
  case __EXPR_SUB__: {
    __tmp__TUBL=execute_link__J0AL(__tmp__SUBL);
  } break;
  case __EXPR_MUL__: {
    __tmp__TUBL=execute_link__S4AL(__tmp__SUBL);
  } break;
  case __EXPR_DIV__: {
    __tmp__TUBL=execute_link__1CBL(__tmp__SUBL);
  } break;
  case __EXPR_AND__: {
    __tmp__TUBL=execute_link__EHBL(__tmp__SUBL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TUBL=execute_link__NLBL(__tmp__SUBL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TUBL=execute_link__WPBL(__tmp__SUBL);
  } break;
  case __PUT_TO__: {
    __tmp__TUBL=execute_link__BOPK(__tmp__SUBL);
  } break;
  case __ITEM__: {
    __tmp__TUBL=execute_link__5TBL(__tmp__SUBL);
  } break;
  case __SIZE_OF__: {
    __tmp__TUBL=execute_link__GUBL(__tmp__SUBL);
  } break;
  case __CAST__: {
    __tmp__TUBL=execute_link__LUBL(__tmp__SUBL);
  } break;
  case __CALL_SLOT__: {
    __tmp__TUBL=execute_link__A2TL(__tmp__SUBL);
  } break;
  case __READ_SLOT__: {
    __tmp__TUBL=execute_link__EYBL(__tmp__SUBL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__TUBL=execute_link__U2BL(__tmp__SUBL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TUBL=execute_link__SRZM(__tmp__SUBL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TUBL=execute_link__OBFO(__tmp__SUBL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TUBL=execute_link__GJLO(__tmp__SUBL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TUBL=execute_link__HHFO(__tmp__SUBL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TUBL=execute_link__KPLO(__tmp__SUBL);
  } break;
  case __EXPR_NEG__: {
    __tmp__TUBL=execute_link__0GKM(__tmp__SUBL);
  } break;
  case __EXPR_ADD__: {
    __tmp__TUBL=execute_link__RROL(__tmp__SUBL);
  } break;
  case __EXPR_NOT__: {
    __tmp__TUBL=execute_link__GUZM(__tmp__SUBL);
  } break;
  case __EXPR_MOD__: {
    __tmp__TUBL=execute_link__ANFO(__tmp__SUBL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TUBL=execute_link__YLEP(__tmp__SUBL);
  } break;
  case __EXPR_INF__: {
    __tmp__TUBL=execute_link__VQQN(__tmp__SUBL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TUBL=execute_link__4UQN(__tmp__SUBL);
  } break;
  case __EXPR_OR__: {
    __tmp__TUBL=execute_link__1HQN(__tmp__SUBL);
  } break;
  case __EXPR_XOR__: {
    __tmp__TUBL=execute_link__IYUO(__tmp__SUBL);
  } break;
  };
  Self__MUBL->value__US2H=__tmp__TUBL;
  result__OUBL=Self__MUBL;
  if (((void *)((__TYPE_FULL *)Self__MUBL->static_type__SO1H)->parent_type__KTL == (void *)type_integer__3JB)) {
    switch (((struct ___OBJ *)__tmp__TUBL)->__id) {
    case __LIST__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__3UBL=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__3UBL=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__3UBL=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __REAL_CST__: {
      __tmp__3UBL=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__3UBL=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_SUB__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_MUL__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_DIV__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_AND__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __PUT_TO__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __CAST__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __READ_GLOBAL__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_NEG__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_ADD__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_NOT__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_MOD__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_INF__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_OR__: {
      __tmp__3UBL=FALSE__;
    } break;
    case __EXPR_XOR__: {
      __tmp__3UBL=FALSE__;
    } break;
    };
    __tmp__AVBL=__tmp__3UBL;
  } else {
    __tmp__AVBL=FALSE__;
  };
  if (__tmp__AVBL) {
    result__OUBL=__tmp__TUBL;
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__IVBL=TRUE__;
  } else {
    __tmp__IVBL=FALSE__;
  };
  if (__tmp__IVBL) {
    __tmp__PWBL=TRUE__;
  } else {
    __tmp__OVBL=((__TYPE_FULL *)Self__MUBL->static_type__SO1H)->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__OVBL)->__id) {
    case __TYPE__: {
      __tmp__PVBL=((__PROTOTYPE *)((__TYPE *)__tmp__OVBL)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__PVBL=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__PVBL=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__PVBL=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__PVBL=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__PVBL=((__TYPE_GENERIC *)__tmp__OVBL)->name__2R2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__PVBL=((__PROFIL_BLOCK *)__tmp__OVBL)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    if (is_integer__M4NI(__tmp__PVBL)) {
      switch (((struct ___OBJ *)Self__MUBL->value__US2H)->__id) {
      case __LIST__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __STRING_CST__: {
        __tmp__YVBL=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__YVBL=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__YVBL=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __REAL_CST__: {
        __tmp__YVBL=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__YVBL=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_SUB__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_MUL__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_DIV__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_AND__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __PUT_TO__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __ITEM__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __SIZE_OF__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __CAST__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __CALL_SLOT__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __READ_GLOBAL__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_NEG__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_ADD__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_NOT__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_MOD__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_INF__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_OR__: {
        __tmp__YVBL=FALSE__;
      } break;
      case __EXPR_XOR__: {
        __tmp__YVBL=FALSE__;
      } break;
      };
      __tmp__EWBL=__tmp__YVBL;
    } else {
      __tmp__EWBL=FALSE__;
    };
    if (__tmp__EWBL) {
      __tmp__AWBL=Self__MUBL->value__US2H;
      if (__tmp__AWBL==NULL) {
        __tmp__BWBL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__AWBL)->__id) {
        case __LIST__: {
          __tmp__BWBL=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__BWBL=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__BWBL=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__BWBL=((void *)__tmp__AWBL);
        } break;
        case __READ_LOCAL__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__BWBL=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__BWBL=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__BWBL=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__BWBL=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__BWBL=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__BWBL=NULL;
        } break;
        case __ITEM__: {
          __tmp__BWBL=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__BWBL=NULL;
        } break;
        case __CAST__: {
          __tmp__BWBL=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__BWBL=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__BWBL=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__BWBL=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__BWBL=NULL;
        } break;
        }
      };
      int__PUBL=__tmp__BWBL;
      __tmp__FWBL=((void *)__tmp__BWBL != (void *)NULL);
    } else {
      __tmp__FWBL=FALSE__;
    };
    if (__tmp__FWBL) {
      Self__RLYJ=((__INTEGER_CST *)int__PUBL);
      Self__RLYJ->parent_constant__P3LC.static_type__F4YD=Self__MUBL->static_type__SO1H;
      check_type__RI5D(Self__RLYJ);
      result__OUBL=Self__MUBL->value__US2H;
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    };
    __tmp__PWBL=__tmp__FWBL;
  };
  if ((! __tmp__PWBL)) {
    __tmp__VWBL=Self__MUBL->value__US2H;
    if (__tmp__VWBL==NULL) {
      __tmp__WWBL=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__VWBL)->__id) {
      case __LIST__: {
        __tmp__WWBL=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__WWBL=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__WWBL=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__WWBL=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__WWBL=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__WWBL=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__WWBL=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__WWBL=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__WWBL=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__WWBL=NULL;
      } break;
      case __ITEM__: {
        __tmp__WWBL=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__WWBL=NULL;
      } break;
      case __CAST__: {
        __tmp__WWBL=((void *)__tmp__VWBL);
      } break;
      case __CALL_SLOT__: {
        __tmp__WWBL=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__WWBL=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__WWBL=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__WWBL=NULL;
      } break;
      }
    };
    other__RUBL=__tmp__WWBL;
    if ((((void *)__tmp__WWBL != (void *)NULL) && ((void *)((__CAST *)__tmp__WWBL)->static_type__SO1H == (void *)Self__MUBL->static_type__SO1H))) {
      result__OUBL=Self__MUBL->value__US2H;
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    } else {
      lst_typ__QUBL=new__XWSG();
      __tmp__OXBL=Self__MUBL->value__US2H;
      switch (((struct ___OBJ *)__tmp__OXBL)->__id) {
      case __LIST__: {
        get_type__EYMJ(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __STRING_CST__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)((__STRING_CST *)__tmp__OXBL)->parent_constant__5F.static_type__F4YD)->parent_type__KTL);
      } break;
      case __EXTERNAL_C__: {
        get_type__ZHDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __PROTOTYPE_CST__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__OXBL)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL);
      } break;
      case __INTEGER_CST__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)((__INTEGER_CST *)__tmp__OXBL)->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL);
      } break;
      case __READ_LOCAL__: {
        get_type__AOFJ(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_MULTIPLE__: {
        print__1ZE((&__string_253));
        fputc((int)('\n'),stdout);
        exit(( 1));
      } break;
      case __EXPR_EQUAL__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_NOT_EQUAL__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __REAL_CST__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)((__REAL_CST *)__tmp__OXBL)->parent_constant__M3JH.static_type__F4YD)->parent_type__KTL);
      } break;
      case __CHARACTER_CST__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)((__CHARACTER_CST *)__tmp__OXBL)->parent_constant__53JH.static_type__F4YD)->parent_type__KTL);
      } break;
      case __IS_EXPANDED__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __GET_TYPE_ID__: {
        add__R2EJ(lst_typ__QUBL,type_integer__3JB);
      } break;
      case __EXPR_SUP__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_SUB__: {
        get_type__ZJDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_MUL__: {
        get_type__3JDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_DIV__: {
        get_type__BKDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_AND__: {
        get_type__FKDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_SHIFT_R__: {
        get_type__JKDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_SHIFT_L__: {
        get_type__NKDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __PUT_TO__: {
        add__R2EJ(lst_typ__QUBL,TYPE_VOID__);
      } break;
      case __ITEM__: {
        get_type__UKDI(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __SIZE_OF__: {
        add__R2EJ(lst_typ__QUBL,type_integer__3JB);
      } break;
      case __CAST__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)((__CAST *)__tmp__OXBL)->static_type__SO1H)->parent_type__KTL);
      } break;
      case __CALL_SLOT__: {
        get_type__DAML(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __READ_SLOT__: {
        get_type__OD0K(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __READ_GLOBAL__: {
        get_type__ZJOL(((__READ_GLOBAL *)__tmp__OXBL)->global__RHJK,lst_typ__QUBL);
      } break;
      case __EXPR_NOT_LOGIC__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_OR_LOGIC__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_AND_LOGIC__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_NEG__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)static_type__Z2IM(((__EXPR_NEG *)__tmp__OXBL)))->parent_type__KTL);
      } break;
      case __EXPR_ADD__: {
        get_type__YEOL(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_NOT__: {
        add__R2EJ(lst_typ__QUBL,((__TYPE_FULL *)static_type__BTXM(((__EXPR_NOT *)__tmp__OXBL)))->parent_type__KTL);
      } break;
      case __EXPR_MOD__: {
        get_type__FSEO(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_SUP_EQ__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_INF__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_INF_EQ__: {
        add__R2EJ(lst_typ__QUBL,type_true__FJB);
        add__R2EJ(lst_typ__QUBL,type_false__NJB);
      } break;
      case __EXPR_OR__: {
        get_type__CVPN(__tmp__OXBL,lst_typ__QUBL);
      } break;
      case __EXPR_XOR__: {
        get_type__FNTO(__tmp__OXBL,lst_typ__QUBL);
      } break;
      };
      if ((((__INTEGER)(((__TYPES_TMP *)lst_typ__QUBL)->parent_types__W25F.upper__4LAG +  1) ==  1) && ((void *)((void **)((__TYPES_TMP *)lst_typ__QUBL)->parent_types__W25F.storage__WWFJ)[ 0] == (void *)((__TYPE_FULL *)Self__MUBL->static_type__SO1H)->parent_type__KTL))) {
        result__OUBL=Self__MUBL->value__US2H;
        modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      };
      free__OOFJ(lst_typ__QUBL);
    };
  };
  return(result__OUBL);
}

static void* execute_link__A2TL(__CALL_SLOT *Self__B2TL)
// ({CALL_SLOT}) With resultRecursive, No inlinable.
{
  void *result__D2TL;
  void *__tmp__K2TL;
  result__D2TL=execute_inline__QFZL(Self__B2TL);
  if (((void *)result__D2TL == (void *)NULL)) {
    execute_normal__BMAM(Self__B2TL);
    __tmp__K2TL=Self__B2TL->profil__QA2H;
    if (((struct ___OBJ *)__tmp__K2TL)->__id==__PROFIL_SLOT__) {
      set_life__2OAM(__tmp__K2TL);
    } else {
      set_life__GPAM(__tmp__K2TL);
    };
    result__D2TL=Self__B2TL;
  };
  return(result__D2TL);
}

static void* execute_link__EYBL(__READ_SLOT *Self__FYBL)
// ({READ_SLOT}) With resultRecursive, No inlinable.
{
  void *rec__IYBL;
  void *result__JYBL,*val__KYBL,*__tmp__RVGL,*__tmp__XWGL,*__tmp__W4WL;
  void *__tmp__X4WL;
  void *l__MYBL;
  void *__tmp__PYBL;
  void *__tmp__QYBL,*s__LYBL;
  void *result__HUGL,*__tmp__ZVGL,*__tmp__R0BL;
  __INTEGER j__IUGL;
  __POSITION __tmp__DVGL;
  __LIST *Self__JHKQ,*Self__INZQ,*Self__KNZQ;
  void *voir__IHKQ;
  void *__tmp__QVGL,*__tmp__WWGL;
  __STRING_CST *Self__N5CQ;
  __PROTOTYPE_CST *Self__O5CQ;
  __INTEGER_CST *Self__P5CQ;
  __REAL_CST *Self__R5CQ;
  __CHARACTER_CST *Self__T5CQ;
  void *req_list__KUGL;
  __BOOLEAN __tmp__SVGL,__tmp__YWGL,__tmp__CXGL,__tmp__5WGL,__tmp__T0BL;
  rec__IYBL=NULL;
  result__JYBL=NULL;
  val__KYBL=NULL;
  l__MYBL=NULL;
  __tmp__PYBL=Self__FYBL->slot__EVGK;
  if (__tmp__PYBL==NULL) {
    __tmp__QYBL=NULL;
  } else {
    __tmp__QYBL=((void *)__tmp__PYBL);
  };
  s__LYBL=__tmp__QYBL;
  if ((((void *)__tmp__QYBL == (void *)NULL) || (((((__SLOT_DATA *)__tmp__QYBL)->parent_variable__AJZD.parent_named__A2LC.style__LDGC != '+') || ((void *)((__SECTION_ *)id_section__UG4F(__tmp__QYBL))->name__1I0D != (void *)(&__string_28))) && ((! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0)) || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.type__125F)->flag__LTL &  2) !=  0))))) {
    result__HUGL=NULL;
    j__IUGL= 0;
    req_list__KUGL=NULL;
    if ((((void *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.require_first__DAEH == (void *)NULL) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0)))) {
      print__1ZE(((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.intern_name__025F);
      fputc((int)('\n'),stdout);
      print__1ZE((&__string_556));
      fputc((int)(((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.parent_named__A2LC.style__LDGC),stdout);
      print__1ZE((&__string_377));
      __tmp__DVGL=Self__FYBL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      put_error__text__0AH( 2,(&__string_557));
      put_position__ECH(__tmp__DVGL);
      send_error__2FH();
      Self__JHKQ=((__LIST *)list_current__IF1);
      voir__IHKQ=create__AXB( 250);
      display__2QQG(Self__JHKQ,voir__IHKQ);
      put_string__2EG(((__STRING *)voir__IHKQ));
      fputc((int)('\n'),stdout);
      exit(( 0));
    };
    if (((void *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.require_first__DAEH != (void *)NULL)) {
      __tmp__QVGL=((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.require_first__DAEH;
      switch (((struct ___OBJ *)__tmp__QVGL)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__RVGL=((__WRITE_GLOBAL *)__tmp__QVGL)->parent_write__QBGH.value__HBEH;
      } break;
      case __WRITE_SLOT__: {
        __tmp__RVGL=((__WRITE_SLOT *)__tmp__QVGL)->parent_write__3BGH.value__HBEH;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__RVGL=((__WRITE_LOCAL *)__tmp__QVGL)->parent_write__X50I.value__HBEH;
      } break;
      };
      switch (((struct ___OBJ *)__tmp__RVGL)->__id) {
      case __LIST__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __STRING_CST__: {
        __tmp__SVGL=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__SVGL=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__SVGL=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __REAL_CST__: {
        __tmp__SVGL=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__SVGL=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_SUB__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_MUL__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_DIV__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_AND__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __PUT_TO__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __ITEM__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __SIZE_OF__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __CAST__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __CALL_SLOT__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __READ_GLOBAL__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_NEG__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_ADD__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_NOT__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_MOD__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_INF__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_OR__: {
        __tmp__SVGL=FALSE__;
      } break;
      case __EXPR_XOR__: {
        __tmp__SVGL=FALSE__;
      } break;
      };
      if (__tmp__SVGL) {
        if (__tmp__RVGL==NULL) {
          __tmp__ZVGL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__RVGL)->__id) {
          case __LIST__: {
            __tmp__ZVGL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__ZVGL=((void *)__tmp__RVGL);
          } break;
          case __EXTERNAL_C__: {
            __tmp__ZVGL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__ZVGL=((void *)__tmp__RVGL);
          } break;
          case __INTEGER_CST__: {
            __tmp__ZVGL=((void *)__tmp__RVGL);
          } break;
          case __READ_LOCAL__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__ZVGL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__ZVGL=((void *)__tmp__RVGL);
          } break;
          case __CHARACTER_CST__: {
            __tmp__ZVGL=((void *)__tmp__RVGL);
          } break;
          case __IS_EXPANDED__: {
            __tmp__ZVGL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__ZVGL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__ZVGL=NULL;
          } break;
          case __ITEM__: {
            __tmp__ZVGL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__ZVGL=NULL;
          } break;
          case __CAST__: {
            __tmp__ZVGL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__ZVGL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__ZVGL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__ZVGL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__ZVGL=NULL;
          } break;
          }
        };
        result__HUGL=__tmp__ZVGL;
        req_list__KUGL=((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.require_list__UAEH;
        if (((void *)req_list__KUGL != (void *)NULL)) {
          j__IUGL= 0;
          while ((! ((j__IUGL > ((__FAST_ARRAYoWRITEo *)req_list__KUGL)->parent_arrayed_collection__TAEH.upper__NPDI) || ((void *)result__HUGL == (void *)NULL)))) {
            __tmp__WWGL=((void **)((__FAST_ARRAYoWRITEo *)req_list__KUGL)->parent_arrayed_collection__TAEH.storage__LQDI)[j__IUGL];
            switch (((struct ___OBJ *)__tmp__WWGL)->__id) {
            case __WRITE_GLOBAL__: {
              __tmp__XWGL=((__WRITE_GLOBAL *)__tmp__WWGL)->parent_write__QBGH.value__HBEH;
            } break;
            case __WRITE_SLOT__: {
              __tmp__XWGL=((__WRITE_SLOT *)__tmp__WWGL)->parent_write__3BGH.value__HBEH;
            } break;
            case __WRITE_LOCAL__: {
              __tmp__XWGL=((__WRITE_LOCAL *)__tmp__WWGL)->parent_write__X50I.value__HBEH;
            } break;
            };
            switch (((struct ___OBJ *)__tmp__XWGL)->__id) {
            case __LIST__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __STRING_CST__: {
              __tmp__YWGL=TRUE__;
            } break;
            case __EXTERNAL_C__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__YWGL=TRUE__;
            } break;
            case __INTEGER_CST__: {
              __tmp__YWGL=TRUE__;
            } break;
            case __READ_LOCAL__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __REAL_CST__: {
              __tmp__YWGL=TRUE__;
            } break;
            case __CHARACTER_CST__: {
              __tmp__YWGL=TRUE__;
            } break;
            case __IS_EXPANDED__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_SUP__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_SUB__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_MUL__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_DIV__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_AND__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __PUT_TO__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __ITEM__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __SIZE_OF__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __CAST__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __CALL_SLOT__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __READ_SLOT__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __READ_GLOBAL__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_NEG__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_ADD__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_NOT__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_MOD__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_INF__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_OR__: {
              __tmp__YWGL=FALSE__;
            } break;
            case __EXPR_XOR__: {
              __tmp__YWGL=FALSE__;
            } break;
            };
            if ((! __tmp__YWGL)) {
              __tmp__CXGL=TRUE__;
            } else {
              switch (((struct ___OBJ *)result__HUGL)->__id) {
              case __STRING_CST__: {
                __tmp__5WGL=(! __infix_equal_equal__WF1L(((__STRING_CST *)result__HUGL),__tmp__XWGL));
              } break;
              case __PROTOTYPE_CST__: {
                __tmp__5WGL=(! __infix_equal_equal__LG1L(((__PROTOTYPE_CST *)result__HUGL),__tmp__XWGL));
              } break;
              case __INTEGER_CST__: {
                __tmp__5WGL=(! __infix_equal_equal__2G1L(((__INTEGER_CST *)result__HUGL),__tmp__XWGL));
              } break;
              case __REAL_CST__: {
                __tmp__5WGL=(! __infix_equal_equal__EK1L(((__REAL_CST *)result__HUGL),__tmp__XWGL));
              } break;
              case __CHARACTER_CST__: {
                __tmp__5WGL=(! __infix_equal_equal__4K1L(((__CHARACTER_CST *)result__HUGL),__tmp__XWGL));
              } break;
              };
              __tmp__CXGL=__tmp__5WGL;
            };
            if (__tmp__CXGL) {
              result__HUGL=NULL;
            };
            j__IUGL=(__INTEGER)(j__IUGL +  1);
          };
        };
      };
    };
    if (((void *)result__HUGL != (void *)NULL)) {
      unread__15ML(Self__FYBL->slot__EVGK,Self__FYBL);
      rec__IYBL=execute_access_unlink__5LDL(Self__FYBL);
      if (((void *)rec__IYBL != (void *)NULL)) {
        Self__INZQ=((__LIST *)list_current__IF1);
        add__to__1H5G(Self__INZQ->expr_list__JUOG,rec__IYBL,(__INTEGER)(Self__INZQ->index__PXRG -  1));
        Self__INZQ->index__PXRG=(__INTEGER)(Self__INZQ->index__PXRG +  1);
      };
      switch (((struct ___OBJ *)result__HUGL)->__id) {
      case __STRING_CST__: {
        Self__N5CQ=((__STRING_CST *)result__HUGL);
        __tmp__R0BL=create__text__AUMH(Self__N5CQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__N5CQ->string__ZK2H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__O5CQ=((__PROTOTYPE_CST *)result__HUGL);
        __tmp__R0BL=create__type__CLQC(Self__O5CQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__O5CQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__P5CQ=((__INTEGER_CST *)result__HUGL);
        __tmp__R0BL=create__value__type__DNQC(Self__P5CQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__P5CQ->value__PAZD,Self__P5CQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __REAL_CST__: {
        Self__R5CQ=((__REAL_CST *)result__HUGL);
        __tmp__R0BL=create__value__type__1SMH(Self__R5CQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__R5CQ->value__5N2H,Self__R5CQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__T5CQ=((__CHARACTER_CST *)result__HUGL);
        __tmp__R0BL=create__char__WTMH(Self__T5CQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__T5CQ->text__HO2H);
      } break;
      };
      result__JYBL=__tmp__R0BL;
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__T0BL=TRUE__;
    } else {
      __tmp__T0BL=FALSE__;
    };
    if ((! __tmp__T0BL)) {
      val__KYBL=get_last_value__FTPL(Self__FYBL->slot__EVGK,Self__FYBL->receiver__I1TI);
      if (((void *)val__KYBL != (void *)NULL)) {
        result__JYBL=val__KYBL;
        unread__15ML(Self__FYBL->slot__EVGK,Self__FYBL);
        modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      };
    };
  };
  if (((void *)result__JYBL == (void *)NULL)) {
    if ((((void *)loop_invariant__RKAL != (void *)NULL) && is_invariant__E4WL(Self__FYBL))) {
      l__MYBL=create__name__style__type__25JG(Self__FYBL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->parent_variable__AJZD.type__125F));
      Self__KNZQ=((__LIST *)loop_list__ILAL);
      add__to__1H5G(Self__KNZQ->expr_list__JUOG,write__value__T5FH(l__MYBL,Self__FYBL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__FYBL),(__INTEGER)(Self__KNZQ->index__PXRG -  1));
      Self__KNZQ->index__PXRG=(__INTEGER)(Self__KNZQ->index__PXRG +  1);
      result__JYBL=read__IC5G(l__MYBL);
      count_invariant__PI=(__INTEGER)(count_invariant__PI +  1);
    } else {
      ((__SLOT_DATA *)Self__FYBL->slot__EVGK)->last_index__UOPL=(__INTEGER)(-  1);
      if (((void *)((__SLOT_DATA *)Self__FYBL->slot__EVGK)->value__M4OG != (void *)NULL)) {
        execute__UPHL(Self__FYBL->slot__EVGK);
      };
      __tmp__W4WL=Self__FYBL->receiver__I1TI;
      switch (((struct ___OBJ *)__tmp__W4WL)->__id) {
      case __LIST__: {
        __tmp__X4WL=execute_link__LUOG(__tmp__W4WL);
      } break;
      case __STRING_CST__: {
        __tmp__X4WL=((__STRING_CST *)__tmp__W4WL);
      } break;
      case __EXTERNAL_C__: {
        __tmp__X4WL=execute_link__U5ZK(__tmp__W4WL);
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__X4WL=((__PROTOTYPE_CST *)__tmp__W4WL);
      } break;
      case __INTEGER_CST__: {
        __tmp__X4WL=((__INTEGER_CST *)__tmp__W4WL);
      } break;
      case __READ_LOCAL__: {
        __tmp__X4WL=execute_link__EHAL(__tmp__W4WL);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__X4WL=execute_link__YLAL();
      } break;
      case __EXPR_EQUAL__: {
        __tmp__X4WL=execute_link__2LAL(__tmp__W4WL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__X4WL=execute_link__FQAL(__tmp__W4WL);
      } break;
      case __REAL_CST__: {
        __tmp__X4WL=((__REAL_CST *)__tmp__W4WL);
      } break;
      case __CHARACTER_CST__: {
        __tmp__X4WL=((__CHARACTER_CST *)__tmp__W4WL);
      } break;
      case __IS_EXPANDED__: {
        __tmp__X4WL=execute_link__UUAL(__tmp__W4WL);
      } break;
      case __GET_TYPE_ID__: {
        __tmp__X4WL=execute_link__1VAL(__tmp__W4WL);
      } break;
      case __EXPR_SUP__: {
        __tmp__X4WL=execute_link__AWAL(__tmp__W4WL);
      } break;
      case __EXPR_SUB__: {
        __tmp__X4WL=execute_link__J0AL(__tmp__W4WL);
      } break;
      case __EXPR_MUL__: {
        __tmp__X4WL=execute_link__S4AL(__tmp__W4WL);
      } break;
      case __EXPR_DIV__: {
        __tmp__X4WL=execute_link__1CBL(__tmp__W4WL);
      } break;
      case __EXPR_AND__: {
        __tmp__X4WL=execute_link__EHBL(__tmp__W4WL);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__X4WL=execute_link__NLBL(__tmp__W4WL);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__X4WL=execute_link__WPBL(__tmp__W4WL);
      } break;
      case __PUT_TO__: {
        __tmp__X4WL=execute_link__BOPK(__tmp__W4WL);
      } break;
      case __ITEM__: {
        __tmp__X4WL=execute_link__5TBL(__tmp__W4WL);
      } break;
      case __SIZE_OF__: {
        __tmp__X4WL=execute_link__GUBL(__tmp__W4WL);
      } break;
      case __CAST__: {
        __tmp__X4WL=execute_link__LUBL(__tmp__W4WL);
      } break;
      case __CALL_SLOT__: {
        __tmp__X4WL=execute_link__A2TL(__tmp__W4WL);
      } break;
      case __READ_SLOT__: {
        __tmp__X4WL=execute_link__EYBL(__tmp__W4WL);
      } break;
      case __READ_GLOBAL__: {
        __tmp__X4WL=execute_link__U2BL(__tmp__W4WL);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__X4WL=execute_link__SRZM(__tmp__W4WL);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__X4WL=execute_link__OBFO(__tmp__W4WL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__X4WL=execute_link__GJLO(__tmp__W4WL);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__X4WL=execute_link__HHFO(__tmp__W4WL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__X4WL=execute_link__KPLO(__tmp__W4WL);
      } break;
      case __EXPR_NEG__: {
        __tmp__X4WL=execute_link__0GKM(__tmp__W4WL);
      } break;
      case __EXPR_ADD__: {
        __tmp__X4WL=execute_link__RROL(__tmp__W4WL);
      } break;
      case __EXPR_NOT__: {
        __tmp__X4WL=execute_link__GUZM(__tmp__W4WL);
      } break;
      case __EXPR_MOD__: {
        __tmp__X4WL=execute_link__ANFO(__tmp__W4WL);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__X4WL=execute_link__YLEP(__tmp__W4WL);
      } break;
      case __EXPR_INF__: {
        __tmp__X4WL=execute_link__VQQN(__tmp__W4WL);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__X4WL=execute_link__4UQN(__tmp__W4WL);
      } break;
      case __EXPR_OR__: {
        __tmp__X4WL=execute_link__1HQN(__tmp__W4WL);
      } break;
      case __EXPR_XOR__: {
        __tmp__X4WL=execute_link__IYUO(__tmp__W4WL);
      } break;
      };
      Self__FYBL->receiver__I1TI=__tmp__X4WL;
      result__JYBL=Self__FYBL;
    };
  };
  return(result__JYBL);
}

static void* execute_link__U2BL(__READ_GLOBAL *Self__V2BL)
// ({READ_GLOBAL}) With resultNo recursive, No inlinable.
{
  void *rec__Y2BL;
  void *result__Z2BL,*val__02BL,*__tmp__Q0GL,*__tmp__W1GL;
  void *__tmp__52BL;
  void *__tmp__A3BL,*s__12BL;
  void *result__GZGL,*__tmp__Y0GL,*__tmp__B5BL;
  __INTEGER j__HZGL;
  __POSITION __tmp__C0GL;
  __LIST *Self__XHKQ,*Self__MNZQ;
  void *voir__WHKQ;
  void *__tmp__P0GL,*__tmp__V1GL;
  __STRING_CST *Self__OADQ;
  __PROTOTYPE_CST *Self__PADQ;
  __INTEGER_CST *Self__QADQ;
  __REAL_CST *Self__SADQ;
  __CHARACTER_CST *Self__UADQ;
  void *req_list__JZGL;
  __BOOLEAN __tmp__R0GL,__tmp__X1GL,__tmp__B2GL,__tmp__41GL,__tmp__D5BL;
  rec__Y2BL=NULL;
  result__Z2BL=NULL;
  val__02BL=NULL;
  __tmp__52BL=Self__V2BL->global__RHJK;
  if (__tmp__52BL==NULL) {
    __tmp__A3BL=NULL;
  } else {
    __tmp__A3BL=((void *)__tmp__52BL);
  };
  s__12BL=__tmp__A3BL;
  if ((((void *)__tmp__A3BL == (void *)NULL) || (((((__SLOT_DATA *)__tmp__A3BL)->parent_variable__AJZD.parent_named__A2LC.style__LDGC != '+') || ((void *)((__SECTION_ *)id_section__UG4F(__tmp__A3BL))->name__1I0D != (void *)(&__string_28))) && ((! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0)) || ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.type__125F)->flag__LTL &  2) !=  0))))) {
    result__GZGL=NULL;
    j__HZGL= 0;
    req_list__JZGL=NULL;
    if ((((void *)((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.require_first__DAEH == (void *)NULL) && (! ((__UINTEGER_8)(((__TYPE_FULL *)((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0)))) {
      print__1ZE(((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.intern_name__025F);
      fputc((int)('\n'),stdout);
      print__1ZE((&__string_556));
      fputc((int)(((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.parent_named__A2LC.style__LDGC),stdout);
      print__1ZE((&__string_377));
      __tmp__C0GL=Self__V2BL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      put_error__text__0AH( 2,(&__string_557));
      put_position__ECH(__tmp__C0GL);
      send_error__2FH();
      Self__XHKQ=((__LIST *)list_current__IF1);
      voir__WHKQ=create__AXB( 250);
      display__2QQG(Self__XHKQ,voir__WHKQ);
      put_string__2EG(((__STRING *)voir__WHKQ));
      fputc((int)('\n'),stdout);
      exit(( 0));
    };
    if (((void *)((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.require_first__DAEH != (void *)NULL)) {
      __tmp__P0GL=((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.require_first__DAEH;
      switch (((struct ___OBJ *)__tmp__P0GL)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__Q0GL=((__WRITE_GLOBAL *)__tmp__P0GL)->parent_write__QBGH.value__HBEH;
      } break;
      case __WRITE_SLOT__: {
        __tmp__Q0GL=((__WRITE_SLOT *)__tmp__P0GL)->parent_write__3BGH.value__HBEH;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__Q0GL=((__WRITE_LOCAL *)__tmp__P0GL)->parent_write__X50I.value__HBEH;
      } break;
      };
      switch (((struct ___OBJ *)__tmp__Q0GL)->__id) {
      case __LIST__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __STRING_CST__: {
        __tmp__R0GL=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__R0GL=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__R0GL=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __REAL_CST__: {
        __tmp__R0GL=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__R0GL=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_SUB__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_MUL__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_DIV__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_AND__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __PUT_TO__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __ITEM__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __SIZE_OF__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __CAST__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __CALL_SLOT__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __READ_GLOBAL__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_NEG__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_ADD__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_NOT__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_MOD__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_INF__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_OR__: {
        __tmp__R0GL=FALSE__;
      } break;
      case __EXPR_XOR__: {
        __tmp__R0GL=FALSE__;
      } break;
      };
      if (__tmp__R0GL) {
        if (__tmp__Q0GL==NULL) {
          __tmp__Y0GL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__Q0GL)->__id) {
          case __LIST__: {
            __tmp__Y0GL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__Y0GL=((void *)__tmp__Q0GL);
          } break;
          case __EXTERNAL_C__: {
            __tmp__Y0GL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__Y0GL=((void *)__tmp__Q0GL);
          } break;
          case __INTEGER_CST__: {
            __tmp__Y0GL=((void *)__tmp__Q0GL);
          } break;
          case __READ_LOCAL__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__Y0GL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__Y0GL=((void *)__tmp__Q0GL);
          } break;
          case __CHARACTER_CST__: {
            __tmp__Y0GL=((void *)__tmp__Q0GL);
          } break;
          case __IS_EXPANDED__: {
            __tmp__Y0GL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__Y0GL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__Y0GL=NULL;
          } break;
          case __ITEM__: {
            __tmp__Y0GL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__Y0GL=NULL;
          } break;
          case __CAST__: {
            __tmp__Y0GL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__Y0GL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__Y0GL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__Y0GL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__Y0GL=NULL;
          } break;
          }
        };
        result__GZGL=__tmp__Y0GL;
        req_list__JZGL=((__SLOT_DATA *)Self__V2BL->global__RHJK)->parent_variable__AJZD.require_list__UAEH;
        if (((void *)req_list__JZGL != (void *)NULL)) {
          j__HZGL= 0;
          while ((! ((j__HZGL > ((__FAST_ARRAYoWRITEo *)req_list__JZGL)->parent_arrayed_collection__TAEH.upper__NPDI) || ((void *)result__GZGL == (void *)NULL)))) {
            __tmp__V1GL=((void **)((__FAST_ARRAYoWRITEo *)req_list__JZGL)->parent_arrayed_collection__TAEH.storage__LQDI)[j__HZGL];
            switch (((struct ___OBJ *)__tmp__V1GL)->__id) {
            case __WRITE_GLOBAL__: {
              __tmp__W1GL=((__WRITE_GLOBAL *)__tmp__V1GL)->parent_write__QBGH.value__HBEH;
            } break;
            case __WRITE_SLOT__: {
              __tmp__W1GL=((__WRITE_SLOT *)__tmp__V1GL)->parent_write__3BGH.value__HBEH;
            } break;
            case __WRITE_LOCAL__: {
              __tmp__W1GL=((__WRITE_LOCAL *)__tmp__V1GL)->parent_write__X50I.value__HBEH;
            } break;
            };
            switch (((struct ___OBJ *)__tmp__W1GL)->__id) {
            case __LIST__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __STRING_CST__: {
              __tmp__X1GL=TRUE__;
            } break;
            case __EXTERNAL_C__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__X1GL=TRUE__;
            } break;
            case __INTEGER_CST__: {
              __tmp__X1GL=TRUE__;
            } break;
            case __READ_LOCAL__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __REAL_CST__: {
              __tmp__X1GL=TRUE__;
            } break;
            case __CHARACTER_CST__: {
              __tmp__X1GL=TRUE__;
            } break;
            case __IS_EXPANDED__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_SUP__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_SUB__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_MUL__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_DIV__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_AND__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __PUT_TO__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __ITEM__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __SIZE_OF__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __CAST__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __CALL_SLOT__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __READ_SLOT__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __READ_GLOBAL__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_NEG__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_ADD__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_NOT__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_MOD__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_INF__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_OR__: {
              __tmp__X1GL=FALSE__;
            } break;
            case __EXPR_XOR__: {
              __tmp__X1GL=FALSE__;
            } break;
            };
            if ((! __tmp__X1GL)) {
              __tmp__B2GL=TRUE__;
            } else {
              switch (((struct ___OBJ *)result__GZGL)->__id) {
              case __STRING_CST__: {
                __tmp__41GL=(! __infix_equal_equal__WF1L(((__STRING_CST *)result__GZGL),__tmp__W1GL));
              } break;
              case __PROTOTYPE_CST__: {
                __tmp__41GL=(! __infix_equal_equal__LG1L(((__PROTOTYPE_CST *)result__GZGL),__tmp__W1GL));
              } break;
              case __INTEGER_CST__: {
                __tmp__41GL=(! __infix_equal_equal__2G1L(((__INTEGER_CST *)result__GZGL),__tmp__W1GL));
              } break;
              case __REAL_CST__: {
                __tmp__41GL=(! __infix_equal_equal__EK1L(((__REAL_CST *)result__GZGL),__tmp__W1GL));
              } break;
              case __CHARACTER_CST__: {
                __tmp__41GL=(! __infix_equal_equal__4K1L(((__CHARACTER_CST *)result__GZGL),__tmp__W1GL));
              } break;
              };
              __tmp__B2GL=__tmp__41GL;
            };
            if (__tmp__B2GL) {
              result__GZGL=NULL;
            };
            j__HZGL=(__INTEGER)(j__HZGL +  1);
          };
        };
      };
    };
    if (((void *)result__GZGL != (void *)NULL)) {
      unread__15ML(Self__V2BL->global__RHJK,Self__V2BL);
      rec__Y2BL=execute_access_unlink__VMDL(Self__V2BL);
      if (((void *)rec__Y2BL != (void *)NULL)) {
        Self__MNZQ=((__LIST *)list_current__IF1);
        add__to__1H5G(Self__MNZQ->expr_list__JUOG,rec__Y2BL,(__INTEGER)(Self__MNZQ->index__PXRG -  1));
        Self__MNZQ->index__PXRG=(__INTEGER)(Self__MNZQ->index__PXRG +  1);
      };
      switch (((struct ___OBJ *)result__GZGL)->__id) {
      case __STRING_CST__: {
        Self__OADQ=((__STRING_CST *)result__GZGL);
        __tmp__B5BL=create__text__AUMH(Self__OADQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__OADQ->string__ZK2H);
      } break;
      case __PROTOTYPE_CST__: {
        Self__PADQ=((__PROTOTYPE_CST *)result__GZGL);
        __tmp__B5BL=create__type__CLQC(Self__PADQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__PADQ->parent_constant__E3LC.static_type__F4YD);
      } break;
      case __INTEGER_CST__: {
        Self__QADQ=((__INTEGER_CST *)result__GZGL);
        __tmp__B5BL=create__value__type__DNQC(Self__QADQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__QADQ->value__PAZD,Self__QADQ->parent_constant__P3LC.static_type__F4YD);
      } break;
      case __REAL_CST__: {
        Self__SADQ=((__REAL_CST *)result__GZGL);
        __tmp__B5BL=create__value__type__1SMH(Self__SADQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__SADQ->value__5N2H,Self__SADQ->parent_constant__M3JH.static_type__F4YD);
      } break;
      case __CHARACTER_CST__: {
        Self__UADQ=((__CHARACTER_CST *)result__GZGL);
        __tmp__B5BL=create__char__WTMH(Self__UADQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__UADQ->text__HO2H);
      } break;
      };
      result__Z2BL=__tmp__B5BL;
      modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      __tmp__D5BL=TRUE__;
    } else {
      __tmp__D5BL=FALSE__;
    };
    if ((! __tmp__D5BL)) {
      val__02BL=get_last_value__FTPL(Self__V2BL->global__RHJK,NULL);
      if (((void *)val__02BL != (void *)NULL)) {
        result__Z2BL=val__02BL;
        unread__15ML(Self__V2BL->global__RHJK,Self__V2BL);
        modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      };
    };
  };
  if (((void *)result__Z2BL == (void *)NULL)) {
    ((__SLOT_DATA *)Self__V2BL->global__RHJK)->last_index__UOPL=(__INTEGER)(-  1);
    if (((void *)((__SLOT_DATA *)Self__V2BL->global__RHJK)->value__M4OG != (void *)NULL)) {
      execute__UPHL(Self__V2BL->global__RHJK);
    };
    result__Z2BL=Self__V2BL;
  };
  return(result__Z2BL);
}

static void* execute_link__SRZM(__EXPR_NOT_LOGIC *Self__TRZM)
// ({EXPR_NOT_LOGIC}) With resultRecursive, No inlinable.
{
  void *right_t__0RZM,*__tmp__YYIN,*__tmp__CZIN;
  __UINTEGER_32 old_seq__WRZM;
  void *__tmp__2RZM,*__tmp__3RZM,*__tmp__5RZM,*result__IP1M,*__tmp__KP1M;
  void *__tmp__ZP1M,*__tmp__OQ1M,*__tmp__ER1M,*result__VRZM,*__tmp__OYIN;
  void *__tmp__ASZM,*right_cst__ZRZM,*__tmp__PYIN,*pro__MYIN;
  void *eq__DP1M,*__tmp__0P1M;
  void *sup_eq__FP1M,*__tmp__PQ1M;
  void *sup__GP1M,*__tmp__FR1M;
  void *__tmp__LP1M,*not__HP1M;
  __POSITION __tmp__XYIN,__tmp__BZIN,__tmp__EUZM;
  void *__tmp__ZYIN,*__tmp__DZIN;
  __PROTOTYPE_CST *Self__WADQ,*Self__ZADQ;
  __BOOLEAN __tmp__TP1M,__tmp__IQ1M,result__EF2M,__tmp__4Q1M;
  __BOOLEAN result__WF2M;
  right_t__0RZM=NULL;
  old_seq__WRZM=seq_call_and_loop__VREJ;
  __tmp__2RZM=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__2RZM)->__id) {
  case __LIST__: {
    __tmp__3RZM=execute_link__LUOG(__tmp__2RZM);
  } break;
  case __STRING_CST__: {
    __tmp__3RZM=((__STRING_CST *)__tmp__2RZM);
  } break;
  case __EXTERNAL_C__: {
    __tmp__3RZM=execute_link__U5ZK(__tmp__2RZM);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__3RZM=((__PROTOTYPE_CST *)__tmp__2RZM);
  } break;
  case __INTEGER_CST__: {
    __tmp__3RZM=((__INTEGER_CST *)__tmp__2RZM);
  } break;
  case __READ_LOCAL__: {
    __tmp__3RZM=execute_link__EHAL(__tmp__2RZM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3RZM=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3RZM=execute_link__2LAL(__tmp__2RZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3RZM=execute_link__FQAL(__tmp__2RZM);
  } break;
  case __REAL_CST__: {
    __tmp__3RZM=((__REAL_CST *)__tmp__2RZM);
  } break;
  case __CHARACTER_CST__: {
    __tmp__3RZM=((__CHARACTER_CST *)__tmp__2RZM);
  } break;
  case __IS_EXPANDED__: {
    __tmp__3RZM=execute_link__UUAL(__tmp__2RZM);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3RZM=execute_link__1VAL(__tmp__2RZM);
  } break;
  case __EXPR_SUP__: {
    __tmp__3RZM=execute_link__AWAL(__tmp__2RZM);
  } break;
  case __EXPR_SUB__: {
    __tmp__3RZM=execute_link__J0AL(__tmp__2RZM);
  } break;
  case __EXPR_MUL__: {
    __tmp__3RZM=execute_link__S4AL(__tmp__2RZM);
  } break;
  case __EXPR_DIV__: {
    __tmp__3RZM=execute_link__1CBL(__tmp__2RZM);
  } break;
  case __EXPR_AND__: {
    __tmp__3RZM=execute_link__EHBL(__tmp__2RZM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3RZM=execute_link__NLBL(__tmp__2RZM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3RZM=execute_link__WPBL(__tmp__2RZM);
  } break;
  case __PUT_TO__: {
    __tmp__3RZM=execute_link__BOPK(__tmp__2RZM);
  } break;
  case __ITEM__: {
    __tmp__3RZM=execute_link__5TBL(__tmp__2RZM);
  } break;
  case __SIZE_OF__: {
    __tmp__3RZM=execute_link__GUBL(__tmp__2RZM);
  } break;
  case __CAST__: {
    __tmp__3RZM=execute_link__LUBL(__tmp__2RZM);
  } break;
  case __CALL_SLOT__: {
    __tmp__3RZM=execute_link__A2TL(__tmp__2RZM);
  } break;
  case __READ_SLOT__: {
    __tmp__3RZM=execute_link__EYBL(__tmp__2RZM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__3RZM=execute_link__U2BL(__tmp__2RZM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3RZM=execute_link__SRZM(__tmp__2RZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3RZM=execute_link__OBFO(__tmp__2RZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3RZM=execute_link__GJLO(__tmp__2RZM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3RZM=execute_link__HHFO(__tmp__2RZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3RZM=execute_link__KPLO(__tmp__2RZM);
  } break;
  case __EXPR_NEG__: {
    __tmp__3RZM=execute_link__0GKM(__tmp__2RZM);
  } break;
  case __EXPR_ADD__: {
    __tmp__3RZM=execute_link__RROL(__tmp__2RZM);
  } break;
  case __EXPR_NOT__: {
    __tmp__3RZM=execute_link__GUZM(__tmp__2RZM);
  } break;
  case __EXPR_MOD__: {
    __tmp__3RZM=execute_link__ANFO(__tmp__2RZM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3RZM=execute_link__YLEP(__tmp__2RZM);
  } break;
  case __EXPR_INF__: {
    __tmp__3RZM=execute_link__VQQN(__tmp__2RZM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3RZM=execute_link__4UQN(__tmp__2RZM);
  } break;
  case __EXPR_OR__: {
    __tmp__3RZM=execute_link__1HQN(__tmp__2RZM);
  } break;
  case __EXPR_XOR__: {
    __tmp__3RZM=execute_link__IYUO(__tmp__2RZM);
  } break;
  };
  Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM=__tmp__3RZM;
  __tmp__5RZM=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
  if (__tmp__5RZM==NULL) {
    __tmp__ASZM=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__5RZM)->__id) {
    case __LIST__: {
      __tmp__ASZM=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ASZM=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ASZM=((void *)__tmp__5RZM);
    } break;
    case __INTEGER_CST__: {
      __tmp__ASZM=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ASZM=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ASZM=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ASZM=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ASZM=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ASZM=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ASZM=NULL;
    } break;
    case __ITEM__: {
      __tmp__ASZM=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ASZM=NULL;
    } break;
    case __CAST__: {
      __tmp__ASZM=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ASZM=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ASZM=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ASZM=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ASZM=NULL;
    } break;
    }
  };
  right_cst__ZRZM=__tmp__ASZM;
  if (((void *)__tmp__ASZM != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__ASZM)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      right_t__0RZM=type_true__FJB;
    } else {
      right_t__0RZM=type_false__NJB;
    };
  };
  eq__DP1M=NULL;
  sup_eq__FP1M=NULL;
  sup__GP1M=NULL;
  result__IP1M=NULL;
  __tmp__KP1M=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
  if (__tmp__KP1M==NULL) {
    __tmp__LP1M=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__KP1M)->__id) {
    case __LIST__: {
      __tmp__LP1M=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LP1M=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LP1M=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__LP1M=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LP1M=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__LP1M=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LP1M=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LP1M=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LP1M=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__LP1M=NULL;
    } break;
    case __ITEM__: {
      __tmp__LP1M=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__LP1M=NULL;
    } break;
    case __CAST__: {
      __tmp__LP1M=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__LP1M=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__LP1M=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LP1M=((void *)__tmp__KP1M);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__LP1M=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__LP1M=NULL;
    } break;
    }
  };
  not__HP1M=__tmp__LP1M;
  if (((void *)__tmp__LP1M != (void *)NULL)) {
    result__IP1M=((__EXPR_NOT_LOGIC *)__tmp__LP1M)->parent_expr_unary_logic__0EUK.right__AQZM;
    __tmp__TP1M=TRUE__;
  } else {
    __tmp__TP1M=FALSE__;
  };
  if (__tmp__TP1M) {
    __tmp__IQ1M=TRUE__;
  } else {
    __tmp__ZP1M=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
    if (__tmp__ZP1M==NULL) {
      __tmp__0P1M=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__ZP1M)->__id) {
      case __LIST__: {
        __tmp__0P1M=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__0P1M=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__0P1M=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__0P1M=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__0P1M=((void *)__tmp__ZP1M);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__0P1M=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__0P1M=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__0P1M=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__0P1M=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__0P1M=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__0P1M=NULL;
      } break;
      case __ITEM__: {
        __tmp__0P1M=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__0P1M=NULL;
      } break;
      case __CAST__: {
        __tmp__0P1M=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__0P1M=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__0P1M=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__0P1M=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__0P1M=NULL;
      } break;
      }
    };
    eq__DP1M=__tmp__0P1M;
    result__EF2M=((void *)__tmp__0P1M != (void *)NULL);
    if (result__EF2M) {
      result__IP1M=create__with__and__AXUH(Self__TRZM->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_EQUAL *)__tmp__0P1M)->parent_expr_binary_cmp__1LJH.left__HN2H,((__EXPR_EQUAL *)__tmp__0P1M)->parent_expr_binary_cmp__1LJH.right__LN2H);
    };
    __tmp__IQ1M=result__EF2M;
  };
  if (__tmp__IQ1M) {
    __tmp__4Q1M=TRUE__;
  } else {
    __tmp__OQ1M=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
    if (__tmp__OQ1M==NULL) {
      __tmp__PQ1M=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__OQ1M)->__id) {
      case __LIST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__PQ1M=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__PQ1M=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__PQ1M=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__PQ1M=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__PQ1M=NULL;
      } break;
      case __ITEM__: {
        __tmp__PQ1M=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__PQ1M=NULL;
      } break;
      case __CAST__: {
        __tmp__PQ1M=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__PQ1M=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__PQ1M=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__PQ1M=((void *)__tmp__OQ1M);
      } break;
      case __EXPR_INF__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__PQ1M=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__PQ1M=NULL;
      } break;
      }
    };
    sup_eq__FP1M=__tmp__PQ1M;
    result__WF2M=((void *)__tmp__PQ1M != (void *)NULL);
    if (result__WF2M) {
      result__IP1M=create__with__and__LOKN(Self__TRZM->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_SUP_EQ *)__tmp__PQ1M)->parent_expr_binary_cmp__EP1M.left__HN2H,((__EXPR_SUP_EQ *)__tmp__PQ1M)->parent_expr_binary_cmp__EP1M.right__LN2H);
    };
    __tmp__4Q1M=result__WF2M;
  };
  if ((! __tmp__4Q1M)) {
    __tmp__ER1M=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
    if (__tmp__ER1M==NULL) {
      __tmp__FR1M=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__ER1M)->__id) {
      case __LIST__: {
        __tmp__FR1M=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__FR1M=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__FR1M=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__FR1M=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__FR1M=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__FR1M=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__FR1M=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__FR1M=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__FR1M=((void *)__tmp__ER1M);
      } break;
      case __EXPR_SUB__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__FR1M=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__FR1M=NULL;
      } break;
      case __ITEM__: {
        __tmp__FR1M=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__FR1M=NULL;
      } break;
      case __CAST__: {
        __tmp__FR1M=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__FR1M=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__FR1M=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__FR1M=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__FR1M=NULL;
      } break;
      }
    };
    sup__GP1M=__tmp__FR1M;
    if (((void *)__tmp__FR1M != (void *)NULL)) {
      result__IP1M=create__with__and__1OKN(Self__TRZM->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_SUP *)__tmp__FR1M)->parent_expr_binary_cmp__TAKH.left__HN2H,((__EXPR_SUP *)__tmp__FR1M)->parent_expr_binary_cmp__TAKH.right__LN2H);
    };
  };
  result__VRZM=result__IP1M;
  if ((((void *)result__IP1M == (void *)NULL) && ((void *)__tmp__ASZM != (void *)NULL))) {
    __tmp__OYIN=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
    if (__tmp__OYIN==NULL) {
      __tmp__PYIN=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__OYIN)->__id) {
      case __LIST__: {
        __tmp__PYIN=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__PYIN=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__PYIN=((void *)__tmp__OYIN);
      } break;
      case __INTEGER_CST__: {
        __tmp__PYIN=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__PYIN=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__PYIN=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__PYIN=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__PYIN=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__PYIN=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__PYIN=NULL;
      } break;
      case __ITEM__: {
        __tmp__PYIN=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__PYIN=NULL;
      } break;
      case __CAST__: {
        __tmp__PYIN=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__PYIN=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__PYIN=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__PYIN=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__PYIN=NULL;
      } break;
      }
    };
    pro__MYIN=__tmp__PYIN;
    if (((void *)right_t__0RZM == (void *)type_true__FJB)) {
      __tmp__XYIN=((__PROTOTYPE_CST *)__tmp__PYIN)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__YYIN=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__YYIN)->__id) {
      case __TYPE__: {
        __tmp__ZYIN=((__TYPE *)__tmp__YYIN)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__ZYIN=((__TYPE_NULL *)__tmp__YYIN)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__ZYIN=((__TYPE_VOID *)__tmp__YYIN)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__ZYIN=((__TYPE_CONTEXT *)__tmp__YYIN)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__ZYIN=((__TYPE_ID *)__tmp__YYIN)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__ZYIN=((__TYPE_GENERIC *)__tmp__YYIN)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__ZYIN=((__PROFIL_BLOCK *)__tmp__YYIN)->parent_type__HHAG.default__AKC;
      } break;
      };
      Self__WADQ=((__PROTOTYPE_CST *)__tmp__PYIN);
      Self__WADQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__XYIN;
      Self__WADQ->parent_constant__E3LC.static_type__F4YD=to_strict__LE5D(__tmp__ZYIN);
    } else {
      __tmp__BZIN=((__PROTOTYPE_CST *)__tmp__PYIN)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__CZIN=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__CZIN)->__id) {
      case __TYPE__: {
        __tmp__DZIN=((__TYPE *)__tmp__CZIN)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__DZIN=((__TYPE_NULL *)__tmp__CZIN)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__DZIN=((__TYPE_VOID *)__tmp__CZIN)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__DZIN=((__TYPE_CONTEXT *)__tmp__CZIN)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__DZIN=((__TYPE_ID *)__tmp__CZIN)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__DZIN=((__TYPE_GENERIC *)__tmp__CZIN)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__DZIN=((__PROFIL_BLOCK *)__tmp__CZIN)->parent_type__HHAG.default__AKC;
      } break;
      };
      Self__ZADQ=((__PROTOTYPE_CST *)__tmp__PYIN);
      Self__ZADQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__BZIN;
      Self__ZADQ->parent_constant__E3LC.static_type__F4YD=to_strict__LE5D(__tmp__DZIN);
    };
    result__VRZM=Self__TRZM->parent_expr_unary_logic__0EUK.right__AQZM;
  };
  if ((((void *)result__VRZM == (void *)NULL) && (old_seq__WRZM == seq_call_and_loop__VREJ))) {
    result__VRZM=NULL;
  };
  if (((void *)result__VRZM == (void *)NULL)) {
    result__VRZM=Self__TRZM;
  } else {
    __tmp__EUZM=Self__TRZM->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__VRZM)->__id) {
    case __LIST__: {
      ((__LIST *)result__VRZM)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__VRZM)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__VRZM)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__VRZM)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__VRZM)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__VRZM)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__VRZM)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__VRZM)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__VRZM)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__VRZM)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__VRZM)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__VRZM)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__VRZM)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__VRZM)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__VRZM)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__VRZM)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__VRZM)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__VRZM)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__VRZM)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__VRZM)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__VRZM)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__VRZM)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __CAST__: {
      ((__CAST *)result__VRZM)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__VRZM)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__VRZM)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__VRZM)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__VRZM)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__VRZM)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__VRZM)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__VRZM)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__VRZM)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__VRZM)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__VRZM)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__VRZM)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__VRZM)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__VRZM)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__VRZM)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__VRZM)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__VRZM)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__VRZM)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__EUZM;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__VRZM);
}

static void* execute_link__OBFO(__EXPR_OR_LOGIC *Self__PBFO)
// ({EXPR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  void *left_t__XBFO,*right_t__YBFO;
  __UINTEGER_32 old_seq__SBFO;
  void *__tmp__0BFO,*__tmp__1BFO,*__tmp__2BFO,*__tmp__3BFO,*__tmp__5BFO;
  void *__tmp__CCFO,*result__RBFO,*result__CRPO,*__tmp__KRPO;
  void *result__RRPO,*__tmp__ZRPO,*result__AZYO,*__tmp__IZYO;
  void *__tmp__PZYO,*result__5RPO,*__tmp__CSPO,*__tmp__DSPO,*__tmp__LSPO;
  void *__tmp__SSPO,*__tmp__VSPO,*__tmp__ETPO,*__tmp__FTPO,*__tmp__MTPO;
  void *__tmp__NTPO,*__tmp__3TPO,*result__DFZO,*__tmp__LFZO;
  void *result__SFZO,*__tmp__0FZO;
  void *__tmp__ACFO,*left_cst__VBFO,*__tmp__DCFO,*right_cst__WBFO;
  __READ_LOCAL *Self__PDDQ,*Self__RDDQ,*Self__TDDQ,*Self__VDDQ;
  __READ_LOCAL *Self__XDDQ,*Self__ZDDQ,*Self__1DDQ,*Self__3DDQ;
  __READ_LOCAL *Self__5DDQ,*Self__BEDQ,*Self__DEDQ,*Self__FEDQ;
  __READ_LOCAL *Self__HEDQ,*Self__JEDQ,*Self__LEDQ,*Self__NEDQ;
  __READ_GLOBAL *Self__SDDQ,*Self__WDDQ,*Self__0DDQ,*Self__4DDQ;
  __READ_GLOBAL *Self__CEDQ,*Self__GEDQ,*Self__KEDQ,*Self__OEDQ;
  void *sup__ASPO,*__tmp__TSPO;
  void *eq__BSPO,*__tmp__WSPO;
  __POSITION __tmp__FHFO;
  __BOOLEAN __tmp__ESPO,__tmp__GTPO,__tmp__OTPO,__tmp__RTPO;
  left_t__XBFO=NULL;
  right_t__YBFO=NULL;
  old_seq__SBFO=seq_call_and_loop__VREJ;
  __tmp__0BFO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__0BFO)->__id) {
  case __LIST__: {
    __tmp__1BFO=execute_link__LUOG(__tmp__0BFO);
  } break;
  case __STRING_CST__: {
    __tmp__1BFO=((__STRING_CST *)__tmp__0BFO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__1BFO=execute_link__U5ZK(__tmp__0BFO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__1BFO=((__PROTOTYPE_CST *)__tmp__0BFO);
  } break;
  case __INTEGER_CST__: {
    __tmp__1BFO=((__INTEGER_CST *)__tmp__0BFO);
  } break;
  case __READ_LOCAL__: {
    __tmp__1BFO=execute_link__EHAL(__tmp__0BFO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1BFO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1BFO=execute_link__2LAL(__tmp__0BFO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1BFO=execute_link__FQAL(__tmp__0BFO);
  } break;
  case __REAL_CST__: {
    __tmp__1BFO=((__REAL_CST *)__tmp__0BFO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__1BFO=((__CHARACTER_CST *)__tmp__0BFO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__1BFO=execute_link__UUAL(__tmp__0BFO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1BFO=execute_link__1VAL(__tmp__0BFO);
  } break;
  case __EXPR_SUP__: {
    __tmp__1BFO=execute_link__AWAL(__tmp__0BFO);
  } break;
  case __EXPR_SUB__: {
    __tmp__1BFO=execute_link__J0AL(__tmp__0BFO);
  } break;
  case __EXPR_MUL__: {
    __tmp__1BFO=execute_link__S4AL(__tmp__0BFO);
  } break;
  case __EXPR_DIV__: {
    __tmp__1BFO=execute_link__1CBL(__tmp__0BFO);
  } break;
  case __EXPR_AND__: {
    __tmp__1BFO=execute_link__EHBL(__tmp__0BFO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1BFO=execute_link__NLBL(__tmp__0BFO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1BFO=execute_link__WPBL(__tmp__0BFO);
  } break;
  case __PUT_TO__: {
    __tmp__1BFO=execute_link__BOPK(__tmp__0BFO);
  } break;
  case __ITEM__: {
    __tmp__1BFO=execute_link__5TBL(__tmp__0BFO);
  } break;
  case __SIZE_OF__: {
    __tmp__1BFO=execute_link__GUBL(__tmp__0BFO);
  } break;
  case __CAST__: {
    __tmp__1BFO=execute_link__LUBL(__tmp__0BFO);
  } break;
  case __CALL_SLOT__: {
    __tmp__1BFO=execute_link__A2TL(__tmp__0BFO);
  } break;
  case __READ_SLOT__: {
    __tmp__1BFO=execute_link__EYBL(__tmp__0BFO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__1BFO=execute_link__U2BL(__tmp__0BFO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1BFO=execute_link__SRZM(__tmp__0BFO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1BFO=execute_link__OBFO(__tmp__0BFO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1BFO=execute_link__GJLO(__tmp__0BFO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1BFO=execute_link__HHFO(__tmp__0BFO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1BFO=execute_link__KPLO(__tmp__0BFO);
  } break;
  case __EXPR_NEG__: {
    __tmp__1BFO=execute_link__0GKM(__tmp__0BFO);
  } break;
  case __EXPR_ADD__: {
    __tmp__1BFO=execute_link__RROL(__tmp__0BFO);
  } break;
  case __EXPR_NOT__: {
    __tmp__1BFO=execute_link__GUZM(__tmp__0BFO);
  } break;
  case __EXPR_MOD__: {
    __tmp__1BFO=execute_link__ANFO(__tmp__0BFO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1BFO=execute_link__YLEP(__tmp__0BFO);
  } break;
  case __EXPR_INF__: {
    __tmp__1BFO=execute_link__VQQN(__tmp__0BFO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1BFO=execute_link__4UQN(__tmp__0BFO);
  } break;
  case __EXPR_OR__: {
    __tmp__1BFO=execute_link__1HQN(__tmp__0BFO);
  } break;
  case __EXPR_XOR__: {
    __tmp__1BFO=execute_link__IYUO(__tmp__0BFO);
  } break;
  };
  Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO=__tmp__1BFO;
  __tmp__2BFO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__2BFO)->__id) {
  case __LIST__: {
    __tmp__3BFO=execute_link__LUOG(__tmp__2BFO);
  } break;
  case __STRING_CST__: {
    __tmp__3BFO=((__STRING_CST *)__tmp__2BFO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__3BFO=execute_link__U5ZK(__tmp__2BFO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__3BFO=((__PROTOTYPE_CST *)__tmp__2BFO);
  } break;
  case __INTEGER_CST__: {
    __tmp__3BFO=((__INTEGER_CST *)__tmp__2BFO);
  } break;
  case __READ_LOCAL__: {
    __tmp__3BFO=execute_link__EHAL(__tmp__2BFO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3BFO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3BFO=execute_link__2LAL(__tmp__2BFO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3BFO=execute_link__FQAL(__tmp__2BFO);
  } break;
  case __REAL_CST__: {
    __tmp__3BFO=((__REAL_CST *)__tmp__2BFO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__3BFO=((__CHARACTER_CST *)__tmp__2BFO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__3BFO=execute_link__UUAL(__tmp__2BFO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3BFO=execute_link__1VAL(__tmp__2BFO);
  } break;
  case __EXPR_SUP__: {
    __tmp__3BFO=execute_link__AWAL(__tmp__2BFO);
  } break;
  case __EXPR_SUB__: {
    __tmp__3BFO=execute_link__J0AL(__tmp__2BFO);
  } break;
  case __EXPR_MUL__: {
    __tmp__3BFO=execute_link__S4AL(__tmp__2BFO);
  } break;
  case __EXPR_DIV__: {
    __tmp__3BFO=execute_link__1CBL(__tmp__2BFO);
  } break;
  case __EXPR_AND__: {
    __tmp__3BFO=execute_link__EHBL(__tmp__2BFO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3BFO=execute_link__NLBL(__tmp__2BFO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3BFO=execute_link__WPBL(__tmp__2BFO);
  } break;
  case __PUT_TO__: {
    __tmp__3BFO=execute_link__BOPK(__tmp__2BFO);
  } break;
  case __ITEM__: {
    __tmp__3BFO=execute_link__5TBL(__tmp__2BFO);
  } break;
  case __SIZE_OF__: {
    __tmp__3BFO=execute_link__GUBL(__tmp__2BFO);
  } break;
  case __CAST__: {
    __tmp__3BFO=execute_link__LUBL(__tmp__2BFO);
  } break;
  case __CALL_SLOT__: {
    __tmp__3BFO=execute_link__A2TL(__tmp__2BFO);
  } break;
  case __READ_SLOT__: {
    __tmp__3BFO=execute_link__EYBL(__tmp__2BFO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__3BFO=execute_link__U2BL(__tmp__2BFO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3BFO=execute_link__SRZM(__tmp__2BFO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3BFO=execute_link__OBFO(__tmp__2BFO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3BFO=execute_link__GJLO(__tmp__2BFO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3BFO=execute_link__HHFO(__tmp__2BFO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3BFO=execute_link__KPLO(__tmp__2BFO);
  } break;
  case __EXPR_NEG__: {
    __tmp__3BFO=execute_link__0GKM(__tmp__2BFO);
  } break;
  case __EXPR_ADD__: {
    __tmp__3BFO=execute_link__RROL(__tmp__2BFO);
  } break;
  case __EXPR_NOT__: {
    __tmp__3BFO=execute_link__GUZM(__tmp__2BFO);
  } break;
  case __EXPR_MOD__: {
    __tmp__3BFO=execute_link__ANFO(__tmp__2BFO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3BFO=execute_link__YLEP(__tmp__2BFO);
  } break;
  case __EXPR_INF__: {
    __tmp__3BFO=execute_link__VQQN(__tmp__2BFO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3BFO=execute_link__4UQN(__tmp__2BFO);
  } break;
  case __EXPR_OR__: {
    __tmp__3BFO=execute_link__1HQN(__tmp__2BFO);
  } break;
  case __EXPR_XOR__: {
    __tmp__3BFO=execute_link__IYUO(__tmp__2BFO);
  } break;
  };
  Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO=__tmp__3BFO;
  __tmp__5BFO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
  if (__tmp__5BFO==NULL) {
    __tmp__ACFO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__5BFO)->__id) {
    case __LIST__: {
      __tmp__ACFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ACFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ACFO=((void *)__tmp__5BFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__ACFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ACFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ACFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ACFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ACFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ACFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ACFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__ACFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ACFO=NULL;
    } break;
    case __CAST__: {
      __tmp__ACFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ACFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ACFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ACFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ACFO=NULL;
    } break;
    }
  };
  left_cst__VBFO=__tmp__ACFO;
  __tmp__CCFO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
  if (__tmp__CCFO==NULL) {
    __tmp__DCFO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__CCFO)->__id) {
    case __LIST__: {
      __tmp__DCFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__DCFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DCFO=((void *)__tmp__CCFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__DCFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DCFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__DCFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__DCFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__DCFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DCFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__DCFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__DCFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__DCFO=NULL;
    } break;
    case __CAST__: {
      __tmp__DCFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__DCFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__DCFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__DCFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__DCFO=NULL;
    } break;
    }
  };
  right_cst__WBFO=__tmp__DCFO;
  if (((void *)__tmp__ACFO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__ACFO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      left_t__XBFO=type_true__FJB;
    } else {
      left_t__XBFO=type_false__NJB;
    };
  };
  if (((void *)__tmp__DCFO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__DCFO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      right_t__YBFO=type_true__FJB;
    } else {
      right_t__YBFO=type_false__NJB;
    };
  };
  result__RBFO=NULL;
  if (((void *)__tmp__ACFO != (void *)NULL)) {
    result__CRPO=NULL;
    if (((void *)left_t__XBFO == (void *)type_false__NJB)) {
      result__CRPO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
      __tmp__KRPO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__KRPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__KRPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__KRPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__PDDQ=((__READ_LOCAL *)__tmp__KRPO);
        unread__YVJK(Self__PDDQ->local__ALZD,Self__PDDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__KRPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__KRPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__KRPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__RDDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__KRPO)->receiver__OO2H);
        unread__YVJK(Self__RDDQ->local__ALZD,Self__RDDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__KRPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__KRPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__KRPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__KRPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__KRPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__KRPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__KRPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__KRPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__KRPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__KRPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__KRPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__KRPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__KRPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__KRPO);
      } break;
      case __READ_GLOBAL__: {
        Self__SDDQ=((__READ_GLOBAL *)__tmp__KRPO);
        unread__15ML(Self__SDDQ->global__RHJK,Self__SDDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__KRPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__KRPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__KRPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__KRPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__KRPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__KRPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__KRPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__KRPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__KRPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__KRPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__KRPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__KRPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__KRPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__KRPO);
      } break;
      };
    };
    result__RBFO=result__CRPO;
  };
  if ((((void *)result__RBFO == (void *)NULL) && ((void *)__tmp__DCFO != (void *)NULL))) {
    result__RRPO=NULL;
    if (((void *)right_t__YBFO == (void *)type_false__NJB)) {
      result__RRPO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__ZRPO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__ZRPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__ZRPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__ZRPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__TDDQ=((__READ_LOCAL *)__tmp__ZRPO);
        unread__YVJK(Self__TDDQ->local__ALZD,Self__TDDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__ZRPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__ZRPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__ZRPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__VDDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZRPO)->receiver__OO2H);
        unread__YVJK(Self__VDDQ->local__ALZD,Self__VDDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__ZRPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__ZRPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__ZRPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__ZRPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__ZRPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__ZRPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__ZRPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__ZRPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__ZRPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__ZRPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__ZRPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__ZRPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__ZRPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__ZRPO);
      } break;
      case __READ_GLOBAL__: {
        Self__WDDQ=((__READ_GLOBAL *)__tmp__ZRPO);
        unread__15ML(Self__WDDQ->global__RHJK,Self__WDDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__ZRPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__ZRPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__ZRPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__ZRPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__ZRPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__ZRPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__ZRPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__ZRPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__ZRPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__ZRPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__ZRPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__ZRPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__ZRPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__ZRPO);
      } break;
      };
    };
    result__RBFO=result__RRPO;
  };
  if (((((void *)result__RBFO == (void *)NULL) && ((void *)__tmp__DCFO != (void *)NULL)) && ((void *)__tmp__ACFO != (void *)NULL))) {
    result__AZYO=NULL;
    if (((void *)left_t__XBFO == (void *)type_true__FJB)) {
      result__AZYO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__IZYO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__IZYO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__IZYO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__IZYO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__XDDQ=((__READ_LOCAL *)__tmp__IZYO);
        unread__YVJK(Self__XDDQ->local__ALZD,Self__XDDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__IZYO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__IZYO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__IZYO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__ZDDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__IZYO)->receiver__OO2H);
        unread__YVJK(Self__ZDDQ->local__ALZD,Self__ZDDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__IZYO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__IZYO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__IZYO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__IZYO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__IZYO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__IZYO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__IZYO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__IZYO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__IZYO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__IZYO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__IZYO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__IZYO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__IZYO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__IZYO);
      } break;
      case __READ_GLOBAL__: {
        Self__0DDQ=((__READ_GLOBAL *)__tmp__IZYO);
        unread__15ML(Self__0DDQ->global__RHJK,Self__0DDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__IZYO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__IZYO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__IZYO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__IZYO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__IZYO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__IZYO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__IZYO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__IZYO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__IZYO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__IZYO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__IZYO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__IZYO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__IZYO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__IZYO);
      } break;
      };
    } else {
      result__AZYO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
      __tmp__PZYO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__PZYO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__PZYO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__PZYO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__1DDQ=((__READ_LOCAL *)__tmp__PZYO);
        unread__YVJK(Self__1DDQ->local__ALZD,Self__1DDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__PZYO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__PZYO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__PZYO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__3DDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__PZYO)->receiver__OO2H);
        unread__YVJK(Self__3DDQ->local__ALZD,Self__3DDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__PZYO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__PZYO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__PZYO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__PZYO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__PZYO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__PZYO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__PZYO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__PZYO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__PZYO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__PZYO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__PZYO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__PZYO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__PZYO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__PZYO);
      } break;
      case __READ_GLOBAL__: {
        Self__4DDQ=((__READ_GLOBAL *)__tmp__PZYO);
        unread__15ML(Self__4DDQ->global__RHJK,Self__4DDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__PZYO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__PZYO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__PZYO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__PZYO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__PZYO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__PZYO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__PZYO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__PZYO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__PZYO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__PZYO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__PZYO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__PZYO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__PZYO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__PZYO);
      } break;
      };
    };
    result__RBFO=result__AZYO;
  };
  if ((((void *)result__RBFO == (void *)NULL) && (old_seq__SBFO == seq_call_and_loop__VREJ))) {
    result__5RPO=NULL;
    sup__ASPO=NULL;
    eq__BSPO=NULL;
    __tmp__CSPO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
    __tmp__DSPO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__CSPO)->__id) {
    case __LIST__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__ESPO=__infix_equal_equal__WF1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ESPO=__infix_equal_equal__LG1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __INTEGER_CST__: {
      __tmp__ESPO=__infix_equal_equal__2G1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __READ_LOCAL__: {
      __tmp__ESPO=__infix_equal_equal__WH1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ESPO=__infix_equal_equal__MI1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ESPO=__infix_equal_equal__IJ1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __REAL_CST__: {
      __tmp__ESPO=__infix_equal_equal__EK1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__ESPO=__infix_equal_equal__4K1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__ESPO=__infix_equal_equal__XL1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_SUB__: {
      __tmp__ESPO=__infix_equal_equal__TM1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_MUL__: {
      __tmp__ESPO=__infix_equal_equal__PN1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_DIV__: {
      __tmp__ESPO=__infix_equal_equal__LO1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_AND__: {
      __tmp__ESPO=__infix_equal_equal__HP1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ESPO=__infix_equal_equal__DQ1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ESPO=__infix_equal_equal__5Q1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __PUT_TO__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__ESPO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__ESPO=__infix_equal_equal__LS1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__ESPO=__infix_equal_equal__HT1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ESPO=__infix_equal_equal__CZHO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ESPO=__infix_equal_equal__SXFO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ESPO=__infix_equal_equal__TBMO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ESPO=__infix_equal_equal__OYFO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ESPO=__infix_equal_equal__QCMO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_NEG__: {
      __tmp__ESPO=__infix_equal_equal__J5KM(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_ADD__: {
      __tmp__ESPO=__infix_equal_equal__ZT1L(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_NOT__: {
      __tmp__ESPO=__infix_equal_equal__QB0M(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_MOD__: {
      __tmp__ESPO=__infix_equal_equal__KZFO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ESPO=__infix_equal_equal__OTEP(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_INF__: {
      __tmp__ESPO=__infix_equal_equal__UZHO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ESPO=__infix_equal_equal__Q0HO(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_OR__: {
      __tmp__ESPO=__infix_equal_equal__32QN(__tmp__CSPO,__tmp__DSPO);
    } break;
    case __EXPR_XOR__: {
      __tmp__ESPO=__infix_equal_equal__GOVO(__tmp__CSPO,__tmp__DSPO);
    } break;
    };
    if (__tmp__ESPO) {
      result__5RPO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
      __tmp__LSPO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__LSPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__LSPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__LSPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__5DDQ=((__READ_LOCAL *)__tmp__LSPO);
        unread__YVJK(Self__5DDQ->local__ALZD,Self__5DDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__LSPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__LSPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__LSPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__BEDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LSPO)->receiver__OO2H);
        unread__YVJK(Self__BEDQ->local__ALZD,Self__BEDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__LSPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__LSPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__LSPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__LSPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__LSPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__LSPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__LSPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__LSPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__LSPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__LSPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__LSPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__LSPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__LSPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__LSPO);
      } break;
      case __READ_GLOBAL__: {
        Self__CEDQ=((__READ_GLOBAL *)__tmp__LSPO);
        unread__15ML(Self__CEDQ->global__RHJK,Self__CEDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__LSPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__LSPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__LSPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__LSPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__LSPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__LSPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__LSPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__LSPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__LSPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__LSPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__LSPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__LSPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__LSPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__LSPO);
      } break;
      };
    } else {
      __tmp__SSPO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
      if (__tmp__SSPO==NULL) {
        __tmp__TSPO=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__SSPO)->__id) {
        case __LIST__: {
          __tmp__TSPO=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__TSPO=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__TSPO=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__TSPO=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__TSPO=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__TSPO=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__TSPO=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__TSPO=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__TSPO=((void *)__tmp__SSPO);
        } break;
        case __EXPR_SUB__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__TSPO=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__TSPO=NULL;
        } break;
        case __ITEM__: {
          __tmp__TSPO=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__TSPO=NULL;
        } break;
        case __CAST__: {
          __tmp__TSPO=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__TSPO=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__TSPO=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__TSPO=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__TSPO=NULL;
        } break;
        }
      };
      sup__ASPO=__tmp__TSPO;
      __tmp__VSPO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
      if (__tmp__VSPO==NULL) {
        __tmp__WSPO=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__VSPO)->__id) {
        case __LIST__: {
          __tmp__WSPO=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__WSPO=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__WSPO=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__WSPO=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__WSPO=((void *)__tmp__VSPO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__WSPO=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__WSPO=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__WSPO=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__WSPO=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__WSPO=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__WSPO=NULL;
        } break;
        case __ITEM__: {
          __tmp__WSPO=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__WSPO=NULL;
        } break;
        case __CAST__: {
          __tmp__WSPO=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__WSPO=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__WSPO=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__WSPO=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__WSPO=NULL;
        } break;
        }
      };
      eq__BSPO=__tmp__WSPO;
      if ((((void *)__tmp__TSPO != (void *)NULL) && ((void *)__tmp__WSPO != (void *)NULL))) {
        __tmp__ETPO=((__EXPR_SUP *)__tmp__TSPO)->parent_expr_binary_cmp__TAKH.left__HN2H;
        __tmp__FTPO=((__EXPR_EQUAL *)__tmp__WSPO)->parent_expr_binary_cmp__1LJH.left__HN2H;
        switch (((struct ___OBJ *)__tmp__ETPO)->__id) {
        case __LIST__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__GTPO=__infix_equal_equal__WF1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXTERNAL_C__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__GTPO=__infix_equal_equal__LG1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __INTEGER_CST__: {
          __tmp__GTPO=__infix_equal_equal__2G1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __READ_LOCAL__: {
          __tmp__GTPO=__infix_equal_equal__WH1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__GTPO=__infix_equal_equal__MI1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__GTPO=__infix_equal_equal__IJ1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __REAL_CST__: {
          __tmp__GTPO=__infix_equal_equal__EK1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __CHARACTER_CST__: {
          __tmp__GTPO=__infix_equal_equal__4K1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __IS_EXPANDED__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__GTPO=__infix_equal_equal__XL1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_SUB__: {
          __tmp__GTPO=__infix_equal_equal__TM1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_MUL__: {
          __tmp__GTPO=__infix_equal_equal__PN1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_DIV__: {
          __tmp__GTPO=__infix_equal_equal__LO1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_AND__: {
          __tmp__GTPO=__infix_equal_equal__HP1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__GTPO=__infix_equal_equal__DQ1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__GTPO=__infix_equal_equal__5Q1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __PUT_TO__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __CAST__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__GTPO=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__GTPO=__infix_equal_equal__LS1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __READ_GLOBAL__: {
          __tmp__GTPO=__infix_equal_equal__HT1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__GTPO=__infix_equal_equal__CZHO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__GTPO=__infix_equal_equal__SXFO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__GTPO=__infix_equal_equal__TBMO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__GTPO=__infix_equal_equal__OYFO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__GTPO=__infix_equal_equal__QCMO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_NEG__: {
          __tmp__GTPO=__infix_equal_equal__J5KM(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_ADD__: {
          __tmp__GTPO=__infix_equal_equal__ZT1L(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_NOT__: {
          __tmp__GTPO=__infix_equal_equal__QB0M(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_MOD__: {
          __tmp__GTPO=__infix_equal_equal__KZFO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__GTPO=__infix_equal_equal__OTEP(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_INF__: {
          __tmp__GTPO=__infix_equal_equal__UZHO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__GTPO=__infix_equal_equal__Q0HO(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_OR__: {
          __tmp__GTPO=__infix_equal_equal__32QN(__tmp__ETPO,__tmp__FTPO);
        } break;
        case __EXPR_XOR__: {
          __tmp__GTPO=__infix_equal_equal__GOVO(__tmp__ETPO,__tmp__FTPO);
        } break;
        };
        if (__tmp__GTPO) {
          __tmp__MTPO=((__EXPR_SUP *)__tmp__TSPO)->parent_expr_binary_cmp__TAKH.right__LN2H;
          __tmp__NTPO=((__EXPR_EQUAL *)__tmp__WSPO)->parent_expr_binary_cmp__1LJH.right__LN2H;
          switch (((struct ___OBJ *)__tmp__MTPO)->__id) {
          case __LIST__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__OTPO=__infix_equal_equal__WF1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXTERNAL_C__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__OTPO=__infix_equal_equal__LG1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __INTEGER_CST__: {
            __tmp__OTPO=__infix_equal_equal__2G1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __READ_LOCAL__: {
            __tmp__OTPO=__infix_equal_equal__WH1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__OTPO=__infix_equal_equal__MI1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__OTPO=__infix_equal_equal__IJ1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __REAL_CST__: {
            __tmp__OTPO=__infix_equal_equal__EK1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __CHARACTER_CST__: {
            __tmp__OTPO=__infix_equal_equal__4K1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __IS_EXPANDED__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__OTPO=__infix_equal_equal__XL1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_SUB__: {
            __tmp__OTPO=__infix_equal_equal__TM1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_MUL__: {
            __tmp__OTPO=__infix_equal_equal__PN1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_DIV__: {
            __tmp__OTPO=__infix_equal_equal__LO1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_AND__: {
            __tmp__OTPO=__infix_equal_equal__HP1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__OTPO=__infix_equal_equal__DQ1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__OTPO=__infix_equal_equal__5Q1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __PUT_TO__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __CAST__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__OTPO=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__OTPO=__infix_equal_equal__LS1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __READ_GLOBAL__: {
            __tmp__OTPO=__infix_equal_equal__HT1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__OTPO=__infix_equal_equal__CZHO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__OTPO=__infix_equal_equal__SXFO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__OTPO=__infix_equal_equal__TBMO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__OTPO=__infix_equal_equal__OYFO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__OTPO=__infix_equal_equal__QCMO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_NEG__: {
            __tmp__OTPO=__infix_equal_equal__J5KM(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_ADD__: {
            __tmp__OTPO=__infix_equal_equal__ZT1L(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_NOT__: {
            __tmp__OTPO=__infix_equal_equal__QB0M(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_MOD__: {
            __tmp__OTPO=__infix_equal_equal__KZFO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__OTPO=__infix_equal_equal__OTEP(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_INF__: {
            __tmp__OTPO=__infix_equal_equal__UZHO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__OTPO=__infix_equal_equal__Q0HO(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_OR__: {
            __tmp__OTPO=__infix_equal_equal__32QN(__tmp__MTPO,__tmp__NTPO);
          } break;
          case __EXPR_XOR__: {
            __tmp__OTPO=__infix_equal_equal__GOVO(__tmp__MTPO,__tmp__NTPO);
          } break;
          };
          __tmp__RTPO=__tmp__OTPO;
        } else {
          __tmp__RTPO=FALSE__;
        };
        if (__tmp__RTPO) {
          result__5RPO=create__with__and__4LAP(Self__PBFO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_SUP *)__tmp__TSPO)->parent_expr_binary_cmp__TAKH.left__HN2H,((__EXPR_SUP *)__tmp__TSPO)->parent_expr_binary_cmp__TAKH.right__LN2H);
          __tmp__3TPO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
          switch (((struct ___OBJ *)__tmp__3TPO)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__3TPO);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__3TPO);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__DEDQ=((__READ_LOCAL *)__tmp__3TPO);
            unread__YVJK(Self__DEDQ->local__ALZD,Self__DEDQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__3TPO);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__3TPO);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__3TPO);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__FEDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3TPO)->receiver__OO2H);
            unread__YVJK(Self__FEDQ->local__ALZD,Self__FEDQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__3TPO);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__3TPO);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__3TPO);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__3TPO);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__3TPO);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__3TPO);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__3TPO);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__3TPO);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__3TPO);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__3TPO);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__3TPO);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__3TPO);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__3TPO);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__3TPO);
          } break;
          case __READ_GLOBAL__: {
            Self__GEDQ=((__READ_GLOBAL *)__tmp__3TPO);
            unread__15ML(Self__GEDQ->global__RHJK,Self__GEDQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__3TPO);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__3TPO);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__3TPO);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__3TPO);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__3TPO);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__3TPO);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__3TPO);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__3TPO);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__3TPO);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__3TPO);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__3TPO);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__3TPO);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__3TPO);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__3TPO);
          } break;
          };
        };
      };
    };
    result__RBFO=result__5RPO;
    if ((((void *)result__5RPO == (void *)NULL) && ((void *)__tmp__ACFO != (void *)NULL))) {
      result__DFZO=NULL;
      if (((void *)left_t__XBFO == (void *)type_true__FJB)) {
        result__DFZO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
        __tmp__LFZO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
        switch (((struct ___OBJ *)__tmp__LFZO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__LFZO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__LFZO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__HEDQ=((__READ_LOCAL *)__tmp__LFZO);
          unread__YVJK(Self__HEDQ->local__ALZD,Self__HEDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__LFZO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__LFZO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__LFZO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__JEDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__LFZO)->receiver__OO2H);
          unread__YVJK(Self__JEDQ->local__ALZD,Self__JEDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__LFZO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__LFZO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__LFZO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__LFZO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__LFZO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__LFZO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__LFZO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__LFZO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__LFZO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__LFZO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__LFZO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__LFZO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__LFZO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__LFZO);
        } break;
        case __READ_GLOBAL__: {
          Self__KEDQ=((__READ_GLOBAL *)__tmp__LFZO);
          unread__15ML(Self__KEDQ->global__RHJK,Self__KEDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__LFZO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__LFZO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__LFZO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__LFZO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__LFZO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__LFZO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__LFZO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__LFZO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__LFZO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__LFZO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__LFZO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__LFZO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__LFZO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__LFZO);
        } break;
        };
      };
      result__RBFO=result__DFZO;
    };
    if ((((void *)result__RBFO == (void *)NULL) && ((void *)__tmp__DCFO != (void *)NULL))) {
      result__SFZO=NULL;
      if (((void *)right_t__YBFO == (void *)type_true__FJB)) {
        result__SFZO=Self__PBFO->parent_expr_binary_logic__WHCL.right__RMEO;
        __tmp__0FZO=Self__PBFO->parent_expr_binary_logic__WHCL.left__NMEO;
        switch (((struct ___OBJ *)__tmp__0FZO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__0FZO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__0FZO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__LEDQ=((__READ_LOCAL *)__tmp__0FZO);
          unread__YVJK(Self__LEDQ->local__ALZD,Self__LEDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__0FZO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__0FZO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__0FZO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__NEDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__0FZO)->receiver__OO2H);
          unread__YVJK(Self__NEDQ->local__ALZD,Self__NEDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__0FZO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__0FZO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__0FZO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__0FZO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__0FZO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__0FZO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__0FZO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__0FZO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__0FZO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__0FZO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__0FZO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__0FZO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__0FZO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__0FZO);
        } break;
        case __READ_GLOBAL__: {
          Self__OEDQ=((__READ_GLOBAL *)__tmp__0FZO);
          unread__15ML(Self__OEDQ->global__RHJK,Self__OEDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__0FZO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__0FZO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__0FZO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__0FZO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__0FZO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__0FZO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__0FZO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__0FZO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__0FZO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__0FZO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__0FZO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__0FZO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__0FZO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__0FZO);
        } break;
        };
      };
      result__RBFO=result__SFZO;
    };
  };
  if (((void *)result__RBFO == (void *)NULL)) {
    result__RBFO=Self__PBFO;
  } else {
    __tmp__FHFO=Self__PBFO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__RBFO)->__id) {
    case __LIST__: {
      ((__LIST *)result__RBFO)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__RBFO)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__RBFO)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__RBFO)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__RBFO)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__RBFO)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__RBFO)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__RBFO)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__RBFO)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__RBFO)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__RBFO)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__RBFO)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__RBFO)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__RBFO)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__RBFO)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__RBFO)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__RBFO)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__RBFO)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__RBFO)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__RBFO)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__RBFO)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__RBFO)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __CAST__: {
      ((__CAST *)result__RBFO)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__RBFO)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__RBFO)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__RBFO)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__RBFO)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__RBFO)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__RBFO)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__RBFO)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__RBFO)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__RBFO)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__RBFO)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__RBFO)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__RBFO)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__RBFO)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__RBFO)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__RBFO)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__RBFO)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__RBFO)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FHFO;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__RBFO);
}

static void* execute_link__HHFO(__EXPR_AND_LOGIC *Self__IHFO)
// ({EXPR_AND_LOGIC}) With resultRecursive, No inlinable.
{
  void *left_t__QHFO,*right_t__RHFO;
  __UINTEGER_32 old_seq__LHFO;
  void *__tmp__THFO,*__tmp__UHFO,*__tmp__VHFO,*__tmp__WHFO,*__tmp__YHFO;
  void *__tmp__1HFO,*result__KHFO,*result__BVPO,*__tmp__JVPO;
  void *result__QVPO,*__tmp__YVPO,*result__WZYO,*__tmp__4ZYO;
  void *__tmp__F0YO,*result__4VPO,*__tmp__5VPO,*__tmp__AWPO,*__tmp__IWPO;
  void *result__BGZO,*__tmp__JGZO,*result__QGZO,*__tmp__YGZO;
  void *__tmp__ZHFO,*left_cst__OHFO,*__tmp__2HFO,*right_cst__PHFO;
  __READ_LOCAL *Self__2IDQ,*Self__4IDQ,*Self__AJDQ,*Self__CJDQ;
  __READ_LOCAL *Self__EJDQ,*Self__GJDQ,*Self__IJDQ,*Self__KJDQ;
  __READ_LOCAL *Self__MJDQ,*Self__OJDQ,*Self__QJDQ,*Self__SJDQ;
  __READ_LOCAL *Self__UJDQ,*Self__WJDQ;
  __READ_GLOBAL *Self__5IDQ,*Self__DJDQ,*Self__HJDQ,*Self__LJDQ;
  __READ_GLOBAL *Self__PJDQ,*Self__TJDQ,*Self__XJDQ;
  __POSITION __tmp__4MFO;
  __BOOLEAN __tmp__BWPO;
  left_t__QHFO=NULL;
  right_t__RHFO=NULL;
  old_seq__LHFO=seq_call_and_loop__VREJ;
  __tmp__THFO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__THFO)->__id) {
  case __LIST__: {
    __tmp__UHFO=execute_link__LUOG(__tmp__THFO);
  } break;
  case __STRING_CST__: {
    __tmp__UHFO=((__STRING_CST *)__tmp__THFO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__UHFO=execute_link__U5ZK(__tmp__THFO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__UHFO=((__PROTOTYPE_CST *)__tmp__THFO);
  } break;
  case __INTEGER_CST__: {
    __tmp__UHFO=((__INTEGER_CST *)__tmp__THFO);
  } break;
  case __READ_LOCAL__: {
    __tmp__UHFO=execute_link__EHAL(__tmp__THFO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UHFO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UHFO=execute_link__2LAL(__tmp__THFO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UHFO=execute_link__FQAL(__tmp__THFO);
  } break;
  case __REAL_CST__: {
    __tmp__UHFO=((__REAL_CST *)__tmp__THFO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__UHFO=((__CHARACTER_CST *)__tmp__THFO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__UHFO=execute_link__UUAL(__tmp__THFO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UHFO=execute_link__1VAL(__tmp__THFO);
  } break;
  case __EXPR_SUP__: {
    __tmp__UHFO=execute_link__AWAL(__tmp__THFO);
  } break;
  case __EXPR_SUB__: {
    __tmp__UHFO=execute_link__J0AL(__tmp__THFO);
  } break;
  case __EXPR_MUL__: {
    __tmp__UHFO=execute_link__S4AL(__tmp__THFO);
  } break;
  case __EXPR_DIV__: {
    __tmp__UHFO=execute_link__1CBL(__tmp__THFO);
  } break;
  case __EXPR_AND__: {
    __tmp__UHFO=execute_link__EHBL(__tmp__THFO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UHFO=execute_link__NLBL(__tmp__THFO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UHFO=execute_link__WPBL(__tmp__THFO);
  } break;
  case __PUT_TO__: {
    __tmp__UHFO=execute_link__BOPK(__tmp__THFO);
  } break;
  case __ITEM__: {
    __tmp__UHFO=execute_link__5TBL(__tmp__THFO);
  } break;
  case __SIZE_OF__: {
    __tmp__UHFO=execute_link__GUBL(__tmp__THFO);
  } break;
  case __CAST__: {
    __tmp__UHFO=execute_link__LUBL(__tmp__THFO);
  } break;
  case __CALL_SLOT__: {
    __tmp__UHFO=execute_link__A2TL(__tmp__THFO);
  } break;
  case __READ_SLOT__: {
    __tmp__UHFO=execute_link__EYBL(__tmp__THFO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__UHFO=execute_link__U2BL(__tmp__THFO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UHFO=execute_link__SRZM(__tmp__THFO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UHFO=execute_link__OBFO(__tmp__THFO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UHFO=execute_link__GJLO(__tmp__THFO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UHFO=execute_link__HHFO(__tmp__THFO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UHFO=execute_link__KPLO(__tmp__THFO);
  } break;
  case __EXPR_NEG__: {
    __tmp__UHFO=execute_link__0GKM(__tmp__THFO);
  } break;
  case __EXPR_ADD__: {
    __tmp__UHFO=execute_link__RROL(__tmp__THFO);
  } break;
  case __EXPR_NOT__: {
    __tmp__UHFO=execute_link__GUZM(__tmp__THFO);
  } break;
  case __EXPR_MOD__: {
    __tmp__UHFO=execute_link__ANFO(__tmp__THFO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UHFO=execute_link__YLEP(__tmp__THFO);
  } break;
  case __EXPR_INF__: {
    __tmp__UHFO=execute_link__VQQN(__tmp__THFO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UHFO=execute_link__4UQN(__tmp__THFO);
  } break;
  case __EXPR_OR__: {
    __tmp__UHFO=execute_link__1HQN(__tmp__THFO);
  } break;
  case __EXPR_XOR__: {
    __tmp__UHFO=execute_link__IYUO(__tmp__THFO);
  } break;
  };
  Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO=__tmp__UHFO;
  __tmp__VHFO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
  switch (((struct ___OBJ *)__tmp__VHFO)->__id) {
  case __LIST__: {
    __tmp__WHFO=execute_link__LUOG(__tmp__VHFO);
  } break;
  case __STRING_CST__: {
    __tmp__WHFO=((__STRING_CST *)__tmp__VHFO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__WHFO=execute_link__U5ZK(__tmp__VHFO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__WHFO=((__PROTOTYPE_CST *)__tmp__VHFO);
  } break;
  case __INTEGER_CST__: {
    __tmp__WHFO=((__INTEGER_CST *)__tmp__VHFO);
  } break;
  case __READ_LOCAL__: {
    __tmp__WHFO=execute_link__EHAL(__tmp__VHFO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WHFO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WHFO=execute_link__2LAL(__tmp__VHFO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WHFO=execute_link__FQAL(__tmp__VHFO);
  } break;
  case __REAL_CST__: {
    __tmp__WHFO=((__REAL_CST *)__tmp__VHFO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__WHFO=((__CHARACTER_CST *)__tmp__VHFO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__WHFO=execute_link__UUAL(__tmp__VHFO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WHFO=execute_link__1VAL(__tmp__VHFO);
  } break;
  case __EXPR_SUP__: {
    __tmp__WHFO=execute_link__AWAL(__tmp__VHFO);
  } break;
  case __EXPR_SUB__: {
    __tmp__WHFO=execute_link__J0AL(__tmp__VHFO);
  } break;
  case __EXPR_MUL__: {
    __tmp__WHFO=execute_link__S4AL(__tmp__VHFO);
  } break;
  case __EXPR_DIV__: {
    __tmp__WHFO=execute_link__1CBL(__tmp__VHFO);
  } break;
  case __EXPR_AND__: {
    __tmp__WHFO=execute_link__EHBL(__tmp__VHFO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WHFO=execute_link__NLBL(__tmp__VHFO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WHFO=execute_link__WPBL(__tmp__VHFO);
  } break;
  case __PUT_TO__: {
    __tmp__WHFO=execute_link__BOPK(__tmp__VHFO);
  } break;
  case __ITEM__: {
    __tmp__WHFO=execute_link__5TBL(__tmp__VHFO);
  } break;
  case __SIZE_OF__: {
    __tmp__WHFO=execute_link__GUBL(__tmp__VHFO);
  } break;
  case __CAST__: {
    __tmp__WHFO=execute_link__LUBL(__tmp__VHFO);
  } break;
  case __CALL_SLOT__: {
    __tmp__WHFO=execute_link__A2TL(__tmp__VHFO);
  } break;
  case __READ_SLOT__: {
    __tmp__WHFO=execute_link__EYBL(__tmp__VHFO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__WHFO=execute_link__U2BL(__tmp__VHFO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WHFO=execute_link__SRZM(__tmp__VHFO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WHFO=execute_link__OBFO(__tmp__VHFO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WHFO=execute_link__GJLO(__tmp__VHFO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WHFO=execute_link__HHFO(__tmp__VHFO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WHFO=execute_link__KPLO(__tmp__VHFO);
  } break;
  case __EXPR_NEG__: {
    __tmp__WHFO=execute_link__0GKM(__tmp__VHFO);
  } break;
  case __EXPR_ADD__: {
    __tmp__WHFO=execute_link__RROL(__tmp__VHFO);
  } break;
  case __EXPR_NOT__: {
    __tmp__WHFO=execute_link__GUZM(__tmp__VHFO);
  } break;
  case __EXPR_MOD__: {
    __tmp__WHFO=execute_link__ANFO(__tmp__VHFO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WHFO=execute_link__YLEP(__tmp__VHFO);
  } break;
  case __EXPR_INF__: {
    __tmp__WHFO=execute_link__VQQN(__tmp__VHFO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WHFO=execute_link__4UQN(__tmp__VHFO);
  } break;
  case __EXPR_OR__: {
    __tmp__WHFO=execute_link__1HQN(__tmp__VHFO);
  } break;
  case __EXPR_XOR__: {
    __tmp__WHFO=execute_link__IYUO(__tmp__VHFO);
  } break;
  };
  Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO=__tmp__WHFO;
  __tmp__YHFO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
  if (__tmp__YHFO==NULL) {
    __tmp__ZHFO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__YHFO)->__id) {
    case __LIST__: {
      __tmp__ZHFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZHFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZHFO=((void *)__tmp__YHFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__ZHFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZHFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ZHFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZHFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZHFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZHFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ZHFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__ZHFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ZHFO=NULL;
    } break;
    case __CAST__: {
      __tmp__ZHFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZHFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ZHFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ZHFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ZHFO=NULL;
    } break;
    }
  };
  left_cst__OHFO=__tmp__ZHFO;
  __tmp__1HFO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
  if (__tmp__1HFO==NULL) {
    __tmp__2HFO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__1HFO)->__id) {
    case __LIST__: {
      __tmp__2HFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__2HFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2HFO=((void *)__tmp__1HFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__2HFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2HFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__2HFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2HFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2HFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2HFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__2HFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__2HFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__2HFO=NULL;
    } break;
    case __CAST__: {
      __tmp__2HFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__2HFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__2HFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__2HFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__2HFO=NULL;
    } break;
    }
  };
  right_cst__PHFO=__tmp__2HFO;
  if (((void *)__tmp__ZHFO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__ZHFO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      left_t__QHFO=type_true__FJB;
    } else {
      left_t__QHFO=type_false__NJB;
    };
  };
  if (((void *)__tmp__2HFO != (void *)NULL)) {
    if (((void *)((__TYPE_FULL *)((__PROTOTYPE_CST *)__tmp__2HFO)->parent_constant__E3LC.static_type__F4YD)->parent_type__KTL == (void *)type_true__FJB)) {
      right_t__RHFO=type_true__FJB;
    } else {
      right_t__RHFO=type_false__NJB;
    };
  };
  result__KHFO=NULL;
  if (((void *)__tmp__ZHFO != (void *)NULL)) {
    result__BVPO=NULL;
    if (((void *)left_t__QHFO == (void *)type_true__FJB)) {
      result__BVPO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
      __tmp__JVPO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__JVPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__JVPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__JVPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__2IDQ=((__READ_LOCAL *)__tmp__JVPO);
        unread__YVJK(Self__2IDQ->local__ALZD,Self__2IDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__JVPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__JVPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__JVPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__4IDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__JVPO)->receiver__OO2H);
        unread__YVJK(Self__4IDQ->local__ALZD,Self__4IDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__JVPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__JVPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__JVPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__JVPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__JVPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__JVPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__JVPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__JVPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__JVPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__JVPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__JVPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__JVPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__JVPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__JVPO);
      } break;
      case __READ_GLOBAL__: {
        Self__5IDQ=((__READ_GLOBAL *)__tmp__JVPO);
        unread__15ML(Self__5IDQ->global__RHJK,Self__5IDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__JVPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__JVPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__JVPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__JVPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__JVPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__JVPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__JVPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__JVPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__JVPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__JVPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__JVPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__JVPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__JVPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__JVPO);
      } break;
      };
    };
    result__KHFO=result__BVPO;
  };
  if ((((void *)result__KHFO == (void *)NULL) && ((void *)__tmp__2HFO != (void *)NULL))) {
    result__QVPO=NULL;
    if (((void *)right_t__RHFO == (void *)type_true__FJB)) {
      result__QVPO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__YVPO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__YVPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__YVPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__YVPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__AJDQ=((__READ_LOCAL *)__tmp__YVPO);
        unread__YVJK(Self__AJDQ->local__ALZD,Self__AJDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__YVPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__YVPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__YVPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__CJDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YVPO)->receiver__OO2H);
        unread__YVJK(Self__CJDQ->local__ALZD,Self__CJDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__YVPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__YVPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__YVPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__YVPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__YVPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__YVPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__YVPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__YVPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__YVPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__YVPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__YVPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__YVPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__YVPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__YVPO);
      } break;
      case __READ_GLOBAL__: {
        Self__DJDQ=((__READ_GLOBAL *)__tmp__YVPO);
        unread__15ML(Self__DJDQ->global__RHJK,Self__DJDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__YVPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__YVPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__YVPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__YVPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__YVPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__YVPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__YVPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__YVPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__YVPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__YVPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__YVPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__YVPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__YVPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__YVPO);
      } break;
      };
    };
    result__KHFO=result__QVPO;
  };
  if (((((void *)result__KHFO == (void *)NULL) && ((void *)__tmp__2HFO != (void *)NULL)) && ((void *)__tmp__ZHFO != (void *)NULL))) {
    result__WZYO=NULL;
    if (((void *)left_t__QHFO == (void *)type_true__FJB)) {
      result__WZYO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
      __tmp__4ZYO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
      switch (((struct ___OBJ *)__tmp__4ZYO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__4ZYO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__4ZYO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__EJDQ=((__READ_LOCAL *)__tmp__4ZYO);
        unread__YVJK(Self__EJDQ->local__ALZD,Self__EJDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__4ZYO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__4ZYO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__4ZYO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__GJDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__4ZYO)->receiver__OO2H);
        unread__YVJK(Self__GJDQ->local__ALZD,Self__GJDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__4ZYO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__4ZYO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__4ZYO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__4ZYO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__4ZYO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__4ZYO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__4ZYO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__4ZYO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__4ZYO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__4ZYO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__4ZYO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__4ZYO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__4ZYO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__4ZYO);
      } break;
      case __READ_GLOBAL__: {
        Self__HJDQ=((__READ_GLOBAL *)__tmp__4ZYO);
        unread__15ML(Self__HJDQ->global__RHJK,Self__HJDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__4ZYO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__4ZYO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__4ZYO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__4ZYO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__4ZYO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__4ZYO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__4ZYO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__4ZYO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__4ZYO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__4ZYO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__4ZYO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__4ZYO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__4ZYO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__4ZYO);
      } break;
      };
    } else {
      result__WZYO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__F0YO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__F0YO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__F0YO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__F0YO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__IJDQ=((__READ_LOCAL *)__tmp__F0YO);
        unread__YVJK(Self__IJDQ->local__ALZD,Self__IJDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__F0YO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__F0YO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__F0YO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__KJDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__F0YO)->receiver__OO2H);
        unread__YVJK(Self__KJDQ->local__ALZD,Self__KJDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__F0YO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__F0YO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__F0YO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__F0YO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__F0YO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__F0YO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__F0YO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__F0YO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__F0YO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__F0YO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__F0YO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__F0YO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__F0YO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__F0YO);
      } break;
      case __READ_GLOBAL__: {
        Self__LJDQ=((__READ_GLOBAL *)__tmp__F0YO);
        unread__15ML(Self__LJDQ->global__RHJK,Self__LJDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__F0YO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__F0YO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__F0YO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__F0YO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__F0YO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__F0YO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__F0YO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__F0YO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__F0YO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__F0YO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__F0YO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__F0YO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__F0YO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__F0YO);
      } break;
      };
    };
    result__KHFO=result__WZYO;
  };
  if ((((void *)result__KHFO == (void *)NULL) && (old_seq__LHFO == seq_call_and_loop__VREJ))) {
    result__4VPO=NULL;
    __tmp__5VPO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
    __tmp__AWPO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__5VPO)->__id) {
    case __LIST__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__BWPO=__infix_equal_equal__WF1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BWPO=__infix_equal_equal__LG1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __INTEGER_CST__: {
      __tmp__BWPO=__infix_equal_equal__2G1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __READ_LOCAL__: {
      __tmp__BWPO=__infix_equal_equal__WH1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BWPO=__infix_equal_equal__MI1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BWPO=__infix_equal_equal__IJ1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __REAL_CST__: {
      __tmp__BWPO=__infix_equal_equal__EK1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__BWPO=__infix_equal_equal__4K1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__BWPO=__infix_equal_equal__XL1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_SUB__: {
      __tmp__BWPO=__infix_equal_equal__TM1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_MUL__: {
      __tmp__BWPO=__infix_equal_equal__PN1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_DIV__: {
      __tmp__BWPO=__infix_equal_equal__LO1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_AND__: {
      __tmp__BWPO=__infix_equal_equal__HP1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BWPO=__infix_equal_equal__DQ1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BWPO=__infix_equal_equal__5Q1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __PUT_TO__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__BWPO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__BWPO=__infix_equal_equal__LS1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__BWPO=__infix_equal_equal__HT1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BWPO=__infix_equal_equal__CZHO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BWPO=__infix_equal_equal__SXFO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BWPO=__infix_equal_equal__TBMO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BWPO=__infix_equal_equal__OYFO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BWPO=__infix_equal_equal__QCMO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_NEG__: {
      __tmp__BWPO=__infix_equal_equal__J5KM(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_ADD__: {
      __tmp__BWPO=__infix_equal_equal__ZT1L(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_NOT__: {
      __tmp__BWPO=__infix_equal_equal__QB0M(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_MOD__: {
      __tmp__BWPO=__infix_equal_equal__KZFO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BWPO=__infix_equal_equal__OTEP(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_INF__: {
      __tmp__BWPO=__infix_equal_equal__UZHO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BWPO=__infix_equal_equal__Q0HO(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_OR__: {
      __tmp__BWPO=__infix_equal_equal__32QN(__tmp__5VPO,__tmp__AWPO);
    } break;
    case __EXPR_XOR__: {
      __tmp__BWPO=__infix_equal_equal__GOVO(__tmp__5VPO,__tmp__AWPO);
    } break;
    };
    if (__tmp__BWPO) {
      result__4VPO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
      __tmp__IWPO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
      switch (((struct ___OBJ *)__tmp__IWPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__IWPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__IWPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__MJDQ=((__READ_LOCAL *)__tmp__IWPO);
        unread__YVJK(Self__MJDQ->local__ALZD,Self__MJDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__IWPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__IWPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__IWPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__OJDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__IWPO)->receiver__OO2H);
        unread__YVJK(Self__OJDQ->local__ALZD,Self__OJDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__IWPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__IWPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__IWPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__IWPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__IWPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__IWPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__IWPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__IWPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__IWPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__IWPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__IWPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__IWPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__IWPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__IWPO);
      } break;
      case __READ_GLOBAL__: {
        Self__PJDQ=((__READ_GLOBAL *)__tmp__IWPO);
        unread__15ML(Self__PJDQ->global__RHJK,Self__PJDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__IWPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__IWPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__IWPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__IWPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__IWPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__IWPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__IWPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__IWPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__IWPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__IWPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__IWPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__IWPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__IWPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__IWPO);
      } break;
      };
    };
    result__KHFO=result__4VPO;
    if ((((void *)result__4VPO == (void *)NULL) && ((void *)__tmp__ZHFO != (void *)NULL))) {
      result__BGZO=NULL;
      if (((void *)left_t__QHFO == (void *)type_false__NJB)) {
        result__BGZO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
        __tmp__JGZO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
        switch (((struct ___OBJ *)__tmp__JGZO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__JGZO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__JGZO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__QJDQ=((__READ_LOCAL *)__tmp__JGZO);
          unread__YVJK(Self__QJDQ->local__ALZD,Self__QJDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__JGZO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__JGZO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__JGZO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__SJDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__JGZO)->receiver__OO2H);
          unread__YVJK(Self__SJDQ->local__ALZD,Self__SJDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__JGZO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__JGZO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__JGZO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__JGZO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__JGZO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__JGZO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__JGZO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__JGZO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__JGZO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__JGZO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__JGZO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__JGZO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__JGZO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__JGZO);
        } break;
        case __READ_GLOBAL__: {
          Self__TJDQ=((__READ_GLOBAL *)__tmp__JGZO);
          unread__15ML(Self__TJDQ->global__RHJK,Self__TJDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__JGZO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__JGZO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__JGZO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__JGZO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__JGZO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__JGZO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__JGZO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__JGZO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__JGZO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__JGZO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__JGZO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__JGZO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__JGZO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__JGZO);
        } break;
        };
      };
      result__KHFO=result__BGZO;
    };
    if ((((void *)result__KHFO == (void *)NULL) && ((void *)__tmp__2HFO != (void *)NULL))) {
      result__QGZO=NULL;
      if (((void *)right_t__RHFO == (void *)type_false__NJB)) {
        result__QGZO=Self__IHFO->parent_expr_binary_logic__WJCL.right__RMEO;
        __tmp__YGZO=Self__IHFO->parent_expr_binary_logic__WJCL.left__NMEO;
        switch (((struct ___OBJ *)__tmp__YGZO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__YGZO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__YGZO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__UJDQ=((__READ_LOCAL *)__tmp__YGZO);
          unread__YVJK(Self__UJDQ->local__ALZD,Self__UJDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__YGZO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__YGZO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__YGZO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__WJDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YGZO)->receiver__OO2H);
          unread__YVJK(Self__WJDQ->local__ALZD,Self__WJDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__YGZO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__YGZO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__YGZO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__YGZO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__YGZO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__YGZO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__YGZO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__YGZO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__YGZO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__YGZO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__YGZO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__YGZO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__YGZO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__YGZO);
        } break;
        case __READ_GLOBAL__: {
          Self__XJDQ=((__READ_GLOBAL *)__tmp__YGZO);
          unread__15ML(Self__XJDQ->global__RHJK,Self__XJDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__YGZO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__YGZO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__YGZO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__YGZO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__YGZO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__YGZO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__YGZO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__YGZO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__YGZO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__YGZO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__YGZO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__YGZO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__YGZO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__YGZO);
        } break;
        };
      };
      result__KHFO=result__QGZO;
    };
  };
  if (((void *)result__KHFO == (void *)NULL)) {
    result__KHFO=Self__IHFO;
  } else {
    __tmp__4MFO=Self__IHFO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__KHFO)->__id) {
    case __LIST__: {
      ((__LIST *)result__KHFO)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__KHFO)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__KHFO)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__KHFO)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__KHFO)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__KHFO)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__KHFO)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__KHFO)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__KHFO)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__KHFO)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__KHFO)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__KHFO)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__KHFO)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__KHFO)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__KHFO)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__KHFO)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__KHFO)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__KHFO)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__KHFO)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__KHFO)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__KHFO)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__KHFO)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __CAST__: {
      ((__CAST *)result__KHFO)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__KHFO)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__KHFO)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__KHFO)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__KHFO)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__KHFO)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__KHFO)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__KHFO)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__KHFO)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__KHFO)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__KHFO)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__KHFO)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__KHFO)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__KHFO)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__KHFO)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__KHFO)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__KHFO)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__KHFO)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__4MFO;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__KHFO);
}

static void* execute_link__0GKM(__EXPR_NEG *Self__1GKM)
// ({EXPR_NEG}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__4GKM;
  void *__tmp__DHKM,*__tmp__EHKM,*__tmp__GHKM,*result__ZBMM,*__tmp__1BMM;
  void *result__3GKM,*result__IB3M;
  void *__tmp__HHKM,*right_cst__BHKM;
  void *__tmp__2BMM,*sub__YBMM;
  __INTEGER_CST *Self__1HKQ;
  __POSITION __tmp__UIKM;
  old_seq__4GKM=seq_call_and_loop__VREJ;
  __tmp__DHKM=Self__1GKM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__DHKM)->__id) {
  case __LIST__: {
    __tmp__EHKM=execute_link__LUOG(__tmp__DHKM);
  } break;
  case __STRING_CST__: {
    __tmp__EHKM=((__STRING_CST *)__tmp__DHKM);
  } break;
  case __EXTERNAL_C__: {
    __tmp__EHKM=execute_link__U5ZK(__tmp__DHKM);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__EHKM=((__PROTOTYPE_CST *)__tmp__DHKM);
  } break;
  case __INTEGER_CST__: {
    __tmp__EHKM=((__INTEGER_CST *)__tmp__DHKM);
  } break;
  case __READ_LOCAL__: {
    __tmp__EHKM=execute_link__EHAL(__tmp__DHKM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__EHKM=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__EHKM=execute_link__2LAL(__tmp__DHKM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__EHKM=execute_link__FQAL(__tmp__DHKM);
  } break;
  case __REAL_CST__: {
    __tmp__EHKM=((__REAL_CST *)__tmp__DHKM);
  } break;
  case __CHARACTER_CST__: {
    __tmp__EHKM=((__CHARACTER_CST *)__tmp__DHKM);
  } break;
  case __IS_EXPANDED__: {
    __tmp__EHKM=execute_link__UUAL(__tmp__DHKM);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__EHKM=execute_link__1VAL(__tmp__DHKM);
  } break;
  case __EXPR_SUP__: {
    __tmp__EHKM=execute_link__AWAL(__tmp__DHKM);
  } break;
  case __EXPR_SUB__: {
    __tmp__EHKM=execute_link__J0AL(__tmp__DHKM);
  } break;
  case __EXPR_MUL__: {
    __tmp__EHKM=execute_link__S4AL(__tmp__DHKM);
  } break;
  case __EXPR_DIV__: {
    __tmp__EHKM=execute_link__1CBL(__tmp__DHKM);
  } break;
  case __EXPR_AND__: {
    __tmp__EHKM=execute_link__EHBL(__tmp__DHKM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__EHKM=execute_link__NLBL(__tmp__DHKM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__EHKM=execute_link__WPBL(__tmp__DHKM);
  } break;
  case __PUT_TO__: {
    __tmp__EHKM=execute_link__BOPK(__tmp__DHKM);
  } break;
  case __ITEM__: {
    __tmp__EHKM=execute_link__5TBL(__tmp__DHKM);
  } break;
  case __SIZE_OF__: {
    __tmp__EHKM=execute_link__GUBL(__tmp__DHKM);
  } break;
  case __CAST__: {
    __tmp__EHKM=execute_link__LUBL(__tmp__DHKM);
  } break;
  case __CALL_SLOT__: {
    __tmp__EHKM=execute_link__A2TL(__tmp__DHKM);
  } break;
  case __READ_SLOT__: {
    __tmp__EHKM=execute_link__EYBL(__tmp__DHKM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__EHKM=execute_link__U2BL(__tmp__DHKM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__EHKM=execute_link__SRZM(__tmp__DHKM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__EHKM=execute_link__OBFO(__tmp__DHKM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__EHKM=execute_link__GJLO(__tmp__DHKM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__EHKM=execute_link__HHFO(__tmp__DHKM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__EHKM=execute_link__KPLO(__tmp__DHKM);
  } break;
  case __EXPR_NEG__: {
    __tmp__EHKM=execute_link__0GKM(__tmp__DHKM);
  } break;
  case __EXPR_ADD__: {
    __tmp__EHKM=execute_link__RROL(__tmp__DHKM);
  } break;
  case __EXPR_NOT__: {
    __tmp__EHKM=execute_link__GUZM(__tmp__DHKM);
  } break;
  case __EXPR_MOD__: {
    __tmp__EHKM=execute_link__ANFO(__tmp__DHKM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__EHKM=execute_link__YLEP(__tmp__DHKM);
  } break;
  case __EXPR_INF__: {
    __tmp__EHKM=execute_link__VQQN(__tmp__DHKM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__EHKM=execute_link__4UQN(__tmp__DHKM);
  } break;
  case __EXPR_OR__: {
    __tmp__EHKM=execute_link__1HQN(__tmp__DHKM);
  } break;
  case __EXPR_XOR__: {
    __tmp__EHKM=execute_link__IYUO(__tmp__DHKM);
  } break;
  };
  Self__1GKM->parent_expr_unary__JZDL.right__XZDL=__tmp__EHKM;
  __tmp__GHKM=Self__1GKM->parent_expr_unary__JZDL.right__XZDL;
  if (__tmp__GHKM==NULL) {
    __tmp__HHKM=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__GHKM)->__id) {
    case __LIST__: {
      __tmp__HHKM=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__HHKM=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__HHKM=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__HHKM=((void *)__tmp__GHKM);
    } break;
    case __READ_LOCAL__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HHKM=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__HHKM=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__HHKM=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__HHKM=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HHKM=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__HHKM=NULL;
    } break;
    case __ITEM__: {
      __tmp__HHKM=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__HHKM=NULL;
    } break;
    case __CAST__: {
      __tmp__HHKM=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__HHKM=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__HHKM=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__HHKM=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__HHKM=NULL;
    } break;
    }
  };
  right_cst__BHKM=__tmp__HHKM;
  result__ZBMM=NULL;
  __tmp__1BMM=Self__1GKM->parent_expr_unary__JZDL.right__XZDL;
  if (__tmp__1BMM==NULL) {
    __tmp__2BMM=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__1BMM)->__id) {
    case __LIST__: {
      __tmp__2BMM=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__2BMM=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2BMM=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__2BMM=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2BMM=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__2BMM=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2BMM=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2BMM=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2BMM=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__2BMM=NULL;
    } break;
    case __ITEM__: {
      __tmp__2BMM=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__2BMM=NULL;
    } break;
    case __CAST__: {
      __tmp__2BMM=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__2BMM=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__2BMM=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__2BMM=((void *)__tmp__1BMM);
    } break;
    case __EXPR_ADD__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__2BMM=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__2BMM=NULL;
    } break;
    }
  };
  sub__YBMM=__tmp__2BMM;
  if (((void *)__tmp__2BMM != (void *)NULL)) {
    result__ZBMM=((__EXPR_NEG *)__tmp__2BMM)->parent_expr_unary__JZDL.right__XZDL;
  };
  result__3GKM=result__ZBMM;
  if ((((void *)result__ZBMM == (void *)NULL) && ((void *)__tmp__HHKM != (void *)NULL))) {
    result__IB3M=NULL;
    if (is_signed__WFKN(__tmp__HHKM)) {
      Self__1HKQ=((__INTEGER_CST *)__tmp__HHKM);
      Self__1HKQ->value__PAZD=(__INTEGER_64)(- ((__INTEGER_CST *)__tmp__HHKM)->value__PAZD);
      check_type__RI5D(Self__1HKQ);
      result__IB3M=__tmp__HHKM;
    };
    result__3GKM=result__IB3M;
  };
  if ((((void *)result__3GKM == (void *)NULL) && (old_seq__4GKM == seq_call_and_loop__VREJ))) {
    result__3GKM=NULL;
  };
  if (((void *)result__3GKM == (void *)NULL)) {
    result__3GKM=Self__1GKM;
  } else {
    __tmp__UIKM=Self__1GKM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__3GKM)->__id) {
    case __LIST__: {
      ((__LIST *)result__3GKM)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__3GKM)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__3GKM)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__3GKM)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__3GKM)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__3GKM)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__3GKM)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__3GKM)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__3GKM)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__3GKM)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__3GKM)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__3GKM)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__3GKM)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__3GKM)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__3GKM)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__3GKM)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__3GKM)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__3GKM)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__3GKM)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__3GKM)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__3GKM)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__3GKM)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __CAST__: {
      ((__CAST *)result__3GKM)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__3GKM)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__3GKM)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__3GKM)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__3GKM)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__3GKM)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__3GKM)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__3GKM)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__3GKM)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__3GKM)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__3GKM)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__3GKM)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__3GKM)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__3GKM)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__3GKM)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__3GKM)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__3GKM)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__3GKM)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__UIKM;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__3GKM);
}

static void* execute_link__RROL(__EXPR_ADD *Self__SROL)
// ({EXPR_ADD}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__VROL;
  void *__tmp__1ROL,*__tmp__2ROL,*__tmp__3ROL,*__tmp__4ROL,*__tmp__ASOL;
  void *__tmp__DSOL,*result__UROL,*result__3DOM,*result__LEOM;
  void *__tmp__BSOL,*left_cst__YROL,*__tmp__ESOL,*right_cst__ZROL;
  __INTEGER_CST *Self__4HKQ;
  __POSITION __tmp__YVOL;
  old_seq__VROL=seq_call_and_loop__VREJ;
  __tmp__1ROL=Self__SROL->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__1ROL)->__id) {
  case __LIST__: {
    __tmp__2ROL=execute_link__LUOG(__tmp__1ROL);
  } break;
  case __STRING_CST__: {
    __tmp__2ROL=((__STRING_CST *)__tmp__1ROL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__2ROL=execute_link__U5ZK(__tmp__1ROL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__2ROL=((__PROTOTYPE_CST *)__tmp__1ROL);
  } break;
  case __INTEGER_CST__: {
    __tmp__2ROL=((__INTEGER_CST *)__tmp__1ROL);
  } break;
  case __READ_LOCAL__: {
    __tmp__2ROL=execute_link__EHAL(__tmp__1ROL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2ROL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2ROL=execute_link__2LAL(__tmp__1ROL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2ROL=execute_link__FQAL(__tmp__1ROL);
  } break;
  case __REAL_CST__: {
    __tmp__2ROL=((__REAL_CST *)__tmp__1ROL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__2ROL=((__CHARACTER_CST *)__tmp__1ROL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__2ROL=execute_link__UUAL(__tmp__1ROL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2ROL=execute_link__1VAL(__tmp__1ROL);
  } break;
  case __EXPR_SUP__: {
    __tmp__2ROL=execute_link__AWAL(__tmp__1ROL);
  } break;
  case __EXPR_SUB__: {
    __tmp__2ROL=execute_link__J0AL(__tmp__1ROL);
  } break;
  case __EXPR_MUL__: {
    __tmp__2ROL=execute_link__S4AL(__tmp__1ROL);
  } break;
  case __EXPR_DIV__: {
    __tmp__2ROL=execute_link__1CBL(__tmp__1ROL);
  } break;
  case __EXPR_AND__: {
    __tmp__2ROL=execute_link__EHBL(__tmp__1ROL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2ROL=execute_link__NLBL(__tmp__1ROL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2ROL=execute_link__WPBL(__tmp__1ROL);
  } break;
  case __PUT_TO__: {
    __tmp__2ROL=execute_link__BOPK(__tmp__1ROL);
  } break;
  case __ITEM__: {
    __tmp__2ROL=execute_link__5TBL(__tmp__1ROL);
  } break;
  case __SIZE_OF__: {
    __tmp__2ROL=execute_link__GUBL(__tmp__1ROL);
  } break;
  case __CAST__: {
    __tmp__2ROL=execute_link__LUBL(__tmp__1ROL);
  } break;
  case __CALL_SLOT__: {
    __tmp__2ROL=execute_link__A2TL(__tmp__1ROL);
  } break;
  case __READ_SLOT__: {
    __tmp__2ROL=execute_link__EYBL(__tmp__1ROL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__2ROL=execute_link__U2BL(__tmp__1ROL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2ROL=execute_link__SRZM(__tmp__1ROL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2ROL=execute_link__OBFO(__tmp__1ROL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2ROL=execute_link__GJLO(__tmp__1ROL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2ROL=execute_link__HHFO(__tmp__1ROL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2ROL=execute_link__KPLO(__tmp__1ROL);
  } break;
  case __EXPR_NEG__: {
    __tmp__2ROL=execute_link__0GKM(__tmp__1ROL);
  } break;
  case __EXPR_ADD__: {
    __tmp__2ROL=execute_link__RROL(__tmp__1ROL);
  } break;
  case __EXPR_NOT__: {
    __tmp__2ROL=execute_link__GUZM(__tmp__1ROL);
  } break;
  case __EXPR_MOD__: {
    __tmp__2ROL=execute_link__ANFO(__tmp__1ROL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2ROL=execute_link__YLEP(__tmp__1ROL);
  } break;
  case __EXPR_INF__: {
    __tmp__2ROL=execute_link__VQQN(__tmp__1ROL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2ROL=execute_link__4UQN(__tmp__1ROL);
  } break;
  case __EXPR_OR__: {
    __tmp__2ROL=execute_link__1HQN(__tmp__1ROL);
  } break;
  case __EXPR_XOR__: {
    __tmp__2ROL=execute_link__IYUO(__tmp__1ROL);
  } break;
  };
  Self__SROL->parent_expr_binary__UZDL.left__PP1H=__tmp__2ROL;
  __tmp__3ROL=Self__SROL->parent_expr_binary__UZDL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__3ROL)->__id) {
  case __LIST__: {
    __tmp__4ROL=execute_link__LUOG(__tmp__3ROL);
  } break;
  case __STRING_CST__: {
    __tmp__4ROL=((__STRING_CST *)__tmp__3ROL);
  } break;
  case __EXTERNAL_C__: {
    __tmp__4ROL=execute_link__U5ZK(__tmp__3ROL);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__4ROL=((__PROTOTYPE_CST *)__tmp__3ROL);
  } break;
  case __INTEGER_CST__: {
    __tmp__4ROL=((__INTEGER_CST *)__tmp__3ROL);
  } break;
  case __READ_LOCAL__: {
    __tmp__4ROL=execute_link__EHAL(__tmp__3ROL);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__4ROL=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__4ROL=execute_link__2LAL(__tmp__3ROL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__4ROL=execute_link__FQAL(__tmp__3ROL);
  } break;
  case __REAL_CST__: {
    __tmp__4ROL=((__REAL_CST *)__tmp__3ROL);
  } break;
  case __CHARACTER_CST__: {
    __tmp__4ROL=((__CHARACTER_CST *)__tmp__3ROL);
  } break;
  case __IS_EXPANDED__: {
    __tmp__4ROL=execute_link__UUAL(__tmp__3ROL);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__4ROL=execute_link__1VAL(__tmp__3ROL);
  } break;
  case __EXPR_SUP__: {
    __tmp__4ROL=execute_link__AWAL(__tmp__3ROL);
  } break;
  case __EXPR_SUB__: {
    __tmp__4ROL=execute_link__J0AL(__tmp__3ROL);
  } break;
  case __EXPR_MUL__: {
    __tmp__4ROL=execute_link__S4AL(__tmp__3ROL);
  } break;
  case __EXPR_DIV__: {
    __tmp__4ROL=execute_link__1CBL(__tmp__3ROL);
  } break;
  case __EXPR_AND__: {
    __tmp__4ROL=execute_link__EHBL(__tmp__3ROL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__4ROL=execute_link__NLBL(__tmp__3ROL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__4ROL=execute_link__WPBL(__tmp__3ROL);
  } break;
  case __PUT_TO__: {
    __tmp__4ROL=execute_link__BOPK(__tmp__3ROL);
  } break;
  case __ITEM__: {
    __tmp__4ROL=execute_link__5TBL(__tmp__3ROL);
  } break;
  case __SIZE_OF__: {
    __tmp__4ROL=execute_link__GUBL(__tmp__3ROL);
  } break;
  case __CAST__: {
    __tmp__4ROL=execute_link__LUBL(__tmp__3ROL);
  } break;
  case __CALL_SLOT__: {
    __tmp__4ROL=execute_link__A2TL(__tmp__3ROL);
  } break;
  case __READ_SLOT__: {
    __tmp__4ROL=execute_link__EYBL(__tmp__3ROL);
  } break;
  case __READ_GLOBAL__: {
    __tmp__4ROL=execute_link__U2BL(__tmp__3ROL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__4ROL=execute_link__SRZM(__tmp__3ROL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__4ROL=execute_link__OBFO(__tmp__3ROL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__4ROL=execute_link__GJLO(__tmp__3ROL);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__4ROL=execute_link__HHFO(__tmp__3ROL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__4ROL=execute_link__KPLO(__tmp__3ROL);
  } break;
  case __EXPR_NEG__: {
    __tmp__4ROL=execute_link__0GKM(__tmp__3ROL);
  } break;
  case __EXPR_ADD__: {
    __tmp__4ROL=execute_link__RROL(__tmp__3ROL);
  } break;
  case __EXPR_NOT__: {
    __tmp__4ROL=execute_link__GUZM(__tmp__3ROL);
  } break;
  case __EXPR_MOD__: {
    __tmp__4ROL=execute_link__ANFO(__tmp__3ROL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__4ROL=execute_link__YLEP(__tmp__3ROL);
  } break;
  case __EXPR_INF__: {
    __tmp__4ROL=execute_link__VQQN(__tmp__3ROL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__4ROL=execute_link__4UQN(__tmp__3ROL);
  } break;
  case __EXPR_OR__: {
    __tmp__4ROL=execute_link__1HQN(__tmp__3ROL);
  } break;
  case __EXPR_XOR__: {
    __tmp__4ROL=execute_link__IYUO(__tmp__3ROL);
  } break;
  };
  Self__SROL->parent_expr_binary__UZDL.right__OP2H=__tmp__4ROL;
  __tmp__ASOL=Self__SROL->parent_expr_binary__UZDL.left__PP1H;
  if (__tmp__ASOL==NULL) {
    __tmp__BSOL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__ASOL)->__id) {
    case __LIST__: {
      __tmp__BSOL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BSOL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BSOL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__BSOL=((void *)__tmp__ASOL);
    } break;
    case __READ_LOCAL__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BSOL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__BSOL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__BSOL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__BSOL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BSOL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__BSOL=NULL;
    } break;
    case __ITEM__: {
      __tmp__BSOL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__BSOL=NULL;
    } break;
    case __CAST__: {
      __tmp__BSOL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__BSOL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__BSOL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__BSOL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__BSOL=NULL;
    } break;
    }
  };
  left_cst__YROL=__tmp__BSOL;
  __tmp__DSOL=Self__SROL->parent_expr_binary__UZDL.right__OP2H;
  if (__tmp__DSOL==NULL) {
    __tmp__ESOL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__DSOL)->__id) {
    case __LIST__: {
      __tmp__ESOL=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ESOL=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ESOL=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__ESOL=((void *)__tmp__DSOL);
    } break;
    case __READ_LOCAL__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ESOL=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ESOL=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ESOL=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ESOL=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ESOL=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ESOL=NULL;
    } break;
    case __ITEM__: {
      __tmp__ESOL=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ESOL=NULL;
    } break;
    case __CAST__: {
      __tmp__ESOL=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ESOL=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ESOL=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ESOL=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ESOL=NULL;
    } break;
    }
  };
  right_cst__ZROL=__tmp__ESOL;
  result__UROL=NULL;
  if (((void *)__tmp__BSOL != (void *)NULL)) {
    result__3DOM=NULL;
    if ((((__INTEGER_CST *)__tmp__BSOL)->value__PAZD ==  0)) {
      result__3DOM=Self__SROL->parent_expr_binary__UZDL.right__OP2H;
    };
    result__UROL=result__3DOM;
  };
  if ((((void *)result__UROL == (void *)NULL) && ((void *)__tmp__ESOL != (void *)NULL))) {
    result__LEOM=NULL;
    if ((((__INTEGER_CST *)__tmp__ESOL)->value__PAZD ==  0)) {
      result__LEOM=Self__SROL->parent_expr_binary__UZDL.left__PP1H;
    };
    result__UROL=result__LEOM;
  };
  if (((((void *)result__UROL == (void *)NULL) && ((void *)__tmp__ESOL != (void *)NULL)) && ((void *)__tmp__BSOL != (void *)NULL))) {
    Self__4HKQ=((__INTEGER_CST *)__tmp__BSOL);
    Self__4HKQ->value__PAZD=(__INTEGER_64)(((__INTEGER_CST *)__tmp__BSOL)->value__PAZD + ((__INTEGER_CST *)__tmp__ESOL)->value__PAZD);
    check_type__RI5D(Self__4HKQ);
    result__UROL=__tmp__BSOL;
  };
  if ((((void *)result__UROL == (void *)NULL) && (old_seq__VROL == seq_call_and_loop__VREJ))) {
    result__UROL=NULL;
    if (((void *)__tmp__BSOL != (void *)NULL)) {
      result__UROL=NULL;
    };
    if ((((void *)result__UROL == (void *)NULL) && ((void *)__tmp__ESOL != (void *)NULL))) {
      result__UROL=NULL;
    };
  };
  if (((void *)result__UROL == (void *)NULL)) {
    result__UROL=Self__SROL;
  } else {
    __tmp__YVOL=Self__SROL->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__UROL)->__id) {
    case __LIST__: {
      ((__LIST *)result__UROL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__UROL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__UROL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__UROL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__UROL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__UROL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__UROL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__UROL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__UROL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__UROL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__UROL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__UROL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__UROL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__UROL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__UROL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__UROL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__UROL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__UROL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__UROL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__UROL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__UROL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__UROL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __CAST__: {
      ((__CAST *)result__UROL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__UROL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__UROL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__UROL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__UROL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__UROL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__UROL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__UROL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__UROL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__UROL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__UROL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__UROL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__UROL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__UROL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__UROL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__UROL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__UROL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__UROL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__YVOL;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__UROL);
}

static void* execute_link__GUZM(__EXPR_NOT *Self__HUZM)
// ({EXPR_NOT}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__KUZM;
  void *__tmp__PUZM,*__tmp__QUZM,*__tmp__SUZM,*result__JT1M,*__tmp__LT1M;
  void *__tmp__TT1M,*__tmp__WT1M,*__tmp__TU1M,*__tmp__1U1M,*__tmp__4U1M;
  void *__tmp__1V1M,*result__JUZM,*result__PZIN;
  void *__tmp__TUZM,*right_cst__NUZM;
  void *or__FT1M,*__tmp__UU1M;
  void *neg1__HT1M,*neg2__IT1M,*__tmp__UT1M,*__tmp__XT1M,*__tmp__2U1M;
  void *__tmp__5U1M,*__tmp__2V1M;
  void *__tmp__MT1M,*and__GT1M;
  __INTEGER_CST *Self__DIKQ;
  __POSITION __tmp__AWZM;
  old_seq__KUZM=seq_call_and_loop__VREJ;
  __tmp__PUZM=Self__HUZM->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__PUZM)->__id) {
  case __LIST__: {
    __tmp__QUZM=execute_link__LUOG(__tmp__PUZM);
  } break;
  case __STRING_CST__: {
    __tmp__QUZM=((__STRING_CST *)__tmp__PUZM);
  } break;
  case __EXTERNAL_C__: {
    __tmp__QUZM=execute_link__U5ZK(__tmp__PUZM);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__QUZM=((__PROTOTYPE_CST *)__tmp__PUZM);
  } break;
  case __INTEGER_CST__: {
    __tmp__QUZM=((__INTEGER_CST *)__tmp__PUZM);
  } break;
  case __READ_LOCAL__: {
    __tmp__QUZM=execute_link__EHAL(__tmp__PUZM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__QUZM=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__QUZM=execute_link__2LAL(__tmp__PUZM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__QUZM=execute_link__FQAL(__tmp__PUZM);
  } break;
  case __REAL_CST__: {
    __tmp__QUZM=((__REAL_CST *)__tmp__PUZM);
  } break;
  case __CHARACTER_CST__: {
    __tmp__QUZM=((__CHARACTER_CST *)__tmp__PUZM);
  } break;
  case __IS_EXPANDED__: {
    __tmp__QUZM=execute_link__UUAL(__tmp__PUZM);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__QUZM=execute_link__1VAL(__tmp__PUZM);
  } break;
  case __EXPR_SUP__: {
    __tmp__QUZM=execute_link__AWAL(__tmp__PUZM);
  } break;
  case __EXPR_SUB__: {
    __tmp__QUZM=execute_link__J0AL(__tmp__PUZM);
  } break;
  case __EXPR_MUL__: {
    __tmp__QUZM=execute_link__S4AL(__tmp__PUZM);
  } break;
  case __EXPR_DIV__: {
    __tmp__QUZM=execute_link__1CBL(__tmp__PUZM);
  } break;
  case __EXPR_AND__: {
    __tmp__QUZM=execute_link__EHBL(__tmp__PUZM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__QUZM=execute_link__NLBL(__tmp__PUZM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__QUZM=execute_link__WPBL(__tmp__PUZM);
  } break;
  case __PUT_TO__: {
    __tmp__QUZM=execute_link__BOPK(__tmp__PUZM);
  } break;
  case __ITEM__: {
    __tmp__QUZM=execute_link__5TBL(__tmp__PUZM);
  } break;
  case __SIZE_OF__: {
    __tmp__QUZM=execute_link__GUBL(__tmp__PUZM);
  } break;
  case __CAST__: {
    __tmp__QUZM=execute_link__LUBL(__tmp__PUZM);
  } break;
  case __CALL_SLOT__: {
    __tmp__QUZM=execute_link__A2TL(__tmp__PUZM);
  } break;
  case __READ_SLOT__: {
    __tmp__QUZM=execute_link__EYBL(__tmp__PUZM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__QUZM=execute_link__U2BL(__tmp__PUZM);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__QUZM=execute_link__SRZM(__tmp__PUZM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__QUZM=execute_link__OBFO(__tmp__PUZM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__QUZM=execute_link__GJLO(__tmp__PUZM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__QUZM=execute_link__HHFO(__tmp__PUZM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__QUZM=execute_link__KPLO(__tmp__PUZM);
  } break;
  case __EXPR_NEG__: {
    __tmp__QUZM=execute_link__0GKM(__tmp__PUZM);
  } break;
  case __EXPR_ADD__: {
    __tmp__QUZM=execute_link__RROL(__tmp__PUZM);
  } break;
  case __EXPR_NOT__: {
    __tmp__QUZM=execute_link__GUZM(__tmp__PUZM);
  } break;
  case __EXPR_MOD__: {
    __tmp__QUZM=execute_link__ANFO(__tmp__PUZM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__QUZM=execute_link__YLEP(__tmp__PUZM);
  } break;
  case __EXPR_INF__: {
    __tmp__QUZM=execute_link__VQQN(__tmp__PUZM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__QUZM=execute_link__4UQN(__tmp__PUZM);
  } break;
  case __EXPR_OR__: {
    __tmp__QUZM=execute_link__1HQN(__tmp__PUZM);
  } break;
  case __EXPR_XOR__: {
    __tmp__QUZM=execute_link__IYUO(__tmp__PUZM);
  } break;
  };
  Self__HUZM->parent_expr_unary__M5VL.right__XZDL=__tmp__QUZM;
  __tmp__SUZM=Self__HUZM->parent_expr_unary__M5VL.right__XZDL;
  if (__tmp__SUZM==NULL) {
    __tmp__TUZM=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__SUZM)->__id) {
    case __LIST__: {
      __tmp__TUZM=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__TUZM=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__TUZM=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__TUZM=((void *)__tmp__SUZM);
    } break;
    case __READ_LOCAL__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__TUZM=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__TUZM=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__TUZM=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__TUZM=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__TUZM=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__TUZM=NULL;
    } break;
    case __ITEM__: {
      __tmp__TUZM=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__TUZM=NULL;
    } break;
    case __CAST__: {
      __tmp__TUZM=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__TUZM=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__TUZM=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__TUZM=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__TUZM=NULL;
    } break;
    }
  };
  right_cst__NUZM=__tmp__TUZM;
  or__FT1M=NULL;
  neg1__HT1M=NULL;
  neg2__IT1M=NULL;
  result__JT1M=NULL;
  __tmp__LT1M=Self__HUZM->parent_expr_unary__M5VL.right__XZDL;
  if (__tmp__LT1M==NULL) {
    __tmp__MT1M=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__LT1M)->__id) {
    case __LIST__: {
      __tmp__MT1M=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__MT1M=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__MT1M=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__MT1M=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__MT1M=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__MT1M=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__MT1M=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__MT1M=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__MT1M=((void *)__tmp__LT1M);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__MT1M=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__MT1M=NULL;
    } break;
    case __ITEM__: {
      __tmp__MT1M=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__MT1M=NULL;
    } break;
    case __CAST__: {
      __tmp__MT1M=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__MT1M=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__MT1M=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__MT1M=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__MT1M=NULL;
    } break;
    }
  };
  and__GT1M=__tmp__MT1M;
  if (((void *)__tmp__MT1M != (void *)NULL)) {
    __tmp__TT1M=((__EXPR_AND *)__tmp__MT1M)->parent_expr_binary__ADKH.left__PP1H;
    if (__tmp__TT1M==NULL) {
      __tmp__UT1M=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__TT1M)->__id) {
      case __LIST__: {
        __tmp__UT1M=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__UT1M=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__UT1M=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__UT1M=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__UT1M=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__UT1M=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__UT1M=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__UT1M=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__UT1M=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__UT1M=NULL;
      } break;
      case __ITEM__: {
        __tmp__UT1M=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__UT1M=NULL;
      } break;
      case __CAST__: {
        __tmp__UT1M=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__UT1M=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__UT1M=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__UT1M=((void *)__tmp__TT1M);
      } break;
      case __EXPR_MOD__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__UT1M=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__UT1M=NULL;
      } break;
      }
    };
    neg1__HT1M=__tmp__UT1M;
    __tmp__WT1M=((__EXPR_AND *)__tmp__MT1M)->parent_expr_binary__ADKH.right__OP2H;
    if (__tmp__WT1M==NULL) {
      __tmp__XT1M=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__WT1M)->__id) {
      case __LIST__: {
        __tmp__XT1M=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__XT1M=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__XT1M=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__XT1M=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__XT1M=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__XT1M=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__XT1M=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__XT1M=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__XT1M=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__XT1M=NULL;
      } break;
      case __ITEM__: {
        __tmp__XT1M=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__XT1M=NULL;
      } break;
      case __CAST__: {
        __tmp__XT1M=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__XT1M=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__XT1M=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__XT1M=((void *)__tmp__WT1M);
      } break;
      case __EXPR_MOD__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__XT1M=NULL;
      } break;
      case __EXPR_XOR__: {
        __tmp__XT1M=NULL;
      } break;
      }
    };
    neg2__IT1M=__tmp__XT1M;
    if ((((void *)__tmp__UT1M != (void *)NULL) && ((void *)__tmp__XT1M != (void *)NULL))) {
      result__JT1M=create__with__and__UNJN(Self__HUZM->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_NOT *)__tmp__UT1M)->parent_expr_unary__M5VL.right__XZDL,((__EXPR_NOT *)__tmp__XT1M)->parent_expr_unary__M5VL.right__XZDL);
    };
  } else {
    __tmp__TU1M=Self__HUZM->parent_expr_unary__M5VL.right__XZDL;
    if (__tmp__TU1M==NULL) {
      __tmp__UU1M=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__TU1M)->__id) {
      case __LIST__: {
        __tmp__UU1M=NULL;
      } break;
      case __STRING_CST__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXTERNAL_C__: {
        __tmp__UU1M=NULL;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__UU1M=NULL;
      } break;
      case __INTEGER_CST__: {
        __tmp__UU1M=NULL;
      } break;
      case __READ_LOCAL__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__UU1M=NULL;
      } break;
      case __REAL_CST__: {
        __tmp__UU1M=NULL;
      } break;
      case __CHARACTER_CST__: {
        __tmp__UU1M=NULL;
      } break;
      case __IS_EXPANDED__: {
        __tmp__UU1M=NULL;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_SUP__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_SUB__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_MUL__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_DIV__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_AND__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__UU1M=NULL;
      } break;
      case __PUT_TO__: {
        __tmp__UU1M=NULL;
      } break;
      case __ITEM__: {
        __tmp__UU1M=NULL;
      } break;
      case __SIZE_OF__: {
        __tmp__UU1M=NULL;
      } break;
      case __CAST__: {
        __tmp__UU1M=NULL;
      } break;
      case __CALL_SLOT__: {
        __tmp__UU1M=NULL;
      } break;
      case __READ_SLOT__: {
        __tmp__UU1M=NULL;
      } break;
      case __READ_GLOBAL__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_NEG__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_ADD__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_NOT__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_MOD__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_INF__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__UU1M=NULL;
      } break;
      case __EXPR_OR__: {
        __tmp__UU1M=((void *)__tmp__TU1M);
      } break;
      case __EXPR_XOR__: {
        __tmp__UU1M=NULL;
      } break;
      }
    };
    or__FT1M=__tmp__UU1M;
    if (((void *)__tmp__UU1M != (void *)NULL)) {
      __tmp__1U1M=((__EXPR_OR *)__tmp__UU1M)->parent_expr_binary__ET1M.left__PP1H;
      if (__tmp__1U1M==NULL) {
        __tmp__2U1M=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__1U1M)->__id) {
        case __LIST__: {
          __tmp__2U1M=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__2U1M=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__2U1M=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__2U1M=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__2U1M=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__2U1M=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__2U1M=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__2U1M=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__2U1M=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__2U1M=NULL;
        } break;
        case __ITEM__: {
          __tmp__2U1M=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__2U1M=NULL;
        } break;
        case __CAST__: {
          __tmp__2U1M=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__2U1M=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__2U1M=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__2U1M=((void *)__tmp__1U1M);
        } break;
        case __EXPR_MOD__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__2U1M=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__2U1M=NULL;
        } break;
        }
      };
      neg1__HT1M=__tmp__2U1M;
      __tmp__4U1M=((__EXPR_OR *)__tmp__UU1M)->parent_expr_binary__ET1M.right__OP2H;
      if (__tmp__4U1M==NULL) {
        __tmp__5U1M=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__4U1M)->__id) {
        case __LIST__: {
          __tmp__5U1M=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__5U1M=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__5U1M=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__5U1M=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__5U1M=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__5U1M=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__5U1M=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__5U1M=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__5U1M=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__5U1M=NULL;
        } break;
        case __ITEM__: {
          __tmp__5U1M=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__5U1M=NULL;
        } break;
        case __CAST__: {
          __tmp__5U1M=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__5U1M=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__5U1M=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__5U1M=((void *)__tmp__4U1M);
        } break;
        case __EXPR_MOD__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__5U1M=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__5U1M=NULL;
        } break;
        }
      };
      neg2__IT1M=__tmp__5U1M;
      if ((((void *)__tmp__2U1M != (void *)NULL) && ((void *)__tmp__5U1M != (void *)NULL))) {
        result__JT1M=create__with__and__NWWH(Self__HUZM->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_NOT *)__tmp__2U1M)->parent_expr_unary__M5VL.right__XZDL,((__EXPR_NOT *)__tmp__5U1M)->parent_expr_unary__M5VL.right__XZDL);
      };
    } else {
      __tmp__1V1M=Self__HUZM->parent_expr_unary__M5VL.right__XZDL;
      if (__tmp__1V1M==NULL) {
        __tmp__2V1M=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__1V1M)->__id) {
        case __LIST__: {
          __tmp__2V1M=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__2V1M=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__2V1M=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__2V1M=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__2V1M=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__2V1M=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__2V1M=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__2V1M=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__2V1M=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__2V1M=NULL;
        } break;
        case __ITEM__: {
          __tmp__2V1M=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__2V1M=NULL;
        } break;
        case __CAST__: {
          __tmp__2V1M=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__2V1M=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__2V1M=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__2V1M=((void *)__tmp__1V1M);
        } break;
        case __EXPR_MOD__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__2V1M=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__2V1M=NULL;
        } break;
        }
      };
      neg1__HT1M=__tmp__2V1M;
      if (((void *)__tmp__2V1M != (void *)NULL)) {
        result__JT1M=((__EXPR_NOT *)__tmp__2V1M)->parent_expr_unary__M5VL.right__XZDL;
      };
    };
  };
  result__JUZM=result__JT1M;
  if ((((void *)result__JT1M == (void *)NULL) && ((void *)__tmp__TUZM != (void *)NULL))) {
    result__PZIN=NULL;
    if (is_signed__WFKN(__tmp__TUZM)) {
      Self__DIKQ=((__INTEGER_CST *)__tmp__TUZM);
      Self__DIKQ->value__PAZD=(__INTEGER_64)(~ ((__INTEGER_CST *)__tmp__TUZM)->value__PAZD);
      check_type__RI5D(Self__DIKQ);
      result__PZIN=__tmp__TUZM;
    };
    result__JUZM=result__PZIN;
  };
  if ((((void *)result__JUZM == (void *)NULL) && (old_seq__KUZM == seq_call_and_loop__VREJ))) {
    result__JUZM=NULL;
  };
  if (((void *)result__JUZM == (void *)NULL)) {
    result__JUZM=Self__HUZM;
  } else {
    __tmp__AWZM=Self__HUZM->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__JUZM)->__id) {
    case __LIST__: {
      ((__LIST *)result__JUZM)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__JUZM)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__JUZM)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__JUZM)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__JUZM)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__JUZM)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__JUZM)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__JUZM)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__JUZM)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__JUZM)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__JUZM)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__JUZM)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__JUZM)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__JUZM)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__JUZM)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__JUZM)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__JUZM)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__JUZM)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__JUZM)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__JUZM)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__JUZM)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__JUZM)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __CAST__: {
      ((__CAST *)result__JUZM)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__JUZM)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__JUZM)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__JUZM)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__JUZM)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__JUZM)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__JUZM)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__JUZM)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__JUZM)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__JUZM)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__JUZM)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__JUZM)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__JUZM)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__JUZM)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__JUZM)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__JUZM)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__JUZM)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__JUZM)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__AWZM;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__JUZM);
}

static void* execute_link__ANFO(__EXPR_MOD *Self__BNFO)
// ({EXPR_MOD}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__GYPO;
  __UINTEGER_32 old_seq__ENFO;
  void *__tmp__KNFO,*__tmp__LNFO,*__tmp__MNFO,*__tmp__NNFO,*__tmp__PNFO;
  void *__tmp__SNFO,*result__DNFO,*result__OXPO,*result__TYPO;
  void *__tmp__UYPO,*__tmp__VYPO,*__tmp__BZPO,*__tmp__CZPO,*result__5GZO;
  void *__tmp__GHZO,*result__NHZO,*__tmp__WHZO,*__tmp__HIZO;
  void *__tmp__QNFO,*left_cst__HNFO,*__tmp__TNFO,*right_cst__INFO;
  __POSITION __tmp__WXPO,__tmp__HRFO;
  __INTEGER_CST *Self__KIKQ,*Self__MIKQ,*Self__QIKQ,*Self__SIKQ;
  __READ_LOCAL *Self__AWDQ,*Self__CWDQ,*Self__EWDQ,*Self__GWDQ;
  __READ_LOCAL *Self__IWDQ,*Self__KWDQ,*Self__NWDQ,*Self__PWDQ;
  __READ_LOCAL *Self__TWDQ,*Self__VWDQ;
  __READ_GLOBAL *Self__DWDQ,*Self__HWDQ,*Self__LWDQ,*Self__QWDQ;
  __READ_GLOBAL *Self__WWDQ;
  __BOOLEAN __tmp__ZXPO,__tmp__WYPO,__tmp__YHZO;
  old_seq__ENFO=seq_call_and_loop__VREJ;
  __tmp__KNFO=Self__BNFO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__KNFO)->__id) {
  case __LIST__: {
    __tmp__LNFO=execute_link__LUOG(__tmp__KNFO);
  } break;
  case __STRING_CST__: {
    __tmp__LNFO=((__STRING_CST *)__tmp__KNFO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__LNFO=execute_link__U5ZK(__tmp__KNFO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__LNFO=((__PROTOTYPE_CST *)__tmp__KNFO);
  } break;
  case __INTEGER_CST__: {
    __tmp__LNFO=((__INTEGER_CST *)__tmp__KNFO);
  } break;
  case __READ_LOCAL__: {
    __tmp__LNFO=execute_link__EHAL(__tmp__KNFO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__LNFO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__LNFO=execute_link__2LAL(__tmp__KNFO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__LNFO=execute_link__FQAL(__tmp__KNFO);
  } break;
  case __REAL_CST__: {
    __tmp__LNFO=((__REAL_CST *)__tmp__KNFO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__LNFO=((__CHARACTER_CST *)__tmp__KNFO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__LNFO=execute_link__UUAL(__tmp__KNFO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__LNFO=execute_link__1VAL(__tmp__KNFO);
  } break;
  case __EXPR_SUP__: {
    __tmp__LNFO=execute_link__AWAL(__tmp__KNFO);
  } break;
  case __EXPR_SUB__: {
    __tmp__LNFO=execute_link__J0AL(__tmp__KNFO);
  } break;
  case __EXPR_MUL__: {
    __tmp__LNFO=execute_link__S4AL(__tmp__KNFO);
  } break;
  case __EXPR_DIV__: {
    __tmp__LNFO=execute_link__1CBL(__tmp__KNFO);
  } break;
  case __EXPR_AND__: {
    __tmp__LNFO=execute_link__EHBL(__tmp__KNFO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__LNFO=execute_link__NLBL(__tmp__KNFO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__LNFO=execute_link__WPBL(__tmp__KNFO);
  } break;
  case __PUT_TO__: {
    __tmp__LNFO=execute_link__BOPK(__tmp__KNFO);
  } break;
  case __ITEM__: {
    __tmp__LNFO=execute_link__5TBL(__tmp__KNFO);
  } break;
  case __SIZE_OF__: {
    __tmp__LNFO=execute_link__GUBL(__tmp__KNFO);
  } break;
  case __CAST__: {
    __tmp__LNFO=execute_link__LUBL(__tmp__KNFO);
  } break;
  case __CALL_SLOT__: {
    __tmp__LNFO=execute_link__A2TL(__tmp__KNFO);
  } break;
  case __READ_SLOT__: {
    __tmp__LNFO=execute_link__EYBL(__tmp__KNFO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__LNFO=execute_link__U2BL(__tmp__KNFO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__LNFO=execute_link__SRZM(__tmp__KNFO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__LNFO=execute_link__OBFO(__tmp__KNFO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__LNFO=execute_link__GJLO(__tmp__KNFO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__LNFO=execute_link__HHFO(__tmp__KNFO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__LNFO=execute_link__KPLO(__tmp__KNFO);
  } break;
  case __EXPR_NEG__: {
    __tmp__LNFO=execute_link__0GKM(__tmp__KNFO);
  } break;
  case __EXPR_ADD__: {
    __tmp__LNFO=execute_link__RROL(__tmp__KNFO);
  } break;
  case __EXPR_NOT__: {
    __tmp__LNFO=execute_link__GUZM(__tmp__KNFO);
  } break;
  case __EXPR_MOD__: {
    __tmp__LNFO=execute_link__ANFO(__tmp__KNFO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__LNFO=execute_link__YLEP(__tmp__KNFO);
  } break;
  case __EXPR_INF__: {
    __tmp__LNFO=execute_link__VQQN(__tmp__KNFO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__LNFO=execute_link__4UQN(__tmp__KNFO);
  } break;
  case __EXPR_OR__: {
    __tmp__LNFO=execute_link__1HQN(__tmp__KNFO);
  } break;
  case __EXPR_XOR__: {
    __tmp__LNFO=execute_link__IYUO(__tmp__KNFO);
  } break;
  };
  Self__BNFO->parent_expr_binary__PDWL.left__PP1H=__tmp__LNFO;
  __tmp__MNFO=Self__BNFO->parent_expr_binary__PDWL.right__OP2H;
  switch (((struct ___OBJ *)__tmp__MNFO)->__id) {
  case __LIST__: {
    __tmp__NNFO=execute_link__LUOG(__tmp__MNFO);
  } break;
  case __STRING_CST__: {
    __tmp__NNFO=((__STRING_CST *)__tmp__MNFO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__NNFO=execute_link__U5ZK(__tmp__MNFO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__NNFO=((__PROTOTYPE_CST *)__tmp__MNFO);
  } break;
  case __INTEGER_CST__: {
    __tmp__NNFO=((__INTEGER_CST *)__tmp__MNFO);
  } break;
  case __READ_LOCAL__: {
    __tmp__NNFO=execute_link__EHAL(__tmp__MNFO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NNFO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NNFO=execute_link__2LAL(__tmp__MNFO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NNFO=execute_link__FQAL(__tmp__MNFO);
  } break;
  case __REAL_CST__: {
    __tmp__NNFO=((__REAL_CST *)__tmp__MNFO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__NNFO=((__CHARACTER_CST *)__tmp__MNFO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__NNFO=execute_link__UUAL(__tmp__MNFO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__NNFO=execute_link__1VAL(__tmp__MNFO);
  } break;
  case __EXPR_SUP__: {
    __tmp__NNFO=execute_link__AWAL(__tmp__MNFO);
  } break;
  case __EXPR_SUB__: {
    __tmp__NNFO=execute_link__J0AL(__tmp__MNFO);
  } break;
  case __EXPR_MUL__: {
    __tmp__NNFO=execute_link__S4AL(__tmp__MNFO);
  } break;
  case __EXPR_DIV__: {
    __tmp__NNFO=execute_link__1CBL(__tmp__MNFO);
  } break;
  case __EXPR_AND__: {
    __tmp__NNFO=execute_link__EHBL(__tmp__MNFO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NNFO=execute_link__NLBL(__tmp__MNFO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NNFO=execute_link__WPBL(__tmp__MNFO);
  } break;
  case __PUT_TO__: {
    __tmp__NNFO=execute_link__BOPK(__tmp__MNFO);
  } break;
  case __ITEM__: {
    __tmp__NNFO=execute_link__5TBL(__tmp__MNFO);
  } break;
  case __SIZE_OF__: {
    __tmp__NNFO=execute_link__GUBL(__tmp__MNFO);
  } break;
  case __CAST__: {
    __tmp__NNFO=execute_link__LUBL(__tmp__MNFO);
  } break;
  case __CALL_SLOT__: {
    __tmp__NNFO=execute_link__A2TL(__tmp__MNFO);
  } break;
  case __READ_SLOT__: {
    __tmp__NNFO=execute_link__EYBL(__tmp__MNFO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__NNFO=execute_link__U2BL(__tmp__MNFO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NNFO=execute_link__SRZM(__tmp__MNFO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NNFO=execute_link__OBFO(__tmp__MNFO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NNFO=execute_link__GJLO(__tmp__MNFO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NNFO=execute_link__HHFO(__tmp__MNFO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NNFO=execute_link__KPLO(__tmp__MNFO);
  } break;
  case __EXPR_NEG__: {
    __tmp__NNFO=execute_link__0GKM(__tmp__MNFO);
  } break;
  case __EXPR_ADD__: {
    __tmp__NNFO=execute_link__RROL(__tmp__MNFO);
  } break;
  case __EXPR_NOT__: {
    __tmp__NNFO=execute_link__GUZM(__tmp__MNFO);
  } break;
  case __EXPR_MOD__: {
    __tmp__NNFO=execute_link__ANFO(__tmp__MNFO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NNFO=execute_link__YLEP(__tmp__MNFO);
  } break;
  case __EXPR_INF__: {
    __tmp__NNFO=execute_link__VQQN(__tmp__MNFO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NNFO=execute_link__4UQN(__tmp__MNFO);
  } break;
  case __EXPR_OR__: {
    __tmp__NNFO=execute_link__1HQN(__tmp__MNFO);
  } break;
  case __EXPR_XOR__: {
    __tmp__NNFO=execute_link__IYUO(__tmp__MNFO);
  } break;
  };
  Self__BNFO->parent_expr_binary__PDWL.right__OP2H=__tmp__NNFO;
  __tmp__PNFO=Self__BNFO->parent_expr_binary__PDWL.left__PP1H;
  if (__tmp__PNFO==NULL) {
    __tmp__QNFO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__PNFO)->__id) {
    case __LIST__: {
      __tmp__QNFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__QNFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QNFO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__QNFO=((void *)__tmp__PNFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QNFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__QNFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__QNFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__QNFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QNFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__QNFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__QNFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__QNFO=NULL;
    } break;
    case __CAST__: {
      __tmp__QNFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__QNFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__QNFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__QNFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__QNFO=NULL;
    } break;
    }
  };
  left_cst__HNFO=__tmp__QNFO;
  __tmp__SNFO=Self__BNFO->parent_expr_binary__PDWL.right__OP2H;
  if (__tmp__SNFO==NULL) {
    __tmp__TNFO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__SNFO)->__id) {
    case __LIST__: {
      __tmp__TNFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__TNFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__TNFO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__TNFO=((void *)__tmp__SNFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__TNFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__TNFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__TNFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__TNFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__TNFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__TNFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__TNFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__TNFO=NULL;
    } break;
    case __CAST__: {
      __tmp__TNFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__TNFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__TNFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__TNFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__TNFO=NULL;
    } break;
    }
  };
  right_cst__INFO=__tmp__TNFO;
  result__DNFO=NULL;
  if (((void *)__tmp__QNFO != (void *)NULL)) {
    result__DNFO=NULL;
  };
  if ((((void *)result__DNFO == (void *)NULL) && ((void *)__tmp__TNFO != (void *)NULL))) {
    result__OXPO=NULL;
    if ((((__INTEGER_CST *)__tmp__TNFO)->value__PAZD ==  0)) {
      __tmp__WXPO=Self__BNFO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      put_error__text__0AH( 2,(&__string_559));
      put_position__ECH(__tmp__WXPO);
      send_error__2FH();
      __tmp__ZXPO=TRUE__;
    } else {
      __tmp__ZXPO=FALSE__;
    };
    if ((! __tmp__ZXPO)) {
      if ((to_power__PCRN(__tmp__TNFO) != (__INTEGER)(-  1))) {
        __tmp__GYPO=((__INTEGER_CST *)__tmp__TNFO)->value__PAZD;
        Self__KIKQ=((__INTEGER_CST *)__tmp__TNFO);
        Self__KIKQ->value__PAZD=(__INTEGER_64)(__tmp__GYPO -  1);
        check_type__RI5D(Self__KIKQ);
        result__OXPO=create__with__and__NWWH(Self__BNFO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BNFO->parent_expr_binary__PDWL.left__PP1H,__tmp__TNFO);
      };
    };
    result__DNFO=result__OXPO;
  };
  if (((((void *)result__DNFO == (void *)NULL) && ((void *)__tmp__TNFO != (void *)NULL)) && ((void *)__tmp__QNFO != (void *)NULL))) {
    Self__MIKQ=((__INTEGER_CST *)__tmp__QNFO);
    Self__MIKQ->value__PAZD=(__INTEGER_64)(((__INTEGER_CST *)__tmp__QNFO)->value__PAZD % ((__INTEGER_CST *)__tmp__TNFO)->value__PAZD);
    check_type__RI5D(Self__MIKQ);
    result__DNFO=__tmp__QNFO;
  };
  if ((((void *)result__DNFO == (void *)NULL) && (old_seq__ENFO == seq_call_and_loop__VREJ))) {
    result__TYPO=NULL;
    __tmp__UYPO=Self__BNFO->parent_expr_binary__PDWL.left__PP1H;
    __tmp__VYPO=Self__BNFO->parent_expr_binary__PDWL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__UYPO)->__id) {
    case __LIST__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__WYPO=__infix_equal_equal__WF1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WYPO=__infix_equal_equal__LG1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __INTEGER_CST__: {
      __tmp__WYPO=__infix_equal_equal__2G1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __READ_LOCAL__: {
      __tmp__WYPO=__infix_equal_equal__WH1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WYPO=__infix_equal_equal__MI1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WYPO=__infix_equal_equal__IJ1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __REAL_CST__: {
      __tmp__WYPO=__infix_equal_equal__EK1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__WYPO=__infix_equal_equal__4K1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__WYPO=__infix_equal_equal__XL1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_SUB__: {
      __tmp__WYPO=__infix_equal_equal__TM1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_MUL__: {
      __tmp__WYPO=__infix_equal_equal__PN1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_DIV__: {
      __tmp__WYPO=__infix_equal_equal__LO1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_AND__: {
      __tmp__WYPO=__infix_equal_equal__HP1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WYPO=__infix_equal_equal__DQ1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WYPO=__infix_equal_equal__5Q1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __PUT_TO__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__WYPO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__WYPO=__infix_equal_equal__LS1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__WYPO=__infix_equal_equal__HT1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WYPO=__infix_equal_equal__CZHO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WYPO=__infix_equal_equal__SXFO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WYPO=__infix_equal_equal__TBMO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WYPO=__infix_equal_equal__OYFO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WYPO=__infix_equal_equal__QCMO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_NEG__: {
      __tmp__WYPO=__infix_equal_equal__J5KM(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_ADD__: {
      __tmp__WYPO=__infix_equal_equal__ZT1L(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_NOT__: {
      __tmp__WYPO=__infix_equal_equal__QB0M(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_MOD__: {
      __tmp__WYPO=__infix_equal_equal__KZFO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WYPO=__infix_equal_equal__OTEP(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_INF__: {
      __tmp__WYPO=__infix_equal_equal__UZHO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WYPO=__infix_equal_equal__Q0HO(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_OR__: {
      __tmp__WYPO=__infix_equal_equal__32QN(__tmp__UYPO,__tmp__VYPO);
    } break;
    case __EXPR_XOR__: {
      __tmp__WYPO=__infix_equal_equal__GOVO(__tmp__UYPO,__tmp__VYPO);
    } break;
    };
    if (__tmp__WYPO) {
      result__TYPO=create__value__type__DNQC(Self__BNFO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM, 0,static_type__5LEO(Self__BNFO));
      __tmp__BZPO=Self__BNFO->parent_expr_binary__PDWL.left__PP1H;
      switch (((struct ___OBJ *)__tmp__BZPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__BZPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__BZPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__AWDQ=((__READ_LOCAL *)__tmp__BZPO);
        unread__YVJK(Self__AWDQ->local__ALZD,Self__AWDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__BZPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__BZPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__BZPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__CWDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__BZPO)->receiver__OO2H);
        unread__YVJK(Self__CWDQ->local__ALZD,Self__CWDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__BZPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__BZPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__BZPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__BZPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__BZPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__BZPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__BZPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__BZPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__BZPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__BZPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__BZPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__BZPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__BZPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__BZPO);
      } break;
      case __READ_GLOBAL__: {
        Self__DWDQ=((__READ_GLOBAL *)__tmp__BZPO);
        unread__15ML(Self__DWDQ->global__RHJK,Self__DWDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__BZPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__BZPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__BZPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__BZPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__BZPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__BZPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__BZPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__BZPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__BZPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__BZPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__BZPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__BZPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__BZPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__BZPO);
      } break;
      };
      __tmp__CZPO=Self__BNFO->parent_expr_binary__PDWL.right__OP2H;
      switch (((struct ___OBJ *)__tmp__CZPO)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__CZPO);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__CZPO);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__EWDQ=((__READ_LOCAL *)__tmp__CZPO);
        unread__YVJK(Self__EWDQ->local__ALZD,Self__EWDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__CZPO);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__CZPO);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__CZPO);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__GWDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__CZPO)->receiver__OO2H);
        unread__YVJK(Self__GWDQ->local__ALZD,Self__GWDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__CZPO);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__CZPO);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__CZPO);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__CZPO);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__CZPO);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__CZPO);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__CZPO);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__CZPO);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__CZPO);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__CZPO);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__CZPO);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__CZPO);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__CZPO);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__CZPO);
      } break;
      case __READ_GLOBAL__: {
        Self__HWDQ=((__READ_GLOBAL *)__tmp__CZPO);
        unread__15ML(Self__HWDQ->global__RHJK,Self__HWDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__CZPO);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__CZPO);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__CZPO);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__CZPO);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__CZPO);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__CZPO);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__CZPO);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__CZPO);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__CZPO);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__CZPO);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__CZPO);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__CZPO);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__CZPO);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__CZPO);
      } break;
      };
    };
    result__DNFO=result__TYPO;
    if ((((void *)result__TYPO == (void *)NULL) && ((void *)__tmp__QNFO != (void *)NULL))) {
      result__5GZO=NULL;
      if ((((__INTEGER_CST *)__tmp__QNFO)->value__PAZD ==  0)) {
        result__5GZO=__tmp__QNFO;
        __tmp__GHZO=Self__BNFO->parent_expr_binary__PDWL.right__OP2H;
        switch (((struct ___OBJ *)__tmp__GHZO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__GHZO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__GHZO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__IWDQ=((__READ_LOCAL *)__tmp__GHZO);
          unread__YVJK(Self__IWDQ->local__ALZD,Self__IWDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__GHZO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__GHZO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__GHZO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__KWDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__GHZO)->receiver__OO2H);
          unread__YVJK(Self__KWDQ->local__ALZD,Self__KWDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__GHZO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__GHZO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__GHZO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__GHZO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__GHZO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__GHZO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__GHZO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__GHZO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__GHZO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__GHZO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__GHZO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__GHZO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__GHZO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__GHZO);
        } break;
        case __READ_GLOBAL__: {
          Self__LWDQ=((__READ_GLOBAL *)__tmp__GHZO);
          unread__15ML(Self__LWDQ->global__RHJK,Self__LWDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__GHZO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__GHZO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__GHZO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__GHZO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__GHZO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__GHZO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__GHZO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__GHZO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__GHZO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__GHZO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__GHZO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__GHZO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__GHZO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__GHZO);
        } break;
        };
      };
      result__DNFO=result__5GZO;
    };
    if ((((void *)result__DNFO == (void *)NULL) && ((void *)__tmp__TNFO != (void *)NULL))) {
      result__NHZO=NULL;
      if ((((__INTEGER_CST *)__tmp__TNFO)->value__PAZD ==  1)) {
        Self__QIKQ=((__INTEGER_CST *)__tmp__TNFO);
        Self__QIKQ->value__PAZD= 0;
        check_type__RI5D(Self__QIKQ);
        __tmp__WHZO=Self__BNFO->parent_expr_binary__PDWL.left__PP1H;
        switch (((struct ___OBJ *)__tmp__WHZO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__WHZO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__WHZO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__NWDQ=((__READ_LOCAL *)__tmp__WHZO);
          unread__YVJK(Self__NWDQ->local__ALZD,Self__NWDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__WHZO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__WHZO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__WHZO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__PWDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__WHZO)->receiver__OO2H);
          unread__YVJK(Self__PWDQ->local__ALZD,Self__PWDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__WHZO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__WHZO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__WHZO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__WHZO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__WHZO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__WHZO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__WHZO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__WHZO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__WHZO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__WHZO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__WHZO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__WHZO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__WHZO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__WHZO);
        } break;
        case __READ_GLOBAL__: {
          Self__QWDQ=((__READ_GLOBAL *)__tmp__WHZO);
          unread__15ML(Self__QWDQ->global__RHJK,Self__QWDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__WHZO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__WHZO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__WHZO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__WHZO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__WHZO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__WHZO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__WHZO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__WHZO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__WHZO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__WHZO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__WHZO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__WHZO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__WHZO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__WHZO);
        } break;
        };
        result__NHZO=__tmp__TNFO;
        __tmp__YHZO=TRUE__;
      } else {
        __tmp__YHZO=FALSE__;
      };
      if ((! __tmp__YHZO)) {
        if ((((__INTEGER_CST *)__tmp__TNFO)->value__PAZD == (__INTEGER)(-  1))) {
          Self__SIKQ=((__INTEGER_CST *)__tmp__TNFO);
          Self__SIKQ->value__PAZD= 0;
          check_type__RI5D(Self__SIKQ);
          result__NHZO=__tmp__TNFO;
          __tmp__HIZO=Self__BNFO->parent_expr_binary__PDWL.left__PP1H;
          switch (((struct ___OBJ *)__tmp__HIZO)->__id) {
          case __LIST__: {
            remove__KPJJ(__tmp__HIZO);
          } break;
          case __STRING_CST__: {
          } break;
          case __EXTERNAL_C__: {
            remove__UUAK(__tmp__HIZO);
          } break;
          case __PROTOTYPE_CST__: {
          } break;
          case __INTEGER_CST__: {
          } break;
          case __READ_LOCAL__: {
            Self__TWDQ=((__READ_LOCAL *)__tmp__HIZO);
            unread__YVJK(Self__TWDQ->local__ALZD,Self__TWDQ);
          } break;
          case __EXPR_MULTIPLE__: {
            remove__TVAK(__tmp__HIZO);
          } break;
          case __EXPR_EQUAL__: {
            remove__DWAK(__tmp__HIZO);
          } break;
          case __EXPR_NOT_EQUAL__: {
            remove__HWAK(__tmp__HIZO);
          } break;
          case __REAL_CST__: {
          } break;
          case __CHARACTER_CST__: {
          } break;
          case __IS_EXPANDED__: {
            Self__VWDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__HIZO)->receiver__OO2H);
            unread__YVJK(Self__VWDQ->local__ALZD,Self__VWDQ);
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(__tmp__HIZO);
          } break;
          case __EXPR_SUP__: {
            remove__VWAK(__tmp__HIZO);
          } break;
          case __EXPR_SUB__: {
            remove__ZWAK(__tmp__HIZO);
          } break;
          case __EXPR_MUL__: {
            remove__3WAK(__tmp__HIZO);
          } break;
          case __EXPR_DIV__: {
            remove__BXAK(__tmp__HIZO);
          } break;
          case __EXPR_AND__: {
            remove__FXAK(__tmp__HIZO);
          } break;
          case __EXPR_SHIFT_R__: {
            remove__JXAK(__tmp__HIZO);
          } break;
          case __EXPR_SHIFT_L__: {
            remove__NXAK(__tmp__HIZO);
          } break;
          case __PUT_TO__: {
            remove__RXAK(__tmp__HIZO);
          } break;
          case __ITEM__: {
            remove__SYAK(__tmp__HIZO);
          } break;
          case __SIZE_OF__: {
            remove__WYAK(__tmp__HIZO);
          } break;
          case __CAST__: {
            remove__ZYAK(__tmp__HIZO);
          } break;
          case __CALL_SLOT__: {
            remove__2NML(__tmp__HIZO);
          } break;
          case __READ_SLOT__: {
            remove__4GHK(__tmp__HIZO);
          } break;
          case __READ_GLOBAL__: {
            Self__WWDQ=((__READ_GLOBAL *)__tmp__HIZO);
            unread__15ML(Self__WWDQ->global__RHJK,Self__WWDQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            remove__GWZM(__tmp__HIZO);
          } break;
          case __EXPR_OR_LOGIC__: {
            remove__WPEO(__tmp__HIZO);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            remove__WMKO(__tmp__HIZO);
          } break;
          case __EXPR_AND_LOGIC__: {
            remove__0PEO(__tmp__HIZO);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            remove__1MKO(__tmp__HIZO);
          } break;
          case __EXPR_NEG__: {
            remove__3KJM(__tmp__HIZO);
          } break;
          case __EXPR_ADD__: {
            remove__QQML(__tmp__HIZO);
          } break;
          case __EXPR_NOT__: {
            remove__D5YM(__tmp__HIZO);
          } break;
          case __EXPR_MOD__: {
            remove__4PEO(__tmp__HIZO);
          } break;
          case __EXPR_SUP_EQ__: {
            remove__X5DP(__tmp__HIZO);
          } break;
          case __EXPR_INF__: {
            remove__KZQN(__tmp__HIZO);
          } break;
          case __EXPR_INF_EQ__: {
            remove__OZQN(__tmp__HIZO);
          } break;
          case __EXPR_OR__: {
            remove__LUPN(__tmp__HIZO);
          } break;
          case __EXPR_XOR__: {
            remove__AQTO(__tmp__HIZO);
          } break;
          };
        };
      };
      result__DNFO=result__NHZO;
    };
  };
  if (((void *)result__DNFO == (void *)NULL)) {
    result__DNFO=Self__BNFO;
  } else {
    __tmp__HRFO=Self__BNFO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__DNFO)->__id) {
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__DNFO)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__HRFO;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__DNFO)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__HRFO;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__DNFO)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__HRFO;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__DNFO);
}

static void* execute_link__YLEP(__EXPR_SUP_EQ *Self__ZLEP)
// ({EXPR_SUP_EQ}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__2LEP;
  void *__tmp__CMEP,*__tmp__DMEP,*__tmp__EMEP,*__tmp__FMEP,*__tmp__HMEP;
  void *__tmp__KMEP,*result__1LEP,*__tmp__GTJP,*__tmp__HTJP,*__tmp__TTJP;
  void *__tmp__UTJP,*result__THKP,*__tmp__0HKP,*__tmp__MIKP,*__tmp__NIKP;
  void *__tmp__IMEP,*left_cst__5LEP,*__tmp__LMEP,*right_cst__AMEP;
  void *result__FGKP,*result__FTJP;
  __POSITION __tmp__OGKP,__tmp__YGKP,__tmp__OTJP,__tmp__HIKP;
  __POSITION __tmp__5PEP;
  void *__tmp__PGKP,*__tmp__ZGKP,*__tmp__PTJP,*__tmp__2HKP,*__tmp__IIKP;
  void *__tmp__QGKP,*__tmp__0GKP,*__tmp__QTJP,*__tmp__1HKP,*__tmp__JIKP;
  __READ_LOCAL *Self__AXDQ,*Self__CXDQ,*Self__EXDQ,*Self__GXDQ;
  __READ_LOCAL *Self__PXDQ,*Self__RXDQ,*Self__TXDQ,*Self__VXDQ;
  __READ_GLOBAL *Self__DXDQ,*Self__HXDQ,*Self__SXDQ,*Self__WXDQ;
  void *__tmp__3HKP;
  __BOOLEAN __tmp__ITJP,__tmp__BIKP;
  old_seq__2LEP=seq_call_and_loop__VREJ;
  __tmp__CMEP=Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__CMEP)->__id) {
  case __LIST__: {
    __tmp__DMEP=execute_link__LUOG(__tmp__CMEP);
  } break;
  case __STRING_CST__: {
    __tmp__DMEP=((__STRING_CST *)__tmp__CMEP);
  } break;
  case __EXTERNAL_C__: {
    __tmp__DMEP=execute_link__U5ZK(__tmp__CMEP);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__DMEP=((__PROTOTYPE_CST *)__tmp__CMEP);
  } break;
  case __INTEGER_CST__: {
    __tmp__DMEP=((__INTEGER_CST *)__tmp__CMEP);
  } break;
  case __READ_LOCAL__: {
    __tmp__DMEP=execute_link__EHAL(__tmp__CMEP);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__DMEP=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__DMEP=execute_link__2LAL(__tmp__CMEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__DMEP=execute_link__FQAL(__tmp__CMEP);
  } break;
  case __REAL_CST__: {
    __tmp__DMEP=((__REAL_CST *)__tmp__CMEP);
  } break;
  case __CHARACTER_CST__: {
    __tmp__DMEP=((__CHARACTER_CST *)__tmp__CMEP);
  } break;
  case __IS_EXPANDED__: {
    __tmp__DMEP=execute_link__UUAL(__tmp__CMEP);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__DMEP=execute_link__1VAL(__tmp__CMEP);
  } break;
  case __EXPR_SUP__: {
    __tmp__DMEP=execute_link__AWAL(__tmp__CMEP);
  } break;
  case __EXPR_SUB__: {
    __tmp__DMEP=execute_link__J0AL(__tmp__CMEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__DMEP=execute_link__S4AL(__tmp__CMEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__DMEP=execute_link__1CBL(__tmp__CMEP);
  } break;
  case __EXPR_AND__: {
    __tmp__DMEP=execute_link__EHBL(__tmp__CMEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__DMEP=execute_link__NLBL(__tmp__CMEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__DMEP=execute_link__WPBL(__tmp__CMEP);
  } break;
  case __PUT_TO__: {
    __tmp__DMEP=execute_link__BOPK(__tmp__CMEP);
  } break;
  case __ITEM__: {
    __tmp__DMEP=execute_link__5TBL(__tmp__CMEP);
  } break;
  case __SIZE_OF__: {
    __tmp__DMEP=execute_link__GUBL(__tmp__CMEP);
  } break;
  case __CAST__: {
    __tmp__DMEP=execute_link__LUBL(__tmp__CMEP);
  } break;
  case __CALL_SLOT__: {
    __tmp__DMEP=execute_link__A2TL(__tmp__CMEP);
  } break;
  case __READ_SLOT__: {
    __tmp__DMEP=execute_link__EYBL(__tmp__CMEP);
  } break;
  case __READ_GLOBAL__: {
    __tmp__DMEP=execute_link__U2BL(__tmp__CMEP);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__DMEP=execute_link__SRZM(__tmp__CMEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__DMEP=execute_link__OBFO(__tmp__CMEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__DMEP=execute_link__GJLO(__tmp__CMEP);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__DMEP=execute_link__HHFO(__tmp__CMEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__DMEP=execute_link__KPLO(__tmp__CMEP);
  } break;
  case __EXPR_NEG__: {
    __tmp__DMEP=execute_link__0GKM(__tmp__CMEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__DMEP=execute_link__RROL(__tmp__CMEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__DMEP=execute_link__GUZM(__tmp__CMEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__DMEP=execute_link__ANFO(__tmp__CMEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__DMEP=execute_link__YLEP(__tmp__CMEP);
  } break;
  case __EXPR_INF__: {
    __tmp__DMEP=execute_link__VQQN(__tmp__CMEP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__DMEP=execute_link__4UQN(__tmp__CMEP);
  } break;
  case __EXPR_OR__: {
    __tmp__DMEP=execute_link__1HQN(__tmp__CMEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__DMEP=execute_link__IYUO(__tmp__CMEP);
  } break;
  };
  Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H=__tmp__DMEP;
  __tmp__EMEP=Self__ZLEP->parent_expr_binary_cmp__EP1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__EMEP)->__id) {
  case __LIST__: {
    __tmp__FMEP=execute_link__LUOG(__tmp__EMEP);
  } break;
  case __STRING_CST__: {
    __tmp__FMEP=((__STRING_CST *)__tmp__EMEP);
  } break;
  case __EXTERNAL_C__: {
    __tmp__FMEP=execute_link__U5ZK(__tmp__EMEP);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__FMEP=((__PROTOTYPE_CST *)__tmp__EMEP);
  } break;
  case __INTEGER_CST__: {
    __tmp__FMEP=((__INTEGER_CST *)__tmp__EMEP);
  } break;
  case __READ_LOCAL__: {
    __tmp__FMEP=execute_link__EHAL(__tmp__EMEP);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FMEP=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FMEP=execute_link__2LAL(__tmp__EMEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FMEP=execute_link__FQAL(__tmp__EMEP);
  } break;
  case __REAL_CST__: {
    __tmp__FMEP=((__REAL_CST *)__tmp__EMEP);
  } break;
  case __CHARACTER_CST__: {
    __tmp__FMEP=((__CHARACTER_CST *)__tmp__EMEP);
  } break;
  case __IS_EXPANDED__: {
    __tmp__FMEP=execute_link__UUAL(__tmp__EMEP);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FMEP=execute_link__1VAL(__tmp__EMEP);
  } break;
  case __EXPR_SUP__: {
    __tmp__FMEP=execute_link__AWAL(__tmp__EMEP);
  } break;
  case __EXPR_SUB__: {
    __tmp__FMEP=execute_link__J0AL(__tmp__EMEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__FMEP=execute_link__S4AL(__tmp__EMEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__FMEP=execute_link__1CBL(__tmp__EMEP);
  } break;
  case __EXPR_AND__: {
    __tmp__FMEP=execute_link__EHBL(__tmp__EMEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FMEP=execute_link__NLBL(__tmp__EMEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FMEP=execute_link__WPBL(__tmp__EMEP);
  } break;
  case __PUT_TO__: {
    __tmp__FMEP=execute_link__BOPK(__tmp__EMEP);
  } break;
  case __ITEM__: {
    __tmp__FMEP=execute_link__5TBL(__tmp__EMEP);
  } break;
  case __SIZE_OF__: {
    __tmp__FMEP=execute_link__GUBL(__tmp__EMEP);
  } break;
  case __CAST__: {
    __tmp__FMEP=execute_link__LUBL(__tmp__EMEP);
  } break;
  case __CALL_SLOT__: {
    __tmp__FMEP=execute_link__A2TL(__tmp__EMEP);
  } break;
  case __READ_SLOT__: {
    __tmp__FMEP=execute_link__EYBL(__tmp__EMEP);
  } break;
  case __READ_GLOBAL__: {
    __tmp__FMEP=execute_link__U2BL(__tmp__EMEP);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FMEP=execute_link__SRZM(__tmp__EMEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FMEP=execute_link__OBFO(__tmp__EMEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FMEP=execute_link__GJLO(__tmp__EMEP);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FMEP=execute_link__HHFO(__tmp__EMEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FMEP=execute_link__KPLO(__tmp__EMEP);
  } break;
  case __EXPR_NEG__: {
    __tmp__FMEP=execute_link__0GKM(__tmp__EMEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__FMEP=execute_link__RROL(__tmp__EMEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__FMEP=execute_link__GUZM(__tmp__EMEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__FMEP=execute_link__ANFO(__tmp__EMEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FMEP=execute_link__YLEP(__tmp__EMEP);
  } break;
  case __EXPR_INF__: {
    __tmp__FMEP=execute_link__VQQN(__tmp__EMEP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FMEP=execute_link__4UQN(__tmp__EMEP);
  } break;
  case __EXPR_OR__: {
    __tmp__FMEP=execute_link__1HQN(__tmp__EMEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__FMEP=execute_link__IYUO(__tmp__EMEP);
  } break;
  };
  Self__ZLEP->parent_expr_binary_cmp__EP1M.right__LN2H=__tmp__FMEP;
  __tmp__HMEP=Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  if (__tmp__HMEP==NULL) {
    __tmp__IMEP=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__HMEP)->__id) {
    case __LIST__: {
      __tmp__IMEP=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__IMEP=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__IMEP=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__IMEP=((void *)__tmp__HMEP);
    } break;
    case __READ_LOCAL__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__IMEP=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__IMEP=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__IMEP=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__IMEP=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__IMEP=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__IMEP=NULL;
    } break;
    case __ITEM__: {
      __tmp__IMEP=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__IMEP=NULL;
    } break;
    case __CAST__: {
      __tmp__IMEP=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__IMEP=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__IMEP=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__IMEP=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__IMEP=NULL;
    } break;
    }
  };
  left_cst__5LEP=__tmp__IMEP;
  __tmp__KMEP=Self__ZLEP->parent_expr_binary_cmp__EP1M.right__LN2H;
  if (__tmp__KMEP==NULL) {
    __tmp__LMEP=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__KMEP)->__id) {
    case __LIST__: {
      __tmp__LMEP=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LMEP=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LMEP=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__LMEP=((void *)__tmp__KMEP);
    } break;
    case __READ_LOCAL__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LMEP=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__LMEP=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LMEP=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LMEP=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LMEP=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__LMEP=NULL;
    } break;
    case __ITEM__: {
      __tmp__LMEP=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__LMEP=NULL;
    } break;
    case __CAST__: {
      __tmp__LMEP=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__LMEP=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__LMEP=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__LMEP=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__LMEP=NULL;
    } break;
    }
  };
  right_cst__AMEP=__tmp__LMEP;
  result__1LEP=NULL;
  if (((void *)__tmp__IMEP != (void *)NULL)) {
    result__1LEP=NULL;
  };
  if ((((void *)result__1LEP == (void *)NULL) && ((void *)__tmp__LMEP != (void *)NULL))) {
    result__1LEP=NULL;
  };
  if (((((void *)result__1LEP == (void *)NULL) && ((void *)__tmp__LMEP != (void *)NULL)) && ((void *)__tmp__IMEP != (void *)NULL))) {
    result__FGKP=NULL;
    if ((((__INTEGER_CST *)__tmp__IMEP)->value__PAZD >= ((__INTEGER_CST *)__tmp__LMEP)->value__PAZD)) {
      __tmp__OGKP=Self__ZLEP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__PGKP=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__PGKP)->__id) {
      case __TYPE__: {
        __tmp__QGKP=((__TYPE *)__tmp__PGKP)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__QGKP=((__TYPE_NULL *)__tmp__PGKP)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__QGKP=((__TYPE_VOID *)__tmp__PGKP)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__QGKP=((__TYPE_CONTEXT *)__tmp__PGKP)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__QGKP=((__TYPE_ID *)__tmp__PGKP)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__QGKP=((__TYPE_GENERIC *)__tmp__PGKP)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__QGKP=((__PROFIL_BLOCK *)__tmp__PGKP)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__FGKP=create__type__CLQC(__tmp__OGKP,__tmp__QGKP);
    } else {
      __tmp__YGKP=Self__ZLEP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__ZGKP=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__ZGKP)->__id) {
      case __TYPE__: {
        __tmp__0GKP=((__TYPE *)__tmp__ZGKP)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__0GKP=((__TYPE_NULL *)__tmp__ZGKP)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__0GKP=((__TYPE_VOID *)__tmp__ZGKP)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__0GKP=((__TYPE_CONTEXT *)__tmp__ZGKP)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__0GKP=((__TYPE_ID *)__tmp__ZGKP)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__0GKP=((__TYPE_GENERIC *)__tmp__ZGKP)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__0GKP=((__PROFIL_BLOCK *)__tmp__ZGKP)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__FGKP=create__type__CLQC(__tmp__YGKP,__tmp__0GKP);
    };
    result__1LEP=result__FGKP;
  };
  if ((((void *)result__1LEP == (void *)NULL) && (old_seq__2LEP == seq_call_and_loop__VREJ))) {
    result__FTJP=NULL;
    __tmp__GTJP=Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    __tmp__HTJP=Self__ZLEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__GTJP)->__id) {
    case __LIST__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__ITJP=__infix_equal_equal__WF1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXTERNAL_C__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ITJP=__infix_equal_equal__LG1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __INTEGER_CST__: {
      __tmp__ITJP=__infix_equal_equal__2G1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __READ_LOCAL__: {
      __tmp__ITJP=__infix_equal_equal__WH1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ITJP=__infix_equal_equal__MI1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ITJP=__infix_equal_equal__IJ1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __REAL_CST__: {
      __tmp__ITJP=__infix_equal_equal__EK1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __CHARACTER_CST__: {
      __tmp__ITJP=__infix_equal_equal__4K1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __IS_EXPANDED__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__ITJP=__infix_equal_equal__XL1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_SUB__: {
      __tmp__ITJP=__infix_equal_equal__TM1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_MUL__: {
      __tmp__ITJP=__infix_equal_equal__PN1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_DIV__: {
      __tmp__ITJP=__infix_equal_equal__LO1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_AND__: {
      __tmp__ITJP=__infix_equal_equal__HP1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ITJP=__infix_equal_equal__DQ1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ITJP=__infix_equal_equal__5Q1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __PUT_TO__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __CAST__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__ITJP=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__ITJP=__infix_equal_equal__LS1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __READ_GLOBAL__: {
      __tmp__ITJP=__infix_equal_equal__HT1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ITJP=__infix_equal_equal__CZHO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ITJP=__infix_equal_equal__SXFO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ITJP=__infix_equal_equal__TBMO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ITJP=__infix_equal_equal__OYFO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ITJP=__infix_equal_equal__QCMO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_NEG__: {
      __tmp__ITJP=__infix_equal_equal__J5KM(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_ADD__: {
      __tmp__ITJP=__infix_equal_equal__ZT1L(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_NOT__: {
      __tmp__ITJP=__infix_equal_equal__QB0M(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_MOD__: {
      __tmp__ITJP=__infix_equal_equal__KZFO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ITJP=__infix_equal_equal__OTEP(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_INF__: {
      __tmp__ITJP=__infix_equal_equal__UZHO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ITJP=__infix_equal_equal__Q0HO(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_OR__: {
      __tmp__ITJP=__infix_equal_equal__32QN(__tmp__GTJP,__tmp__HTJP);
    } break;
    case __EXPR_XOR__: {
      __tmp__ITJP=__infix_equal_equal__GOVO(__tmp__GTJP,__tmp__HTJP);
    } break;
    };
    if (__tmp__ITJP) {
      __tmp__OTJP=Self__ZLEP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__PTJP=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__PTJP)->__id) {
      case __TYPE__: {
        __tmp__QTJP=((__TYPE *)__tmp__PTJP)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__QTJP=((__TYPE_NULL *)__tmp__PTJP)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__QTJP=((__TYPE_VOID *)__tmp__PTJP)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__QTJP=((__TYPE_CONTEXT *)__tmp__PTJP)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__QTJP=((__TYPE_ID *)__tmp__PTJP)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__QTJP=((__TYPE_GENERIC *)__tmp__PTJP)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__QTJP=((__PROFIL_BLOCK *)__tmp__PTJP)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__FTJP=create__type__CLQC(__tmp__OTJP,__tmp__QTJP);
      __tmp__TTJP=Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H;
      switch (((struct ___OBJ *)__tmp__TTJP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__TTJP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__TTJP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__AXDQ=((__READ_LOCAL *)__tmp__TTJP);
        unread__YVJK(Self__AXDQ->local__ALZD,Self__AXDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__TTJP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__TTJP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__TTJP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__CXDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__TTJP)->receiver__OO2H);
        unread__YVJK(Self__CXDQ->local__ALZD,Self__CXDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__TTJP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__TTJP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__TTJP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__TTJP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__TTJP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__TTJP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__TTJP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__TTJP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__TTJP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__TTJP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__TTJP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__TTJP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__TTJP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__TTJP);
      } break;
      case __READ_GLOBAL__: {
        Self__DXDQ=((__READ_GLOBAL *)__tmp__TTJP);
        unread__15ML(Self__DXDQ->global__RHJK,Self__DXDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__TTJP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__TTJP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__TTJP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__TTJP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__TTJP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__TTJP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__TTJP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__TTJP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__TTJP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__TTJP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__TTJP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__TTJP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__TTJP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__TTJP);
      } break;
      };
      __tmp__UTJP=Self__ZLEP->parent_expr_binary_cmp__EP1M.right__LN2H;
      switch (((struct ___OBJ *)__tmp__UTJP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__UTJP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__UTJP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__EXDQ=((__READ_LOCAL *)__tmp__UTJP);
        unread__YVJK(Self__EXDQ->local__ALZD,Self__EXDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__UTJP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__UTJP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__UTJP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__GXDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__UTJP)->receiver__OO2H);
        unread__YVJK(Self__GXDQ->local__ALZD,Self__GXDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__UTJP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__UTJP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__UTJP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__UTJP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__UTJP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__UTJP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__UTJP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__UTJP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__UTJP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__UTJP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__UTJP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__UTJP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__UTJP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__UTJP);
      } break;
      case __READ_GLOBAL__: {
        Self__HXDQ=((__READ_GLOBAL *)__tmp__UTJP);
        unread__15ML(Self__HXDQ->global__RHJK,Self__HXDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__UTJP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__UTJP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__UTJP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__UTJP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__UTJP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__UTJP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__UTJP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__UTJP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__UTJP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__UTJP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__UTJP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__UTJP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__UTJP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__UTJP);
      } break;
      };
    };
    result__1LEP=result__FTJP;
    if ((((void *)result__FTJP == (void *)NULL) && ((void *)__tmp__IMEP != (void *)NULL))) {
      result__1LEP=NULL;
    };
    if ((((void *)result__1LEP == (void *)NULL) && ((void *)__tmp__LMEP != (void *)NULL))) {
      result__THKP=NULL;
      if ((((__INTEGER_CST *)__tmp__LMEP)->value__PAZD ==  0)) {
        __tmp__0HKP=Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H;
        switch (((struct ___OBJ *)__tmp__0HKP)->__id) {
        case __LIST__: {
          __tmp__1HKP=static_type__GIQG(__tmp__0HKP);
        } break;
        case __STRING_CST__: {
          __tmp__1HKP=((__STRING_CST *)__tmp__0HKP)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__1HKP=((__EXTERNAL_C *)__tmp__0HKP)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__1HKP=((__PROTOTYPE_CST *)__tmp__0HKP)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__1HKP=((__INTEGER_CST *)__tmp__0HKP)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__1HKP=((__LOCAL *)((__READ_LOCAL *)__tmp__0HKP)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__1HKP=static_type__0N1H(__tmp__0HKP);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__1HKP=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__1HKP=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__1HKP=((__REAL_CST *)__tmp__0HKP)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__1HKP=((__CHARACTER_CST *)__tmp__0HKP)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__1HKP=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__1HKP=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__1HKP=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__1HKP=static_type__MP1H(__tmp__0HKP);
        } break;
        case __EXPR_MUL__: {
          __tmp__1HKP=static_type__SP1H(__tmp__0HKP);
        } break;
        case __EXPR_DIV__: {
          __tmp__1HKP=static_type__XP1H(__tmp__0HKP);
        } break;
        case __EXPR_AND__: {
          __tmp__1HKP=static_type__2P1H(__tmp__0HKP);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__1HKP=static_type__BQ1H(__tmp__0HKP);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__1HKP=static_type__GQ1H(__tmp__0HKP);
        } break;
        case __PUT_TO__: {
          __tmp__1HKP=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__1HKP=static_type__PQ1H(__tmp__0HKP);
        } break;
        case __SIZE_OF__: {
          __tmp__1HKP=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__1HKP=((__CAST *)__tmp__0HKP)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__1HKP=static_type__GIKL(__tmp__0HKP);
        } break;
        case __READ_SLOT__: {
          __tmp__1HKP=((__SLOT_DATA *)((__READ_SLOT *)__tmp__0HKP)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__1HKP=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__0HKP)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__1HKP=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__1HKP=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__1HKP=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__1HKP=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__1HKP=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__1HKP=static_type__Z2IM(__tmp__0HKP);
        } break;
        case __EXPR_ADD__: {
          __tmp__1HKP=static_type__IXML(__tmp__0HKP);
        } break;
        case __EXPR_NOT__: {
          __tmp__1HKP=static_type__BTXM(__tmp__0HKP);
        } break;
        case __EXPR_MOD__: {
          __tmp__1HKP=static_type__5LEO(__tmp__0HKP);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__1HKP=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__1HKP=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__1HKP=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__1HKP=static_type__NOPN(__tmp__0HKP);
        } break;
        case __EXPR_XOR__: {
          __tmp__1HKP=static_type__XCSO(__tmp__0HKP);
        } break;
        };
        __tmp__2HKP=((__TYPE_FULL *)__tmp__1HKP)->parent_type__KTL;
        switch (((struct ___OBJ *)__tmp__2HKP)->__id) {
        case __TYPE__: {
          __tmp__3HKP=((__PROTOTYPE *)((__TYPE *)__tmp__2HKP)->prototype__RD)->parent_named__QD.name__1QB;
        } break;
        case __TYPE_NULL__: {
          __tmp__3HKP=(&__string_59);
        } break;
        case __TYPE_VOID__: {
          __tmp__3HKP=(&__string_2);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__3HKP=(&__string_44);
        } break;
        case __TYPE_ID__: {
          __tmp__3HKP=(&__string_46);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__3HKP=((__TYPE_GENERIC *)__tmp__2HKP)->name__2R2B;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__3HKP=((__PROFIL_BLOCK *)__tmp__2HKP)->parent_profil__GHAG.name__XJEI;
        } break;
        };
        __tmp__BIKP=(((__CHARACTER *)((__STRING_CONSTANT *)__tmp__3HKP)->storage__C5K)[ 0] == 'U');
      } else {
        __tmp__BIKP=FALSE__;
      };
      if (__tmp__BIKP) {
        __tmp__HIKP=Self__ZLEP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__IIKP=type_true__FJB;
        switch (((struct ___OBJ *)__tmp__IIKP)->__id) {
        case __TYPE__: {
          __tmp__JIKP=((__TYPE *)__tmp__IIKP)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__JIKP=((__TYPE_NULL *)__tmp__IIKP)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__JIKP=((__TYPE_VOID *)__tmp__IIKP)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__JIKP=((__TYPE_CONTEXT *)__tmp__IIKP)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__JIKP=((__TYPE_ID *)__tmp__IIKP)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__JIKP=((__TYPE_GENERIC *)__tmp__IIKP)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__JIKP=((__PROFIL_BLOCK *)__tmp__IIKP)->parent_type__HHAG.default__AKC;
        } break;
        };
        result__THKP=create__type__CLQC(__tmp__HIKP,__tmp__JIKP);
        __tmp__MIKP=Self__ZLEP->parent_expr_binary_cmp__EP1M.left__HN2H;
        switch (((struct ___OBJ *)__tmp__MIKP)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__MIKP);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__MIKP);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__PXDQ=((__READ_LOCAL *)__tmp__MIKP);
          unread__YVJK(Self__PXDQ->local__ALZD,Self__PXDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__MIKP);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__MIKP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__MIKP);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__RXDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MIKP)->receiver__OO2H);
          unread__YVJK(Self__RXDQ->local__ALZD,Self__RXDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__MIKP);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__MIKP);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__MIKP);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__MIKP);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__MIKP);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__MIKP);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__MIKP);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__MIKP);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__MIKP);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__MIKP);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__MIKP);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__MIKP);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__MIKP);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__MIKP);
        } break;
        case __READ_GLOBAL__: {
          Self__SXDQ=((__READ_GLOBAL *)__tmp__MIKP);
          unread__15ML(Self__SXDQ->global__RHJK,Self__SXDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__MIKP);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__MIKP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__MIKP);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__MIKP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__MIKP);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__MIKP);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__MIKP);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__MIKP);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__MIKP);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__MIKP);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__MIKP);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__MIKP);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__MIKP);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__MIKP);
        } break;
        };
        __tmp__NIKP=Self__ZLEP->parent_expr_binary_cmp__EP1M.right__LN2H;
        switch (((struct ___OBJ *)__tmp__NIKP)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__NIKP);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__NIKP);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__TXDQ=((__READ_LOCAL *)__tmp__NIKP);
          unread__YVJK(Self__TXDQ->local__ALZD,Self__TXDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__NIKP);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__NIKP);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__NIKP);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__VXDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__NIKP)->receiver__OO2H);
          unread__YVJK(Self__VXDQ->local__ALZD,Self__VXDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__NIKP);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__NIKP);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__NIKP);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__NIKP);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__NIKP);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__NIKP);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__NIKP);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__NIKP);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__NIKP);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__NIKP);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__NIKP);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__NIKP);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__NIKP);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__NIKP);
        } break;
        case __READ_GLOBAL__: {
          Self__WXDQ=((__READ_GLOBAL *)__tmp__NIKP);
          unread__15ML(Self__WXDQ->global__RHJK,Self__WXDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__NIKP);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__NIKP);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__NIKP);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__NIKP);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__NIKP);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__NIKP);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__NIKP);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__NIKP);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__NIKP);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__NIKP);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__NIKP);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__NIKP);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__NIKP);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__NIKP);
        } break;
        };
      };
      result__1LEP=result__THKP;
    };
  };
  if (((void *)result__1LEP == (void *)NULL)) {
    result__1LEP=Self__ZLEP;
  } else {
    __tmp__5PEP=Self__ZLEP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    if (((struct ___OBJ *)result__1LEP)->__id==__PROTOTYPE_CST__) {
      ((__PROTOTYPE_CST *)result__1LEP)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__5PEP;
    } else {
      ((__EXPR_SUP_EQ *)result__1LEP)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__5PEP;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__1LEP);
}

static void* execute_link__VQQN(__EXPR_INF *Self__WQQN)
// ({EXPR_INF}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__ZQQN;
  void *__tmp__5QQN,*__tmp__ARQN,*__tmp__BRQN,*__tmp__CRQN,*__tmp__ERQN;
  void *__tmp__HRQN,*result__YQQN,*__tmp__LC5N,*__tmp__MC5N,*__tmp__YC5N;
  void *__tmp__ZC5N,*result__2NCO,*__tmp__DOCO,*__tmp__VOCO,*__tmp__WOCO;
  void *__tmp__FRQN,*left_cst__2QQN,*__tmp__IRQN,*right_cst__3QQN;
  void *result__BECO,*result__KC5N;
  __POSITION __tmp__KECO,__tmp__UECO,__tmp__TC5N,__tmp__QOCO;
  __POSITION __tmp__2UQN;
  void *__tmp__LECO,*__tmp__VECO,*__tmp__UC5N,*__tmp__FOCO,*__tmp__ROCO;
  void *__tmp__MECO,*__tmp__WECO,*__tmp__VC5N,*__tmp__EOCO,*__tmp__SOCO;
  __READ_LOCAL *Self__AYDQ,*Self__CYDQ,*Self__EYDQ,*Self__GYDQ;
  __READ_LOCAL *Self__PYDQ,*Self__RYDQ,*Self__TYDQ,*Self__VYDQ;
  __READ_GLOBAL *Self__DYDQ,*Self__HYDQ,*Self__SYDQ,*Self__WYDQ;
  void *__tmp__GOCO;
  __BOOLEAN __tmp__NC5N,__tmp__KOCO;
  old_seq__ZQQN=seq_call_and_loop__VREJ;
  __tmp__5QQN=Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__5QQN)->__id) {
  case __LIST__: {
    __tmp__ARQN=execute_link__LUOG(__tmp__5QQN);
  } break;
  case __STRING_CST__: {
    __tmp__ARQN=((__STRING_CST *)__tmp__5QQN);
  } break;
  case __EXTERNAL_C__: {
    __tmp__ARQN=execute_link__U5ZK(__tmp__5QQN);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__ARQN=((__PROTOTYPE_CST *)__tmp__5QQN);
  } break;
  case __INTEGER_CST__: {
    __tmp__ARQN=((__INTEGER_CST *)__tmp__5QQN);
  } break;
  case __READ_LOCAL__: {
    __tmp__ARQN=execute_link__EHAL(__tmp__5QQN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__ARQN=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__ARQN=execute_link__2LAL(__tmp__5QQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__ARQN=execute_link__FQAL(__tmp__5QQN);
  } break;
  case __REAL_CST__: {
    __tmp__ARQN=((__REAL_CST *)__tmp__5QQN);
  } break;
  case __CHARACTER_CST__: {
    __tmp__ARQN=((__CHARACTER_CST *)__tmp__5QQN);
  } break;
  case __IS_EXPANDED__: {
    __tmp__ARQN=execute_link__UUAL(__tmp__5QQN);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__ARQN=execute_link__1VAL(__tmp__5QQN);
  } break;
  case __EXPR_SUP__: {
    __tmp__ARQN=execute_link__AWAL(__tmp__5QQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__ARQN=execute_link__J0AL(__tmp__5QQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__ARQN=execute_link__S4AL(__tmp__5QQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__ARQN=execute_link__1CBL(__tmp__5QQN);
  } break;
  case __EXPR_AND__: {
    __tmp__ARQN=execute_link__EHBL(__tmp__5QQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__ARQN=execute_link__NLBL(__tmp__5QQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__ARQN=execute_link__WPBL(__tmp__5QQN);
  } break;
  case __PUT_TO__: {
    __tmp__ARQN=execute_link__BOPK(__tmp__5QQN);
  } break;
  case __ITEM__: {
    __tmp__ARQN=execute_link__5TBL(__tmp__5QQN);
  } break;
  case __SIZE_OF__: {
    __tmp__ARQN=execute_link__GUBL(__tmp__5QQN);
  } break;
  case __CAST__: {
    __tmp__ARQN=execute_link__LUBL(__tmp__5QQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__ARQN=execute_link__A2TL(__tmp__5QQN);
  } break;
  case __READ_SLOT__: {
    __tmp__ARQN=execute_link__EYBL(__tmp__5QQN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__ARQN=execute_link__U2BL(__tmp__5QQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__ARQN=execute_link__SRZM(__tmp__5QQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__ARQN=execute_link__OBFO(__tmp__5QQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__ARQN=execute_link__GJLO(__tmp__5QQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__ARQN=execute_link__HHFO(__tmp__5QQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__ARQN=execute_link__KPLO(__tmp__5QQN);
  } break;
  case __EXPR_NEG__: {
    __tmp__ARQN=execute_link__0GKM(__tmp__5QQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__ARQN=execute_link__RROL(__tmp__5QQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__ARQN=execute_link__GUZM(__tmp__5QQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__ARQN=execute_link__ANFO(__tmp__5QQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__ARQN=execute_link__YLEP(__tmp__5QQN);
  } break;
  case __EXPR_INF__: {
    __tmp__ARQN=execute_link__VQQN(__tmp__5QQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__ARQN=execute_link__4UQN(__tmp__5QQN);
  } break;
  case __EXPR_OR__: {
    __tmp__ARQN=execute_link__1HQN(__tmp__5QQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__ARQN=execute_link__IYUO(__tmp__5QQN);
  } break;
  };
  Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H=__tmp__ARQN;
  __tmp__BRQN=Self__WQQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__BRQN)->__id) {
  case __LIST__: {
    __tmp__CRQN=execute_link__LUOG(__tmp__BRQN);
  } break;
  case __STRING_CST__: {
    __tmp__CRQN=((__STRING_CST *)__tmp__BRQN);
  } break;
  case __EXTERNAL_C__: {
    __tmp__CRQN=execute_link__U5ZK(__tmp__BRQN);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__CRQN=((__PROTOTYPE_CST *)__tmp__BRQN);
  } break;
  case __INTEGER_CST__: {
    __tmp__CRQN=((__INTEGER_CST *)__tmp__BRQN);
  } break;
  case __READ_LOCAL__: {
    __tmp__CRQN=execute_link__EHAL(__tmp__BRQN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__CRQN=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__CRQN=execute_link__2LAL(__tmp__BRQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__CRQN=execute_link__FQAL(__tmp__BRQN);
  } break;
  case __REAL_CST__: {
    __tmp__CRQN=((__REAL_CST *)__tmp__BRQN);
  } break;
  case __CHARACTER_CST__: {
    __tmp__CRQN=((__CHARACTER_CST *)__tmp__BRQN);
  } break;
  case __IS_EXPANDED__: {
    __tmp__CRQN=execute_link__UUAL(__tmp__BRQN);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__CRQN=execute_link__1VAL(__tmp__BRQN);
  } break;
  case __EXPR_SUP__: {
    __tmp__CRQN=execute_link__AWAL(__tmp__BRQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__CRQN=execute_link__J0AL(__tmp__BRQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__CRQN=execute_link__S4AL(__tmp__BRQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__CRQN=execute_link__1CBL(__tmp__BRQN);
  } break;
  case __EXPR_AND__: {
    __tmp__CRQN=execute_link__EHBL(__tmp__BRQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__CRQN=execute_link__NLBL(__tmp__BRQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__CRQN=execute_link__WPBL(__tmp__BRQN);
  } break;
  case __PUT_TO__: {
    __tmp__CRQN=execute_link__BOPK(__tmp__BRQN);
  } break;
  case __ITEM__: {
    __tmp__CRQN=execute_link__5TBL(__tmp__BRQN);
  } break;
  case __SIZE_OF__: {
    __tmp__CRQN=execute_link__GUBL(__tmp__BRQN);
  } break;
  case __CAST__: {
    __tmp__CRQN=execute_link__LUBL(__tmp__BRQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__CRQN=execute_link__A2TL(__tmp__BRQN);
  } break;
  case __READ_SLOT__: {
    __tmp__CRQN=execute_link__EYBL(__tmp__BRQN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__CRQN=execute_link__U2BL(__tmp__BRQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__CRQN=execute_link__SRZM(__tmp__BRQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__CRQN=execute_link__OBFO(__tmp__BRQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__CRQN=execute_link__GJLO(__tmp__BRQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__CRQN=execute_link__HHFO(__tmp__BRQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__CRQN=execute_link__KPLO(__tmp__BRQN);
  } break;
  case __EXPR_NEG__: {
    __tmp__CRQN=execute_link__0GKM(__tmp__BRQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__CRQN=execute_link__RROL(__tmp__BRQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__CRQN=execute_link__GUZM(__tmp__BRQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__CRQN=execute_link__ANFO(__tmp__BRQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__CRQN=execute_link__YLEP(__tmp__BRQN);
  } break;
  case __EXPR_INF__: {
    __tmp__CRQN=execute_link__VQQN(__tmp__BRQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__CRQN=execute_link__4UQN(__tmp__BRQN);
  } break;
  case __EXPR_OR__: {
    __tmp__CRQN=execute_link__1HQN(__tmp__BRQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__CRQN=execute_link__IYUO(__tmp__BRQN);
  } break;
  };
  Self__WQQN->parent_expr_binary_cmp__WQ1M.right__LN2H=__tmp__CRQN;
  __tmp__ERQN=Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  if (__tmp__ERQN==NULL) {
    __tmp__FRQN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__ERQN)->__id) {
    case __LIST__: {
      __tmp__FRQN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FRQN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FRQN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__FRQN=((void *)__tmp__ERQN);
    } break;
    case __READ_LOCAL__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FRQN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__FRQN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__FRQN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__FRQN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FRQN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__FRQN=NULL;
    } break;
    case __ITEM__: {
      __tmp__FRQN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__FRQN=NULL;
    } break;
    case __CAST__: {
      __tmp__FRQN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__FRQN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__FRQN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__FRQN=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__FRQN=NULL;
    } break;
    }
  };
  left_cst__2QQN=__tmp__FRQN;
  __tmp__HRQN=Self__WQQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
  if (__tmp__HRQN==NULL) {
    __tmp__IRQN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__HRQN)->__id) {
    case __LIST__: {
      __tmp__IRQN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__IRQN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__IRQN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__IRQN=((void *)__tmp__HRQN);
    } break;
    case __READ_LOCAL__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__IRQN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__IRQN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__IRQN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__IRQN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__IRQN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__IRQN=NULL;
    } break;
    case __ITEM__: {
      __tmp__IRQN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__IRQN=NULL;
    } break;
    case __CAST__: {
      __tmp__IRQN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__IRQN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__IRQN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__IRQN=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__IRQN=NULL;
    } break;
    }
  };
  right_cst__3QQN=__tmp__IRQN;
  result__YQQN=NULL;
  if (((void *)__tmp__FRQN != (void *)NULL)) {
    result__YQQN=NULL;
  };
  if ((((void *)result__YQQN == (void *)NULL) && ((void *)__tmp__IRQN != (void *)NULL))) {
    result__YQQN=NULL;
  };
  if (((((void *)result__YQQN == (void *)NULL) && ((void *)__tmp__IRQN != (void *)NULL)) && ((void *)__tmp__FRQN != (void *)NULL))) {
    result__BECO=NULL;
    if ((((__INTEGER_CST *)__tmp__FRQN)->value__PAZD < ((__INTEGER_CST *)__tmp__IRQN)->value__PAZD)) {
      __tmp__KECO=Self__WQQN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__LECO=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__LECO)->__id) {
      case __TYPE__: {
        __tmp__MECO=((__TYPE *)__tmp__LECO)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__MECO=((__TYPE_NULL *)__tmp__LECO)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__MECO=((__TYPE_VOID *)__tmp__LECO)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__MECO=((__TYPE_CONTEXT *)__tmp__LECO)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__MECO=((__TYPE_ID *)__tmp__LECO)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__MECO=((__TYPE_GENERIC *)__tmp__LECO)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__MECO=((__PROFIL_BLOCK *)__tmp__LECO)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__BECO=create__type__CLQC(__tmp__KECO,__tmp__MECO);
    } else {
      __tmp__UECO=Self__WQQN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__VECO=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__VECO)->__id) {
      case __TYPE__: {
        __tmp__WECO=((__TYPE *)__tmp__VECO)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__WECO=((__TYPE_NULL *)__tmp__VECO)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__WECO=((__TYPE_VOID *)__tmp__VECO)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__WECO=((__TYPE_CONTEXT *)__tmp__VECO)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__WECO=((__TYPE_ID *)__tmp__VECO)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__WECO=((__TYPE_GENERIC *)__tmp__VECO)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__WECO=((__PROFIL_BLOCK *)__tmp__VECO)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__BECO=create__type__CLQC(__tmp__UECO,__tmp__WECO);
    };
    result__YQQN=result__BECO;
  };
  if ((((void *)result__YQQN == (void *)NULL) && (old_seq__ZQQN == seq_call_and_loop__VREJ))) {
    result__KC5N=NULL;
    __tmp__LC5N=Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
    __tmp__MC5N=Self__WQQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__LC5N)->__id) {
    case __LIST__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__NC5N=__infix_equal_equal__WF1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXTERNAL_C__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__NC5N=__infix_equal_equal__LG1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __INTEGER_CST__: {
      __tmp__NC5N=__infix_equal_equal__2G1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __READ_LOCAL__: {
      __tmp__NC5N=__infix_equal_equal__WH1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__NC5N=__infix_equal_equal__MI1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__NC5N=__infix_equal_equal__IJ1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __REAL_CST__: {
      __tmp__NC5N=__infix_equal_equal__EK1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __CHARACTER_CST__: {
      __tmp__NC5N=__infix_equal_equal__4K1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __IS_EXPANDED__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__NC5N=__infix_equal_equal__XL1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_SUB__: {
      __tmp__NC5N=__infix_equal_equal__TM1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_MUL__: {
      __tmp__NC5N=__infix_equal_equal__PN1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_DIV__: {
      __tmp__NC5N=__infix_equal_equal__LO1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_AND__: {
      __tmp__NC5N=__infix_equal_equal__HP1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__NC5N=__infix_equal_equal__DQ1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__NC5N=__infix_equal_equal__5Q1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __PUT_TO__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __CAST__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__NC5N=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__NC5N=__infix_equal_equal__LS1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __READ_GLOBAL__: {
      __tmp__NC5N=__infix_equal_equal__HT1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__NC5N=__infix_equal_equal__CZHO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__NC5N=__infix_equal_equal__SXFO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__NC5N=__infix_equal_equal__TBMO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__NC5N=__infix_equal_equal__OYFO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__NC5N=__infix_equal_equal__QCMO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_NEG__: {
      __tmp__NC5N=__infix_equal_equal__J5KM(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_ADD__: {
      __tmp__NC5N=__infix_equal_equal__ZT1L(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_NOT__: {
      __tmp__NC5N=__infix_equal_equal__QB0M(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_MOD__: {
      __tmp__NC5N=__infix_equal_equal__KZFO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__NC5N=__infix_equal_equal__OTEP(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_INF__: {
      __tmp__NC5N=__infix_equal_equal__UZHO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__NC5N=__infix_equal_equal__Q0HO(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_OR__: {
      __tmp__NC5N=__infix_equal_equal__32QN(__tmp__LC5N,__tmp__MC5N);
    } break;
    case __EXPR_XOR__: {
      __tmp__NC5N=__infix_equal_equal__GOVO(__tmp__LC5N,__tmp__MC5N);
    } break;
    };
    if (__tmp__NC5N) {
      __tmp__TC5N=Self__WQQN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__UC5N=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__UC5N)->__id) {
      case __TYPE__: {
        __tmp__VC5N=((__TYPE *)__tmp__UC5N)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__VC5N=((__TYPE_NULL *)__tmp__UC5N)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__VC5N=((__TYPE_VOID *)__tmp__UC5N)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__VC5N=((__TYPE_CONTEXT *)__tmp__UC5N)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__VC5N=((__TYPE_ID *)__tmp__UC5N)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__VC5N=((__TYPE_GENERIC *)__tmp__UC5N)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__VC5N=((__PROFIL_BLOCK *)__tmp__UC5N)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__KC5N=create__type__CLQC(__tmp__TC5N,__tmp__VC5N);
      __tmp__YC5N=Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
      switch (((struct ___OBJ *)__tmp__YC5N)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__YC5N);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__YC5N);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__AYDQ=((__READ_LOCAL *)__tmp__YC5N);
        unread__YVJK(Self__AYDQ->local__ALZD,Self__AYDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__YC5N);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__YC5N);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__YC5N);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__CYDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__YC5N)->receiver__OO2H);
        unread__YVJK(Self__CYDQ->local__ALZD,Self__CYDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__YC5N);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__YC5N);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__YC5N);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__YC5N);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__YC5N);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__YC5N);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__YC5N);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__YC5N);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__YC5N);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__YC5N);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__YC5N);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__YC5N);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__YC5N);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__YC5N);
      } break;
      case __READ_GLOBAL__: {
        Self__DYDQ=((__READ_GLOBAL *)__tmp__YC5N);
        unread__15ML(Self__DYDQ->global__RHJK,Self__DYDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__YC5N);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__YC5N);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__YC5N);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__YC5N);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__YC5N);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__YC5N);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__YC5N);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__YC5N);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__YC5N);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__YC5N);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__YC5N);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__YC5N);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__YC5N);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__YC5N);
      } break;
      };
      __tmp__ZC5N=Self__WQQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
      switch (((struct ___OBJ *)__tmp__ZC5N)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__ZC5N);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__ZC5N);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__EYDQ=((__READ_LOCAL *)__tmp__ZC5N);
        unread__YVJK(Self__EYDQ->local__ALZD,Self__EYDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__ZC5N);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__ZC5N);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__ZC5N);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__GYDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__ZC5N)->receiver__OO2H);
        unread__YVJK(Self__GYDQ->local__ALZD,Self__GYDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__ZC5N);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__ZC5N);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__ZC5N);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__ZC5N);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__ZC5N);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__ZC5N);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__ZC5N);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__ZC5N);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__ZC5N);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__ZC5N);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__ZC5N);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__ZC5N);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__ZC5N);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__ZC5N);
      } break;
      case __READ_GLOBAL__: {
        Self__HYDQ=((__READ_GLOBAL *)__tmp__ZC5N);
        unread__15ML(Self__HYDQ->global__RHJK,Self__HYDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__ZC5N);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__ZC5N);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__ZC5N);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__ZC5N);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__ZC5N);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__ZC5N);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__ZC5N);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__ZC5N);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__ZC5N);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__ZC5N);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__ZC5N);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__ZC5N);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__ZC5N);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__ZC5N);
      } break;
      };
    };
    result__YQQN=result__KC5N;
    if ((((void *)result__KC5N == (void *)NULL) && ((void *)__tmp__FRQN != (void *)NULL))) {
      result__YQQN=NULL;
    };
    if ((((void *)result__YQQN == (void *)NULL) && ((void *)__tmp__IRQN != (void *)NULL))) {
      result__2NCO=NULL;
      if ((((__INTEGER_CST *)__tmp__IRQN)->value__PAZD ==  0)) {
        __tmp__DOCO=Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
        switch (((struct ___OBJ *)__tmp__DOCO)->__id) {
        case __LIST__: {
          __tmp__EOCO=static_type__GIQG(__tmp__DOCO);
        } break;
        case __STRING_CST__: {
          __tmp__EOCO=((__STRING_CST *)__tmp__DOCO)->parent_constant__5F.static_type__F4YD;
        } break;
        case __EXTERNAL_C__: {
          __tmp__EOCO=((__EXTERNAL_C *)__tmp__DOCO)->static_type__UXZD;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__EOCO=((__PROTOTYPE_CST *)__tmp__DOCO)->parent_constant__E3LC.static_type__F4YD;
        } break;
        case __INTEGER_CST__: {
          __tmp__EOCO=((__INTEGER_CST *)__tmp__DOCO)->parent_constant__P3LC.static_type__F4YD;
        } break;
        case __READ_LOCAL__: {
          __tmp__EOCO=((__LOCAL *)((__READ_LOCAL *)__tmp__DOCO)->local__ALZD)->parent_variable__B2LC.type__125F;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__EOCO=static_type__0N1H(__tmp__DOCO);
        } break;
        case __EXPR_EQUAL__: {
          __tmp__EOCO=static_type__TO1H();
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__EOCO=static_type__YO1H();
        } break;
        case __REAL_CST__: {
          __tmp__EOCO=((__REAL_CST *)__tmp__DOCO)->parent_constant__M3JH.static_type__F4YD;
        } break;
        case __CHARACTER_CST__: {
          __tmp__EOCO=((__CHARACTER_CST *)__tmp__DOCO)->parent_constant__53JH.static_type__F4YD;
        } break;
        case __IS_EXPANDED__: {
          __tmp__EOCO=static_type__3O1H();
        } break;
        case __GET_TYPE_ID__: {
          __tmp__EOCO=static_type__CP1H();
        } break;
        case __EXPR_SUP__: {
          __tmp__EOCO=static_type__HP1H();
        } break;
        case __EXPR_SUB__: {
          __tmp__EOCO=static_type__MP1H(__tmp__DOCO);
        } break;
        case __EXPR_MUL__: {
          __tmp__EOCO=static_type__SP1H(__tmp__DOCO);
        } break;
        case __EXPR_DIV__: {
          __tmp__EOCO=static_type__XP1H(__tmp__DOCO);
        } break;
        case __EXPR_AND__: {
          __tmp__EOCO=static_type__2P1H(__tmp__DOCO);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__EOCO=static_type__BQ1H(__tmp__DOCO);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__EOCO=static_type__GQ1H(__tmp__DOCO);
        } break;
        case __PUT_TO__: {
          __tmp__EOCO=TYPE_VOID__->parent_type__UIB.default__AKC;
        } break;
        case __ITEM__: {
          __tmp__EOCO=static_type__PQ1H(__tmp__DOCO);
        } break;
        case __SIZE_OF__: {
          __tmp__EOCO=static_type__1Q1H();
        } break;
        case __CAST__: {
          __tmp__EOCO=((__CAST *)__tmp__DOCO)->static_type__SO1H;
        } break;
        case __CALL_SLOT__: {
          __tmp__EOCO=static_type__GIKL(__tmp__DOCO);
        } break;
        case __READ_SLOT__: {
          __tmp__EOCO=((__SLOT_DATA *)((__READ_SLOT *)__tmp__DOCO)->slot__EVGK)->parent_variable__AJZD.type__125F;
        } break;
        case __READ_GLOBAL__: {
          __tmp__EOCO=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__DOCO)->global__RHJK)->parent_variable__AJZD.type__125F;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__EOCO=static_type__JRZM();
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__EOCO=static_type__VLEO();
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__EOCO=static_type__LVIO();
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__EOCO=static_type__0LEO();
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__EOCO=static_type__RVIO();
        } break;
        case __EXPR_NEG__: {
          __tmp__EOCO=static_type__Z2IM(__tmp__DOCO);
        } break;
        case __EXPR_ADD__: {
          __tmp__EOCO=static_type__IXML(__tmp__DOCO);
        } break;
        case __EXPR_NOT__: {
          __tmp__EOCO=static_type__BTXM(__tmp__DOCO);
        } break;
        case __EXPR_MOD__: {
          __tmp__EOCO=static_type__5LEO(__tmp__DOCO);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__EOCO=static_type__W2DP();
        } break;
        case __EXPR_INF__: {
          __tmp__EOCO=static_type__FQQN();
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__EOCO=static_type__KQQN();
        } break;
        case __EXPR_OR__: {
          __tmp__EOCO=static_type__NOPN(__tmp__DOCO);
        } break;
        case __EXPR_XOR__: {
          __tmp__EOCO=static_type__XCSO(__tmp__DOCO);
        } break;
        };
        __tmp__FOCO=((__TYPE_FULL *)__tmp__EOCO)->parent_type__KTL;
        switch (((struct ___OBJ *)__tmp__FOCO)->__id) {
        case __TYPE__: {
          __tmp__GOCO=((__PROTOTYPE *)((__TYPE *)__tmp__FOCO)->prototype__RD)->parent_named__QD.name__1QB;
        } break;
        case __TYPE_NULL__: {
          __tmp__GOCO=(&__string_59);
        } break;
        case __TYPE_VOID__: {
          __tmp__GOCO=(&__string_2);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__GOCO=(&__string_44);
        } break;
        case __TYPE_ID__: {
          __tmp__GOCO=(&__string_46);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__GOCO=((__TYPE_GENERIC *)__tmp__FOCO)->name__2R2B;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__GOCO=((__PROFIL_BLOCK *)__tmp__FOCO)->parent_profil__GHAG.name__XJEI;
        } break;
        };
        __tmp__KOCO=(((__CHARACTER *)((__STRING_CONSTANT *)__tmp__GOCO)->storage__C5K)[ 0] == 'U');
      } else {
        __tmp__KOCO=FALSE__;
      };
      if (__tmp__KOCO) {
        __tmp__QOCO=Self__WQQN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
        __tmp__ROCO=type_false__NJB;
        switch (((struct ___OBJ *)__tmp__ROCO)->__id) {
        case __TYPE__: {
          __tmp__SOCO=((__TYPE *)__tmp__ROCO)->default__AKC;
        } break;
        case __TYPE_NULL__: {
          __tmp__SOCO=((__TYPE_NULL *)__tmp__ROCO)->parent_type__TIB.default__AKC;
        } break;
        case __TYPE_VOID__: {
          __tmp__SOCO=((__TYPE_VOID *)__tmp__ROCO)->parent_type__UIB.default__AKC;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__SOCO=((__TYPE_CONTEXT *)__tmp__ROCO)->parent_type__VIB.default__AKC;
        } break;
        case __TYPE_ID__: {
          __tmp__SOCO=((__TYPE_ID *)__tmp__ROCO)->parent_type__WIB.default__AKC;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__SOCO=((__TYPE_GENERIC *)__tmp__ROCO)->parent_type__T2IB.default__AKC;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__SOCO=((__PROFIL_BLOCK *)__tmp__ROCO)->parent_type__HHAG.default__AKC;
        } break;
        };
        result__2NCO=create__type__CLQC(__tmp__QOCO,__tmp__SOCO);
        __tmp__VOCO=Self__WQQN->parent_expr_binary_cmp__WQ1M.left__HN2H;
        switch (((struct ___OBJ *)__tmp__VOCO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__VOCO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__VOCO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__PYDQ=((__READ_LOCAL *)__tmp__VOCO);
          unread__YVJK(Self__PYDQ->local__ALZD,Self__PYDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__VOCO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__VOCO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__VOCO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__RYDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__VOCO)->receiver__OO2H);
          unread__YVJK(Self__RYDQ->local__ALZD,Self__RYDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__VOCO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__VOCO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__VOCO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__VOCO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__VOCO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__VOCO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__VOCO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__VOCO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__VOCO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__VOCO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__VOCO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__VOCO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__VOCO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__VOCO);
        } break;
        case __READ_GLOBAL__: {
          Self__SYDQ=((__READ_GLOBAL *)__tmp__VOCO);
          unread__15ML(Self__SYDQ->global__RHJK,Self__SYDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__VOCO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__VOCO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__VOCO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__VOCO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__VOCO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__VOCO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__VOCO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__VOCO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__VOCO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__VOCO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__VOCO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__VOCO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__VOCO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__VOCO);
        } break;
        };
        __tmp__WOCO=Self__WQQN->parent_expr_binary_cmp__WQ1M.right__LN2H;
        switch (((struct ___OBJ *)__tmp__WOCO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__WOCO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__WOCO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__TYDQ=((__READ_LOCAL *)__tmp__WOCO);
          unread__YVJK(Self__TYDQ->local__ALZD,Self__TYDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__WOCO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__WOCO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__WOCO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__VYDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__WOCO)->receiver__OO2H);
          unread__YVJK(Self__VYDQ->local__ALZD,Self__VYDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__WOCO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__WOCO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__WOCO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__WOCO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__WOCO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__WOCO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__WOCO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__WOCO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__WOCO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__WOCO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__WOCO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__WOCO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__WOCO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__WOCO);
        } break;
        case __READ_GLOBAL__: {
          Self__WYDQ=((__READ_GLOBAL *)__tmp__WOCO);
          unread__15ML(Self__WYDQ->global__RHJK,Self__WYDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__WOCO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__WOCO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__WOCO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__WOCO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__WOCO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__WOCO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__WOCO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__WOCO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__WOCO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__WOCO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__WOCO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__WOCO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__WOCO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__WOCO);
        } break;
        };
      };
      result__YQQN=result__2NCO;
    };
  };
  if (((void *)result__YQQN == (void *)NULL)) {
    result__YQQN=Self__WQQN;
  } else {
    __tmp__2UQN=Self__WQQN->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    if (((struct ___OBJ *)result__YQQN)->__id==__PROTOTYPE_CST__) {
      ((__PROTOTYPE_CST *)result__YQQN)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__2UQN;
    } else {
      ((__EXPR_INF *)result__YQQN)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__2UQN;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__YQQN);
}

static void* execute_link__4UQN(__EXPR_INF_EQ *Self__5UQN)
// ({EXPR_INF_EQ}) With resultRecursive, No inlinable.
{
  __UINTEGER_32 old_seq__CVQN;
  void *__tmp__IVQN,*__tmp__JVQN,*__tmp__KVQN,*__tmp__LVQN,*__tmp__NVQN;
  void *__tmp__QVQN,*result__BVQN,*__tmp__EE5N,*__tmp__FE5N,*__tmp__RE5N;
  void *__tmp__SE5N;
  void *__tmp__OVQN,*left_cst__FVQN,*__tmp__RVQN,*right_cst__GVQN;
  void *result__5ECO,*result__DE5N;
  __POSITION __tmp__IFCO,__tmp__SFCO,__tmp__ME5N,__tmp__FZQN;
  void *__tmp__JFCO,*__tmp__TFCO,*__tmp__NE5N;
  void *__tmp__KFCO,*__tmp__UFCO,*__tmp__OE5N;
  __READ_LOCAL *Self__AZDQ,*Self__CZDQ,*Self__EZDQ,*Self__GZDQ;
  __READ_GLOBAL *Self__DZDQ,*Self__HZDQ;
  __BOOLEAN __tmp__GE5N;
  old_seq__CVQN=seq_call_and_loop__VREJ;
  __tmp__IVQN=Self__5UQN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__IVQN)->__id) {
  case __LIST__: {
    __tmp__JVQN=execute_link__LUOG(__tmp__IVQN);
  } break;
  case __STRING_CST__: {
    __tmp__JVQN=((__STRING_CST *)__tmp__IVQN);
  } break;
  case __EXTERNAL_C__: {
    __tmp__JVQN=execute_link__U5ZK(__tmp__IVQN);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__JVQN=((__PROTOTYPE_CST *)__tmp__IVQN);
  } break;
  case __INTEGER_CST__: {
    __tmp__JVQN=((__INTEGER_CST *)__tmp__IVQN);
  } break;
  case __READ_LOCAL__: {
    __tmp__JVQN=execute_link__EHAL(__tmp__IVQN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__JVQN=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__JVQN=execute_link__2LAL(__tmp__IVQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__JVQN=execute_link__FQAL(__tmp__IVQN);
  } break;
  case __REAL_CST__: {
    __tmp__JVQN=((__REAL_CST *)__tmp__IVQN);
  } break;
  case __CHARACTER_CST__: {
    __tmp__JVQN=((__CHARACTER_CST *)__tmp__IVQN);
  } break;
  case __IS_EXPANDED__: {
    __tmp__JVQN=execute_link__UUAL(__tmp__IVQN);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__JVQN=execute_link__1VAL(__tmp__IVQN);
  } break;
  case __EXPR_SUP__: {
    __tmp__JVQN=execute_link__AWAL(__tmp__IVQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__JVQN=execute_link__J0AL(__tmp__IVQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__JVQN=execute_link__S4AL(__tmp__IVQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__JVQN=execute_link__1CBL(__tmp__IVQN);
  } break;
  case __EXPR_AND__: {
    __tmp__JVQN=execute_link__EHBL(__tmp__IVQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__JVQN=execute_link__NLBL(__tmp__IVQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__JVQN=execute_link__WPBL(__tmp__IVQN);
  } break;
  case __PUT_TO__: {
    __tmp__JVQN=execute_link__BOPK(__tmp__IVQN);
  } break;
  case __ITEM__: {
    __tmp__JVQN=execute_link__5TBL(__tmp__IVQN);
  } break;
  case __SIZE_OF__: {
    __tmp__JVQN=execute_link__GUBL(__tmp__IVQN);
  } break;
  case __CAST__: {
    __tmp__JVQN=execute_link__LUBL(__tmp__IVQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__JVQN=execute_link__A2TL(__tmp__IVQN);
  } break;
  case __READ_SLOT__: {
    __tmp__JVQN=execute_link__EYBL(__tmp__IVQN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__JVQN=execute_link__U2BL(__tmp__IVQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__JVQN=execute_link__SRZM(__tmp__IVQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__JVQN=execute_link__OBFO(__tmp__IVQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__JVQN=execute_link__GJLO(__tmp__IVQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__JVQN=execute_link__HHFO(__tmp__IVQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__JVQN=execute_link__KPLO(__tmp__IVQN);
  } break;
  case __EXPR_NEG__: {
    __tmp__JVQN=execute_link__0GKM(__tmp__IVQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__JVQN=execute_link__RROL(__tmp__IVQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__JVQN=execute_link__GUZM(__tmp__IVQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__JVQN=execute_link__ANFO(__tmp__IVQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__JVQN=execute_link__YLEP(__tmp__IVQN);
  } break;
  case __EXPR_INF__: {
    __tmp__JVQN=execute_link__VQQN(__tmp__IVQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__JVQN=execute_link__4UQN(__tmp__IVQN);
  } break;
  case __EXPR_OR__: {
    __tmp__JVQN=execute_link__1HQN(__tmp__IVQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__JVQN=execute_link__IYUO(__tmp__IVQN);
  } break;
  };
  Self__5UQN->parent_expr_binary_cmp__MR1M.left__HN2H=__tmp__JVQN;
  __tmp__KVQN=Self__5UQN->parent_expr_binary_cmp__MR1M.right__LN2H;
  switch (((struct ___OBJ *)__tmp__KVQN)->__id) {
  case __LIST__: {
    __tmp__LVQN=execute_link__LUOG(__tmp__KVQN);
  } break;
  case __STRING_CST__: {
    __tmp__LVQN=((__STRING_CST *)__tmp__KVQN);
  } break;
  case __EXTERNAL_C__: {
    __tmp__LVQN=execute_link__U5ZK(__tmp__KVQN);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__LVQN=((__PROTOTYPE_CST *)__tmp__KVQN);
  } break;
  case __INTEGER_CST__: {
    __tmp__LVQN=((__INTEGER_CST *)__tmp__KVQN);
  } break;
  case __READ_LOCAL__: {
    __tmp__LVQN=execute_link__EHAL(__tmp__KVQN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__LVQN=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__LVQN=execute_link__2LAL(__tmp__KVQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__LVQN=execute_link__FQAL(__tmp__KVQN);
  } break;
  case __REAL_CST__: {
    __tmp__LVQN=((__REAL_CST *)__tmp__KVQN);
  } break;
  case __CHARACTER_CST__: {
    __tmp__LVQN=((__CHARACTER_CST *)__tmp__KVQN);
  } break;
  case __IS_EXPANDED__: {
    __tmp__LVQN=execute_link__UUAL(__tmp__KVQN);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__LVQN=execute_link__1VAL(__tmp__KVQN);
  } break;
  case __EXPR_SUP__: {
    __tmp__LVQN=execute_link__AWAL(__tmp__KVQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__LVQN=execute_link__J0AL(__tmp__KVQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__LVQN=execute_link__S4AL(__tmp__KVQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__LVQN=execute_link__1CBL(__tmp__KVQN);
  } break;
  case __EXPR_AND__: {
    __tmp__LVQN=execute_link__EHBL(__tmp__KVQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__LVQN=execute_link__NLBL(__tmp__KVQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__LVQN=execute_link__WPBL(__tmp__KVQN);
  } break;
  case __PUT_TO__: {
    __tmp__LVQN=execute_link__BOPK(__tmp__KVQN);
  } break;
  case __ITEM__: {
    __tmp__LVQN=execute_link__5TBL(__tmp__KVQN);
  } break;
  case __SIZE_OF__: {
    __tmp__LVQN=execute_link__GUBL(__tmp__KVQN);
  } break;
  case __CAST__: {
    __tmp__LVQN=execute_link__LUBL(__tmp__KVQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__LVQN=execute_link__A2TL(__tmp__KVQN);
  } break;
  case __READ_SLOT__: {
    __tmp__LVQN=execute_link__EYBL(__tmp__KVQN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__LVQN=execute_link__U2BL(__tmp__KVQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__LVQN=execute_link__SRZM(__tmp__KVQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__LVQN=execute_link__OBFO(__tmp__KVQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__LVQN=execute_link__GJLO(__tmp__KVQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__LVQN=execute_link__HHFO(__tmp__KVQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__LVQN=execute_link__KPLO(__tmp__KVQN);
  } break;
  case __EXPR_NEG__: {
    __tmp__LVQN=execute_link__0GKM(__tmp__KVQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__LVQN=execute_link__RROL(__tmp__KVQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__LVQN=execute_link__GUZM(__tmp__KVQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__LVQN=execute_link__ANFO(__tmp__KVQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__LVQN=execute_link__YLEP(__tmp__KVQN);
  } break;
  case __EXPR_INF__: {
    __tmp__LVQN=execute_link__VQQN(__tmp__KVQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__LVQN=execute_link__4UQN(__tmp__KVQN);
  } break;
  case __EXPR_OR__: {
    __tmp__LVQN=execute_link__1HQN(__tmp__KVQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__LVQN=execute_link__IYUO(__tmp__KVQN);
  } break;
  };
  Self__5UQN->parent_expr_binary_cmp__MR1M.right__LN2H=__tmp__LVQN;
  __tmp__NVQN=Self__5UQN->parent_expr_binary_cmp__MR1M.left__HN2H;
  if (__tmp__NVQN==NULL) {
    __tmp__OVQN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__NVQN)->__id) {
    case __LIST__: {
      __tmp__OVQN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OVQN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OVQN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__OVQN=((void *)__tmp__NVQN);
    } break;
    case __READ_LOCAL__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OVQN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__OVQN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OVQN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OVQN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OVQN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__OVQN=NULL;
    } break;
    case __ITEM__: {
      __tmp__OVQN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__OVQN=NULL;
    } break;
    case __CAST__: {
      __tmp__OVQN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__OVQN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__OVQN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__OVQN=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__OVQN=NULL;
    } break;
    }
  };
  left_cst__FVQN=__tmp__OVQN;
  __tmp__QVQN=Self__5UQN->parent_expr_binary_cmp__MR1M.right__LN2H;
  if (__tmp__QVQN==NULL) {
    __tmp__RVQN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__QVQN)->__id) {
    case __LIST__: {
      __tmp__RVQN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__RVQN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RVQN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__RVQN=((void *)__tmp__QVQN);
    } break;
    case __READ_LOCAL__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RVQN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__RVQN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__RVQN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__RVQN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RVQN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__RVQN=NULL;
    } break;
    case __ITEM__: {
      __tmp__RVQN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__RVQN=NULL;
    } break;
    case __CAST__: {
      __tmp__RVQN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__RVQN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__RVQN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__RVQN=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__RVQN=NULL;
    } break;
    }
  };
  right_cst__GVQN=__tmp__RVQN;
  result__BVQN=NULL;
  if (((void *)__tmp__OVQN != (void *)NULL)) {
    result__BVQN=NULL;
  };
  if ((((void *)result__BVQN == (void *)NULL) && ((void *)__tmp__RVQN != (void *)NULL))) {
    result__BVQN=NULL;
  };
  if (((((void *)result__BVQN == (void *)NULL) && ((void *)__tmp__RVQN != (void *)NULL)) && ((void *)__tmp__OVQN != (void *)NULL))) {
    result__5ECO=NULL;
    if ((((__INTEGER_CST *)__tmp__OVQN)->value__PAZD <= ((__INTEGER_CST *)__tmp__RVQN)->value__PAZD)) {
      __tmp__IFCO=Self__5UQN->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__JFCO=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__JFCO)->__id) {
      case __TYPE__: {
        __tmp__KFCO=((__TYPE *)__tmp__JFCO)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__KFCO=((__TYPE_NULL *)__tmp__JFCO)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__KFCO=((__TYPE_VOID *)__tmp__JFCO)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__KFCO=((__TYPE_CONTEXT *)__tmp__JFCO)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__KFCO=((__TYPE_ID *)__tmp__JFCO)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__KFCO=((__TYPE_GENERIC *)__tmp__JFCO)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__KFCO=((__PROFIL_BLOCK *)__tmp__JFCO)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__5ECO=create__type__CLQC(__tmp__IFCO,__tmp__KFCO);
    } else {
      __tmp__SFCO=Self__5UQN->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__TFCO=type_false__NJB;
      switch (((struct ___OBJ *)__tmp__TFCO)->__id) {
      case __TYPE__: {
        __tmp__UFCO=((__TYPE *)__tmp__TFCO)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__UFCO=((__TYPE_NULL *)__tmp__TFCO)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__UFCO=((__TYPE_VOID *)__tmp__TFCO)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__UFCO=((__TYPE_CONTEXT *)__tmp__TFCO)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__UFCO=((__TYPE_ID *)__tmp__TFCO)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__UFCO=((__TYPE_GENERIC *)__tmp__TFCO)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__UFCO=((__PROFIL_BLOCK *)__tmp__TFCO)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__5ECO=create__type__CLQC(__tmp__SFCO,__tmp__UFCO);
    };
    result__BVQN=result__5ECO;
  };
  if ((((void *)result__BVQN == (void *)NULL) && (old_seq__CVQN == seq_call_and_loop__VREJ))) {
    result__DE5N=NULL;
    __tmp__EE5N=Self__5UQN->parent_expr_binary_cmp__MR1M.left__HN2H;
    __tmp__FE5N=Self__5UQN->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__EE5N)->__id) {
    case __LIST__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__GE5N=__infix_equal_equal__WF1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXTERNAL_C__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GE5N=__infix_equal_equal__LG1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __INTEGER_CST__: {
      __tmp__GE5N=__infix_equal_equal__2G1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __READ_LOCAL__: {
      __tmp__GE5N=__infix_equal_equal__WH1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GE5N=__infix_equal_equal__MI1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GE5N=__infix_equal_equal__IJ1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __REAL_CST__: {
      __tmp__GE5N=__infix_equal_equal__EK1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __CHARACTER_CST__: {
      __tmp__GE5N=__infix_equal_equal__4K1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __IS_EXPANDED__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__GE5N=__infix_equal_equal__XL1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_SUB__: {
      __tmp__GE5N=__infix_equal_equal__TM1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_MUL__: {
      __tmp__GE5N=__infix_equal_equal__PN1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_DIV__: {
      __tmp__GE5N=__infix_equal_equal__LO1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_AND__: {
      __tmp__GE5N=__infix_equal_equal__HP1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GE5N=__infix_equal_equal__DQ1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GE5N=__infix_equal_equal__5Q1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __PUT_TO__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __CAST__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__GE5N=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__GE5N=__infix_equal_equal__LS1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __READ_GLOBAL__: {
      __tmp__GE5N=__infix_equal_equal__HT1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GE5N=__infix_equal_equal__CZHO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GE5N=__infix_equal_equal__SXFO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GE5N=__infix_equal_equal__TBMO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GE5N=__infix_equal_equal__OYFO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GE5N=__infix_equal_equal__QCMO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_NEG__: {
      __tmp__GE5N=__infix_equal_equal__J5KM(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_ADD__: {
      __tmp__GE5N=__infix_equal_equal__ZT1L(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_NOT__: {
      __tmp__GE5N=__infix_equal_equal__QB0M(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_MOD__: {
      __tmp__GE5N=__infix_equal_equal__KZFO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GE5N=__infix_equal_equal__OTEP(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_INF__: {
      __tmp__GE5N=__infix_equal_equal__UZHO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GE5N=__infix_equal_equal__Q0HO(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_OR__: {
      __tmp__GE5N=__infix_equal_equal__32QN(__tmp__EE5N,__tmp__FE5N);
    } break;
    case __EXPR_XOR__: {
      __tmp__GE5N=__infix_equal_equal__GOVO(__tmp__EE5N,__tmp__FE5N);
    } break;
    };
    if (__tmp__GE5N) {
      __tmp__ME5N=Self__5UQN->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      __tmp__NE5N=type_true__FJB;
      switch (((struct ___OBJ *)__tmp__NE5N)->__id) {
      case __TYPE__: {
        __tmp__OE5N=((__TYPE *)__tmp__NE5N)->default__AKC;
      } break;
      case __TYPE_NULL__: {
        __tmp__OE5N=((__TYPE_NULL *)__tmp__NE5N)->parent_type__TIB.default__AKC;
      } break;
      case __TYPE_VOID__: {
        __tmp__OE5N=((__TYPE_VOID *)__tmp__NE5N)->parent_type__UIB.default__AKC;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__OE5N=((__TYPE_CONTEXT *)__tmp__NE5N)->parent_type__VIB.default__AKC;
      } break;
      case __TYPE_ID__: {
        __tmp__OE5N=((__TYPE_ID *)__tmp__NE5N)->parent_type__WIB.default__AKC;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__OE5N=((__TYPE_GENERIC *)__tmp__NE5N)->parent_type__T2IB.default__AKC;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__OE5N=((__PROFIL_BLOCK *)__tmp__NE5N)->parent_type__HHAG.default__AKC;
      } break;
      };
      result__DE5N=create__type__CLQC(__tmp__ME5N,__tmp__OE5N);
      __tmp__RE5N=Self__5UQN->parent_expr_binary_cmp__MR1M.left__HN2H;
      switch (((struct ___OBJ *)__tmp__RE5N)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__RE5N);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__RE5N);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__AZDQ=((__READ_LOCAL *)__tmp__RE5N);
        unread__YVJK(Self__AZDQ->local__ALZD,Self__AZDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__RE5N);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__RE5N);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__RE5N);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__CZDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__RE5N)->receiver__OO2H);
        unread__YVJK(Self__CZDQ->local__ALZD,Self__CZDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__RE5N);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__RE5N);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__RE5N);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__RE5N);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__RE5N);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__RE5N);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__RE5N);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__RE5N);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__RE5N);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__RE5N);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__RE5N);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__RE5N);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__RE5N);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__RE5N);
      } break;
      case __READ_GLOBAL__: {
        Self__DZDQ=((__READ_GLOBAL *)__tmp__RE5N);
        unread__15ML(Self__DZDQ->global__RHJK,Self__DZDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__RE5N);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__RE5N);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__RE5N);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__RE5N);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__RE5N);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__RE5N);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__RE5N);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__RE5N);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__RE5N);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__RE5N);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__RE5N);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__RE5N);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__RE5N);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__RE5N);
      } break;
      };
      __tmp__SE5N=Self__5UQN->parent_expr_binary_cmp__MR1M.right__LN2H;
      switch (((struct ___OBJ *)__tmp__SE5N)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__SE5N);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__SE5N);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__EZDQ=((__READ_LOCAL *)__tmp__SE5N);
        unread__YVJK(Self__EZDQ->local__ALZD,Self__EZDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__SE5N);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__SE5N);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__SE5N);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__GZDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__SE5N)->receiver__OO2H);
        unread__YVJK(Self__GZDQ->local__ALZD,Self__GZDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__SE5N);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__SE5N);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__SE5N);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__SE5N);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__SE5N);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__SE5N);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__SE5N);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__SE5N);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__SE5N);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__SE5N);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__SE5N);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__SE5N);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__SE5N);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__SE5N);
      } break;
      case __READ_GLOBAL__: {
        Self__HZDQ=((__READ_GLOBAL *)__tmp__SE5N);
        unread__15ML(Self__HZDQ->global__RHJK,Self__HZDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__SE5N);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__SE5N);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__SE5N);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__SE5N);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__SE5N);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__SE5N);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__SE5N);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__SE5N);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__SE5N);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__SE5N);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__SE5N);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__SE5N);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__SE5N);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__SE5N);
      } break;
      };
    };
    result__BVQN=result__DE5N;
    if ((((void *)result__DE5N == (void *)NULL) && ((void *)__tmp__OVQN != (void *)NULL))) {
      result__BVQN=NULL;
    };
    if ((((void *)result__BVQN == (void *)NULL) && ((void *)__tmp__RVQN != (void *)NULL))) {
      result__BVQN=NULL;
    };
  };
  if (((void *)result__BVQN == (void *)NULL)) {
    result__BVQN=Self__5UQN;
  } else {
    __tmp__FZQN=Self__5UQN->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    if (((struct ___OBJ *)result__BVQN)->__id==__PROTOTYPE_CST__) {
      ((__PROTOTYPE_CST *)result__BVQN)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FZQN;
    } else {
      ((__EXPR_INF_EQ *)result__BVQN)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__FZQN;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__BVQN);
}

static void* execute_link__1HQN(__EXPR_OR *Self__2HQN)
// ({EXPR_OR}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__YDCO,other__RZDQ;
  __UINTEGER_32 old_seq__5HQN;
  void *__tmp__FIQN,*__tmp__GIQN,*__tmp__HIQN,*__tmp__IIQN,*__tmp__KIQN;
  void *__tmp__NIQN,*result__4HQN,*result__M34N,*result__034N;
  void *result__H44N,*__tmp__M44N,*__tmp__N44N,*__tmp__U44N,*__tmp__244N;
  void *__tmp__544N,*__tmp__P54N,*__tmp__S54N,*__tmp__BA5N,*__tmp__CA5N;
  void *__tmp__JA5N,*__tmp__KA5N,*__tmp__1A5N,*result__1MCO,*__tmp__CNCO;
  void *result__JNCO,*__tmp__QNCO;
  void *__tmp__LIQN,*left_cst__CIQN,*__tmp__OIQN,*right_cst__DIQN;
  __INTEGER_CST *Self__0IKQ;
  void *and_l__I44N,*and_r__J44N,*__tmp__344N,*__tmp__A54N;
  void *not_l__K44N,*not_r__L44N,*__tmp__Q54N,*__tmp__T54N;
  __READ_LOCAL *Self__SZDQ,*Self__UZDQ,*Self__WZDQ,*Self__YZDQ;
  __READ_LOCAL *Self__0ZDQ,*Self__2ZDQ,*Self__4ZDQ,*Self__A0DQ;
  __READ_GLOBAL *Self__VZDQ,*Self__ZZDQ,*Self__3ZDQ,*Self__B0DQ;
  __POSITION __tmp__CMQN;
  __BOOLEAN __tmp__O44N,__tmp__DA5N,__tmp__LA5N,__tmp__OA5N;
  old_seq__5HQN=seq_call_and_loop__VREJ;
  __tmp__FIQN=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__FIQN)->__id) {
  case __LIST__: {
    __tmp__GIQN=execute_link__LUOG(__tmp__FIQN);
  } break;
  case __STRING_CST__: {
    __tmp__GIQN=((__STRING_CST *)__tmp__FIQN);
  } break;
  case __EXTERNAL_C__: {
    __tmp__GIQN=execute_link__U5ZK(__tmp__FIQN);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__GIQN=((__PROTOTYPE_CST *)__tmp__FIQN);
  } break;
  case __INTEGER_CST__: {
    __tmp__GIQN=((__INTEGER_CST *)__tmp__FIQN);
  } break;
  case __READ_LOCAL__: {
    __tmp__GIQN=execute_link__EHAL(__tmp__FIQN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__GIQN=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__GIQN=execute_link__2LAL(__tmp__FIQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__GIQN=execute_link__FQAL(__tmp__FIQN);
  } break;
  case __REAL_CST__: {
    __tmp__GIQN=((__REAL_CST *)__tmp__FIQN);
  } break;
  case __CHARACTER_CST__: {
    __tmp__GIQN=((__CHARACTER_CST *)__tmp__FIQN);
  } break;
  case __IS_EXPANDED__: {
    __tmp__GIQN=execute_link__UUAL(__tmp__FIQN);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__GIQN=execute_link__1VAL(__tmp__FIQN);
  } break;
  case __EXPR_SUP__: {
    __tmp__GIQN=execute_link__AWAL(__tmp__FIQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__GIQN=execute_link__J0AL(__tmp__FIQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__GIQN=execute_link__S4AL(__tmp__FIQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__GIQN=execute_link__1CBL(__tmp__FIQN);
  } break;
  case __EXPR_AND__: {
    __tmp__GIQN=execute_link__EHBL(__tmp__FIQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__GIQN=execute_link__NLBL(__tmp__FIQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__GIQN=execute_link__WPBL(__tmp__FIQN);
  } break;
  case __PUT_TO__: {
    __tmp__GIQN=execute_link__BOPK(__tmp__FIQN);
  } break;
  case __ITEM__: {
    __tmp__GIQN=execute_link__5TBL(__tmp__FIQN);
  } break;
  case __SIZE_OF__: {
    __tmp__GIQN=execute_link__GUBL(__tmp__FIQN);
  } break;
  case __CAST__: {
    __tmp__GIQN=execute_link__LUBL(__tmp__FIQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__GIQN=execute_link__A2TL(__tmp__FIQN);
  } break;
  case __READ_SLOT__: {
    __tmp__GIQN=execute_link__EYBL(__tmp__FIQN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__GIQN=execute_link__U2BL(__tmp__FIQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__GIQN=execute_link__SRZM(__tmp__FIQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__GIQN=execute_link__OBFO(__tmp__FIQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__GIQN=execute_link__GJLO(__tmp__FIQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__GIQN=execute_link__HHFO(__tmp__FIQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__GIQN=execute_link__KPLO(__tmp__FIQN);
  } break;
  case __EXPR_NEG__: {
    __tmp__GIQN=execute_link__0GKM(__tmp__FIQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__GIQN=execute_link__RROL(__tmp__FIQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__GIQN=execute_link__GUZM(__tmp__FIQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__GIQN=execute_link__ANFO(__tmp__FIQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__GIQN=execute_link__YLEP(__tmp__FIQN);
  } break;
  case __EXPR_INF__: {
    __tmp__GIQN=execute_link__VQQN(__tmp__FIQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__GIQN=execute_link__4UQN(__tmp__FIQN);
  } break;
  case __EXPR_OR__: {
    __tmp__GIQN=execute_link__1HQN(__tmp__FIQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__GIQN=execute_link__IYUO(__tmp__FIQN);
  } break;
  };
  Self__2HQN->parent_expr_binary__ET1M.left__PP1H=__tmp__GIQN;
  __tmp__HIQN=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
  switch (((struct ___OBJ *)__tmp__HIQN)->__id) {
  case __LIST__: {
    __tmp__IIQN=execute_link__LUOG(__tmp__HIQN);
  } break;
  case __STRING_CST__: {
    __tmp__IIQN=((__STRING_CST *)__tmp__HIQN);
  } break;
  case __EXTERNAL_C__: {
    __tmp__IIQN=execute_link__U5ZK(__tmp__HIQN);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__IIQN=((__PROTOTYPE_CST *)__tmp__HIQN);
  } break;
  case __INTEGER_CST__: {
    __tmp__IIQN=((__INTEGER_CST *)__tmp__HIQN);
  } break;
  case __READ_LOCAL__: {
    __tmp__IIQN=execute_link__EHAL(__tmp__HIQN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IIQN=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IIQN=execute_link__2LAL(__tmp__HIQN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IIQN=execute_link__FQAL(__tmp__HIQN);
  } break;
  case __REAL_CST__: {
    __tmp__IIQN=((__REAL_CST *)__tmp__HIQN);
  } break;
  case __CHARACTER_CST__: {
    __tmp__IIQN=((__CHARACTER_CST *)__tmp__HIQN);
  } break;
  case __IS_EXPANDED__: {
    __tmp__IIQN=execute_link__UUAL(__tmp__HIQN);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IIQN=execute_link__1VAL(__tmp__HIQN);
  } break;
  case __EXPR_SUP__: {
    __tmp__IIQN=execute_link__AWAL(__tmp__HIQN);
  } break;
  case __EXPR_SUB__: {
    __tmp__IIQN=execute_link__J0AL(__tmp__HIQN);
  } break;
  case __EXPR_MUL__: {
    __tmp__IIQN=execute_link__S4AL(__tmp__HIQN);
  } break;
  case __EXPR_DIV__: {
    __tmp__IIQN=execute_link__1CBL(__tmp__HIQN);
  } break;
  case __EXPR_AND__: {
    __tmp__IIQN=execute_link__EHBL(__tmp__HIQN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IIQN=execute_link__NLBL(__tmp__HIQN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IIQN=execute_link__WPBL(__tmp__HIQN);
  } break;
  case __PUT_TO__: {
    __tmp__IIQN=execute_link__BOPK(__tmp__HIQN);
  } break;
  case __ITEM__: {
    __tmp__IIQN=execute_link__5TBL(__tmp__HIQN);
  } break;
  case __SIZE_OF__: {
    __tmp__IIQN=execute_link__GUBL(__tmp__HIQN);
  } break;
  case __CAST__: {
    __tmp__IIQN=execute_link__LUBL(__tmp__HIQN);
  } break;
  case __CALL_SLOT__: {
    __tmp__IIQN=execute_link__A2TL(__tmp__HIQN);
  } break;
  case __READ_SLOT__: {
    __tmp__IIQN=execute_link__EYBL(__tmp__HIQN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__IIQN=execute_link__U2BL(__tmp__HIQN);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IIQN=execute_link__SRZM(__tmp__HIQN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IIQN=execute_link__OBFO(__tmp__HIQN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IIQN=execute_link__GJLO(__tmp__HIQN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IIQN=execute_link__HHFO(__tmp__HIQN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IIQN=execute_link__KPLO(__tmp__HIQN);
  } break;
  case __EXPR_NEG__: {
    __tmp__IIQN=execute_link__0GKM(__tmp__HIQN);
  } break;
  case __EXPR_ADD__: {
    __tmp__IIQN=execute_link__RROL(__tmp__HIQN);
  } break;
  case __EXPR_NOT__: {
    __tmp__IIQN=execute_link__GUZM(__tmp__HIQN);
  } break;
  case __EXPR_MOD__: {
    __tmp__IIQN=execute_link__ANFO(__tmp__HIQN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IIQN=execute_link__YLEP(__tmp__HIQN);
  } break;
  case __EXPR_INF__: {
    __tmp__IIQN=execute_link__VQQN(__tmp__HIQN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IIQN=execute_link__4UQN(__tmp__HIQN);
  } break;
  case __EXPR_OR__: {
    __tmp__IIQN=execute_link__1HQN(__tmp__HIQN);
  } break;
  case __EXPR_XOR__: {
    __tmp__IIQN=execute_link__IYUO(__tmp__HIQN);
  } break;
  };
  Self__2HQN->parent_expr_binary__ET1M.right__OP2H=__tmp__IIQN;
  __tmp__KIQN=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
  if (__tmp__KIQN==NULL) {
    __tmp__LIQN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__KIQN)->__id) {
    case __LIST__: {
      __tmp__LIQN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__LIQN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__LIQN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__LIQN=((void *)__tmp__KIQN);
    } break;
    case __READ_LOCAL__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__LIQN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__LIQN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__LIQN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__LIQN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__LIQN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__LIQN=NULL;
    } break;
    case __ITEM__: {
      __tmp__LIQN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__LIQN=NULL;
    } break;
    case __CAST__: {
      __tmp__LIQN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__LIQN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__LIQN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__LIQN=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__LIQN=NULL;
    } break;
    }
  };
  left_cst__CIQN=__tmp__LIQN;
  __tmp__NIQN=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
  if (__tmp__NIQN==NULL) {
    __tmp__OIQN=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__NIQN)->__id) {
    case __LIST__: {
      __tmp__OIQN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OIQN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OIQN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__OIQN=((void *)__tmp__NIQN);
    } break;
    case __READ_LOCAL__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OIQN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__OIQN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OIQN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OIQN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OIQN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__OIQN=NULL;
    } break;
    case __ITEM__: {
      __tmp__OIQN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__OIQN=NULL;
    } break;
    case __CAST__: {
      __tmp__OIQN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__OIQN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__OIQN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__OIQN=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__OIQN=NULL;
    } break;
    }
  };
  right_cst__DIQN=__tmp__OIQN;
  result__4HQN=NULL;
  if (((void *)__tmp__LIQN != (void *)NULL)) {
    result__M34N=NULL;
    if ((((__INTEGER_CST *)__tmp__LIQN)->value__PAZD ==  0)) {
      result__M34N=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
    };
    result__4HQN=result__M34N;
  };
  if ((((void *)result__4HQN == (void *)NULL) && ((void *)__tmp__OIQN != (void *)NULL))) {
    result__034N=NULL;
    if ((((__INTEGER_CST *)__tmp__OIQN)->value__PAZD ==  0)) {
      result__034N=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
    };
    result__4HQN=result__034N;
  };
  if (((((void *)result__4HQN == (void *)NULL) && ((void *)__tmp__OIQN != (void *)NULL)) && ((void *)__tmp__LIQN != (void *)NULL))) {
    __tmp__YDCO=((__INTEGER_CST *)__tmp__LIQN)->value__PAZD;
    other__RZDQ=((__INTEGER_CST *)__tmp__OIQN)->value__PAZD;
    Self__0IKQ=((__INTEGER_CST *)__tmp__LIQN);
    Self__0IKQ->value__PAZD=(__INTEGER_64)(__tmp__YDCO | other__RZDQ);
    check_type__RI5D(Self__0IKQ);
    result__4HQN=__tmp__LIQN;
  };
  if ((((void *)result__4HQN == (void *)NULL) && (old_seq__5HQN == seq_call_and_loop__VREJ))) {
    result__H44N=NULL;
    and_l__I44N=NULL;
    and_r__J44N=NULL;
    not_l__K44N=NULL;
    not_r__L44N=NULL;
    __tmp__M44N=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
    __tmp__N44N=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
    switch (((struct ___OBJ *)__tmp__M44N)->__id) {
    case __LIST__: {
      __tmp__O44N=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__O44N=__infix_equal_equal__WF1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXTERNAL_C__: {
      __tmp__O44N=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__O44N=__infix_equal_equal__LG1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __INTEGER_CST__: {
      __tmp__O44N=__infix_equal_equal__2G1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __READ_LOCAL__: {
      __tmp__O44N=__infix_equal_equal__WH1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__O44N=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__O44N=__infix_equal_equal__MI1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__O44N=__infix_equal_equal__IJ1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __REAL_CST__: {
      __tmp__O44N=__infix_equal_equal__EK1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __CHARACTER_CST__: {
      __tmp__O44N=__infix_equal_equal__4K1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __IS_EXPANDED__: {
      __tmp__O44N=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__O44N=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__O44N=__infix_equal_equal__XL1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_SUB__: {
      __tmp__O44N=__infix_equal_equal__TM1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_MUL__: {
      __tmp__O44N=__infix_equal_equal__PN1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_DIV__: {
      __tmp__O44N=__infix_equal_equal__LO1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_AND__: {
      __tmp__O44N=__infix_equal_equal__HP1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__O44N=__infix_equal_equal__DQ1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__O44N=__infix_equal_equal__5Q1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __PUT_TO__: {
      __tmp__O44N=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__O44N=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__O44N=FALSE__;
    } break;
    case __CAST__: {
      __tmp__O44N=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__O44N=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__O44N=__infix_equal_equal__LS1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __READ_GLOBAL__: {
      __tmp__O44N=__infix_equal_equal__HT1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__O44N=__infix_equal_equal__CZHO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__O44N=__infix_equal_equal__SXFO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__O44N=__infix_equal_equal__TBMO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__O44N=__infix_equal_equal__OYFO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__O44N=__infix_equal_equal__QCMO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_NEG__: {
      __tmp__O44N=__infix_equal_equal__J5KM(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_ADD__: {
      __tmp__O44N=__infix_equal_equal__ZT1L(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_NOT__: {
      __tmp__O44N=__infix_equal_equal__QB0M(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_MOD__: {
      __tmp__O44N=__infix_equal_equal__KZFO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__O44N=__infix_equal_equal__OTEP(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_INF__: {
      __tmp__O44N=__infix_equal_equal__UZHO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__O44N=__infix_equal_equal__Q0HO(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_OR__: {
      __tmp__O44N=__infix_equal_equal__32QN(__tmp__M44N,__tmp__N44N);
    } break;
    case __EXPR_XOR__: {
      __tmp__O44N=__infix_equal_equal__GOVO(__tmp__M44N,__tmp__N44N);
    } break;
    };
    if (__tmp__O44N) {
      __tmp__U44N=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
      switch (((struct ___OBJ *)__tmp__U44N)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__U44N);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__U44N);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__SZDQ=((__READ_LOCAL *)__tmp__U44N);
        unread__YVJK(Self__SZDQ->local__ALZD,Self__SZDQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__U44N);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__U44N);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__U44N);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__UZDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__U44N)->receiver__OO2H);
        unread__YVJK(Self__UZDQ->local__ALZD,Self__UZDQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__U44N);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__U44N);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__U44N);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__U44N);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__U44N);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__U44N);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__U44N);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__U44N);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__U44N);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__U44N);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__U44N);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__U44N);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__U44N);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__U44N);
      } break;
      case __READ_GLOBAL__: {
        Self__VZDQ=((__READ_GLOBAL *)__tmp__U44N);
        unread__15ML(Self__VZDQ->global__RHJK,Self__VZDQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__U44N);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__U44N);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__U44N);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__U44N);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__U44N);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__U44N);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__U44N);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__U44N);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__U44N);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__U44N);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__U44N);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__U44N);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__U44N);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__U44N);
      } break;
      };
      result__H44N=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
    } else {
      __tmp__244N=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
      if (__tmp__244N==NULL) {
        __tmp__344N=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__244N)->__id) {
        case __LIST__: {
          __tmp__344N=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__344N=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__344N=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__344N=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__344N=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__344N=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__344N=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__344N=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__344N=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__344N=((void *)__tmp__244N);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__344N=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__344N=NULL;
        } break;
        case __ITEM__: {
          __tmp__344N=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__344N=NULL;
        } break;
        case __CAST__: {
          __tmp__344N=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__344N=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__344N=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__344N=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__344N=NULL;
        } break;
        }
      };
      and_l__I44N=__tmp__344N;
      __tmp__544N=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
      if (__tmp__544N==NULL) {
        __tmp__A54N=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__544N)->__id) {
        case __LIST__: {
          __tmp__A54N=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__A54N=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__A54N=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__A54N=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__A54N=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__A54N=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__A54N=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__A54N=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__A54N=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__A54N=((void *)__tmp__544N);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__A54N=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__A54N=NULL;
        } break;
        case __ITEM__: {
          __tmp__A54N=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__A54N=NULL;
        } break;
        case __CAST__: {
          __tmp__A54N=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__A54N=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__A54N=NULL;
        } break;
        case __READ_GLOBAL__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__A54N=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__A54N=NULL;
        } break;
        }
      };
      and_r__J44N=__tmp__A54N;
      if ((((void *)__tmp__344N != (void *)NULL) && ((void *)__tmp__A54N != (void *)NULL))) {
        __tmp__P54N=((__EXPR_AND *)__tmp__344N)->parent_expr_binary__ADKH.left__PP1H;
        if (__tmp__P54N==NULL) {
          __tmp__Q54N=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__P54N)->__id) {
          case __LIST__: {
            __tmp__Q54N=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__Q54N=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__Q54N=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__Q54N=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__Q54N=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__Q54N=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__Q54N=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__Q54N=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__Q54N=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__Q54N=NULL;
          } break;
          case __ITEM__: {
            __tmp__Q54N=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__Q54N=NULL;
          } break;
          case __CAST__: {
            __tmp__Q54N=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__Q54N=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__Q54N=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__Q54N=((void *)__tmp__P54N);
          } break;
          case __EXPR_MOD__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__Q54N=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__Q54N=NULL;
          } break;
          }
        };
        not_l__K44N=__tmp__Q54N;
        __tmp__S54N=((__EXPR_AND *)__tmp__A54N)->parent_expr_binary__ADKH.right__OP2H;
        if (__tmp__S54N==NULL) {
          __tmp__T54N=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__S54N)->__id) {
          case __LIST__: {
            __tmp__T54N=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__T54N=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__T54N=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__T54N=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__T54N=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__T54N=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__T54N=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__T54N=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__T54N=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__T54N=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__T54N=NULL;
          } break;
          case __ITEM__: {
            __tmp__T54N=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__T54N=NULL;
          } break;
          case __CAST__: {
            __tmp__T54N=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__T54N=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__T54N=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__T54N=((void *)__tmp__S54N);
          } break;
          case __EXPR_MOD__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__T54N=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__T54N=NULL;
          } break;
          }
        };
        not_r__L44N=__tmp__T54N;
        if ((((void *)__tmp__Q54N != (void *)NULL) && ((void *)__tmp__T54N != (void *)NULL))) {
          __tmp__BA5N=((__EXPR_NOT *)__tmp__Q54N)->parent_expr_unary__M5VL.right__XZDL;
          __tmp__CA5N=((__EXPR_AND *)__tmp__A54N)->parent_expr_binary__ADKH.left__PP1H;
          switch (((struct ___OBJ *)__tmp__BA5N)->__id) {
          case __LIST__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__DA5N=__infix_equal_equal__WF1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXTERNAL_C__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__DA5N=__infix_equal_equal__LG1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __INTEGER_CST__: {
            __tmp__DA5N=__infix_equal_equal__2G1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __READ_LOCAL__: {
            __tmp__DA5N=__infix_equal_equal__WH1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__DA5N=__infix_equal_equal__MI1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__DA5N=__infix_equal_equal__IJ1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __REAL_CST__: {
            __tmp__DA5N=__infix_equal_equal__EK1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __CHARACTER_CST__: {
            __tmp__DA5N=__infix_equal_equal__4K1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __IS_EXPANDED__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__DA5N=__infix_equal_equal__XL1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_SUB__: {
            __tmp__DA5N=__infix_equal_equal__TM1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_MUL__: {
            __tmp__DA5N=__infix_equal_equal__PN1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_DIV__: {
            __tmp__DA5N=__infix_equal_equal__LO1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_AND__: {
            __tmp__DA5N=__infix_equal_equal__HP1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__DA5N=__infix_equal_equal__DQ1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__DA5N=__infix_equal_equal__5Q1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __PUT_TO__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __CAST__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__DA5N=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__DA5N=__infix_equal_equal__LS1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __READ_GLOBAL__: {
            __tmp__DA5N=__infix_equal_equal__HT1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__DA5N=__infix_equal_equal__CZHO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__DA5N=__infix_equal_equal__SXFO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__DA5N=__infix_equal_equal__TBMO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__DA5N=__infix_equal_equal__OYFO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__DA5N=__infix_equal_equal__QCMO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_NEG__: {
            __tmp__DA5N=__infix_equal_equal__J5KM(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_ADD__: {
            __tmp__DA5N=__infix_equal_equal__ZT1L(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_NOT__: {
            __tmp__DA5N=__infix_equal_equal__QB0M(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_MOD__: {
            __tmp__DA5N=__infix_equal_equal__KZFO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__DA5N=__infix_equal_equal__OTEP(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_INF__: {
            __tmp__DA5N=__infix_equal_equal__UZHO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__DA5N=__infix_equal_equal__Q0HO(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_OR__: {
            __tmp__DA5N=__infix_equal_equal__32QN(__tmp__BA5N,__tmp__CA5N);
          } break;
          case __EXPR_XOR__: {
            __tmp__DA5N=__infix_equal_equal__GOVO(__tmp__BA5N,__tmp__CA5N);
          } break;
          };
          if (__tmp__DA5N) {
            __tmp__JA5N=((__EXPR_AND *)__tmp__344N)->parent_expr_binary__ADKH.right__OP2H;
            __tmp__KA5N=((__EXPR_NOT *)__tmp__T54N)->parent_expr_unary__M5VL.right__XZDL;
            switch (((struct ___OBJ *)__tmp__JA5N)->__id) {
            case __LIST__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __STRING_CST__: {
              __tmp__LA5N=__infix_equal_equal__WF1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXTERNAL_C__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__LA5N=__infix_equal_equal__LG1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __INTEGER_CST__: {
              __tmp__LA5N=__infix_equal_equal__2G1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __READ_LOCAL__: {
              __tmp__LA5N=__infix_equal_equal__WH1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__LA5N=__infix_equal_equal__MI1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__LA5N=__infix_equal_equal__IJ1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __REAL_CST__: {
              __tmp__LA5N=__infix_equal_equal__EK1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __CHARACTER_CST__: {
              __tmp__LA5N=__infix_equal_equal__4K1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __IS_EXPANDED__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __EXPR_SUP__: {
              __tmp__LA5N=__infix_equal_equal__XL1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_SUB__: {
              __tmp__LA5N=__infix_equal_equal__TM1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_MUL__: {
              __tmp__LA5N=__infix_equal_equal__PN1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_DIV__: {
              __tmp__LA5N=__infix_equal_equal__LO1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_AND__: {
              __tmp__LA5N=__infix_equal_equal__HP1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__LA5N=__infix_equal_equal__DQ1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__LA5N=__infix_equal_equal__5Q1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __PUT_TO__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __ITEM__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __SIZE_OF__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __CAST__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __CALL_SLOT__: {
              __tmp__LA5N=FALSE__;
            } break;
            case __READ_SLOT__: {
              __tmp__LA5N=__infix_equal_equal__LS1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __READ_GLOBAL__: {
              __tmp__LA5N=__infix_equal_equal__HT1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__LA5N=__infix_equal_equal__CZHO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__LA5N=__infix_equal_equal__SXFO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__LA5N=__infix_equal_equal__TBMO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__LA5N=__infix_equal_equal__OYFO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__LA5N=__infix_equal_equal__QCMO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_NEG__: {
              __tmp__LA5N=__infix_equal_equal__J5KM(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_ADD__: {
              __tmp__LA5N=__infix_equal_equal__ZT1L(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_NOT__: {
              __tmp__LA5N=__infix_equal_equal__QB0M(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_MOD__: {
              __tmp__LA5N=__infix_equal_equal__KZFO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__LA5N=__infix_equal_equal__OTEP(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_INF__: {
              __tmp__LA5N=__infix_equal_equal__UZHO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__LA5N=__infix_equal_equal__Q0HO(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_OR__: {
              __tmp__LA5N=__infix_equal_equal__32QN(__tmp__JA5N,__tmp__KA5N);
            } break;
            case __EXPR_XOR__: {
              __tmp__LA5N=__infix_equal_equal__GOVO(__tmp__JA5N,__tmp__KA5N);
            } break;
            };
            __tmp__OA5N=__tmp__LA5N;
          } else {
            __tmp__OA5N=FALSE__;
          };
          if (__tmp__OA5N) {
            result__H44N=create__with__and__D5PO(Self__2HQN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,((__EXPR_NOT *)__tmp__Q54N)->parent_expr_unary__M5VL.right__XZDL,((__EXPR_AND *)__tmp__344N)->parent_expr_binary__ADKH.right__OP2H);
            __tmp__1A5N=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
            switch (((struct ___OBJ *)__tmp__1A5N)->__id) {
            case __LIST__: {
              remove__KPJJ(__tmp__1A5N);
            } break;
            case __STRING_CST__: {
            } break;
            case __EXTERNAL_C__: {
              remove__UUAK(__tmp__1A5N);
            } break;
            case __PROTOTYPE_CST__: {
            } break;
            case __INTEGER_CST__: {
            } break;
            case __READ_LOCAL__: {
              Self__WZDQ=((__READ_LOCAL *)__tmp__1A5N);
              unread__YVJK(Self__WZDQ->local__ALZD,Self__WZDQ);
            } break;
            case __EXPR_MULTIPLE__: {
              remove__TVAK(__tmp__1A5N);
            } break;
            case __EXPR_EQUAL__: {
              remove__DWAK(__tmp__1A5N);
            } break;
            case __EXPR_NOT_EQUAL__: {
              remove__HWAK(__tmp__1A5N);
            } break;
            case __REAL_CST__: {
            } break;
            case __CHARACTER_CST__: {
            } break;
            case __IS_EXPANDED__: {
              Self__YZDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__1A5N)->receiver__OO2H);
              unread__YVJK(Self__YZDQ->local__ALZD,Self__YZDQ);
            } break;
            case __GET_TYPE_ID__: {
              remove__SWAK(__tmp__1A5N);
            } break;
            case __EXPR_SUP__: {
              remove__VWAK(__tmp__1A5N);
            } break;
            case __EXPR_SUB__: {
              remove__ZWAK(__tmp__1A5N);
            } break;
            case __EXPR_MUL__: {
              remove__3WAK(__tmp__1A5N);
            } break;
            case __EXPR_DIV__: {
              remove__BXAK(__tmp__1A5N);
            } break;
            case __EXPR_AND__: {
              remove__FXAK(__tmp__1A5N);
            } break;
            case __EXPR_SHIFT_R__: {
              remove__JXAK(__tmp__1A5N);
            } break;
            case __EXPR_SHIFT_L__: {
              remove__NXAK(__tmp__1A5N);
            } break;
            case __PUT_TO__: {
              remove__RXAK(__tmp__1A5N);
            } break;
            case __ITEM__: {
              remove__SYAK(__tmp__1A5N);
            } break;
            case __SIZE_OF__: {
              remove__WYAK(__tmp__1A5N);
            } break;
            case __CAST__: {
              remove__ZYAK(__tmp__1A5N);
            } break;
            case __CALL_SLOT__: {
              remove__2NML(__tmp__1A5N);
            } break;
            case __READ_SLOT__: {
              remove__4GHK(__tmp__1A5N);
            } break;
            case __READ_GLOBAL__: {
              Self__ZZDQ=((__READ_GLOBAL *)__tmp__1A5N);
              unread__15ML(Self__ZZDQ->global__RHJK,Self__ZZDQ);
            } break;
            case __EXPR_NOT_LOGIC__: {
              remove__GWZM(__tmp__1A5N);
            } break;
            case __EXPR_OR_LOGIC__: {
              remove__WPEO(__tmp__1A5N);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              remove__WMKO(__tmp__1A5N);
            } break;
            case __EXPR_AND_LOGIC__: {
              remove__0PEO(__tmp__1A5N);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              remove__1MKO(__tmp__1A5N);
            } break;
            case __EXPR_NEG__: {
              remove__3KJM(__tmp__1A5N);
            } break;
            case __EXPR_ADD__: {
              remove__QQML(__tmp__1A5N);
            } break;
            case __EXPR_NOT__: {
              remove__D5YM(__tmp__1A5N);
            } break;
            case __EXPR_MOD__: {
              remove__4PEO(__tmp__1A5N);
            } break;
            case __EXPR_SUP_EQ__: {
              remove__X5DP(__tmp__1A5N);
            } break;
            case __EXPR_INF__: {
              remove__KZQN(__tmp__1A5N);
            } break;
            case __EXPR_INF_EQ__: {
              remove__OZQN(__tmp__1A5N);
            } break;
            case __EXPR_OR__: {
              remove__LUPN(__tmp__1A5N);
            } break;
            case __EXPR_XOR__: {
              remove__AQTO(__tmp__1A5N);
            } break;
            };
          };
        };
      };
    };
    result__4HQN=result__H44N;
    if ((((void *)result__H44N == (void *)NULL) && ((void *)__tmp__LIQN != (void *)NULL))) {
      result__1MCO=NULL;
      if (is_saturated__13QN(__tmp__LIQN)) {
        result__1MCO=__tmp__LIQN;
        __tmp__CNCO=Self__2HQN->parent_expr_binary__ET1M.right__OP2H;
        switch (((struct ___OBJ *)__tmp__CNCO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__CNCO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__CNCO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__0ZDQ=((__READ_LOCAL *)__tmp__CNCO);
          unread__YVJK(Self__0ZDQ->local__ALZD,Self__0ZDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__CNCO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__CNCO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__CNCO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__2ZDQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__CNCO)->receiver__OO2H);
          unread__YVJK(Self__2ZDQ->local__ALZD,Self__2ZDQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__CNCO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__CNCO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__CNCO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__CNCO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__CNCO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__CNCO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__CNCO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__CNCO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__CNCO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__CNCO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__CNCO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__CNCO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__CNCO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__CNCO);
        } break;
        case __READ_GLOBAL__: {
          Self__3ZDQ=((__READ_GLOBAL *)__tmp__CNCO);
          unread__15ML(Self__3ZDQ->global__RHJK,Self__3ZDQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__CNCO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__CNCO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__CNCO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__CNCO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__CNCO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__CNCO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__CNCO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__CNCO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__CNCO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__CNCO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__CNCO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__CNCO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__CNCO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__CNCO);
        } break;
        };
      };
      result__4HQN=result__1MCO;
    };
    if ((((void *)result__4HQN == (void *)NULL) && ((void *)__tmp__OIQN != (void *)NULL))) {
      result__JNCO=NULL;
      if (is_saturated__13QN(__tmp__OIQN)) {
        result__JNCO=__tmp__OIQN;
        __tmp__QNCO=Self__2HQN->parent_expr_binary__ET1M.left__PP1H;
        switch (((struct ___OBJ *)__tmp__QNCO)->__id) {
        case __LIST__: {
          remove__KPJJ(__tmp__QNCO);
        } break;
        case __STRING_CST__: {
        } break;
        case __EXTERNAL_C__: {
          remove__UUAK(__tmp__QNCO);
        } break;
        case __PROTOTYPE_CST__: {
        } break;
        case __INTEGER_CST__: {
        } break;
        case __READ_LOCAL__: {
          Self__4ZDQ=((__READ_LOCAL *)__tmp__QNCO);
          unread__YVJK(Self__4ZDQ->local__ALZD,Self__4ZDQ);
        } break;
        case __EXPR_MULTIPLE__: {
          remove__TVAK(__tmp__QNCO);
        } break;
        case __EXPR_EQUAL__: {
          remove__DWAK(__tmp__QNCO);
        } break;
        case __EXPR_NOT_EQUAL__: {
          remove__HWAK(__tmp__QNCO);
        } break;
        case __REAL_CST__: {
        } break;
        case __CHARACTER_CST__: {
        } break;
        case __IS_EXPANDED__: {
          Self__A0DQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__QNCO)->receiver__OO2H);
          unread__YVJK(Self__A0DQ->local__ALZD,Self__A0DQ);
        } break;
        case __GET_TYPE_ID__: {
          remove__SWAK(__tmp__QNCO);
        } break;
        case __EXPR_SUP__: {
          remove__VWAK(__tmp__QNCO);
        } break;
        case __EXPR_SUB__: {
          remove__ZWAK(__tmp__QNCO);
        } break;
        case __EXPR_MUL__: {
          remove__3WAK(__tmp__QNCO);
        } break;
        case __EXPR_DIV__: {
          remove__BXAK(__tmp__QNCO);
        } break;
        case __EXPR_AND__: {
          remove__FXAK(__tmp__QNCO);
        } break;
        case __EXPR_SHIFT_R__: {
          remove__JXAK(__tmp__QNCO);
        } break;
        case __EXPR_SHIFT_L__: {
          remove__NXAK(__tmp__QNCO);
        } break;
        case __PUT_TO__: {
          remove__RXAK(__tmp__QNCO);
        } break;
        case __ITEM__: {
          remove__SYAK(__tmp__QNCO);
        } break;
        case __SIZE_OF__: {
          remove__WYAK(__tmp__QNCO);
        } break;
        case __CAST__: {
          remove__ZYAK(__tmp__QNCO);
        } break;
        case __CALL_SLOT__: {
          remove__2NML(__tmp__QNCO);
        } break;
        case __READ_SLOT__: {
          remove__4GHK(__tmp__QNCO);
        } break;
        case __READ_GLOBAL__: {
          Self__B0DQ=((__READ_GLOBAL *)__tmp__QNCO);
          unread__15ML(Self__B0DQ->global__RHJK,Self__B0DQ);
        } break;
        case __EXPR_NOT_LOGIC__: {
          remove__GWZM(__tmp__QNCO);
        } break;
        case __EXPR_OR_LOGIC__: {
          remove__WPEO(__tmp__QNCO);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          remove__WMKO(__tmp__QNCO);
        } break;
        case __EXPR_AND_LOGIC__: {
          remove__0PEO(__tmp__QNCO);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          remove__1MKO(__tmp__QNCO);
        } break;
        case __EXPR_NEG__: {
          remove__3KJM(__tmp__QNCO);
        } break;
        case __EXPR_ADD__: {
          remove__QQML(__tmp__QNCO);
        } break;
        case __EXPR_NOT__: {
          remove__D5YM(__tmp__QNCO);
        } break;
        case __EXPR_MOD__: {
          remove__4PEO(__tmp__QNCO);
        } break;
        case __EXPR_SUP_EQ__: {
          remove__X5DP(__tmp__QNCO);
        } break;
        case __EXPR_INF__: {
          remove__KZQN(__tmp__QNCO);
        } break;
        case __EXPR_INF_EQ__: {
          remove__OZQN(__tmp__QNCO);
        } break;
        case __EXPR_OR__: {
          remove__LUPN(__tmp__QNCO);
        } break;
        case __EXPR_XOR__: {
          remove__AQTO(__tmp__QNCO);
        } break;
        };
      };
      result__4HQN=result__JNCO;
    };
  };
  if (((void *)result__4HQN == (void *)NULL)) {
    result__4HQN=Self__2HQN;
  } else {
    __tmp__CMQN=Self__2HQN->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__4HQN)->__id) {
    case __LIST__: {
      ((__LIST *)result__4HQN)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__4HQN)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__4HQN)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__4HQN)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__4HQN)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__4HQN)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__4HQN)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__4HQN)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__4HQN)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__4HQN)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__4HQN)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__4HQN)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__4HQN)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__4HQN)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__4HQN)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__4HQN)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__4HQN)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__4HQN)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__4HQN)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__4HQN)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__4HQN)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__4HQN)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __CAST__: {
      ((__CAST *)result__4HQN)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__4HQN)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__4HQN)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__4HQN)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__4HQN)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__4HQN)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__4HQN)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__4HQN)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__4HQN)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__4HQN)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__4HQN)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__4HQN)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__4HQN)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__4HQN)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__4HQN)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__4HQN)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__4HQN)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__4HQN)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__CMQN;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__4HQN);
}

static void* execute_link__IYUO(__EXPR_XOR *Self__JYUO)
// ({EXPR_XOR}) With resultRecursive, No inlinable.
{
  __INTEGER_64 __tmp__0AGP,__tmp__1AGP,__tmp__WUGP,other__02DQ;
  __UINTEGER_32 old_seq__MYUO;
  void *__tmp__SYUO,*__tmp__TYUO,*__tmp__UYUO,*__tmp__VYUO,*__tmp__XYUO;
  void *__tmp__0YUO,*result__LYUO,*result__TEAP,*result__RFAP;
  void *result__OGAP,*__tmp__PGAP,*__tmp__QGAP,*__tmp__2GAP,*__tmp__3GAP;
  void *__tmp__YYUO,*left_cst__PYUO,*__tmp__1YUO,*right_cst__QYUO;
  __INTEGER_CST *Self__WLRN;
  __READ_LOCAL *Self__22DQ,*Self__42DQ,*Self__A3DQ,*Self__C3DQ;
  __READ_GLOBAL *Self__52DQ,*Self__D3DQ;
  __POSITION __tmp__P2UO;
  __BOOLEAN __tmp__2EAP,__tmp__0FAP,__tmp__RGAP;
  old_seq__MYUO=seq_call_and_loop__VREJ;
  __tmp__SYUO=Self__JYUO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__SYUO)->__id) {
  case __LIST__: {
    __tmp__TYUO=execute_link__LUOG(__tmp__SYUO);
  } break;
  case __STRING_CST__: {
    __tmp__TYUO=((__STRING_CST *)__tmp__SYUO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__TYUO=execute_link__U5ZK(__tmp__SYUO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__TYUO=((__PROTOTYPE_CST *)__tmp__SYUO);
  } break;
  case __INTEGER_CST__: {
    __tmp__TYUO=((__INTEGER_CST *)__tmp__SYUO);
  } break;
  case __READ_LOCAL__: {
    __tmp__TYUO=execute_link__EHAL(__tmp__SYUO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TYUO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TYUO=execute_link__2LAL(__tmp__SYUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TYUO=execute_link__FQAL(__tmp__SYUO);
  } break;
  case __REAL_CST__: {
    __tmp__TYUO=((__REAL_CST *)__tmp__SYUO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__TYUO=((__CHARACTER_CST *)__tmp__SYUO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__TYUO=execute_link__UUAL(__tmp__SYUO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TYUO=execute_link__1VAL(__tmp__SYUO);
  } break;
  case __EXPR_SUP__: {
    __tmp__TYUO=execute_link__AWAL(__tmp__SYUO);
  } break;
  case __EXPR_SUB__: {
    __tmp__TYUO=execute_link__J0AL(__tmp__SYUO);
  } break;
  case __EXPR_MUL__: {
    __tmp__TYUO=execute_link__S4AL(__tmp__SYUO);
  } break;
  case __EXPR_DIV__: {
    __tmp__TYUO=execute_link__1CBL(__tmp__SYUO);
  } break;
  case __EXPR_AND__: {
    __tmp__TYUO=execute_link__EHBL(__tmp__SYUO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TYUO=execute_link__NLBL(__tmp__SYUO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TYUO=execute_link__WPBL(__tmp__SYUO);
  } break;
  case __PUT_TO__: {
    __tmp__TYUO=execute_link__BOPK(__tmp__SYUO);
  } break;
  case __ITEM__: {
    __tmp__TYUO=execute_link__5TBL(__tmp__SYUO);
  } break;
  case __SIZE_OF__: {
    __tmp__TYUO=execute_link__GUBL(__tmp__SYUO);
  } break;
  case __CAST__: {
    __tmp__TYUO=execute_link__LUBL(__tmp__SYUO);
  } break;
  case __CALL_SLOT__: {
    __tmp__TYUO=execute_link__A2TL(__tmp__SYUO);
  } break;
  case __READ_SLOT__: {
    __tmp__TYUO=execute_link__EYBL(__tmp__SYUO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__TYUO=execute_link__U2BL(__tmp__SYUO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TYUO=execute_link__SRZM(__tmp__SYUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TYUO=execute_link__OBFO(__tmp__SYUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TYUO=execute_link__GJLO(__tmp__SYUO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TYUO=execute_link__HHFO(__tmp__SYUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TYUO=execute_link__KPLO(__tmp__SYUO);
  } break;
  case __EXPR_NEG__: {
    __tmp__TYUO=execute_link__0GKM(__tmp__SYUO);
  } break;
  case __EXPR_ADD__: {
    __tmp__TYUO=execute_link__RROL(__tmp__SYUO);
  } break;
  case __EXPR_NOT__: {
    __tmp__TYUO=execute_link__GUZM(__tmp__SYUO);
  } break;
  case __EXPR_MOD__: {
    __tmp__TYUO=execute_link__ANFO(__tmp__SYUO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TYUO=execute_link__YLEP(__tmp__SYUO);
  } break;
  case __EXPR_INF__: {
    __tmp__TYUO=execute_link__VQQN(__tmp__SYUO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TYUO=execute_link__4UQN(__tmp__SYUO);
  } break;
  case __EXPR_OR__: {
    __tmp__TYUO=execute_link__1HQN(__tmp__SYUO);
  } break;
  case __EXPR_XOR__: {
    __tmp__TYUO=execute_link__IYUO(__tmp__SYUO);
  } break;
  };
  Self__JYUO->parent_expr_binary__UA5N.left__PP1H=__tmp__TYUO;
  __tmp__UYUO=Self__JYUO->parent_expr_binary__UA5N.right__OP2H;
  switch (((struct ___OBJ *)__tmp__UYUO)->__id) {
  case __LIST__: {
    __tmp__VYUO=execute_link__LUOG(__tmp__UYUO);
  } break;
  case __STRING_CST__: {
    __tmp__VYUO=((__STRING_CST *)__tmp__UYUO);
  } break;
  case __EXTERNAL_C__: {
    __tmp__VYUO=execute_link__U5ZK(__tmp__UYUO);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__VYUO=((__PROTOTYPE_CST *)__tmp__UYUO);
  } break;
  case __INTEGER_CST__: {
    __tmp__VYUO=((__INTEGER_CST *)__tmp__UYUO);
  } break;
  case __READ_LOCAL__: {
    __tmp__VYUO=execute_link__EHAL(__tmp__UYUO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__VYUO=execute_link__YLAL();
  } break;
  case __EXPR_EQUAL__: {
    __tmp__VYUO=execute_link__2LAL(__tmp__UYUO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__VYUO=execute_link__FQAL(__tmp__UYUO);
  } break;
  case __REAL_CST__: {
    __tmp__VYUO=((__REAL_CST *)__tmp__UYUO);
  } break;
  case __CHARACTER_CST__: {
    __tmp__VYUO=((__CHARACTER_CST *)__tmp__UYUO);
  } break;
  case __IS_EXPANDED__: {
    __tmp__VYUO=execute_link__UUAL(__tmp__UYUO);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__VYUO=execute_link__1VAL(__tmp__UYUO);
  } break;
  case __EXPR_SUP__: {
    __tmp__VYUO=execute_link__AWAL(__tmp__UYUO);
  } break;
  case __EXPR_SUB__: {
    __tmp__VYUO=execute_link__J0AL(__tmp__UYUO);
  } break;
  case __EXPR_MUL__: {
    __tmp__VYUO=execute_link__S4AL(__tmp__UYUO);
  } break;
  case __EXPR_DIV__: {
    __tmp__VYUO=execute_link__1CBL(__tmp__UYUO);
  } break;
  case __EXPR_AND__: {
    __tmp__VYUO=execute_link__EHBL(__tmp__UYUO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__VYUO=execute_link__NLBL(__tmp__UYUO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__VYUO=execute_link__WPBL(__tmp__UYUO);
  } break;
  case __PUT_TO__: {
    __tmp__VYUO=execute_link__BOPK(__tmp__UYUO);
  } break;
  case __ITEM__: {
    __tmp__VYUO=execute_link__5TBL(__tmp__UYUO);
  } break;
  case __SIZE_OF__: {
    __tmp__VYUO=execute_link__GUBL(__tmp__UYUO);
  } break;
  case __CAST__: {
    __tmp__VYUO=execute_link__LUBL(__tmp__UYUO);
  } break;
  case __CALL_SLOT__: {
    __tmp__VYUO=execute_link__A2TL(__tmp__UYUO);
  } break;
  case __READ_SLOT__: {
    __tmp__VYUO=execute_link__EYBL(__tmp__UYUO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__VYUO=execute_link__U2BL(__tmp__UYUO);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__VYUO=execute_link__SRZM(__tmp__UYUO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__VYUO=execute_link__OBFO(__tmp__UYUO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__VYUO=execute_link__GJLO(__tmp__UYUO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__VYUO=execute_link__HHFO(__tmp__UYUO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__VYUO=execute_link__KPLO(__tmp__UYUO);
  } break;
  case __EXPR_NEG__: {
    __tmp__VYUO=execute_link__0GKM(__tmp__UYUO);
  } break;
  case __EXPR_ADD__: {
    __tmp__VYUO=execute_link__RROL(__tmp__UYUO);
  } break;
  case __EXPR_NOT__: {
    __tmp__VYUO=execute_link__GUZM(__tmp__UYUO);
  } break;
  case __EXPR_MOD__: {
    __tmp__VYUO=execute_link__ANFO(__tmp__UYUO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__VYUO=execute_link__YLEP(__tmp__UYUO);
  } break;
  case __EXPR_INF__: {
    __tmp__VYUO=execute_link__VQQN(__tmp__UYUO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__VYUO=execute_link__4UQN(__tmp__UYUO);
  } break;
  case __EXPR_OR__: {
    __tmp__VYUO=execute_link__1HQN(__tmp__UYUO);
  } break;
  case __EXPR_XOR__: {
    __tmp__VYUO=execute_link__IYUO(__tmp__UYUO);
  } break;
  };
  Self__JYUO->parent_expr_binary__UA5N.right__OP2H=__tmp__VYUO;
  __tmp__XYUO=Self__JYUO->parent_expr_binary__UA5N.left__PP1H;
  if (__tmp__XYUO==NULL) {
    __tmp__YYUO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__XYUO)->__id) {
    case __LIST__: {
      __tmp__YYUO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YYUO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YYUO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__YYUO=((void *)__tmp__XYUO);
    } break;
    case __READ_LOCAL__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YYUO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__YYUO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YYUO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YYUO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YYUO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__YYUO=NULL;
    } break;
    case __ITEM__: {
      __tmp__YYUO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__YYUO=NULL;
    } break;
    case __CAST__: {
      __tmp__YYUO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__YYUO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__YYUO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__YYUO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__YYUO=NULL;
    } break;
    }
  };
  left_cst__PYUO=__tmp__YYUO;
  __tmp__0YUO=Self__JYUO->parent_expr_binary__UA5N.right__OP2H;
  if (__tmp__0YUO==NULL) {
    __tmp__1YUO=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__0YUO)->__id) {
    case __LIST__: {
      __tmp__1YUO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__1YUO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__1YUO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__1YUO=((void *)__tmp__0YUO);
    } break;
    case __READ_LOCAL__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__1YUO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__1YUO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__1YUO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__1YUO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__1YUO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__1YUO=NULL;
    } break;
    case __ITEM__: {
      __tmp__1YUO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__1YUO=NULL;
    } break;
    case __CAST__: {
      __tmp__1YUO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__1YUO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__1YUO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__1YUO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__1YUO=NULL;
    } break;
    }
  };
  right_cst__QYUO=__tmp__1YUO;
  result__LYUO=NULL;
  if (((void *)__tmp__YYUO != (void *)NULL)) {
    result__TEAP=NULL;
    if ((((__INTEGER_CST *)__tmp__YYUO)->value__PAZD ==  0)) {
      result__TEAP=Self__JYUO->parent_expr_binary__UA5N.right__OP2H;
      __tmp__2EAP=TRUE__;
    } else {
      __tmp__2EAP=FALSE__;
    };
    if ((! __tmp__2EAP)) {
      if (is_saturated__13QN(__tmp__YYUO)) {
        result__TEAP=create__with__0YVM(Self__JYUO->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JYUO->parent_expr_binary__UA5N.right__OP2H);
      };
    };
    result__LYUO=result__TEAP;
  };
  if ((((void *)result__LYUO == (void *)NULL) && ((void *)__tmp__1YUO != (void *)NULL))) {
    result__RFAP=NULL;
    if ((((__INTEGER_CST *)__tmp__1YUO)->value__PAZD ==  0)) {
      result__RFAP=Self__JYUO->parent_expr_binary__UA5N.left__PP1H;
      __tmp__0FAP=TRUE__;
    } else {
      __tmp__0FAP=FALSE__;
    };
    if ((! __tmp__0FAP)) {
      if (is_saturated__13QN(__tmp__1YUO)) {
        result__RFAP=create__with__0YVM(Self__JYUO->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__JYUO->parent_expr_binary__UA5N.left__PP1H);
      };
    };
    result__LYUO=result__RFAP;
  };
  if (((((void *)result__LYUO == (void *)NULL) && ((void *)__tmp__1YUO != (void *)NULL)) && ((void *)__tmp__YYUO != (void *)NULL))) {
    __tmp__0AGP=((__INTEGER_CST *)__tmp__YYUO)->value__PAZD;
    __tmp__1AGP=((__INTEGER_CST *)__tmp__1YUO)->value__PAZD;
    __tmp__WUGP=(__INTEGER_64)((__INTEGER_64)(~ __tmp__0AGP) & __tmp__1AGP);
    other__02DQ=(__INTEGER_64)(__tmp__0AGP & (__INTEGER_64)(~ __tmp__1AGP));
    Self__WLRN=((__INTEGER_CST *)__tmp__YYUO);
    Self__WLRN->value__PAZD=(__INTEGER_64)(__tmp__WUGP | other__02DQ);
    check_type__RI5D(Self__WLRN);
    result__LYUO=__tmp__YYUO;
  };
  if ((((void *)result__LYUO == (void *)NULL) && (old_seq__MYUO == seq_call_and_loop__VREJ))) {
    result__OGAP=NULL;
    __tmp__PGAP=Self__JYUO->parent_expr_binary__UA5N.left__PP1H;
    __tmp__QGAP=Self__JYUO->parent_expr_binary__UA5N.right__OP2H;
    switch (((struct ___OBJ *)__tmp__PGAP)->__id) {
    case __LIST__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__RGAP=__infix_equal_equal__WF1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXTERNAL_C__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RGAP=__infix_equal_equal__LG1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __INTEGER_CST__: {
      __tmp__RGAP=__infix_equal_equal__2G1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __READ_LOCAL__: {
      __tmp__RGAP=__infix_equal_equal__WH1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RGAP=__infix_equal_equal__MI1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RGAP=__infix_equal_equal__IJ1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __REAL_CST__: {
      __tmp__RGAP=__infix_equal_equal__EK1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __CHARACTER_CST__: {
      __tmp__RGAP=__infix_equal_equal__4K1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __IS_EXPANDED__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__RGAP=__infix_equal_equal__XL1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_SUB__: {
      __tmp__RGAP=__infix_equal_equal__TM1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_MUL__: {
      __tmp__RGAP=__infix_equal_equal__PN1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_DIV__: {
      __tmp__RGAP=__infix_equal_equal__LO1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_AND__: {
      __tmp__RGAP=__infix_equal_equal__HP1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RGAP=__infix_equal_equal__DQ1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RGAP=__infix_equal_equal__5Q1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __PUT_TO__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __CAST__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__RGAP=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__RGAP=__infix_equal_equal__LS1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __READ_GLOBAL__: {
      __tmp__RGAP=__infix_equal_equal__HT1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RGAP=__infix_equal_equal__CZHO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RGAP=__infix_equal_equal__SXFO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RGAP=__infix_equal_equal__TBMO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RGAP=__infix_equal_equal__OYFO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RGAP=__infix_equal_equal__QCMO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_NEG__: {
      __tmp__RGAP=__infix_equal_equal__J5KM(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_ADD__: {
      __tmp__RGAP=__infix_equal_equal__ZT1L(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_NOT__: {
      __tmp__RGAP=__infix_equal_equal__QB0M(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_MOD__: {
      __tmp__RGAP=__infix_equal_equal__KZFO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RGAP=__infix_equal_equal__OTEP(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_INF__: {
      __tmp__RGAP=__infix_equal_equal__UZHO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RGAP=__infix_equal_equal__Q0HO(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_OR__: {
      __tmp__RGAP=__infix_equal_equal__32QN(__tmp__PGAP,__tmp__QGAP);
    } break;
    case __EXPR_XOR__: {
      __tmp__RGAP=__infix_equal_equal__GOVO(__tmp__PGAP,__tmp__QGAP);
    } break;
    };
    if (__tmp__RGAP) {
      result__OGAP=create__value__type__DNQC(Self__JYUO->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM, 0,static_type__XCSO(Self__JYUO));
      __tmp__2GAP=Self__JYUO->parent_expr_binary__UA5N.left__PP1H;
      switch (((struct ___OBJ *)__tmp__2GAP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__2GAP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__2GAP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__22DQ=((__READ_LOCAL *)__tmp__2GAP);
        unread__YVJK(Self__22DQ->local__ALZD,Self__22DQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__2GAP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__2GAP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__2GAP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__42DQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__2GAP)->receiver__OO2H);
        unread__YVJK(Self__42DQ->local__ALZD,Self__42DQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__2GAP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__2GAP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__2GAP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__2GAP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__2GAP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__2GAP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__2GAP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__2GAP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__2GAP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__2GAP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__2GAP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__2GAP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__2GAP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__2GAP);
      } break;
      case __READ_GLOBAL__: {
        Self__52DQ=((__READ_GLOBAL *)__tmp__2GAP);
        unread__15ML(Self__52DQ->global__RHJK,Self__52DQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__2GAP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__2GAP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__2GAP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__2GAP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__2GAP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__2GAP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__2GAP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__2GAP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__2GAP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__2GAP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__2GAP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__2GAP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__2GAP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__2GAP);
      } break;
      };
      __tmp__3GAP=Self__JYUO->parent_expr_binary__UA5N.right__OP2H;
      switch (((struct ___OBJ *)__tmp__3GAP)->__id) {
      case __LIST__: {
        remove__KPJJ(__tmp__3GAP);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(__tmp__3GAP);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__A3DQ=((__READ_LOCAL *)__tmp__3GAP);
        unread__YVJK(Self__A3DQ->local__ALZD,Self__A3DQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(__tmp__3GAP);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(__tmp__3GAP);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(__tmp__3GAP);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__C3DQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__3GAP)->receiver__OO2H);
        unread__YVJK(Self__C3DQ->local__ALZD,Self__C3DQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(__tmp__3GAP);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(__tmp__3GAP);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(__tmp__3GAP);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(__tmp__3GAP);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(__tmp__3GAP);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(__tmp__3GAP);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(__tmp__3GAP);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(__tmp__3GAP);
      } break;
      case __PUT_TO__: {
        remove__RXAK(__tmp__3GAP);
      } break;
      case __ITEM__: {
        remove__SYAK(__tmp__3GAP);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(__tmp__3GAP);
      } break;
      case __CAST__: {
        remove__ZYAK(__tmp__3GAP);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(__tmp__3GAP);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(__tmp__3GAP);
      } break;
      case __READ_GLOBAL__: {
        Self__D3DQ=((__READ_GLOBAL *)__tmp__3GAP);
        unread__15ML(Self__D3DQ->global__RHJK,Self__D3DQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(__tmp__3GAP);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(__tmp__3GAP);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(__tmp__3GAP);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(__tmp__3GAP);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(__tmp__3GAP);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(__tmp__3GAP);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(__tmp__3GAP);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(__tmp__3GAP);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(__tmp__3GAP);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(__tmp__3GAP);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(__tmp__3GAP);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(__tmp__3GAP);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(__tmp__3GAP);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(__tmp__3GAP);
      } break;
      };
    };
    result__LYUO=result__OGAP;
    if ((((void *)result__OGAP == (void *)NULL) && ((void *)__tmp__YYUO != (void *)NULL))) {
      result__LYUO=NULL;
    };
    if ((((void *)result__LYUO == (void *)NULL) && ((void *)__tmp__1YUO != (void *)NULL))) {
      result__LYUO=NULL;
    };
  };
  if (((void *)result__LYUO == (void *)NULL)) {
    result__LYUO=Self__JYUO;
  } else {
    __tmp__P2UO=Self__JYUO->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    switch (((struct ___OBJ *)result__LYUO)->__id) {
    case __LIST__: {
      ((__LIST *)result__LYUO)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __STRING_CST__: {
      ((__STRING_CST *)result__LYUO)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXTERNAL_C__: {
      ((__EXTERNAL_C *)result__LYUO)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __PROTOTYPE_CST__: {
      ((__PROTOTYPE_CST *)result__LYUO)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __INTEGER_CST__: {
      ((__INTEGER_CST *)result__LYUO)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __READ_LOCAL__: {
      ((__READ_LOCAL *)result__LYUO)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_MULTIPLE__: {
      EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_EQUAL__: {
      ((__EXPR_EQUAL *)result__LYUO)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_NOT_EQUAL__: {
      ((__EXPR_NOT_EQUAL *)result__LYUO)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __REAL_CST__: {
      ((__REAL_CST *)result__LYUO)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __CHARACTER_CST__: {
      ((__CHARACTER_CST *)result__LYUO)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __IS_EXPANDED__: {
      ((__IS_EXPANDED *)result__LYUO)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __GET_TYPE_ID__: {
      ((__GET_TYPE_ID *)result__LYUO)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_SUP__: {
      ((__EXPR_SUP *)result__LYUO)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_SUB__: {
      ((__EXPR_SUB *)result__LYUO)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_MUL__: {
      ((__EXPR_MUL *)result__LYUO)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_DIV__: {
      ((__EXPR_DIV *)result__LYUO)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_AND__: {
      ((__EXPR_AND *)result__LYUO)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_SHIFT_R__: {
      ((__EXPR_SHIFT_R *)result__LYUO)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_SHIFT_L__: {
      ((__EXPR_SHIFT_L *)result__LYUO)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __PUT_TO__: {
      ((__PUT_TO *)result__LYUO)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __ITEM__: {
      ((__ITEM *)result__LYUO)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __SIZE_OF__: {
      ((__SIZE_OF *)result__LYUO)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __CAST__: {
      ((__CAST *)result__LYUO)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __CALL_SLOT__: {
      ((__CALL_SLOT *)result__LYUO)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __READ_SLOT__: {
      ((__READ_SLOT *)result__LYUO)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __READ_GLOBAL__: {
      ((__READ_GLOBAL *)result__LYUO)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_NOT_LOGIC__: {
      ((__EXPR_NOT_LOGIC *)result__LYUO)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_OR_LOGIC__: {
      ((__EXPR_OR_LOGIC *)result__LYUO)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      ((__EXPR_OR_OR_LOGIC *)result__LYUO)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_AND_LOGIC__: {
      ((__EXPR_AND_LOGIC *)result__LYUO)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      ((__EXPR_AND_AND_LOGIC *)result__LYUO)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_NEG__: {
      ((__EXPR_NEG *)result__LYUO)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_ADD__: {
      ((__EXPR_ADD *)result__LYUO)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_NOT__: {
      ((__EXPR_NOT *)result__LYUO)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_MOD__: {
      ((__EXPR_MOD *)result__LYUO)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_SUP_EQ__: {
      ((__EXPR_SUP_EQ *)result__LYUO)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_INF__: {
      ((__EXPR_INF *)result__LYUO)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_INF_EQ__: {
      ((__EXPR_INF_EQ *)result__LYUO)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_OR__: {
      ((__EXPR_OR *)result__LYUO)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    case __EXPR_XOR__: {
      ((__EXPR_XOR *)result__LYUO)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM=__tmp__P2UO;
    } break;
    };
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
  };
  return(result__LYUO);
}

static void move__to__by__ZAFH(__FAST_ARRAYoINSTRo *Self__0AFH,__INTEGER lower_index__1AFH,__INTEGER upper_index__2AFH)
// ({FAST_ARRAYoINSTRo},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER Self__SRPH;
  void **__tmp__B05Q,**__tmp__C05Q,**__tmp__D05Q;
  Self__SRPH=upper_index__2AFH;
  __tmp__B05Q=Self__0AFH->parent_arrayed_collection__IUOG.storage__BM4G;
  __tmp__C05Q=Self__0AFH->parent_arrayed_collection__IUOG.storage__BM4G;
  __tmp__D05Q=Self__0AFH->parent_arrayed_collection__IUOG.storage__BM4G;
  while ((Self__SRPH >= lower_index__1AFH)) {
    ((void **)__tmp__C05Q)[(__INTEGER)(Self__SRPH +  1)]=((void **)__tmp__B05Q)[Self__SRPH];
    ((void **)__tmp__D05Q)[Self__SRPH]=NULL;
    Self__SRPH=(__INTEGER)(Self__SRPH -  1);
  };
}

static void unwrite__CDNL(__SLOT_DATA *Self__DDNL,void *e__EDNL)
// ({SLOT_DATA},{NULLxWRITE_GLOBALxWRITE_SLOT}) VoidNo recursive, No inlinable.
{
  __INTEGER idx__FDNL;
  __BOOLEAN __tmp__GDNL,__tmp__QDNL;
  idx__FDNL= 0;
  if (((struct ___OBJ *)e__EDNL)->__id==__WRITE_GLOBAL__) {
    __tmp__GDNL=((__WRITE_GLOBAL *)e__EDNL)->parent_write__QBGH.is_create__1BDI;
  } else {
    __tmp__GDNL=((__WRITE_SLOT *)e__EDNL)->parent_write__3BGH.is_create__1BDI;
  };
  if ((! __tmp__GDNL)) {
    print__1ZE((&__string_460));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
  if (((struct ___OBJ *)e__EDNL)->__id==__WRITE_GLOBAL__) {
    __tmp__QDNL=((__WRITE_GLOBAL *)e__EDNL)->parent_write__QBGH.is_delete__PDNL;
  } else {
    __tmp__QDNL=((__WRITE_SLOT *)e__EDNL)->parent_write__3BGH.is_delete__PDNL;
  };
  if (__tmp__QDNL) {
    print__1ZE((&__string_460));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
  if (((struct ___OBJ *)e__EDNL)->__id==__WRITE_GLOBAL__) {
    ((__WRITE_GLOBAL *)e__EDNL)->parent_write__QBGH.is_delete__PDNL=TRUE__;
  } else {
    ((__WRITE_SLOT *)e__EDNL)->parent_write__3BGH.is_delete__PDNL=TRUE__;
  };
  if (((void *)Self__DDNL->last_write__Y5IL == (void *)e__EDNL)) {
    Self__DDNL->last_write__Y5IL=NULL;
  };
  if (((void *)Self__DDNL->parent_variable__AJZD.require_first__DAEH == (void *)e__EDNL)) {
    if (((void *)Self__DDNL->parent_variable__AJZD.require_list__UAEH != (void *)NULL)) {
      Self__DDNL->parent_variable__AJZD.require_first__DAEH=((void **)((__FAST_ARRAYoWRITEo *)Self__DDNL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0];
      remove_first__XRAM(Self__DDNL->parent_variable__AJZD.require_list__UAEH);
      if ((((__FAST_ARRAYoWRITEo *)Self__DDNL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI <  0)) {
        Self__DDNL->parent_variable__AJZD.require_list__UAEH=NULL;
      };
    } else {
      Self__DDNL->parent_variable__AJZD.require_first__DAEH=NULL;
    };
  } else {
    if (((void *)Self__DDNL->parent_variable__AJZD.require_list__UAEH == (void *)NULL)) {
      print__1ZE(Self__DDNL->parent_variable__AJZD.intern_name__025F);
      fputc((int)('\n'),stdout);
      print__1ZE((&__string_562));
      fputc((int)('\n'),stdout);
      exit(( 1));
    };
    idx__FDNL=fast_first_index_of__NUZL(Self__DDNL->parent_variable__AJZD.require_list__UAEH,e__EDNL);
    if ((idx__FDNL > ((__FAST_ARRAYoWRITEo *)Self__DDNL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI)) {
      print__1ZE(Self__DDNL->parent_variable__AJZD.intern_name__025F);
      fputc((int)('\n'),stdout);
      print__1ZE((&__string_563));
      fputc((int)('\n'),stdout);
      exit(( 1));
    };
    remove__KWZL(Self__DDNL->parent_variable__AJZD.require_list__UAEH,idx__FDNL);
    if ((((__FAST_ARRAYoWRITEo *)Self__DDNL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI <  0)) {
      Self__DDNL->parent_variable__AJZD.require_list__UAEH=NULL;
    };
  };
}

static void unwrite__OGNL(__LOCAL *Self__PGNL,void *e__QGNL)
// ({LOCAL},{NULLxWRITE_GLOBALxWRITE_SLOTxWRITE_LOCAL}) VoidNo recursive, No inlinable.
{
  __INTEGER idx__RGNL;
  __BOOLEAN __tmp__SGNL,__tmp__1GNL;
  idx__RGNL= 0;
  switch (((struct ___OBJ *)e__QGNL)->__id) {
  case __WRITE_GLOBAL__: {
    __tmp__SGNL=((__WRITE_GLOBAL *)e__QGNL)->parent_write__QBGH.is_create__1BDI;
  } break;
  case __WRITE_SLOT__: {
    __tmp__SGNL=((__WRITE_SLOT *)e__QGNL)->parent_write__3BGH.is_create__1BDI;
  } break;
  case __WRITE_LOCAL__: {
    __tmp__SGNL=((__WRITE_LOCAL *)e__QGNL)->parent_write__X50I.is_create__1BDI;
  } break;
  };
  if ((! __tmp__SGNL)) {
    print__1ZE((&__string_460));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
  switch (((struct ___OBJ *)e__QGNL)->__id) {
  case __WRITE_GLOBAL__: {
    __tmp__1GNL=((__WRITE_GLOBAL *)e__QGNL)->parent_write__QBGH.is_delete__PDNL;
  } break;
  case __WRITE_SLOT__: {
    __tmp__1GNL=((__WRITE_SLOT *)e__QGNL)->parent_write__3BGH.is_delete__PDNL;
  } break;
  case __WRITE_LOCAL__: {
    __tmp__1GNL=((__WRITE_LOCAL *)e__QGNL)->parent_write__X50I.is_delete__PDNL;
  } break;
  };
  if (__tmp__1GNL) {
    print__1ZE((&__string_460));
    fputc((int)('\n'),stdout);
    exit(( 1));
  };
  switch (((struct ___OBJ *)e__QGNL)->__id) {
  case __WRITE_GLOBAL__: {
    ((__WRITE_GLOBAL *)e__QGNL)->parent_write__QBGH.is_delete__PDNL=TRUE__;
  } break;
  case __WRITE_SLOT__: {
    ((__WRITE_SLOT *)e__QGNL)->parent_write__3BGH.is_delete__PDNL=TRUE__;
  } break;
  case __WRITE_LOCAL__: {
    ((__WRITE_LOCAL *)e__QGNL)->parent_write__X50I.is_delete__PDNL=TRUE__;
  } break;
  };
  if ((((void *)Self__PGNL->last_seq__LRJJ != (void *)NULL) && ((void *)((__LOCAL_SEQ *)Self__PGNL->last_seq__LRJJ)->last_write__G1IL == (void *)e__QGNL))) {
    ((__LOCAL_SEQ *)Self__PGNL->last_seq__LRJJ)->last_write__G1IL=NULL;
  };
  if (((void *)Self__PGNL->parent_variable__B2LC.require_first__DAEH == (void *)e__QGNL)) {
    if (((void *)Self__PGNL->parent_variable__B2LC.require_list__UAEH != (void *)NULL)) {
      Self__PGNL->parent_variable__B2LC.require_first__DAEH=((void **)((__FAST_ARRAYoWRITEo *)Self__PGNL->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0];
      remove_first__XRAM(Self__PGNL->parent_variable__B2LC.require_list__UAEH);
      if ((((__FAST_ARRAYoWRITEo *)Self__PGNL->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI <  0)) {
        Self__PGNL->parent_variable__B2LC.require_list__UAEH=NULL;
      };
    } else {
      Self__PGNL->parent_variable__B2LC.require_first__DAEH=NULL;
    };
  } else {
    if (((void *)Self__PGNL->parent_variable__B2LC.require_list__UAEH == (void *)NULL)) {
      print__1ZE(Self__PGNL->parent_variable__B2LC.intern_name__025F);
      fputc((int)('\n'),stdout);
      print__1ZE((&__string_562));
      fputc((int)('\n'),stdout);
      exit(( 1));
    };
    idx__RGNL=fast_first_index_of__NUZL(Self__PGNL->parent_variable__B2LC.require_list__UAEH,e__QGNL);
    if ((idx__RGNL > ((__FAST_ARRAYoWRITEo *)Self__PGNL->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI)) {
      print__1ZE(Self__PGNL->parent_variable__B2LC.intern_name__025F);
      fputc((int)('\n'),stdout);
      print__1ZE((&__string_563));
      fputc((int)('\n'),stdout);
      exit(( 1));
    };
    remove__KWZL(Self__PGNL->parent_variable__B2LC.require_list__UAEH,idx__RGNL);
    if ((((__FAST_ARRAYoWRITEo *)Self__PGNL->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI <  0)) {
      Self__PGNL->parent_variable__B2LC.require_list__UAEH=NULL;
    };
  };
}

static __INTEGER fast_first_index_of__J0QJ(__FAST_ARRAYoTYPEo *Self__K0QJ,void *element__L0QJ)
// ({FAST_ARRAYoTYPEo},{TYPExTYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_GENERICxPROFIL_BLOCK}) With resultNo recursive, No inlinable.
{
  __INTEGER result__N0QJ,__tmp__W0QJ,idx__BT4J;
  void **__tmp__V0QJ,**Self__VS4J;
  result__N0QJ= 0;
  if ((Self__K0QJ->parent_arrayed_collection__UOB.upper__1OB >=  0)) {
    __tmp__V0QJ=Self__K0QJ->parent_arrayed_collection__UOB.storage__X2L;
    __tmp__W0QJ=Self__K0QJ->parent_arrayed_collection__UOB.upper__1OB;
    Self__VS4J=((void **)__tmp__V0QJ);
    idx__BT4J= 0;
    while ((! ((idx__BT4J > __tmp__W0QJ) || ((void *)element__L0QJ == (void *)Self__VS4J[idx__BT4J])))) {
      idx__BT4J=(__INTEGER)(idx__BT4J +  1);
    };
    result__N0QJ=idx__BT4J;
  };
  return(result__N0QJ);
}

static void* read_group__Z5BD(__PARSER *Self__05BD)
// ({PARSER}) With resultNo recursive, No inlinable.
{
  void *e__35BD;
  __ITM_RESULT *result__A4TD,*Self__E52D;
  __POINTER ptr__B4TD;
  __INTEGER typ_id__G4TD;
  __UINTEGER_32 sz__D4TD,a__PS2Q,new_size__NS2Q,t__TS2Q,a__VS2Q;
  __POSITION __tmp__G52D,pos__YAEQ;
  void *result__45BD;
  read_def_local__PCFC(Self__05BD);
  result__45BD=new__KFFC();
  e__35BD=read_expr__NTFC(Self__05BD);
  while ((((void *)e__35BD != (void *)NULL) && read_character__EQ3(';'))) {
    add_last__I4PC(result__45BD,e__35BD);
    e__35BD=read_expr__NTFC(Self__05BD);
  };
  if (((void *)e__35BD != (void *)NULL)) {
    if (read_character__EQ3(',')) {
      do {
        result__A4TD=NULL;
        ptr__B4TD=((__POINTER )(NULL));
        typ_id__G4TD= 0;
        sz__D4TD=((__UINTEGER_32 )sizeof(__ITM_RESULT));
        if ((sz__D4TD ==  0)) {
          result__A4TD=ITM_RESULT__;
        } else {
          typ_id__G4TD=-1;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__D4TD);
          if ((typ_id__G4TD == (__INTEGER)(-  1))) {
            a__PS2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__NS2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__D4TD + a__PS2Q) & (__UINTEGER_32)(~ a__PS2Q));
            ptr__B4TD=micro_alloc__table__lab__BOI(new_size__NS2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NS2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__NS2Q);
          } else {
            t__TS2Q=((__UINTEGER_32 )typ_id__G4TD);
            a__VS2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__B4TD=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__D4TD + a__VS2Q) & (__UINTEGER_32)(~ a__VS2Q)),((__POINTER )(&(table_type[(t__TS2Q)]))),(__UINTEGER_32)(t__TS2Q |  1));
          };
          result__A4TD=((__ITM_RESULT *)ptr__B4TD);
          *(result__A4TD) = *(ITM_RESULT__);
        };
        Self__E52D=((__ITM_RESULT *)result__A4TD);
        switch (((struct ___OBJ *)e__35BD)->__id) {
        case __ITM_LIST__: {
          __tmp__G52D=((__ITM_LIST *)e__35BD)->parent_itm_code__YVDC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_PROTOTYPE__: {
          __tmp__G52D=((__ITM_PROTOTYPE *)e__35BD)->parent_itm_constant__LHEC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_LIST_IDF__: {
          __tmp__G52D=((__ITM_LIST_IDF *)e__35BD)->parent_itm_code__NXFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_WRITE_VALUE__: {
          __tmp__G52D=((__ITM_WRITE_VALUE *)e__35BD)->parent_itm_write__DYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_WRITE_CAST__: {
          __tmp__G52D=((__ITM_WRITE_CAST *)e__35BD)->parent_itm_write__ZYFC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ__: {
          __tmp__G52D=((__ITM_READ *)e__35BD)->parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_WRITE_CODE__: {
          __tmp__G52D=((__ITM_WRITE_CODE *)e__35BD)->parent_itm_write__E2FC.parent_itm_code__CYFC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ_ARG2__: {
          __tmp__G52D=((__ITM_READ_ARG2 *)e__35BD)->parent_itm_read__V4FC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_BINARY__: {
          __tmp__G52D=((__ITM_BINARY *)e__35BD)->parent_itm_code__J5FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ_ARG1__: {
          __tmp__G52D=((__ITM_READ_ARG1 *)e__35BD)->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_OLD__: {
          __tmp__G52D=((__ITM_OLD *)e__35BD)->parent_itm_code__CIIC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_EXTERNAL_TYPE__: {
          __tmp__G52D=((__ITM_EXTERNAL_TYPE *)e__35BD)->parent_itm_extern__LXIC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_REAL__: {
          __tmp__G52D=((__ITM_REAL *)e__35BD)->parent_itm_constant__30IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_NUMBER__: {
          __tmp__G52D=((__ITM_NUMBER *)e__35BD)->parent_itm_constant__P1IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_CHARACTER__: {
          __tmp__G52D=((__ITM_CHARACTER *)e__35BD)->parent_itm_constant__B2IC.parent_itm_code__KHEC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_STRING__: {
          __tmp__G52D=((__ITM_STRING *)e__35BD)->parent_itm_code__S2IC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_EXTERNAL__: {
          __tmp__G52D=((__ITM_EXTERNAL *)e__35BD)->parent_itm_extern__MAJC.parent_itm_code__KXIC.parent_itm_object__X1CC.position__BJM;
        } break;
        case __ITM_READ_ARGS__: {
          __tmp__G52D=((__ITM_READ_ARGS *)e__35BD)->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM;
        } break;
        };
        Self__E52D->parent_itm_code__FBCD.parent_itm_object__X1CC.position__BJM=__tmp__G52D;
        Self__E52D->value__H52D=e__35BD;
        add_last__I4PC(result__45BD,result__A4TD);
        e__35BD=read_expr__NTFC(Self__05BD);
        while ((((void *)e__35BD != (void *)NULL) && read_character__EQ3(';'))) {
          add_last__I4PC(result__45BD,e__35BD);
          e__35BD=read_expr__NTFC(Self__05BD);
        };
        if (((void *)e__35BD == (void *)NULL)) {
          pos__YAEQ=current_position__EJG();
          put_error__text__0AH( 0,(&__string_564));
          put_position__ECH(pos__YAEQ);
          send_error__2FH();
        };
      } while (read_character__EQ3(','));
      add_last__I4PC(result__45BD,e__35BD);
    } else {
      add_last__I4PC(result__45BD,e__35BD);
    };
  } else {
    add_last__I4PC(result__45BD,create__type__1GFC(current_position__EJG(),type_void__NHEC));
  };
  return(copy__CHFC(result__45BD));
}

static void** create__V0TE(__INTEGER nb_elements__X0TE)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__TFKF;
  void **Result__GJZE;
  Result__GJZE=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__X0TE * ((__INTEGER )(sizeof(void *)))))));
  Self__TFKF=(__INTEGER)(nb_elements__X0TE -  1);
  while ((Self__TFKF >=  0)) {
    Result__GJZE[Self__TFKF]=NULL;
    Self__TFKF=(__INTEGER)(Self__TFKF -  1);
  };
  return(Result__GJZE);
}

static __INTEGER hash_code__DRBE(__FAST_ARRAYoSTRING_CONSTANTo *Self__ERBE)
// ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
{
  __INTEGER result__GRBE;
  __BOOLEAN __tmp__XRBE;
  result__GRBE= 0;
  if ((! (Self__ERBE->parent_arrayed_collection__VTFC.upper__RSSD <  0))) {
    if (((void *)((void **)Self__ERBE->parent_arrayed_collection__VTFC.storage__FB0D)[Self__ERBE->parent_arrayed_collection__VTFC.upper__RSSD] != (void *)NULL)) {
      result__GRBE=hash_code__WPN(((void **)Self__ERBE->parent_arrayed_collection__VTFC.storage__FB0D)[Self__ERBE->parent_arrayed_collection__VTFC.upper__RSSD]);
      __tmp__XRBE=TRUE__;
    } else {
      __tmp__XRBE=FALSE__;
    };
    if ((! __tmp__XRBE)) {
      if (((void *)((void **)Self__ERBE->parent_arrayed_collection__VTFC.storage__FB0D)[ 0] != (void *)NULL)) {
        result__GRBE=hash_code__WPN(((void **)Self__ERBE->parent_arrayed_collection__VTFC.storage__FB0D)[ 0]);
      };
    };
  };
  return(result__GRBE);
}

static __BOOLEAN fast_has__10CE(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__20CE,void *e__30CE)
// ({HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
{
  void *node__G1CE;
  node__G1CE=((void **)Self__20CE->buckets__YS0D)[(__INTEGER)(hash_code__DRBE(e__30CE) % Self__20CE->capacity__TS0D)];
  while ((! (((void *)node__G1CE == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__G1CE)->item__ET0D == (void *)e__30CE)))) {
    node__G1CE=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__G1CE)->next__QT0D;
  };
  return(((void *)node__G1CE != (void *)NULL));
}

static void* new__2MFC()
// () With resultNo recursive, No inlinable.
{
  void *result__5MFC;
  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__YAZC,*Self__OBZC;
  result__5MFC=NULL;
  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FNFC)->parent_arrayed_collection__ENFC.upper__LCPC <  0)) {
    result__5MFC=create_with_capacity__XLGC( 16);
  } else {
    Self__YAZC=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FNFC);
    result__5MFC=((void **)Self__YAZC->parent_arrayed_collection__ENFC.storage__LKPC)[Self__YAZC->parent_arrayed_collection__ENFC.upper__LCPC];
    Self__OBZC=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FNFC);
    Self__OBZC->parent_arrayed_collection__ENFC.upper__LCPC=(__INTEGER)(Self__OBZC->parent_arrayed_collection__ENFC.upper__LCPC -  1);
  };
  return(result__5MFC);
}

static void add_last__0VPC(__FAST_ARRAYoITM_LOCALo *Self__1VPC,void *element__2VPC)
// ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__3VPC,__tmp__BXPC,__tmp__AY0D,Self__ZYIF;
  __BOOLEAN __tmp__LWPC;
  void **__tmp__AXPC,**new__NX0D;
  new_capacity__3VPC= 0;
  if (((__INTEGER)(Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC +  1) <= (__INTEGER)(Self__1VPC->parent_arrayed_collection__WCFC.capacity__1LPC -  1))) {
    Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC=(__INTEGER)(Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC +  1);
    __tmp__LWPC=TRUE__;
  } else {
    __tmp__LWPC=FALSE__;
  };
  if ((! __tmp__LWPC)) {
    if ((Self__1VPC->parent_arrayed_collection__WCFC.capacity__1LPC ==  0)) {
      Self__1VPC->parent_arrayed_collection__WCFC.storage__GMPC=create__PNBD( 2);
      Self__1VPC->parent_arrayed_collection__WCFC.capacity__1LPC= 2;
      Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC= 0;
    } else {
      new_capacity__3VPC=(__INTEGER)(Self__1VPC->parent_arrayed_collection__WCFC.capacity__1LPC <<  1);
      __tmp__AXPC=Self__1VPC->parent_arrayed_collection__WCFC.storage__GMPC;
      __tmp__BXPC=Self__1VPC->parent_arrayed_collection__WCFC.capacity__1LPC;
      new__NX0D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__AXPC)),((__UINTEGER_32 )(__INTEGER)(__tmp__BXPC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3VPC * ((__INTEGER )(sizeof(void *)))))));
      __tmp__AY0D=(__INTEGER)(new_capacity__3VPC -  1);
      Self__ZYIF=__tmp__BXPC;
      while ((Self__ZYIF <= __tmp__AY0D)) {
        new__NX0D[Self__ZYIF]=NULL;
        Self__ZYIF=(__INTEGER)(Self__ZYIF +  1);
      };
      Self__1VPC->parent_arrayed_collection__WCFC.storage__GMPC=new__NX0D;
      Self__1VPC->parent_arrayed_collection__WCFC.capacity__1LPC=new_capacity__3VPC;
      Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC=(__INTEGER)(Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC +  1);
    };
  };
  ((void **)Self__1VPC->parent_arrayed_collection__WCFC.storage__GMPC)[Self__1VPC->parent_arrayed_collection__WCFC.upper__3XGC]=element__2VPC;
}

static void free__3LGC(void *tmp__5LGC)
// ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__QOPC,__tmp__UPPC,__tmp__TM0D,Self__HUIF;
  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__OOPC;
  __BOOLEAN __tmp__4OPC;
  void **__tmp__TPPC,**new__AM0D;
  ((__FAST_ARRAYoITM_LOCALo *)tmp__5LGC)->parent_arrayed_collection__WCFC.upper__3XGC=(__INTEGER)(-  1);
  Self__OOPC=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FNFC);
  new_capacity__QOPC= 0;
  if (((__INTEGER)(Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC +  1) <= (__INTEGER)(Self__OOPC->parent_arrayed_collection__ENFC.capacity__AKPC -  1))) {
    Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC=(__INTEGER)(Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC +  1);
    __tmp__4OPC=TRUE__;
  } else {
    __tmp__4OPC=FALSE__;
  };
  if ((! __tmp__4OPC)) {
    if ((Self__OOPC->parent_arrayed_collection__ENFC.capacity__AKPC ==  0)) {
      Self__OOPC->parent_arrayed_collection__ENFC.storage__LKPC=create__XKBD( 2);
      Self__OOPC->parent_arrayed_collection__ENFC.capacity__AKPC= 2;
      Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC= 0;
    } else {
      new_capacity__QOPC=(__INTEGER)(Self__OOPC->parent_arrayed_collection__ENFC.capacity__AKPC <<  1);
      __tmp__TPPC=Self__OOPC->parent_arrayed_collection__ENFC.storage__LKPC;
      __tmp__UPPC=Self__OOPC->parent_arrayed_collection__ENFC.capacity__AKPC;
      new__AM0D=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__TPPC)),((__UINTEGER_32 )(__INTEGER)(__tmp__UPPC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__QOPC * ((__INTEGER )(sizeof(void *)))))));
      __tmp__TM0D=(__INTEGER)(new_capacity__QOPC -  1);
      Self__HUIF=__tmp__UPPC;
      while ((Self__HUIF <= __tmp__TM0D)) {
        new__AM0D[Self__HUIF]=NULL;
        Self__HUIF=(__INTEGER)(Self__HUIF +  1);
      };
      Self__OOPC->parent_arrayed_collection__ENFC.storage__LKPC=new__AM0D;
      Self__OOPC->parent_arrayed_collection__ENFC.capacity__AKPC=new_capacity__QOPC;
      Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC=(__INTEGER)(Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC +  1);
    };
  };
  ((void **)Self__OOPC->parent_arrayed_collection__ENFC.storage__LKPC)[Self__OOPC->parent_arrayed_collection__ENFC.upper__LCPC]=tmp__5LGC;
}

static void* copy__QFGC(void *tmp__SFGC)
// ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
{
  __INTEGER new_capacity__SLPC,other_upper__RLPC,Self__Q35D;
  void *result__UFGC;
  __FAST_ARRAYoITM_LOCALo *Self__PLPC;
  void **__tmp__JMPC,**__tmp__LMPC,**Self__KQZD;
  result__UFGC=create_with_capacity__XLGC((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__SFGC)->parent_arrayed_collection__WCFC.upper__3XGC +  1));
  Self__PLPC=((__FAST_ARRAYoITM_LOCALo *)result__UFGC);
  new_capacity__SLPC= 0;
  other_upper__RLPC=((__FAST_ARRAYoITM_LOCALo *)tmp__SFGC)->parent_arrayed_collection__WCFC.upper__3XGC;
  if ((other_upper__RLPC >=  0)) {
    new_capacity__SLPC=(__INTEGER)(other_upper__RLPC +  1);
    if ((Self__PLPC->parent_arrayed_collection__WCFC.capacity__1LPC < new_capacity__SLPC)) {
      Self__PLPC->parent_arrayed_collection__WCFC.storage__GMPC=create__PNBD(new_capacity__SLPC);
      Self__PLPC->parent_arrayed_collection__WCFC.capacity__1LPC=new_capacity__SLPC;
    };
    __tmp__JMPC=Self__PLPC->parent_arrayed_collection__WCFC.storage__GMPC;
    __tmp__LMPC=((__FAST_ARRAYoITM_LOCALo *)tmp__SFGC)->parent_arrayed_collection__WCFC.storage__GMPC;
    Self__KQZD=((void **)__tmp__JMPC);
    Self__Q35D=other_upper__RLPC;
    while ((Self__Q35D >=  0)) {
      Self__KQZD[Self__Q35D]=((void **)__tmp__LMPC)[Self__Q35D];
      Self__Q35D=(__INTEGER)(Self__Q35D -  1);
    };
  };
  Self__PLPC->parent_arrayed_collection__WCFC.upper__3XGC=other_upper__RLPC;
  free__3LGC(tmp__SFGC);
  return(result__UFGC);
}

static void append_collection__5LEF(__FAST_ARRAYoITM_LOCALo *Self__AMEF,void *other__BMEF)
// ({FAST_ARRAYoITM_LOCALo},{NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__LMEF,Self__YEIF;
  __tmp__LMEF=((__FAST_ARRAYoITM_LOCALo *)other__BMEF)->parent_arrayed_collection__WCFC.upper__3XGC;
  Self__YEIF= 0;
  while ((Self__YEIF <= __tmp__LMEF)) {
    add_last__0VPC(Self__AMEF,((void **)((__FAST_ARRAYoITM_LOCALo *)other__BMEF)->parent_arrayed_collection__WCFC.storage__GMPC)[Self__YEIF]);
    Self__YEIF=(__INTEGER)(Self__YEIF +  1);
  };
}

static __FAST_ARRAYoITM_CODEo* create_with_capacity__GQFC(__INTEGER new_count__IQFC)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__VAGC;
  __INTEGER typ_id__0AGC;
  __UINTEGER_32 sz__XAGC,a__ZT2Q,new_size__XT2Q,t__3T2Q,a__5T2Q;
  __FAST_ARRAYoITM_CODEo *result__UAGC,*Self__1CPC;
  result__UAGC=NULL;
  ptr__VAGC=((__POINTER )(NULL));
  typ_id__0AGC= 0;
  sz__XAGC=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
  if ((sz__XAGC ==  0)) {
    result__UAGC=FAST_ARRAYoITM_CODEo__;
  } else {
    typ_id__0AGC=__FAST_ARRAYoITM_CODEo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__XAGC);
    if ((typ_id__0AGC == (__INTEGER)(-  1))) {
      a__ZT2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__XT2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__XAGC + a__ZT2Q) & (__UINTEGER_32)(~ a__ZT2Q));
      ptr__VAGC=micro_alloc__table__lab__BOI(new_size__XT2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XT2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__XT2Q);
    } else {
      t__3T2Q=((__UINTEGER_32 )typ_id__0AGC);
      a__5T2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__VAGC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__XAGC + a__5T2Q) & (__UINTEGER_32)(~ a__5T2Q)),((__POINTER )(&(table_type[(t__3T2Q)]))),(__UINTEGER_32)(t__3T2Q |  1));
    };
    result__UAGC=((__FAST_ARRAYoITM_CODEo *)ptr__VAGC);
    *(result__UAGC) = *(FAST_ARRAYoITM_CODEo__);
  };
  Self__1CPC=((__FAST_ARRAYoITM_CODEo *)result__UAGC);
  if ((Self__1CPC->parent_arrayed_collection__AFEC.capacity__VBPC < new_count__IQFC)) {
    Self__1CPC->parent_arrayed_collection__AFEC.storage__ACPC=create__UFBD(new_count__IQFC);
    Self__1CPC->parent_arrayed_collection__AFEC.capacity__VBPC=new_count__IQFC;
  };
  Self__1CPC->parent_arrayed_collection__AFEC.upper__ZAPC=(__INTEGER)(-  1);
  return(result__UAGC);
}

static void** create__UFBD(__INTEGER nb_elements__WFBD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__AOAE;
  void **Result__ZIGD;
  Result__ZIGD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__WFBD * ((__INTEGER )(sizeof(void *)))))));
  Self__AOAE=(__INTEGER)(nb_elements__WFBD -  1);
  while ((Self__AOAE >=  0)) {
    Result__ZIGD[Self__AOAE]=NULL;
    Self__AOAE=(__INTEGER)(Self__AOAE -  1);
  };
  return(Result__ZIGD);
}

static __ITM_READ_ARG1* create__name__arg__3AIC(__POSITION p__5AIC,void *n__ABIC,void *a__BBIC)
// ({POSITION},{NULLxSTRING_CONSTANT},{NULLxITM_LISTxITM_PROTOTYPExITM_READxITM_READ_ARG2xITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS}) With resultNo recursive, No inlinable.
{
  __ITM_READ_ARG1 *result__CGIC,*Self__JVPC;
  __POINTER ptr__DGIC;
  __INTEGER typ_id__IGIC;
  __UINTEGER_32 sz__FGIC,a__EU2Q,new_size__CU2Q,t__IU2Q,a__KU2Q;
  result__CGIC=NULL;
  ptr__DGIC=((__POINTER )(NULL));
  typ_id__IGIC= 0;
  sz__FGIC=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
  if ((sz__FGIC ==  0)) {
    result__CGIC=ITM_READ_ARG1__;
  } else {
    typ_id__IGIC=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__FGIC);
    if ((typ_id__IGIC == (__INTEGER)(-  1))) {
      a__EU2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__CU2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__FGIC + a__EU2Q) & (__UINTEGER_32)(~ a__EU2Q));
      ptr__DGIC=micro_alloc__table__lab__BOI(new_size__CU2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CU2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__CU2Q);
    } else {
      t__IU2Q=((__UINTEGER_32 )typ_id__IGIC);
      a__KU2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__DGIC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__FGIC + a__KU2Q) & (__UINTEGER_32)(~ a__KU2Q)),((__POINTER )(&(table_type[(t__IU2Q)]))),(__UINTEGER_32)(t__IU2Q |  1));
    };
    result__CGIC=((__ITM_READ_ARG1 *)ptr__DGIC);
    *(result__CGIC) = *(ITM_READ_ARG1__);
  };
  Self__JVPC=((__ITM_READ_ARG1 *)result__CGIC);
  Self__JVPC->parent_itm_read__S5GC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM=p__5AIC;
  Self__JVPC->parent_itm_read__S5GC.name__TVPC=n__ABIC;
  Self__JVPC->arg__UVPC=a__BBIC;
  return(result__CGIC);
}

static void* read_send_msg__L0JC(__PARSER *Self__M0JC,void *first_arg__N0JC)
// ({PARSER},{NULLxITM_LISTxITM_PROTOTYPExITM_READxITM_READ_ARG2xITM_READ_ARG1xITM_OLDxITM_EXTERNAL_TYPExITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_EXTERNALxITM_READ_ARGS}) With resultNo recursive, No inlinable.
{
  void *result__P0JC,*arg__T0JC,*tmp__UALD;
  void *n__R0JC;
  __POSITION pos__WIEQ,p__OKLC;
  void *result__ZIEQ;
  __INTEGER Self__5JTD,typ_id__PPLC;
  __ITM_READ_ARGS *result__JPLC,*Self__PEQC;
  __POINTER ptr__KPLC;
  __UINTEGER_32 sz__MPLC,a__NV2Q,new_size__LV2Q,t__RV2Q,a__TV2Q;
  void *l_arg__S0JC;
  __BOOLEAN __tmp__R4JC;
  __FAST_ARRAYoITM_CODEo *Self__1BQC;
  void **__tmp__N45Q,**__tmp__O45Q,**__tmp__P45Q;
  result__P0JC=NULL;
  n__R0JC=NULL;
  l_arg__S0JC=NULL;
  arg__T0JC=NULL;
  if (read_identifier__OLEB()) {
    n__R0JC=new__5ALC();
    copy__BNK(n__R0JC,last_string__V1G);
    l_arg__S0JC=new__KFFC();
    arg__T0JC=read_argument__VBLC(Self__M0JC);
    if (((void *)arg__T0JC != (void *)NULL)) {
      add_last__I4PC(l_arg__S0JC,arg__T0JC);
      while (read_identifier__OLEB()) {
        append__MOK(n__R0JC,(&__string_92));
        append__MOK(n__R0JC,last_string__V1G);
        arg__T0JC=read_argument__VBLC(Self__M0JC);
        if (((void *)arg__T0JC == (void *)NULL)) {
          pos__WIEQ=current_position__EJG();
          put_error__text__0AH( 0,(&__string_565));
          put_position__ECH(pos__WIEQ);
          send_error__2FH();
        };
        add_last__I4PC(l_arg__S0JC,arg__T0JC);
      };
    };
    result__ZIEQ=get__QEC(n__R0JC);
    add_last__00X(free__DBLC,n__R0JC);
    ((__STRING *)n__R0JC)->count__VF= 0;
    if ((((__FAST_ARRAYoITM_CODEo *)l_arg__S0JC)->parent_arrayed_collection__AFEC.upper__ZAPC <  0)) {
      if (((void *)first_arg__N0JC == (void *)NULL)) {
        result__P0JC=create__name__Q5JC(current_position__EJG(),result__ZIEQ);
      } else {
        result__P0JC=create__name__arg__3AIC(current_position__EJG(),result__ZIEQ,first_arg__N0JC);
      };
      free__MQFC(l_arg__S0JC);
      __tmp__R4JC=TRUE__;
    } else {
      __tmp__R4JC=FALSE__;
    };
    if ((! __tmp__R4JC)) {
      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_arg__S0JC)->parent_arrayed_collection__AFEC.upper__ZAPC +  1) ==  1)) {
        result__P0JC=create__name__args__BKLC(current_position__EJG(),result__ZIEQ,first_arg__N0JC,((void **)((__FAST_ARRAYoITM_CODEo *)l_arg__S0JC)->parent_arrayed_collection__AFEC.storage__ACPC)[ 0]);
        free__MQFC(l_arg__S0JC);
      } else {
        Self__1BQC=((__FAST_ARRAYoITM_CODEo *)l_arg__S0JC);
        add_last__I4PC(Self__1BQC,first_arg__N0JC);
        if ((Self__1BQC->parent_arrayed_collection__AFEC.upper__ZAPC !=  0)) {
          if ((Self__1BQC->parent_arrayed_collection__AFEC.upper__ZAPC ==  1)) {
            tmp__UALD=((void **)Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC)[ 0];
            ((void **)Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC)[ 0]=((void **)Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC)[ 1];
            ((void **)Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC)[ 1]=tmp__UALD;
          } else {
            Self__5JTD=(__INTEGER)(Self__1BQC->parent_arrayed_collection__AFEC.upper__ZAPC -  1);
            __tmp__N45Q=Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC;
            __tmp__O45Q=Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC;
            __tmp__P45Q=Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC;
            while ((Self__5JTD >=  0)) {
              ((void **)__tmp__O45Q)[(__INTEGER)(Self__5JTD +  1)]=((void **)__tmp__N45Q)[Self__5JTD];
              ((void **)__tmp__P45Q)[Self__5JTD]=NULL;
              Self__5JTD=(__INTEGER)(Self__5JTD -  1);
            };
            ((void **)Self__1BQC->parent_arrayed_collection__AFEC.storage__ACPC)[ 0]=first_arg__N0JC;
          };
        };
        l_arg__S0JC=copy__CHFC(l_arg__S0JC);
        p__OKLC=current_position__EJG();
        result__JPLC=NULL;
        ptr__KPLC=((__POINTER )(NULL));
        typ_id__PPLC= 0;
        sz__MPLC=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
        if ((sz__MPLC ==  0)) {
          result__JPLC=ITM_READ_ARGS__;
        } else {
          typ_id__PPLC=-1;
          clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__MPLC);
          if ((typ_id__PPLC == (__INTEGER)(-  1))) {
            a__NV2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            new_size__LV2Q=(__UINTEGER_32)((__UINTEGER_32)(sz__MPLC + a__NV2Q) & (__UINTEGER_32)(~ a__NV2Q));
            ptr__KPLC=micro_alloc__table__lab__BOI(new_size__LV2Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LV2Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__LV2Q);
          } else {
            t__RV2Q=((__UINTEGER_32 )typ_id__PPLC);
            a__TV2Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
            ptr__KPLC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__MPLC + a__TV2Q) & (__UINTEGER_32)(~ a__TV2Q)),((__POINTER )(&(table_type[(t__RV2Q)]))),(__UINTEGER_32)(t__RV2Q |  1));
          };
          result__JPLC=((__ITM_READ_ARGS *)ptr__KPLC);
          *(result__JPLC) = *(ITM_READ_ARGS__);
        };
        Self__PEQC=((__ITM_READ_ARGS *)result__JPLC);
        Self__PEQC->parent_itm_read__J5JC.parent_itm_code__G1FC.parent_itm_object__X1CC.position__BJM=p__OKLC;
        Self__PEQC->parent_itm_read__J5JC.name__TVPC=result__ZIEQ;
        Self__PEQC->args__TEQC=l_arg__S0JC;
        result__P0JC=result__JPLC;
      };
    };
  };
  return(result__P0JC);
}

static void* search_require__AS4L(__TYPE *Self__BS4L,void *n__CS4L)
// ({TYPE},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__FS4L,*__tmp__4T4L;
  void *typ__GS4L;
  __INTEGER j__ES4L;
  void *__tmp__WS4L,*__tmp__KT4L;
  void *__tmp__XS4L;
  __SECTION_ *Self__0KKQ;
  void *__tmp__LT4L;
  void *__tmp__NT4L;
  __BOOLEAN __tmp__BT4L;
  result__FS4L=NULL;
  typ__GS4L=NULL;
  j__ES4L= 0;
  while_do__V1AM:
  {
    if ((j__ES4L <= ((__FAST_ARRAYoSLOTo *)Self__BS4L->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__WS4L=((void **)((__FAST_ARRAYoSLOTo *)Self__BS4L->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ES4L];
      if (((struct ___OBJ *)__tmp__WS4L)->__id==__SLOT_DATA__) {
        __tmp__XS4L=id_section__UG4F(__tmp__WS4L);
      } else {
        __tmp__XS4L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__WS4L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__0KKQ=((__SECTION_ *)__tmp__XS4L);
      __tmp__BT4L=(((void *)Self__0KKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__0KKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__BT4L=FALSE__;
    };
    if ((__tmp__BT4L && ((void *)result__FS4L == (void *)NULL))) {
      __tmp__KT4L=((void **)((__FAST_ARRAYoSLOTo *)Self__BS4L->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ES4L];
      if (((struct ___OBJ *)__tmp__KT4L)->__id==__SLOT_DATA__) {
        __tmp__LT4L=get_type_result__PG2G(__tmp__KT4L);
      } else {
        __tmp__LT4L=get_type_result__ZH2G(__tmp__KT4L);
      };
      typ__GS4L=((__TYPE_FULL *)__tmp__LT4L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__GS4L)->__id) {
      case __TYPE__: {
        __tmp__NT4L=((__TYPE *)typ__GS4L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__NT4L=((__TYPE_NULL *)typ__GS4L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__NT4L=((__TYPE_VOID *)typ__GS4L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__NT4L=((__TYPE_CONTEXT *)typ__GS4L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__NT4L=((__TYPE_ID *)typ__GS4L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__NT4L=((__TYPE_GENERIC *)typ__GS4L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__NT4L=prototype__IMEJ();
      } break;
      };
      result__FS4L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__NT4L)->slot_list__3IM,n__CS4L);
      if ((((void *)result__FS4L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__FS4L)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__GS4L)->__id) {
        case __TYPE__: {
          __tmp__4T4L=search_require__AS4L(typ__GS4L,n__CS4L);
        } break;
        case __TYPE_NULL__: {
          __tmp__4T4L=search_require__HU4L(typ__GS4L,n__CS4L);
        } break;
        case __TYPE_VOID__: {
          __tmp__4T4L=search_require__OW4L(typ__GS4L,n__CS4L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__4T4L=search_require__VY4L(typ__GS4L,n__CS4L);
        } break;
        case __TYPE_ID__: {
          __tmp__4T4L=search_require__204L(typ__GS4L,n__CS4L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__4T4L=search_require__D34L(typ__GS4L,n__CS4L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__4T4L=search_require__LUBN(typ__GS4L,n__CS4L);
        } break;
        };
        result__FS4L=__tmp__4T4L;
      } else {
        last_type_contract__VORL=typ__GS4L;
      };
      j__ES4L=(__INTEGER)(j__ES4L +  1);
      goto while_do__V1AM;
    };
  };
  return(result__FS4L);
}

static void* search_require__HU4L(__TYPE_NULL *Self__IU4L,void *n__JU4L)
// ({TYPE_NULL},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__MU4L,*__tmp__FW4L;
  void *typ__NU4L;
  __INTEGER j__LU4L;
  void *__tmp__3U4L,*__tmp__RV4L;
  void *__tmp__4U4L;
  __SECTION_ *Self__1KKQ;
  void *__tmp__SV4L;
  void *__tmp__UV4L;
  __BOOLEAN __tmp__IV4L;
  result__MU4L=NULL;
  typ__NU4L=NULL;
  j__LU4L= 0;
  while_do__A2AM:
  {
    if ((j__LU4L <= ((__FAST_ARRAYoSLOTo *)Self__IU4L->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__3U4L=((void **)((__FAST_ARRAYoSLOTo *)Self__IU4L->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__LU4L];
      if (((struct ___OBJ *)__tmp__3U4L)->__id==__SLOT_DATA__) {
        __tmp__4U4L=id_section__UG4F(__tmp__3U4L);
      } else {
        __tmp__4U4L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__3U4L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__1KKQ=((__SECTION_ *)__tmp__4U4L);
      __tmp__IV4L=(((void *)Self__1KKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__1KKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__IV4L=FALSE__;
    };
    if ((__tmp__IV4L && ((void *)result__MU4L == (void *)NULL))) {
      __tmp__RV4L=((void **)((__FAST_ARRAYoSLOTo *)Self__IU4L->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__LU4L];
      if (((struct ___OBJ *)__tmp__RV4L)->__id==__SLOT_DATA__) {
        __tmp__SV4L=get_type_result__PG2G(__tmp__RV4L);
      } else {
        __tmp__SV4L=get_type_result__ZH2G(__tmp__RV4L);
      };
      typ__NU4L=((__TYPE_FULL *)__tmp__SV4L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__NU4L)->__id) {
      case __TYPE__: {
        __tmp__UV4L=((__TYPE *)typ__NU4L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__UV4L=((__TYPE_NULL *)typ__NU4L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__UV4L=((__TYPE_VOID *)typ__NU4L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__UV4L=((__TYPE_CONTEXT *)typ__NU4L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__UV4L=((__TYPE_ID *)typ__NU4L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__UV4L=((__TYPE_GENERIC *)typ__NU4L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__UV4L=prototype__IMEJ();
      } break;
      };
      result__MU4L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__UV4L)->slot_list__3IM,n__JU4L);
      if ((((void *)result__MU4L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__MU4L)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__NU4L)->__id) {
        case __TYPE__: {
          __tmp__FW4L=search_require__AS4L(typ__NU4L,n__JU4L);
        } break;
        case __TYPE_NULL__: {
          __tmp__FW4L=search_require__HU4L(typ__NU4L,n__JU4L);
        } break;
        case __TYPE_VOID__: {
          __tmp__FW4L=search_require__OW4L(typ__NU4L,n__JU4L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__FW4L=search_require__VY4L(typ__NU4L,n__JU4L);
        } break;
        case __TYPE_ID__: {
          __tmp__FW4L=search_require__204L(typ__NU4L,n__JU4L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__FW4L=search_require__D34L(typ__NU4L,n__JU4L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__FW4L=search_require__LUBN(typ__NU4L,n__JU4L);
        } break;
        };
        result__MU4L=__tmp__FW4L;
      } else {
        last_type_contract__VORL=typ__NU4L;
      };
      j__LU4L=(__INTEGER)(j__LU4L +  1);
      goto while_do__A2AM;
    };
  };
  return(result__MU4L);
}

static void* search_require__OW4L(__TYPE_VOID *Self__PW4L,void *n__QW4L)
// ({TYPE_VOID},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__TW4L,*__tmp__MY4L;
  void *typ__UW4L;
  __INTEGER j__SW4L;
  void *__tmp__EX4L,*__tmp__YX4L;
  void *__tmp__FX4L;
  __SECTION_ *Self__2KKQ;
  void *__tmp__ZX4L;
  void *__tmp__1X4L;
  __BOOLEAN __tmp__PX4L;
  result__TW4L=NULL;
  typ__UW4L=NULL;
  j__SW4L= 0;
  while_do__L2AM:
  {
    if ((j__SW4L <= ((__FAST_ARRAYoSLOTo *)Self__PW4L->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__EX4L=((void **)((__FAST_ARRAYoSLOTo *)Self__PW4L->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__SW4L];
      if (((struct ___OBJ *)__tmp__EX4L)->__id==__SLOT_DATA__) {
        __tmp__FX4L=id_section__UG4F(__tmp__EX4L);
      } else {
        __tmp__FX4L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__EX4L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__2KKQ=((__SECTION_ *)__tmp__FX4L);
      __tmp__PX4L=(((void *)Self__2KKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__2KKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__PX4L=FALSE__;
    };
    if ((__tmp__PX4L && ((void *)result__TW4L == (void *)NULL))) {
      __tmp__YX4L=((void **)((__FAST_ARRAYoSLOTo *)Self__PW4L->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__SW4L];
      if (((struct ___OBJ *)__tmp__YX4L)->__id==__SLOT_DATA__) {
        __tmp__ZX4L=get_type_result__PG2G(__tmp__YX4L);
      } else {
        __tmp__ZX4L=get_type_result__ZH2G(__tmp__YX4L);
      };
      typ__UW4L=((__TYPE_FULL *)__tmp__ZX4L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__UW4L)->__id) {
      case __TYPE__: {
        __tmp__1X4L=((__TYPE *)typ__UW4L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__1X4L=((__TYPE_NULL *)typ__UW4L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__1X4L=((__TYPE_VOID *)typ__UW4L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__1X4L=((__TYPE_CONTEXT *)typ__UW4L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__1X4L=((__TYPE_ID *)typ__UW4L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__1X4L=((__TYPE_GENERIC *)typ__UW4L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__1X4L=prototype__IMEJ();
      } break;
      };
      result__TW4L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__1X4L)->slot_list__3IM,n__QW4L);
      if ((((void *)result__TW4L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__TW4L)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__UW4L)->__id) {
        case __TYPE__: {
          __tmp__MY4L=search_require__AS4L(typ__UW4L,n__QW4L);
        } break;
        case __TYPE_NULL__: {
          __tmp__MY4L=search_require__HU4L(typ__UW4L,n__QW4L);
        } break;
        case __TYPE_VOID__: {
          __tmp__MY4L=search_require__OW4L(typ__UW4L,n__QW4L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__MY4L=search_require__VY4L(typ__UW4L,n__QW4L);
        } break;
        case __TYPE_ID__: {
          __tmp__MY4L=search_require__204L(typ__UW4L,n__QW4L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__MY4L=search_require__D34L(typ__UW4L,n__QW4L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__MY4L=search_require__LUBN(typ__UW4L,n__QW4L);
        } break;
        };
        result__TW4L=__tmp__MY4L;
      } else {
        last_type_contract__VORL=typ__UW4L;
      };
      j__SW4L=(__INTEGER)(j__SW4L +  1);
      goto while_do__L2AM;
    };
  };
  return(result__TW4L);
}

static void* search_require__VY4L(__TYPE_CONTEXT *Self__WY4L,void *n__XY4L)
// ({TYPE_CONTEXT},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__0Y4L,*__tmp__T04L;
  void *typ__1Y4L;
  __INTEGER j__ZY4L;
  void *__tmp__LZ4L,*__tmp__5Z4L;
  void *__tmp__MZ4L;
  __SECTION_ *Self__3KKQ;
  void *__tmp__A04L;
  void *__tmp__C04L;
  __BOOLEAN __tmp__WZ4L;
  result__0Y4L=NULL;
  typ__1Y4L=NULL;
  j__ZY4L= 0;
  while_do__W2AM:
  {
    if ((j__ZY4L <= ((__FAST_ARRAYoSLOTo *)Self__WY4L->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__LZ4L=((void **)((__FAST_ARRAYoSLOTo *)Self__WY4L->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ZY4L];
      if (((struct ___OBJ *)__tmp__LZ4L)->__id==__SLOT_DATA__) {
        __tmp__MZ4L=id_section__UG4F(__tmp__LZ4L);
      } else {
        __tmp__MZ4L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__LZ4L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__3KKQ=((__SECTION_ *)__tmp__MZ4L);
      __tmp__WZ4L=(((void *)Self__3KKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__3KKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__WZ4L=FALSE__;
    };
    if ((__tmp__WZ4L && ((void *)result__0Y4L == (void *)NULL))) {
      __tmp__5Z4L=((void **)((__FAST_ARRAYoSLOTo *)Self__WY4L->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__ZY4L];
      if (((struct ___OBJ *)__tmp__5Z4L)->__id==__SLOT_DATA__) {
        __tmp__A04L=get_type_result__PG2G(__tmp__5Z4L);
      } else {
        __tmp__A04L=get_type_result__ZH2G(__tmp__5Z4L);
      };
      typ__1Y4L=((__TYPE_FULL *)__tmp__A04L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__1Y4L)->__id) {
      case __TYPE__: {
        __tmp__C04L=((__TYPE *)typ__1Y4L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__C04L=((__TYPE_NULL *)typ__1Y4L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__C04L=((__TYPE_VOID *)typ__1Y4L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__C04L=((__TYPE_CONTEXT *)typ__1Y4L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__C04L=((__TYPE_ID *)typ__1Y4L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__C04L=((__TYPE_GENERIC *)typ__1Y4L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__C04L=prototype__IMEJ();
      } break;
      };
      result__0Y4L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__C04L)->slot_list__3IM,n__XY4L);
      if ((((void *)result__0Y4L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__0Y4L)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__1Y4L)->__id) {
        case __TYPE__: {
          __tmp__T04L=search_require__AS4L(typ__1Y4L,n__XY4L);
        } break;
        case __TYPE_NULL__: {
          __tmp__T04L=search_require__HU4L(typ__1Y4L,n__XY4L);
        } break;
        case __TYPE_VOID__: {
          __tmp__T04L=search_require__OW4L(typ__1Y4L,n__XY4L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__T04L=search_require__VY4L(typ__1Y4L,n__XY4L);
        } break;
        case __TYPE_ID__: {
          __tmp__T04L=search_require__204L(typ__1Y4L,n__XY4L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__T04L=search_require__D34L(typ__1Y4L,n__XY4L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__T04L=search_require__LUBN(typ__1Y4L,n__XY4L);
        } break;
        };
        result__0Y4L=__tmp__T04L;
      } else {
        last_type_contract__VORL=typ__1Y4L;
      };
      j__ZY4L=(__INTEGER)(j__ZY4L +  1);
      goto while_do__W2AM;
    };
  };
  return(result__0Y4L);
}

static void* search_require__204L(__TYPE_ID *Self__304L,void *n__404L)
// ({TYPE_ID},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__B14L,*__tmp__024L;
  void *typ__C14L;
  __INTEGER j__A14L;
  void *__tmp__S14L,*__tmp__G24L;
  void *__tmp__T14L;
  __SECTION_ *Self__4KKQ;
  void *__tmp__H24L;
  void *__tmp__J24L;
  __BOOLEAN __tmp__314L;
  result__B14L=NULL;
  typ__C14L=NULL;
  j__A14L= 0;
  while_do__B3AM:
  {
    if ((j__A14L <= ((__FAST_ARRAYoSLOTo *)Self__304L->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__S14L=((void **)((__FAST_ARRAYoSLOTo *)Self__304L->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__A14L];
      if (((struct ___OBJ *)__tmp__S14L)->__id==__SLOT_DATA__) {
        __tmp__T14L=id_section__UG4F(__tmp__S14L);
      } else {
        __tmp__T14L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__S14L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__4KKQ=((__SECTION_ *)__tmp__T14L);
      __tmp__314L=(((void *)Self__4KKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__4KKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__314L=FALSE__;
    };
    if ((__tmp__314L && ((void *)result__B14L == (void *)NULL))) {
      __tmp__G24L=((void **)((__FAST_ARRAYoSLOTo *)Self__304L->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__A14L];
      if (((struct ___OBJ *)__tmp__G24L)->__id==__SLOT_DATA__) {
        __tmp__H24L=get_type_result__PG2G(__tmp__G24L);
      } else {
        __tmp__H24L=get_type_result__ZH2G(__tmp__G24L);
      };
      typ__C14L=((__TYPE_FULL *)__tmp__H24L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__C14L)->__id) {
      case __TYPE__: {
        __tmp__J24L=((__TYPE *)typ__C14L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__J24L=((__TYPE_NULL *)typ__C14L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__J24L=((__TYPE_VOID *)typ__C14L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__J24L=((__TYPE_CONTEXT *)typ__C14L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__J24L=((__TYPE_ID *)typ__C14L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__J24L=((__TYPE_GENERIC *)typ__C14L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__J24L=prototype__IMEJ();
      } break;
      };
      result__B14L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__J24L)->slot_list__3IM,n__404L);
      if ((((void *)result__B14L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__B14L)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__C14L)->__id) {
        case __TYPE__: {
          __tmp__024L=search_require__AS4L(typ__C14L,n__404L);
        } break;
        case __TYPE_NULL__: {
          __tmp__024L=search_require__HU4L(typ__C14L,n__404L);
        } break;
        case __TYPE_VOID__: {
          __tmp__024L=search_require__OW4L(typ__C14L,n__404L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__024L=search_require__VY4L(typ__C14L,n__404L);
        } break;
        case __TYPE_ID__: {
          __tmp__024L=search_require__204L(typ__C14L,n__404L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__024L=search_require__D34L(typ__C14L,n__404L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__024L=search_require__LUBN(typ__C14L,n__404L);
        } break;
        };
        result__B14L=__tmp__024L;
      } else {
        last_type_contract__VORL=typ__C14L;
      };
      j__A14L=(__INTEGER)(j__A14L +  1);
      goto while_do__B3AM;
    };
  };
  return(result__B14L);
}

static void* search_require__D34L(__TYPE_GENERIC *Self__E34L,void *n__F34L)
// ({TYPE_GENERIC},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__I34L,*__tmp__B54L;
  void *typ__J34L;
  __INTEGER j__H34L;
  void *__tmp__Z34L,*__tmp__N44L;
  void *__tmp__034L;
  __SECTION_ *Self__5KKQ;
  void *__tmp__O44L;
  void *__tmp__Q44L;
  __BOOLEAN __tmp__E44L;
  result__I34L=NULL;
  typ__J34L=NULL;
  j__H34L= 0;
  while_do__M3AM:
  {
    if ((j__H34L <= ((__FAST_ARRAYoSLOTo *)Self__E34L->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__Z34L=((void **)((__FAST_ARRAYoSLOTo *)Self__E34L->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__H34L];
      if (((struct ___OBJ *)__tmp__Z34L)->__id==__SLOT_DATA__) {
        __tmp__034L=id_section__UG4F(__tmp__Z34L);
      } else {
        __tmp__034L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__Z34L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__5KKQ=((__SECTION_ *)__tmp__034L);
      __tmp__E44L=(((void *)Self__5KKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__5KKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__E44L=FALSE__;
    };
    if ((__tmp__E44L && ((void *)result__I34L == (void *)NULL))) {
      __tmp__N44L=((void **)((__FAST_ARRAYoSLOTo *)Self__E34L->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__H34L];
      if (((struct ___OBJ *)__tmp__N44L)->__id==__SLOT_DATA__) {
        __tmp__O44L=get_type_result__PG2G(__tmp__N44L);
      } else {
        __tmp__O44L=get_type_result__ZH2G(__tmp__N44L);
      };
      typ__J34L=((__TYPE_FULL *)__tmp__O44L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__J34L)->__id) {
      case __TYPE__: {
        __tmp__Q44L=((__TYPE *)typ__J34L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__Q44L=((__TYPE_NULL *)typ__J34L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__Q44L=((__TYPE_VOID *)typ__J34L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__Q44L=((__TYPE_CONTEXT *)typ__J34L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__Q44L=((__TYPE_ID *)typ__J34L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__Q44L=((__TYPE_GENERIC *)typ__J34L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__Q44L=prototype__IMEJ();
      } break;
      };
      result__I34L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__Q44L)->slot_list__3IM,n__F34L);
      if ((((void *)result__I34L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__I34L)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__J34L)->__id) {
        case __TYPE__: {
          __tmp__B54L=search_require__AS4L(typ__J34L,n__F34L);
        } break;
        case __TYPE_NULL__: {
          __tmp__B54L=search_require__HU4L(typ__J34L,n__F34L);
        } break;
        case __TYPE_VOID__: {
          __tmp__B54L=search_require__OW4L(typ__J34L,n__F34L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__B54L=search_require__VY4L(typ__J34L,n__F34L);
        } break;
        case __TYPE_ID__: {
          __tmp__B54L=search_require__204L(typ__J34L,n__F34L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__B54L=search_require__D34L(typ__J34L,n__F34L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__B54L=search_require__LUBN(typ__J34L,n__F34L);
        } break;
        };
        result__I34L=__tmp__B54L;
      } else {
        last_type_contract__VORL=typ__J34L;
      };
      j__H34L=(__INTEGER)(j__H34L +  1);
      goto while_do__M3AM;
    };
  };
  return(result__I34L);
}

static void* search_require__LUBN(__PROFIL_BLOCK *Self__MUBN,void *n__NUBN)
// ({PROFIL_BLOCK},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__QUBN,*__tmp__JWBN;
  void *typ__RUBN;
  __INTEGER j__PUBN;
  void *__tmp__BVBN,*__tmp__VVBN;
  void *__tmp__CVBN;
  __SECTION_ *Self__ALKQ;
  void *__tmp__WVBN;
  void *__tmp__YVBN;
  __BOOLEAN __tmp__MVBN;
  result__QUBN=NULL;
  typ__RUBN=NULL;
  j__PUBN= 0;
  while_do__JOCN:
  {
    if ((j__PUBN <= ((__FAST_ARRAYoSLOTo *)Self__MUBN->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__BVBN=((void **)((__FAST_ARRAYoSLOTo *)Self__MUBN->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__PUBN];
      if (((struct ___OBJ *)__tmp__BVBN)->__id==__SLOT_DATA__) {
        __tmp__CVBN=id_section__UG4F(__tmp__BVBN);
      } else {
        __tmp__CVBN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__BVBN)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__ALKQ=((__SECTION_ *)__tmp__CVBN);
      __tmp__MVBN=(((void *)Self__ALKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__ALKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__MVBN=FALSE__;
    };
    if ((__tmp__MVBN && ((void *)result__QUBN == (void *)NULL))) {
      __tmp__VVBN=((void **)((__FAST_ARRAYoSLOTo *)Self__MUBN->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__PUBN];
      if (((struct ___OBJ *)__tmp__VVBN)->__id==__SLOT_DATA__) {
        __tmp__WVBN=get_type_result__PG2G(__tmp__VVBN);
      } else {
        __tmp__WVBN=get_type_result__ZH2G(__tmp__VVBN);
      };
      typ__RUBN=((__TYPE_FULL *)__tmp__WVBN)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__RUBN)->__id) {
      case __TYPE__: {
        __tmp__YVBN=((__TYPE *)typ__RUBN)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__YVBN=((__TYPE_NULL *)typ__RUBN)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__YVBN=((__TYPE_VOID *)typ__RUBN)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__YVBN=((__TYPE_CONTEXT *)typ__RUBN)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__YVBN=((__TYPE_ID *)typ__RUBN)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__YVBN=((__TYPE_GENERIC *)typ__RUBN)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__YVBN=prototype__IMEJ();
      } break;
      };
      result__QUBN=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__YVBN)->slot_list__3IM,n__NUBN);
      if ((((void *)result__QUBN == (void *)NULL) || ((void *)((__ITM_SLOT *)result__QUBN)->require__SB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__RUBN)->__id) {
        case __TYPE__: {
          __tmp__JWBN=search_require__AS4L(typ__RUBN,n__NUBN);
        } break;
        case __TYPE_NULL__: {
          __tmp__JWBN=search_require__HU4L(typ__RUBN,n__NUBN);
        } break;
        case __TYPE_VOID__: {
          __tmp__JWBN=search_require__OW4L(typ__RUBN,n__NUBN);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__JWBN=search_require__VY4L(typ__RUBN,n__NUBN);
        } break;
        case __TYPE_ID__: {
          __tmp__JWBN=search_require__204L(typ__RUBN,n__NUBN);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__JWBN=search_require__D34L(typ__RUBN,n__NUBN);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__JWBN=search_require__LUBN(typ__RUBN,n__NUBN);
        } break;
        };
        result__QUBN=__tmp__JWBN;
      } else {
        last_type_contract__VORL=typ__RUBN;
      };
      j__PUBN=(__INTEGER)(j__PUBN +  1);
      goto while_do__JOCN;
    };
  };
  return(result__QUBN);
}

static void* search_ensure__LA5L(__TYPE *Self__MA5L,void *n__NA5L)
// ({TYPE},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__QA5L,*__tmp__JC5L;
  void *typ__RA5L;
  __INTEGER j__PA5L;
  void *__tmp__BB5L,*__tmp__VB5L;
  void *__tmp__CB5L;
  __SECTION_ *Self__BLKQ;
  void *__tmp__WB5L;
  void *__tmp__YB5L;
  __BOOLEAN __tmp__MB5L;
  result__QA5L=NULL;
  typ__RA5L=NULL;
  j__PA5L= 0;
  while_do__GMBM:
  {
    if ((j__PA5L <= ((__FAST_ARRAYoSLOTo *)Self__MA5L->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__BB5L=((void **)((__FAST_ARRAYoSLOTo *)Self__MA5L->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__PA5L];
      if (((struct ___OBJ *)__tmp__BB5L)->__id==__SLOT_DATA__) {
        __tmp__CB5L=id_section__UG4F(__tmp__BB5L);
      } else {
        __tmp__CB5L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__BB5L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__BLKQ=((__SECTION_ *)__tmp__CB5L);
      __tmp__MB5L=(((void *)Self__BLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__BLKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__MB5L=FALSE__;
    };
    if ((__tmp__MB5L && ((void *)result__QA5L == (void *)NULL))) {
      __tmp__VB5L=((void **)((__FAST_ARRAYoSLOTo *)Self__MA5L->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__PA5L];
      if (((struct ___OBJ *)__tmp__VB5L)->__id==__SLOT_DATA__) {
        __tmp__WB5L=get_type_result__PG2G(__tmp__VB5L);
      } else {
        __tmp__WB5L=get_type_result__ZH2G(__tmp__VB5L);
      };
      typ__RA5L=((__TYPE_FULL *)__tmp__WB5L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__RA5L)->__id) {
      case __TYPE__: {
        __tmp__YB5L=((__TYPE *)typ__RA5L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__YB5L=((__TYPE_NULL *)typ__RA5L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__YB5L=((__TYPE_VOID *)typ__RA5L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__YB5L=((__TYPE_CONTEXT *)typ__RA5L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__YB5L=((__TYPE_ID *)typ__RA5L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__YB5L=((__TYPE_GENERIC *)typ__RA5L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__YB5L=prototype__IMEJ();
      } break;
      };
      result__QA5L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__YB5L)->slot_list__3IM,n__NA5L);
      if ((((void *)result__QA5L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__QA5L)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__RA5L)->__id) {
        case __TYPE__: {
          __tmp__JC5L=search_ensure__LA5L(typ__RA5L,n__NA5L);
        } break;
        case __TYPE_NULL__: {
          __tmp__JC5L=search_ensure__SC5L(typ__RA5L,n__NA5L);
        } break;
        case __TYPE_VOID__: {
          __tmp__JC5L=search_ensure__ZE5L(typ__RA5L,n__NA5L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__JC5L=search_ensure__AH5L(typ__RA5L,n__NA5L);
        } break;
        case __TYPE_ID__: {
          __tmp__JC5L=search_ensure__HJ5L(typ__RA5L,n__NA5L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__JC5L=search_ensure__OL5L(typ__RA5L,n__NA5L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__JC5L=search_ensure__WXBN(typ__RA5L,n__NA5L);
        } break;
        };
        result__QA5L=__tmp__JC5L;
      } else {
        last_type_contract__VORL=typ__RA5L;
      };
      j__PA5L=(__INTEGER)(j__PA5L +  1);
      goto while_do__GMBM;
    };
  };
  return(result__QA5L);
}

static void* search_ensure__SC5L(__TYPE_NULL *Self__TC5L,void *n__UC5L)
// ({TYPE_NULL},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__XC5L,*__tmp__QE5L;
  void *typ__YC5L;
  __INTEGER j__WC5L;
  void *__tmp__ID5L,*__tmp__2D5L;
  void *__tmp__JD5L;
  __SECTION_ *Self__CLKQ;
  void *__tmp__3D5L;
  void *__tmp__5D5L;
  __BOOLEAN __tmp__TD5L;
  result__XC5L=NULL;
  typ__YC5L=NULL;
  j__WC5L= 0;
  while_do__RMBM:
  {
    if ((j__WC5L <= ((__FAST_ARRAYoSLOTo *)Self__TC5L->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__ID5L=((void **)((__FAST_ARRAYoSLOTo *)Self__TC5L->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__WC5L];
      if (((struct ___OBJ *)__tmp__ID5L)->__id==__SLOT_DATA__) {
        __tmp__JD5L=id_section__UG4F(__tmp__ID5L);
      } else {
        __tmp__JD5L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__ID5L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__CLKQ=((__SECTION_ *)__tmp__JD5L);
      __tmp__TD5L=(((void *)Self__CLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__CLKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__TD5L=FALSE__;
    };
    if ((__tmp__TD5L && ((void *)result__XC5L == (void *)NULL))) {
      __tmp__2D5L=((void **)((__FAST_ARRAYoSLOTo *)Self__TC5L->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__WC5L];
      if (((struct ___OBJ *)__tmp__2D5L)->__id==__SLOT_DATA__) {
        __tmp__3D5L=get_type_result__PG2G(__tmp__2D5L);
      } else {
        __tmp__3D5L=get_type_result__ZH2G(__tmp__2D5L);
      };
      typ__YC5L=((__TYPE_FULL *)__tmp__3D5L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__YC5L)->__id) {
      case __TYPE__: {
        __tmp__5D5L=((__TYPE *)typ__YC5L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__5D5L=((__TYPE_NULL *)typ__YC5L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__5D5L=((__TYPE_VOID *)typ__YC5L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__5D5L=((__TYPE_CONTEXT *)typ__YC5L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__5D5L=((__TYPE_ID *)typ__YC5L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__5D5L=((__TYPE_GENERIC *)typ__YC5L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__5D5L=prototype__IMEJ();
      } break;
      };
      result__XC5L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__5D5L)->slot_list__3IM,n__UC5L);
      if ((((void *)result__XC5L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__XC5L)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__YC5L)->__id) {
        case __TYPE__: {
          __tmp__QE5L=search_ensure__LA5L(typ__YC5L,n__UC5L);
        } break;
        case __TYPE_NULL__: {
          __tmp__QE5L=search_ensure__SC5L(typ__YC5L,n__UC5L);
        } break;
        case __TYPE_VOID__: {
          __tmp__QE5L=search_ensure__ZE5L(typ__YC5L,n__UC5L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__QE5L=search_ensure__AH5L(typ__YC5L,n__UC5L);
        } break;
        case __TYPE_ID__: {
          __tmp__QE5L=search_ensure__HJ5L(typ__YC5L,n__UC5L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__QE5L=search_ensure__OL5L(typ__YC5L,n__UC5L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__QE5L=search_ensure__WXBN(typ__YC5L,n__UC5L);
        } break;
        };
        result__XC5L=__tmp__QE5L;
      } else {
        last_type_contract__VORL=typ__YC5L;
      };
      j__WC5L=(__INTEGER)(j__WC5L +  1);
      goto while_do__RMBM;
    };
  };
  return(result__XC5L);
}

static void* search_ensure__ZE5L(__TYPE_VOID *Self__0E5L,void *n__1E5L)
// ({TYPE_VOID},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__4E5L,*__tmp__XG5L;
  void *typ__5E5L;
  __INTEGER j__3E5L;
  void *__tmp__PF5L,*__tmp__DG5L;
  void *__tmp__QF5L;
  __SECTION_ *Self__DLKQ;
  void *__tmp__EG5L;
  void *__tmp__GG5L;
  __BOOLEAN __tmp__0F5L;
  result__4E5L=NULL;
  typ__5E5L=NULL;
  j__3E5L= 0;
  while_do__2MBM:
  {
    if ((j__3E5L <= ((__FAST_ARRAYoSLOTo *)Self__0E5L->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__PF5L=((void **)((__FAST_ARRAYoSLOTo *)Self__0E5L->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__3E5L];
      if (((struct ___OBJ *)__tmp__PF5L)->__id==__SLOT_DATA__) {
        __tmp__QF5L=id_section__UG4F(__tmp__PF5L);
      } else {
        __tmp__QF5L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__PF5L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__DLKQ=((__SECTION_ *)__tmp__QF5L);
      __tmp__0F5L=(((void *)Self__DLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__DLKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__0F5L=FALSE__;
    };
    if ((__tmp__0F5L && ((void *)result__4E5L == (void *)NULL))) {
      __tmp__DG5L=((void **)((__FAST_ARRAYoSLOTo *)Self__0E5L->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__3E5L];
      if (((struct ___OBJ *)__tmp__DG5L)->__id==__SLOT_DATA__) {
        __tmp__EG5L=get_type_result__PG2G(__tmp__DG5L);
      } else {
        __tmp__EG5L=get_type_result__ZH2G(__tmp__DG5L);
      };
      typ__5E5L=((__TYPE_FULL *)__tmp__EG5L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__5E5L)->__id) {
      case __TYPE__: {
        __tmp__GG5L=((__TYPE *)typ__5E5L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__GG5L=((__TYPE_NULL *)typ__5E5L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__GG5L=((__TYPE_VOID *)typ__5E5L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__GG5L=((__TYPE_CONTEXT *)typ__5E5L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__GG5L=((__TYPE_ID *)typ__5E5L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__GG5L=((__TYPE_GENERIC *)typ__5E5L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__GG5L=prototype__IMEJ();
      } break;
      };
      result__4E5L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__GG5L)->slot_list__3IM,n__1E5L);
      if ((((void *)result__4E5L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__4E5L)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__5E5L)->__id) {
        case __TYPE__: {
          __tmp__XG5L=search_ensure__LA5L(typ__5E5L,n__1E5L);
        } break;
        case __TYPE_NULL__: {
          __tmp__XG5L=search_ensure__SC5L(typ__5E5L,n__1E5L);
        } break;
        case __TYPE_VOID__: {
          __tmp__XG5L=search_ensure__ZE5L(typ__5E5L,n__1E5L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__XG5L=search_ensure__AH5L(typ__5E5L,n__1E5L);
        } break;
        case __TYPE_ID__: {
          __tmp__XG5L=search_ensure__HJ5L(typ__5E5L,n__1E5L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__XG5L=search_ensure__OL5L(typ__5E5L,n__1E5L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__XG5L=search_ensure__WXBN(typ__5E5L,n__1E5L);
        } break;
        };
        result__4E5L=__tmp__XG5L;
      } else {
        last_type_contract__VORL=typ__5E5L;
      };
      j__3E5L=(__INTEGER)(j__3E5L +  1);
      goto while_do__2MBM;
    };
  };
  return(result__4E5L);
}

static void* search_ensure__AH5L(__TYPE_CONTEXT *Self__BH5L,void *n__CH5L)
// ({TYPE_CONTEXT},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__FH5L,*__tmp__4I5L;
  void *typ__GH5L;
  __INTEGER j__EH5L;
  void *__tmp__WH5L,*__tmp__KI5L;
  void *__tmp__XH5L;
  __SECTION_ *Self__ELKQ;
  void *__tmp__LI5L;
  void *__tmp__NI5L;
  __BOOLEAN __tmp__BI5L;
  result__FH5L=NULL;
  typ__GH5L=NULL;
  j__EH5L= 0;
  while_do__HNBM:
  {
    if ((j__EH5L <= ((__FAST_ARRAYoSLOTo *)Self__BH5L->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__WH5L=((void **)((__FAST_ARRAYoSLOTo *)Self__BH5L->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__EH5L];
      if (((struct ___OBJ *)__tmp__WH5L)->__id==__SLOT_DATA__) {
        __tmp__XH5L=id_section__UG4F(__tmp__WH5L);
      } else {
        __tmp__XH5L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__WH5L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__ELKQ=((__SECTION_ *)__tmp__XH5L);
      __tmp__BI5L=(((void *)Self__ELKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__ELKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__BI5L=FALSE__;
    };
    if ((__tmp__BI5L && ((void *)result__FH5L == (void *)NULL))) {
      __tmp__KI5L=((void **)((__FAST_ARRAYoSLOTo *)Self__BH5L->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__EH5L];
      if (((struct ___OBJ *)__tmp__KI5L)->__id==__SLOT_DATA__) {
        __tmp__LI5L=get_type_result__PG2G(__tmp__KI5L);
      } else {
        __tmp__LI5L=get_type_result__ZH2G(__tmp__KI5L);
      };
      typ__GH5L=((__TYPE_FULL *)__tmp__LI5L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__GH5L)->__id) {
      case __TYPE__: {
        __tmp__NI5L=((__TYPE *)typ__GH5L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__NI5L=((__TYPE_NULL *)typ__GH5L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__NI5L=((__TYPE_VOID *)typ__GH5L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__NI5L=((__TYPE_CONTEXT *)typ__GH5L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__NI5L=((__TYPE_ID *)typ__GH5L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__NI5L=((__TYPE_GENERIC *)typ__GH5L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__NI5L=prototype__IMEJ();
      } break;
      };
      result__FH5L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__NI5L)->slot_list__3IM,n__CH5L);
      if ((((void *)result__FH5L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__FH5L)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__GH5L)->__id) {
        case __TYPE__: {
          __tmp__4I5L=search_ensure__LA5L(typ__GH5L,n__CH5L);
        } break;
        case __TYPE_NULL__: {
          __tmp__4I5L=search_ensure__SC5L(typ__GH5L,n__CH5L);
        } break;
        case __TYPE_VOID__: {
          __tmp__4I5L=search_ensure__ZE5L(typ__GH5L,n__CH5L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__4I5L=search_ensure__AH5L(typ__GH5L,n__CH5L);
        } break;
        case __TYPE_ID__: {
          __tmp__4I5L=search_ensure__HJ5L(typ__GH5L,n__CH5L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__4I5L=search_ensure__OL5L(typ__GH5L,n__CH5L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__4I5L=search_ensure__WXBN(typ__GH5L,n__CH5L);
        } break;
        };
        result__FH5L=__tmp__4I5L;
      } else {
        last_type_contract__VORL=typ__GH5L;
      };
      j__EH5L=(__INTEGER)(j__EH5L +  1);
      goto while_do__HNBM;
    };
  };
  return(result__FH5L);
}

static void* search_ensure__HJ5L(__TYPE_ID *Self__IJ5L,void *n__JJ5L)
// ({TYPE_ID},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__MJ5L,*__tmp__FL5L;
  void *typ__NJ5L;
  __INTEGER j__LJ5L;
  void *__tmp__3J5L,*__tmp__RK5L;
  void *__tmp__4J5L;
  __SECTION_ *Self__FLKQ;
  void *__tmp__SK5L;
  void *__tmp__UK5L;
  __BOOLEAN __tmp__IK5L;
  result__MJ5L=NULL;
  typ__NJ5L=NULL;
  j__LJ5L= 0;
  while_do__SNBM:
  {
    if ((j__LJ5L <= ((__FAST_ARRAYoSLOTo *)Self__IJ5L->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__3J5L=((void **)((__FAST_ARRAYoSLOTo *)Self__IJ5L->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__LJ5L];
      if (((struct ___OBJ *)__tmp__3J5L)->__id==__SLOT_DATA__) {
        __tmp__4J5L=id_section__UG4F(__tmp__3J5L);
      } else {
        __tmp__4J5L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__3J5L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__FLKQ=((__SECTION_ *)__tmp__4J5L);
      __tmp__IK5L=(((void *)Self__FLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__FLKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__IK5L=FALSE__;
    };
    if ((__tmp__IK5L && ((void *)result__MJ5L == (void *)NULL))) {
      __tmp__RK5L=((void **)((__FAST_ARRAYoSLOTo *)Self__IJ5L->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__LJ5L];
      if (((struct ___OBJ *)__tmp__RK5L)->__id==__SLOT_DATA__) {
        __tmp__SK5L=get_type_result__PG2G(__tmp__RK5L);
      } else {
        __tmp__SK5L=get_type_result__ZH2G(__tmp__RK5L);
      };
      typ__NJ5L=((__TYPE_FULL *)__tmp__SK5L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__NJ5L)->__id) {
      case __TYPE__: {
        __tmp__UK5L=((__TYPE *)typ__NJ5L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__UK5L=((__TYPE_NULL *)typ__NJ5L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__UK5L=((__TYPE_VOID *)typ__NJ5L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__UK5L=((__TYPE_CONTEXT *)typ__NJ5L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__UK5L=((__TYPE_ID *)typ__NJ5L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__UK5L=((__TYPE_GENERIC *)typ__NJ5L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__UK5L=prototype__IMEJ();
      } break;
      };
      result__MJ5L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__UK5L)->slot_list__3IM,n__JJ5L);
      if ((((void *)result__MJ5L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__MJ5L)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__NJ5L)->__id) {
        case __TYPE__: {
          __tmp__FL5L=search_ensure__LA5L(typ__NJ5L,n__JJ5L);
        } break;
        case __TYPE_NULL__: {
          __tmp__FL5L=search_ensure__SC5L(typ__NJ5L,n__JJ5L);
        } break;
        case __TYPE_VOID__: {
          __tmp__FL5L=search_ensure__ZE5L(typ__NJ5L,n__JJ5L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__FL5L=search_ensure__AH5L(typ__NJ5L,n__JJ5L);
        } break;
        case __TYPE_ID__: {
          __tmp__FL5L=search_ensure__HJ5L(typ__NJ5L,n__JJ5L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__FL5L=search_ensure__OL5L(typ__NJ5L,n__JJ5L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__FL5L=search_ensure__WXBN(typ__NJ5L,n__JJ5L);
        } break;
        };
        result__MJ5L=__tmp__FL5L;
      } else {
        last_type_contract__VORL=typ__NJ5L;
      };
      j__LJ5L=(__INTEGER)(j__LJ5L +  1);
      goto while_do__SNBM;
    };
  };
  return(result__MJ5L);
}

static void* search_ensure__OL5L(__TYPE_GENERIC *Self__PL5L,void *n__QL5L)
// ({TYPE_GENERIC},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__TL5L,*__tmp__MN5L;
  void *typ__UL5L;
  __INTEGER j__SL5L;
  void *__tmp__EM5L,*__tmp__YM5L;
  void *__tmp__FM5L;
  __SECTION_ *Self__GLKQ;
  void *__tmp__ZM5L;
  void *__tmp__1M5L;
  __BOOLEAN __tmp__PM5L;
  result__TL5L=NULL;
  typ__UL5L=NULL;
  j__SL5L= 0;
  while_do__3NBM:
  {
    if ((j__SL5L <= ((__FAST_ARRAYoSLOTo *)Self__PL5L->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__EM5L=((void **)((__FAST_ARRAYoSLOTo *)Self__PL5L->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__SL5L];
      if (((struct ___OBJ *)__tmp__EM5L)->__id==__SLOT_DATA__) {
        __tmp__FM5L=id_section__UG4F(__tmp__EM5L);
      } else {
        __tmp__FM5L=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__EM5L)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__GLKQ=((__SECTION_ *)__tmp__FM5L);
      __tmp__PM5L=(((void *)Self__GLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__GLKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__PM5L=FALSE__;
    };
    if ((__tmp__PM5L && ((void *)result__TL5L == (void *)NULL))) {
      __tmp__YM5L=((void **)((__FAST_ARRAYoSLOTo *)Self__PL5L->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__SL5L];
      if (((struct ___OBJ *)__tmp__YM5L)->__id==__SLOT_DATA__) {
        __tmp__ZM5L=get_type_result__PG2G(__tmp__YM5L);
      } else {
        __tmp__ZM5L=get_type_result__ZH2G(__tmp__YM5L);
      };
      typ__UL5L=((__TYPE_FULL *)__tmp__ZM5L)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__UL5L)->__id) {
      case __TYPE__: {
        __tmp__1M5L=((__TYPE *)typ__UL5L)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__1M5L=((__TYPE_NULL *)typ__UL5L)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__1M5L=((__TYPE_VOID *)typ__UL5L)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__1M5L=((__TYPE_CONTEXT *)typ__UL5L)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__1M5L=((__TYPE_ID *)typ__UL5L)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__1M5L=((__TYPE_GENERIC *)typ__UL5L)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__1M5L=prototype__IMEJ();
      } break;
      };
      result__TL5L=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__1M5L)->slot_list__3IM,n__QL5L);
      if ((((void *)result__TL5L == (void *)NULL) || ((void *)((__ITM_SLOT *)result__TL5L)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__UL5L)->__id) {
        case __TYPE__: {
          __tmp__MN5L=search_ensure__LA5L(typ__UL5L,n__QL5L);
        } break;
        case __TYPE_NULL__: {
          __tmp__MN5L=search_ensure__SC5L(typ__UL5L,n__QL5L);
        } break;
        case __TYPE_VOID__: {
          __tmp__MN5L=search_ensure__ZE5L(typ__UL5L,n__QL5L);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__MN5L=search_ensure__AH5L(typ__UL5L,n__QL5L);
        } break;
        case __TYPE_ID__: {
          __tmp__MN5L=search_ensure__HJ5L(typ__UL5L,n__QL5L);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__MN5L=search_ensure__OL5L(typ__UL5L,n__QL5L);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__MN5L=search_ensure__WXBN(typ__UL5L,n__QL5L);
        } break;
        };
        result__TL5L=__tmp__MN5L;
      } else {
        last_type_contract__VORL=typ__UL5L;
      };
      j__SL5L=(__INTEGER)(j__SL5L +  1);
      goto while_do__3NBM;
    };
  };
  return(result__TL5L);
}

static void* search_ensure__WXBN(__PROFIL_BLOCK *Self__XXBN,void *n__YXBN)
// ({PROFIL_BLOCK},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  void *result__1XBN,*__tmp__UZBN;
  void *typ__2XBN;
  __INTEGER j__0XBN;
  void *__tmp__MYBN,*__tmp__AZBN;
  void *__tmp__NYBN;
  __SECTION_ *Self__HLKQ;
  void *__tmp__BZBN;
  void *__tmp__DZBN;
  __BOOLEAN __tmp__XYBN;
  result__1XBN=NULL;
  typ__2XBN=NULL;
  j__0XBN= 0;
  while_do__UOCN:
  {
    if ((j__0XBN <= ((__FAST_ARRAYoSLOTo *)Self__XXBN->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
      __tmp__MYBN=((void **)((__FAST_ARRAYoSLOTo *)Self__XXBN->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__0XBN];
      if (((struct ___OBJ *)__tmp__MYBN)->__id==__SLOT_DATA__) {
        __tmp__NYBN=id_section__UG4F(__tmp__MYBN);
      } else {
        __tmp__NYBN=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__MYBN)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
      };
      Self__HLKQ=((__SECTION_ *)__tmp__NYBN);
      __tmp__XYBN=(((void *)Self__HLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__HLKQ->name__1I0D == (void *)(&__string_24)));
    } else {
      __tmp__XYBN=FALSE__;
    };
    if ((__tmp__XYBN && ((void *)result__1XBN == (void *)NULL))) {
      __tmp__AZBN=((void **)((__FAST_ARRAYoSLOTo *)Self__XXBN->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[j__0XBN];
      if (((struct ___OBJ *)__tmp__AZBN)->__id==__SLOT_DATA__) {
        __tmp__BZBN=get_type_result__PG2G(__tmp__AZBN);
      } else {
        __tmp__BZBN=get_type_result__ZH2G(__tmp__AZBN);
      };
      typ__2XBN=((__TYPE_FULL *)__tmp__BZBN)->parent_type__KTL;
      switch (((struct ___OBJ *)typ__2XBN)->__id) {
      case __TYPE__: {
        __tmp__DZBN=((__TYPE *)typ__2XBN)->prototype__RD;
      } break;
      case __TYPE_NULL__: {
        __tmp__DZBN=((__TYPE_NULL *)typ__2XBN)->parent_type__TIB.prototype__RD;
      } break;
      case __TYPE_VOID__: {
        __tmp__DZBN=((__TYPE_VOID *)typ__2XBN)->parent_type__UIB.prototype__RD;
      } break;
      case __TYPE_CONTEXT__: {
        __tmp__DZBN=((__TYPE_CONTEXT *)typ__2XBN)->parent_type__VIB.prototype__RD;
      } break;
      case __TYPE_ID__: {
        __tmp__DZBN=((__TYPE_ID *)typ__2XBN)->parent_type__WIB.prototype__RD;
      } break;
      case __TYPE_GENERIC__: {
        __tmp__DZBN=((__TYPE_GENERIC *)typ__2XBN)->parent_type__T2IB.prototype__RD;
      } break;
      case __PROFIL_BLOCK__: {
        __tmp__DZBN=prototype__IMEJ();
      } break;
      };
      result__1XBN=fast_reference_at__UEQD(((__PROTOTYPE *)__tmp__DZBN)->slot_list__3IM,n__YXBN);
      if ((((void *)result__1XBN == (void *)NULL) || ((void *)((__ITM_SLOT *)result__1XBN)->ensure__WB3D == (void *)NULL))) {
        switch (((struct ___OBJ *)typ__2XBN)->__id) {
        case __TYPE__: {
          __tmp__UZBN=search_ensure__LA5L(typ__2XBN,n__YXBN);
        } break;
        case __TYPE_NULL__: {
          __tmp__UZBN=search_ensure__SC5L(typ__2XBN,n__YXBN);
        } break;
        case __TYPE_VOID__: {
          __tmp__UZBN=search_ensure__ZE5L(typ__2XBN,n__YXBN);
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__UZBN=search_ensure__AH5L(typ__2XBN,n__YXBN);
        } break;
        case __TYPE_ID__: {
          __tmp__UZBN=search_ensure__HJ5L(typ__2XBN,n__YXBN);
        } break;
        case __TYPE_GENERIC__: {
          __tmp__UZBN=search_ensure__OL5L(typ__2XBN,n__YXBN);
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__UZBN=search_ensure__WXBN(typ__2XBN,n__YXBN);
        } break;
        };
        result__1XBN=__tmp__UZBN;
      } else {
        last_type_contract__VORL=typ__2XBN;
      };
      j__0XBN=(__INTEGER)(j__0XBN +  1);
      goto while_do__UOCN;
    };
  };
  return(result__1XBN);
}

static void* put_result__Z0DN(__LIST *Self__00DN,__BOOLEAN is_last__10DN)
// ({LIST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__30DN;
  void *result__40DN;
  __INTEGER idx__50DN;
  void *var_result__A1DN;
  __BOOLEAN __tmp__S2DN;
  var__30DN=NULL;
  result__40DN=NULL;
  idx__50DN= 0;
  var_result__A1DN=NULL;
  if (is_last__10DN) {
    result__40DN=Self__00DN;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__50DN=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__A1DN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__A1DN != (void *)NULL)) {
        if ((idx__50DN <= ((__FAST_ARRAYoLOCALo *)var_result__A1DN)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__30DN=((void **)((__FAST_ARRAYoLOCALo *)var_result__A1DN)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__50DN];
          __tmp__S2DN=TRUE__;
        } else {
          __tmp__S2DN=FALSE__;
        };
        if ((! __tmp__S2DN)) {
          if ((idx__50DN == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__A1DN)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__30DN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__00DN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__50DN !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__00DN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__30DN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__30DN == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__00DN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__30DN=create__name__style__type__25JG(Self__00DN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIQG(Self__00DN)));
    };
    add_last__T2FH(stack_result__WI4F,var__30DN);
    result__40DN=write__value__T5FH(var__30DN,Self__00DN->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__T5CN(Self__00DN,((__LOCAL *)var__30DN)->parent_variable__B2LC.type__125F,((__LOCAL *)var__30DN)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__40DN);
}

static void* put_result__HZKI(__STRING_CST *Self__IZKI,__BOOLEAN is_last__JZKI)
// ({STRING_CST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__LZKI;
  void *result__MZKI;
  __INTEGER idx__NZKI;
  void *var_result__OZKI;
  __BOOLEAN __tmp__A1KI;
  var__LZKI=NULL;
  result__MZKI=NULL;
  idx__NZKI= 0;
  var_result__OZKI=NULL;
  if (is_last__JZKI) {
    result__MZKI=Self__IZKI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__NZKI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__OZKI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__OZKI != (void *)NULL)) {
        if ((idx__NZKI <= ((__FAST_ARRAYoLOCALo *)var_result__OZKI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__LZKI=((void **)((__FAST_ARRAYoLOCALo *)var_result__OZKI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__NZKI];
          __tmp__A1KI=TRUE__;
        } else {
          __tmp__A1KI=FALSE__;
        };
        if ((! __tmp__A1KI)) {
          if ((idx__NZKI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__OZKI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__LZKI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__IZKI->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__NZKI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IZKI->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__LZKI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__LZKI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IZKI->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__LZKI=create__name__style__type__25JG(Self__IZKI->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__IZKI->parent_constant__5F.static_type__F4YD));
    };
    add_last__T2FH(stack_result__WI4F,var__LZKI);
    result__MZKI=write__value__T5FH(var__LZKI,Self__IZKI->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__Q22H(Self__IZKI,((__LOCAL *)var__LZKI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__LZKI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__MZKI);
}

static void* put_result__X3KI(__EXTERNAL_C *Self__Y3KI,__BOOLEAN is_last__Z3KI)
// ({EXTERNAL_C},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__13KI;
  void *result__23KI;
  __INTEGER idx__33KI;
  void *var_result__43KI;
  __BOOLEAN __tmp__Q5KI;
  var__13KI=NULL;
  result__23KI=NULL;
  idx__33KI= 0;
  var_result__43KI=NULL;
  if (is_last__Z3KI) {
    result__23KI=Self__Y3KI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__33KI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__43KI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__43KI != (void *)NULL)) {
        if ((idx__33KI <= ((__FAST_ARRAYoLOCALo *)var_result__43KI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__13KI=((void **)((__FAST_ARRAYoLOCALo *)var_result__43KI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__33KI];
          __tmp__Q5KI=TRUE__;
        } else {
          __tmp__Q5KI=FALSE__;
        };
        if ((! __tmp__Q5KI)) {
          if ((idx__33KI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__43KI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__13KI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__Y3KI->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__33KI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__Y3KI->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__13KI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__13KI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__Y3KI->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__13KI=create__name__style__type__25JG(Self__Y3KI->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__Y3KI->static_type__UXZD));
    };
    add_last__T2FH(stack_result__WI4F,var__13KI);
    result__23KI=write__value__T5FH(var__13KI,Self__Y3KI->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__PF3H(Self__Y3KI,((__LOCAL *)var__13KI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__13KI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__23KI);
}

static void* put_result__ICLI(__PROTOTYPE_CST *Self__JCLI,__BOOLEAN is_last__KCLI)
// ({PROTOTYPE_CST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__MCLI;
  void *result__NCLI;
  __INTEGER idx__OCLI;
  void *var_result__PCLI;
  __BOOLEAN __tmp__BELI;
  var__MCLI=NULL;
  result__NCLI=NULL;
  idx__OCLI= 0;
  var_result__PCLI=NULL;
  if (is_last__KCLI) {
    result__NCLI=Self__JCLI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__OCLI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__PCLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__PCLI != (void *)NULL)) {
        if ((idx__OCLI <= ((__FAST_ARRAYoLOCALo *)var_result__PCLI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__MCLI=((void **)((__FAST_ARRAYoLOCALo *)var_result__PCLI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__OCLI];
          __tmp__BELI=TRUE__;
        } else {
          __tmp__BELI=FALSE__;
        };
        if ((! __tmp__BELI)) {
          if ((idx__OCLI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__PCLI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__MCLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__JCLI->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__OCLI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__JCLI->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__MCLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__MCLI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__JCLI->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__MCLI=create__name__style__type__25JG(Self__JCLI->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__JCLI->parent_constant__E3LC.static_type__F4YD));
    };
    add_last__T2FH(stack_result__WI4F,var__MCLI);
    result__NCLI=write__value__T5FH(var__MCLI,Self__JCLI->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__OO3H(Self__JCLI,((__LOCAL *)var__MCLI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__MCLI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__NCLI);
}

static void* put_result__ZGLI(__INTEGER_CST *Self__0GLI,__BOOLEAN is_last__1GLI)
// ({INTEGER_CST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__3GLI;
  void *result__4GLI;
  __INTEGER idx__5GLI;
  void *var_result__AHLI;
  __BOOLEAN __tmp__SILI;
  var__3GLI=NULL;
  result__4GLI=NULL;
  idx__5GLI= 0;
  var_result__AHLI=NULL;
  if (is_last__1GLI) {
    result__4GLI=Self__0GLI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__5GLI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__AHLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__AHLI != (void *)NULL)) {
        if ((idx__5GLI <= ((__FAST_ARRAYoLOCALo *)var_result__AHLI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__3GLI=((void **)((__FAST_ARRAYoLOCALo *)var_result__AHLI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__5GLI];
          __tmp__SILI=TRUE__;
        } else {
          __tmp__SILI=FALSE__;
        };
        if ((! __tmp__SILI)) {
          if ((idx__5GLI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__AHLI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__3GLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__0GLI->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__5GLI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__0GLI->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__3GLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__3GLI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__0GLI->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__3GLI=create__name__style__type__25JG(Self__0GLI->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__0GLI->parent_constant__P3LC.static_type__F4YD));
    };
    add_last__T2FH(stack_result__WI4F,var__3GLI);
    result__4GLI=write__value__T5FH(var__3GLI,Self__0GLI->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__NX3H(Self__0GLI,((__LOCAL *)var__3GLI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__3GLI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__4GLI);
}

static void* put_result__DYFJ(__READ_LOCAL *Self__EYFJ,__BOOLEAN is_last__FYFJ)
// ({READ_LOCAL},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__HYFJ;
  void *result__IYFJ;
  __INTEGER idx__JYFJ;
  void *var_result__KYFJ;
  __BOOLEAN __tmp__2ZFJ;
  var__HYFJ=NULL;
  result__IYFJ=NULL;
  idx__JYFJ= 0;
  var_result__KYFJ=NULL;
  if (is_last__FYFJ) {
    result__IYFJ=Self__EYFJ;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__JYFJ=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__KYFJ=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__KYFJ != (void *)NULL)) {
        if ((idx__JYFJ <= ((__FAST_ARRAYoLOCALo *)var_result__KYFJ)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__HYFJ=((void **)((__FAST_ARRAYoLOCALo *)var_result__KYFJ)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__JYFJ];
          __tmp__2ZFJ=TRUE__;
        } else {
          __tmp__2ZFJ=FALSE__;
        };
        if ((! __tmp__2ZFJ)) {
          if ((idx__JYFJ == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__KYFJ)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__HYFJ=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__EYFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__JYFJ !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__EYFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__HYFJ=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__HYFJ == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__EYFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__HYFJ=create__name__style__type__25JG(Self__EYFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__LOCAL *)Self__EYFJ->local__ALZD)->parent_variable__B2LC.type__125F));
    };
    add_last__T2FH(stack_result__WI4F,var__HYFJ);
    result__IYFJ=write__value__T5FH(var__HYFJ,Self__EYFJ->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__LEFJ(Self__EYFJ,((__LOCAL *)var__HYFJ)->parent_variable__B2LC.type__125F,((__LOCAL *)var__HYFJ)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__IYFJ);
}

static void* put_result__JLLI(__EXPR_MULTIPLE *Self__KLLI,__BOOLEAN is_last__LLLI)
// ({EXPR_MULTIPLE},{TRUExFALSE}) With resultRecursive, No inlinable.
{
  __INTEGER __tmp__TLLI,Self__4XSI;
  void *__tmp__ZLLI;
  void *__tmp__1LLI,*__tmp__AMLI;
  void *__tmp__2LLI,*__tmp__BMLI;
  __FAST_ARRAYoEXPRo *Self__N02Q;
  __tmp__TLLI=(__INTEGER)(((__FAST_ARRAYoEXPRo *)Self__KLLI->expr_list__VFMH)->parent_arrayed_collection__42LC.upper__USSH -  1);
  Self__4XSI= 0;
  while ((Self__4XSI <= __tmp__TLLI)) {
    __tmp__ZLLI=list_current__IF1;
    __tmp__1LLI=((void **)((__FAST_ARRAYoEXPRo *)Self__KLLI->expr_list__VFMH)->parent_arrayed_collection__42LC.storage__1SDI)[Self__4XSI];
    switch (((struct ___OBJ *)__tmp__1LLI)->__id) {
    case __LIST__: {
      __tmp__2LLI=put_result__Z0DN(__tmp__1LLI,FALSE__);
    } break;
    case __STRING_CST__: {
      __tmp__2LLI=put_result__HZKI(__tmp__1LLI,FALSE__);
    } break;
    case __EXTERNAL_C__: {
      __tmp__2LLI=put_result__X3KI(__tmp__1LLI,FALSE__);
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2LLI=put_result__ICLI(__tmp__1LLI,FALSE__);
    } break;
    case __INTEGER_CST__: {
      __tmp__2LLI=put_result__ZGLI(__tmp__1LLI,FALSE__);
    } break;
    case __READ_LOCAL__: {
      __tmp__2LLI=put_result__DYFJ(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2LLI=put_result__JLLI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2LLI=put_result__DMLI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2LLI=put_result__UQLI(__tmp__1LLI,FALSE__);
    } break;
    case __REAL_CST__: {
      __tmp__2LLI=put_result__FVLI(__tmp__1LLI,FALSE__);
    } break;
    case __CHARACTER_CST__: {
      __tmp__2LLI=put_result__WZLI(__tmp__1LLI,FALSE__);
    } break;
    case __IS_EXPANDED__: {
      __tmp__2LLI=put_result__G4LI(__tmp__1LLI,FALSE__);
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2LLI=put_result__WCMI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_SUP__: {
      __tmp__2LLI=put_result__HHMI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_SUB__: {
      __tmp__2LLI=put_result__YLMI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_MUL__: {
      __tmp__2LLI=put_result__JQMI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_DIV__: {
      __tmp__2LLI=put_result__0UMI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_AND__: {
      __tmp__2LLI=put_result__LZMI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2LLI=put_result__23MI(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2LLI=put_result__NCNI(__tmp__1LLI,FALSE__);
    } break;
    case __PUT_TO__: {
      __tmp__2LLI=put_result__3GNI(__tmp__1LLI,FALSE__);
    } break;
    case __ITEM__: {
      __tmp__2LLI=put_result__NLNI(__tmp__1LLI,FALSE__);
    } break;
    case __SIZE_OF__: {
      __tmp__2LLI=put_result__3PNI(__tmp__1LLI,FALSE__);
    } break;
    case __CAST__: {
      __tmp__2LLI=put_result__NUNI(__tmp__1LLI,FALSE__);
    } break;
    case __CALL_SLOT__: {
      __tmp__2LLI=put_result__J5DN(__tmp__1LLI,FALSE__);
    } break;
    case __READ_SLOT__: {
      __tmp__2LLI=put_result__YCLL(__tmp__1LLI,FALSE__);
    } break;
    case __READ_GLOBAL__: {
      __tmp__2LLI=put_result__JHLL(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2LLI=put_result__I13O(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2LLI=put_result__WUJO(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2LLI=put_result__3YSO(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2LLI=put_result__HZJO(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2LLI=put_result__P3SO(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_NEG__: {
      __tmp__2LLI=put_result__WLYM(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_ADD__: {
      __tmp__2LLI=put_result__HQYM(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_NOT__: {
      __tmp__2LLI=put_result__0DEN(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_MOD__: {
      __tmp__2LLI=put_result__Y3JO(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2LLI=put_result__0ZIP(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_INF__: {
      __tmp__2LLI=put_result__Z53O(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2LLI=put_result__KE4O(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_OR__: {
      __tmp__2LLI=put_result__0C0N(__tmp__1LLI,FALSE__);
    } break;
    case __EXPR_XOR__: {
      __tmp__2LLI=put_result__1I4O(__tmp__1LLI,FALSE__);
    } break;
    };
    add_last__AL4G(((__LIST *)__tmp__ZLLI)->expr_list__JUOG,__tmp__2LLI);
    Self__4XSI=(__INTEGER)(Self__4XSI +  1);
  };
  Self__N02Q=((__FAST_ARRAYoEXPRo *)Self__KLLI->expr_list__VFMH);
  __tmp__AMLI=((void **)Self__N02Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__N02Q->parent_arrayed_collection__42LC.upper__USSH];
  switch (((struct ___OBJ *)__tmp__AMLI)->__id) {
  case __LIST__: {
    __tmp__BMLI=put_result__Z0DN(__tmp__AMLI,is_last__LLLI);
  } break;
  case __STRING_CST__: {
    __tmp__BMLI=put_result__HZKI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXTERNAL_C__: {
    __tmp__BMLI=put_result__X3KI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__BMLI=put_result__ICLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __INTEGER_CST__: {
    __tmp__BMLI=put_result__ZGLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __READ_LOCAL__: {
    __tmp__BMLI=put_result__DYFJ(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BMLI=put_result__JLLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BMLI=put_result__DMLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BMLI=put_result__UQLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __REAL_CST__: {
    __tmp__BMLI=put_result__FVLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __CHARACTER_CST__: {
    __tmp__BMLI=put_result__WZLI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __IS_EXPANDED__: {
    __tmp__BMLI=put_result__G4LI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BMLI=put_result__WCMI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_SUP__: {
    __tmp__BMLI=put_result__HHMI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_SUB__: {
    __tmp__BMLI=put_result__YLMI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_MUL__: {
    __tmp__BMLI=put_result__JQMI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_DIV__: {
    __tmp__BMLI=put_result__0UMI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_AND__: {
    __tmp__BMLI=put_result__LZMI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BMLI=put_result__23MI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BMLI=put_result__NCNI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __PUT_TO__: {
    __tmp__BMLI=put_result__3GNI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __ITEM__: {
    __tmp__BMLI=put_result__NLNI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __SIZE_OF__: {
    __tmp__BMLI=put_result__3PNI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __CAST__: {
    __tmp__BMLI=put_result__NUNI(__tmp__AMLI,is_last__LLLI);
  } break;
  case __CALL_SLOT__: {
    __tmp__BMLI=put_result__J5DN(__tmp__AMLI,is_last__LLLI);
  } break;
  case __READ_SLOT__: {
    __tmp__BMLI=put_result__YCLL(__tmp__AMLI,is_last__LLLI);
  } break;
  case __READ_GLOBAL__: {
    __tmp__BMLI=put_result__JHLL(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BMLI=put_result__I13O(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BMLI=put_result__WUJO(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BMLI=put_result__3YSO(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BMLI=put_result__HZJO(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BMLI=put_result__P3SO(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_NEG__: {
    __tmp__BMLI=put_result__WLYM(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_ADD__: {
    __tmp__BMLI=put_result__HQYM(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_NOT__: {
    __tmp__BMLI=put_result__0DEN(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_MOD__: {
    __tmp__BMLI=put_result__Y3JO(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BMLI=put_result__0ZIP(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_INF__: {
    __tmp__BMLI=put_result__Z53O(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BMLI=put_result__KE4O(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_OR__: {
    __tmp__BMLI=put_result__0C0N(__tmp__AMLI,is_last__LLLI);
  } break;
  case __EXPR_XOR__: {
    __tmp__BMLI=put_result__1I4O(__tmp__AMLI,is_last__LLLI);
  } break;
  };
  return(__tmp__BMLI);
}

static void* put_result__DMLI(__EXPR_EQUAL *Self__EMLI,__BOOLEAN is_last__FMLI)
// ({EXPR_EQUAL},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__HMLI;
  void *result__IMLI;
  __INTEGER idx__JMLI;
  void *var_result__KMLI;
  __BOOLEAN __tmp__2NLI;
  var__HMLI=NULL;
  result__IMLI=NULL;
  idx__JMLI= 0;
  var_result__KMLI=NULL;
  if (is_last__FMLI) {
    result__IMLI=Self__EMLI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__JMLI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__KMLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__KMLI != (void *)NULL)) {
        if ((idx__JMLI <= ((__FAST_ARRAYoLOCALo *)var_result__KMLI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__HMLI=((void **)((__FAST_ARRAYoLOCALo *)var_result__KMLI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__JMLI];
          __tmp__2NLI=TRUE__;
        } else {
          __tmp__2NLI=FALSE__;
        };
        if ((! __tmp__2NLI)) {
          if ((idx__JMLI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__KMLI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__HMLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__EMLI->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__JMLI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__EMLI->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__HMLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__HMLI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__EMLI->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__HMLI=create__name__style__type__25JG(Self__EMLI->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__TO1H()));
    };
    add_last__T2FH(stack_result__WI4F,var__HMLI);
    result__IMLI=write__value__T5FH(var__HMLI,Self__EMLI->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__KJ4H(Self__EMLI,((__LOCAL *)var__HMLI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__HMLI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__IMLI);
}

static void* put_result__UQLI(__EXPR_NOT_EQUAL *Self__VQLI,__BOOLEAN is_last__WQLI)
// ({EXPR_NOT_EQUAL},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__YQLI;
  void *result__ZQLI;
  __INTEGER idx__0QLI;
  void *var_result__1QLI;
  __BOOLEAN __tmp__NSLI;
  var__YQLI=NULL;
  result__ZQLI=NULL;
  idx__0QLI= 0;
  var_result__1QLI=NULL;
  if (is_last__WQLI) {
    result__ZQLI=Self__VQLI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__0QLI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__1QLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__1QLI != (void *)NULL)) {
        if ((idx__0QLI <= ((__FAST_ARRAYoLOCALo *)var_result__1QLI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__YQLI=((void **)((__FAST_ARRAYoLOCALo *)var_result__1QLI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__0QLI];
          __tmp__NSLI=TRUE__;
        } else {
          __tmp__NSLI=FALSE__;
        };
        if ((! __tmp__NSLI)) {
          if ((idx__0QLI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__1QLI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__YQLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__VQLI->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__0QLI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__VQLI->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__YQLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__YQLI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__VQLI->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__YQLI=create__name__style__type__25JG(Self__VQLI->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__YO1H()));
    };
    add_last__T2FH(stack_result__WI4F,var__YQLI);
    result__ZQLI=write__value__T5FH(var__YQLI,Self__VQLI->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__JS4H(Self__VQLI,((__LOCAL *)var__YQLI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__YQLI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__ZQLI);
}

static void* put_result__FVLI(__REAL_CST *Self__GVLI,__BOOLEAN is_last__HVLI)
// ({REAL_CST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__JVLI;
  void *result__KVLI;
  __INTEGER idx__LVLI;
  void *var_result__MVLI;
  __BOOLEAN __tmp__4WLI;
  var__JVLI=NULL;
  result__KVLI=NULL;
  idx__LVLI= 0;
  var_result__MVLI=NULL;
  if (is_last__HVLI) {
    result__KVLI=Self__GVLI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__LVLI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__MVLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__MVLI != (void *)NULL)) {
        if ((idx__LVLI <= ((__FAST_ARRAYoLOCALo *)var_result__MVLI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__JVLI=((void **)((__FAST_ARRAYoLOCALo *)var_result__MVLI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__LVLI];
          __tmp__4WLI=TRUE__;
        } else {
          __tmp__4WLI=FALSE__;
        };
        if ((! __tmp__4WLI)) {
          if ((idx__LVLI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__MVLI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__JVLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__GVLI->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__LVLI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__GVLI->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__JVLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__JVLI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__GVLI->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__JVLI=create__name__style__type__25JG(Self__GVLI->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__GVLI->parent_constant__M3JH.static_type__F4YD));
    };
    add_last__T2FH(stack_result__WI4F,var__JVLI);
    result__KVLI=write__value__T5FH(var__JVLI,Self__GVLI->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__I14H(Self__GVLI,((__LOCAL *)var__JVLI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__JVLI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__KVLI);
}

static void* put_result__WZLI(__CHARACTER_CST *Self__XZLI,__BOOLEAN is_last__YZLI)
// ({CHARACTER_CST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__0ZLI;
  void *result__1ZLI;
  __INTEGER idx__2ZLI;
  void *var_result__3ZLI;
  __BOOLEAN __tmp__P1LI;
  var__0ZLI=NULL;
  result__1ZLI=NULL;
  idx__2ZLI= 0;
  var_result__3ZLI=NULL;
  if (is_last__YZLI) {
    result__1ZLI=Self__XZLI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__2ZLI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__3ZLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__3ZLI != (void *)NULL)) {
        if ((idx__2ZLI <= ((__FAST_ARRAYoLOCALo *)var_result__3ZLI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__0ZLI=((void **)((__FAST_ARRAYoLOCALo *)var_result__3ZLI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__2ZLI];
          __tmp__P1LI=TRUE__;
        } else {
          __tmp__P1LI=FALSE__;
        };
        if ((! __tmp__P1LI)) {
          if ((idx__2ZLI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__3ZLI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__0ZLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__XZLI->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__2ZLI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XZLI->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__0ZLI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__0ZLI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XZLI->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__0ZLI=create__name__style__type__25JG(Self__XZLI->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__XZLI->parent_constant__53JH.static_type__F4YD));
    };
    add_last__T2FH(stack_result__WI4F,var__0ZLI);
    result__1ZLI=write__value__T5FH(var__0ZLI,Self__XZLI->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__HE5H(Self__XZLI,((__LOCAL *)var__0ZLI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__0ZLI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__1ZLI);
}

static void* put_result__G4LI(__IS_EXPANDED *Self__H4LI,__BOOLEAN is_last__I4LI)
// ({IS_EXPANDED},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__K4LI;
  void *result__L4LI;
  __INTEGER idx__M4LI;
  void *var_result__N4LI;
  __BOOLEAN __tmp__55LI;
  var__K4LI=NULL;
  result__L4LI=NULL;
  idx__M4LI= 0;
  var_result__N4LI=NULL;
  if (is_last__I4LI) {
    result__L4LI=Self__H4LI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__M4LI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__N4LI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__N4LI != (void *)NULL)) {
        if ((idx__M4LI <= ((__FAST_ARRAYoLOCALo *)var_result__N4LI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__K4LI=((void **)((__FAST_ARRAYoLOCALo *)var_result__N4LI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__M4LI];
          __tmp__55LI=TRUE__;
        } else {
          __tmp__55LI=FALSE__;
        };
        if ((! __tmp__55LI)) {
          if ((idx__M4LI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__N4LI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__K4LI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__H4LI->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__M4LI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__H4LI->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__K4LI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__K4LI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__H4LI->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__K4LI=create__name__style__type__25JG(Self__H4LI->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__3O1H()));
    };
    add_last__T2FH(stack_result__WI4F,var__K4LI);
    result__L4LI=write__value__T5FH(var__K4LI,Self__H4LI->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__FN5H(Self__H4LI,((__LOCAL *)var__K4LI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__K4LI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__L4LI);
}

static void* put_result__WCMI(__GET_TYPE_ID *Self__XCMI,__BOOLEAN is_last__YCMI)
// ({GET_TYPE_ID},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__0CMI;
  void *result__1CMI;
  __INTEGER idx__2CMI;
  void *var_result__3CMI;
  __BOOLEAN __tmp__PEMI;
  var__0CMI=NULL;
  result__1CMI=NULL;
  idx__2CMI= 0;
  var_result__3CMI=NULL;
  if (is_last__YCMI) {
    result__1CMI=Self__XCMI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__2CMI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__3CMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__3CMI != (void *)NULL)) {
        if ((idx__2CMI <= ((__FAST_ARRAYoLOCALo *)var_result__3CMI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__0CMI=((void **)((__FAST_ARRAYoLOCALo *)var_result__3CMI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__2CMI];
          __tmp__PEMI=TRUE__;
        } else {
          __tmp__PEMI=FALSE__;
        };
        if ((! __tmp__PEMI)) {
          if ((idx__2CMI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__3CMI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__0CMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__XCMI->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__2CMI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XCMI->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__0CMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__0CMI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XCMI->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__0CMI=create__name__style__type__25JG(Self__XCMI->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__CP1H()));
    };
    add_last__T2FH(stack_result__WI4F,var__0CMI);
    result__1CMI=write__value__T5FH(var__0CMI,Self__XCMI->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__DW5H(Self__XCMI,((__LOCAL *)var__0CMI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__0CMI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__1CMI);
}

static void* put_result__HHMI(__EXPR_SUP *Self__IHMI,__BOOLEAN is_last__JHMI)
// ({EXPR_SUP},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__LHMI;
  void *result__MHMI;
  __INTEGER idx__NHMI;
  void *var_result__OHMI;
  __BOOLEAN __tmp__AJMI;
  var__LHMI=NULL;
  result__MHMI=NULL;
  idx__NHMI= 0;
  var_result__OHMI=NULL;
  if (is_last__JHMI) {
    result__MHMI=Self__IHMI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__NHMI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__OHMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__OHMI != (void *)NULL)) {
        if ((idx__NHMI <= ((__FAST_ARRAYoLOCALo *)var_result__OHMI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__LHMI=((void **)((__FAST_ARRAYoLOCALo *)var_result__OHMI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__NHMI];
          __tmp__AJMI=TRUE__;
        } else {
          __tmp__AJMI=FALSE__;
        };
        if ((! __tmp__AJMI)) {
          if ((idx__NHMI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__OHMI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__LHMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__IHMI->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__NHMI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IHMI->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__LHMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__LHMI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IHMI->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__LHMI=create__name__style__type__25JG(Self__IHMI->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__HP1H()));
    };
    add_last__T2FH(stack_result__WI4F,var__LHMI);
    result__MHMI=write__value__T5FH(var__LHMI,Self__IHMI->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__C55H(Self__IHMI,((__LOCAL *)var__LHMI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__LHMI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__MHMI);
}

static void* put_result__YLMI(__EXPR_SUB *Self__ZLMI,__BOOLEAN is_last__0LMI)
// ({EXPR_SUB},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__2LMI;
  void *result__3LMI;
  __INTEGER idx__4LMI;
  void *var_result__5LMI;
  __BOOLEAN __tmp__RNMI;
  var__2LMI=NULL;
  result__3LMI=NULL;
  idx__4LMI= 0;
  var_result__5LMI=NULL;
  if (is_last__0LMI) {
    result__3LMI=Self__ZLMI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__4LMI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__5LMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__5LMI != (void *)NULL)) {
        if ((idx__4LMI <= ((__FAST_ARRAYoLOCALo *)var_result__5LMI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__2LMI=((void **)((__FAST_ARRAYoLOCALo *)var_result__5LMI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__4LMI];
          __tmp__RNMI=TRUE__;
        } else {
          __tmp__RNMI=FALSE__;
        };
        if ((! __tmp__RNMI)) {
          if ((idx__4LMI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__5LMI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__2LMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__ZLMI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__4LMI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__ZLMI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__2LMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__2LMI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__ZLMI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__2LMI=create__name__style__type__25JG(Self__ZLMI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__MP1H(Self__ZLMI)));
    };
    add_last__T2FH(stack_result__WI4F,var__2LMI);
    result__3LMI=write__value__T5FH(var__2LMI,Self__ZLMI->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__BIAI(Self__ZLMI,((__LOCAL *)var__2LMI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__2LMI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__3LMI);
}

static void* put_result__JQMI(__EXPR_MUL *Self__KQMI,__BOOLEAN is_last__LQMI)
// ({EXPR_MUL},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__NQMI;
  void *result__OQMI;
  __INTEGER idx__PQMI;
  void *var_result__QQMI;
  __BOOLEAN __tmp__CSMI;
  var__NQMI=NULL;
  result__OQMI=NULL;
  idx__PQMI= 0;
  var_result__QQMI=NULL;
  if (is_last__LQMI) {
    result__OQMI=Self__KQMI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__PQMI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__QQMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__QQMI != (void *)NULL)) {
        if ((idx__PQMI <= ((__FAST_ARRAYoLOCALo *)var_result__QQMI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__NQMI=((void **)((__FAST_ARRAYoLOCALo *)var_result__QQMI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__PQMI];
          __tmp__CSMI=TRUE__;
        } else {
          __tmp__CSMI=FALSE__;
        };
        if ((! __tmp__CSMI)) {
          if ((idx__PQMI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__QQMI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__NQMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__KQMI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__PQMI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__KQMI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__NQMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__NQMI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__KQMI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__NQMI=create__name__style__type__25JG(Self__KQMI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__SP1H(Self__KQMI)));
    };
    add_last__T2FH(stack_result__WI4F,var__NQMI);
    result__OQMI=write__value__T5FH(var__NQMI,Self__KQMI->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__ARAI(Self__KQMI,((__LOCAL *)var__NQMI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__NQMI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__OQMI);
}

static void* put_result__0UMI(__EXPR_DIV *Self__1UMI,__BOOLEAN is_last__2UMI)
// ({EXPR_DIV},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__4UMI;
  void *result__5UMI;
  __INTEGER idx__AVMI;
  void *var_result__BVMI;
  __BOOLEAN __tmp__TWMI;
  var__4UMI=NULL;
  result__5UMI=NULL;
  idx__AVMI= 0;
  var_result__BVMI=NULL;
  if (is_last__2UMI) {
    result__5UMI=Self__1UMI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__AVMI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__BVMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__BVMI != (void *)NULL)) {
        if ((idx__AVMI <= ((__FAST_ARRAYoLOCALo *)var_result__BVMI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__4UMI=((void **)((__FAST_ARRAYoLOCALo *)var_result__BVMI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__AVMI];
          __tmp__TWMI=TRUE__;
        } else {
          __tmp__TWMI=FALSE__;
        };
        if ((! __tmp__TWMI)) {
          if ((idx__AVMI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__BVMI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__4UMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__1UMI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__AVMI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1UMI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__4UMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__4UMI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1UMI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__4UMI=create__name__style__type__25JG(Self__1UMI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__XP1H(Self__1UMI)));
    };
    add_last__T2FH(stack_result__WI4F,var__4UMI);
    result__5UMI=write__value__T5FH(var__4UMI,Self__1UMI->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__5ZAI(Self__1UMI,((__LOCAL *)var__4UMI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__4UMI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__5UMI);
}

static void* put_result__LZMI(__EXPR_AND *Self__MZMI,__BOOLEAN is_last__NZMI)
// ({EXPR_AND},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__PZMI;
  void *result__QZMI;
  __INTEGER idx__RZMI;
  void *var_result__SZMI;
  __BOOLEAN __tmp__E1MI;
  var__PZMI=NULL;
  result__QZMI=NULL;
  idx__RZMI= 0;
  var_result__SZMI=NULL;
  if (is_last__NZMI) {
    result__QZMI=Self__MZMI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__RZMI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__SZMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__SZMI != (void *)NULL)) {
        if ((idx__RZMI <= ((__FAST_ARRAYoLOCALo *)var_result__SZMI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__PZMI=((void **)((__FAST_ARRAYoLOCALo *)var_result__SZMI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__RZMI];
          __tmp__E1MI=TRUE__;
        } else {
          __tmp__E1MI=FALSE__;
        };
        if ((! __tmp__E1MI)) {
          if ((idx__RZMI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__SZMI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__PZMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__MZMI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__RZMI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__MZMI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__PZMI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__PZMI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__MZMI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__PZMI=create__name__style__type__25JG(Self__MZMI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__2P1H(Self__MZMI)));
    };
    add_last__T2FH(stack_result__WI4F,var__PZMI);
    result__QZMI=write__value__T5FH(var__PZMI,Self__MZMI->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__4CBI(Self__MZMI,((__LOCAL *)var__PZMI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__PZMI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__QZMI);
}

static void* put_result__23MI(__EXPR_SHIFT_R *Self__33MI,__BOOLEAN is_last__43MI)
// ({EXPR_SHIFT_R},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__A4MI;
  void *result__B4MI;
  __INTEGER idx__C4MI;
  void *var_result__D4MI;
  __BOOLEAN __tmp__V5MI;
  var__A4MI=NULL;
  result__B4MI=NULL;
  idx__C4MI= 0;
  var_result__D4MI=NULL;
  if (is_last__43MI) {
    result__B4MI=Self__33MI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__C4MI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__D4MI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__D4MI != (void *)NULL)) {
        if ((idx__C4MI <= ((__FAST_ARRAYoLOCALo *)var_result__D4MI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__A4MI=((void **)((__FAST_ARRAYoLOCALo *)var_result__D4MI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__C4MI];
          __tmp__V5MI=TRUE__;
        } else {
          __tmp__V5MI=FALSE__;
        };
        if ((! __tmp__V5MI)) {
          if ((idx__C4MI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__D4MI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__A4MI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__33MI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__C4MI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__33MI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__A4MI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__A4MI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__33MI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__A4MI=create__name__style__type__25JG(Self__33MI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__BQ1H(Self__33MI)));
    };
    add_last__T2FH(stack_result__WI4F,var__A4MI);
    result__B4MI=write__value__T5FH(var__A4MI,Self__33MI->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__3LBI(Self__33MI,((__LOCAL *)var__A4MI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__A4MI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__B4MI);
}

static void* put_result__NCNI(__EXPR_SHIFT_L *Self__OCNI,__BOOLEAN is_last__PCNI)
// ({EXPR_SHIFT_L},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__RCNI;
  void *result__SCNI;
  __INTEGER idx__TCNI;
  void *var_result__UCNI;
  __BOOLEAN __tmp__GENI;
  var__RCNI=NULL;
  result__SCNI=NULL;
  idx__TCNI= 0;
  var_result__UCNI=NULL;
  if (is_last__PCNI) {
    result__SCNI=Self__OCNI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__TCNI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__UCNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__UCNI != (void *)NULL)) {
        if ((idx__TCNI <= ((__FAST_ARRAYoLOCALo *)var_result__UCNI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__RCNI=((void **)((__FAST_ARRAYoLOCALo *)var_result__UCNI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__TCNI];
          __tmp__GENI=TRUE__;
        } else {
          __tmp__GENI=FALSE__;
        };
        if ((! __tmp__GENI)) {
          if ((idx__TCNI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__UCNI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__RCNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__OCNI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__TCNI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__OCNI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__RCNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__RCNI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__OCNI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__RCNI=create__name__style__type__25JG(Self__OCNI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GQ1H(Self__OCNI)));
    };
    add_last__T2FH(stack_result__WI4F,var__RCNI);
    result__SCNI=write__value__T5FH(var__RCNI,Self__OCNI->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__2UBI(Self__OCNI,((__LOCAL *)var__RCNI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__RCNI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__SCNI);
}

static void* put_result__3GNI(__PUT_TO *Self__4GNI,__BOOLEAN is_last__5GNI)
// ({PUT_TO},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__BHNI;
  void *result__CHNI;
  __INTEGER idx__DHNI;
  void *var_result__EHNI;
  __BOOLEAN __tmp__WINI;
  var__BHNI=NULL;
  result__CHNI=NULL;
  idx__DHNI= 0;
  var_result__EHNI=NULL;
  if (is_last__5GNI) {
    result__CHNI=Self__4GNI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__DHNI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__EHNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__EHNI != (void *)NULL)) {
        if ((idx__DHNI <= ((__FAST_ARRAYoLOCALo *)var_result__EHNI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__BHNI=((void **)((__FAST_ARRAYoLOCALo *)var_result__EHNI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__DHNI];
          __tmp__WINI=TRUE__;
        } else {
          __tmp__WINI=FALSE__;
        };
        if ((! __tmp__WINI)) {
          if ((idx__DHNI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__EHNI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__BHNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__4GNI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__DHNI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__4GNI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__BHNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__BHNI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__4GNI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__BHNI=create__name__style__type__25JG(Self__4GNI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)TYPE_VOID__->parent_type__UIB.default__AKC));
    };
    add_last__T2FH(stack_result__WI4F,var__BHNI);
    result__CHNI=write__value__T5FH(var__BHNI,Self__4GNI->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__03BI(Self__4GNI,((__LOCAL *)var__BHNI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__BHNI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__CHNI);
}

static void* put_result__NLNI(__ITEM *Self__OLNI,__BOOLEAN is_last__PLNI)
// ({ITEM},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__RLNI;
  void *result__SLNI;
  __INTEGER idx__TLNI;
  void *var_result__ULNI;
  __BOOLEAN __tmp__GNNI;
  var__RLNI=NULL;
  result__SLNI=NULL;
  idx__TLNI= 0;
  var_result__ULNI=NULL;
  if (is_last__PLNI) {
    result__SLNI=Self__OLNI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__TLNI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__ULNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__ULNI != (void *)NULL)) {
        if ((idx__TLNI <= ((__FAST_ARRAYoLOCALo *)var_result__ULNI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__RLNI=((void **)((__FAST_ARRAYoLOCALo *)var_result__ULNI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__TLNI];
          __tmp__GNNI=TRUE__;
        } else {
          __tmp__GNNI=FALSE__;
        };
        if ((! __tmp__GNNI)) {
          if ((idx__TLNI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__ULNI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__RLNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__OLNI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__TLNI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__OLNI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__RLNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__RLNI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__OLNI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__RLNI=create__name__style__type__25JG(Self__OLNI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__PQ1H(Self__OLNI)));
    };
    add_last__T2FH(stack_result__WI4F,var__RLNI);
    result__SLNI=write__value__T5FH(var__RLNI,Self__OLNI->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__YGCI(Self__OLNI,((__LOCAL *)var__RLNI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__RLNI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__SLNI);
}

static void* put_result__3PNI(__SIZE_OF *Self__4PNI,__BOOLEAN is_last__5PNI)
// ({SIZE_OF},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__BQNI;
  void *result__CQNI;
  __INTEGER idx__DQNI;
  void *var_result__EQNI;
  __BOOLEAN __tmp__WRNI;
  var__BQNI=NULL;
  result__CQNI=NULL;
  idx__DQNI= 0;
  var_result__EQNI=NULL;
  if (is_last__5PNI) {
    result__CQNI=Self__4PNI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__DQNI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__EQNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__EQNI != (void *)NULL)) {
        if ((idx__DQNI <= ((__FAST_ARRAYoLOCALo *)var_result__EQNI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__BQNI=((void **)((__FAST_ARRAYoLOCALo *)var_result__EQNI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__DQNI];
          __tmp__WRNI=TRUE__;
        } else {
          __tmp__WRNI=FALSE__;
        };
        if ((! __tmp__WRNI)) {
          if ((idx__DQNI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__EQNI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__BQNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__4PNI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__DQNI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__4PNI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__BQNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__BQNI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__4PNI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__BQNI=create__name__style__type__25JG(Self__4PNI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__1Q1H()));
    };
    add_last__T2FH(stack_result__WI4F,var__BQNI);
    result__CQNI=write__value__T5FH(var__BQNI,Self__4PNI->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__WPCI(Self__4PNI,((__LOCAL *)var__BQNI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__BQNI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__CQNI);
}

static void* put_result__NUNI(__CAST *Self__OUNI,__BOOLEAN is_last__PUNI)
// ({CAST},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__RUNI;
  void *result__SUNI;
  __INTEGER idx__TUNI;
  void *var_result__UUNI;
  __BOOLEAN __tmp__GWNI;
  var__RUNI=NULL;
  result__SUNI=NULL;
  idx__TUNI= 0;
  var_result__UUNI=NULL;
  if (is_last__PUNI) {
    result__SUNI=Self__OUNI;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__TUNI=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__UUNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__UUNI != (void *)NULL)) {
        if ((idx__TUNI <= ((__FAST_ARRAYoLOCALo *)var_result__UUNI)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__RUNI=((void **)((__FAST_ARRAYoLOCALo *)var_result__UUNI)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__TUNI];
          __tmp__GWNI=TRUE__;
        } else {
          __tmp__GWNI=FALSE__;
        };
        if ((! __tmp__GWNI)) {
          if ((idx__TUNI == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__UUNI)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__RUNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__OUNI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__TUNI !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__OUNI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__RUNI=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__RUNI == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__OUNI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__RUNI=create__name__style__type__25JG(Self__OUNI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__OUNI->static_type__SO1H));
    };
    add_last__T2FH(stack_result__WI4F,var__RUNI);
    result__SUNI=write__value__T5FH(var__RUNI,Self__OUNI->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__UYCI(Self__OUNI,((__LOCAL *)var__RUNI)->parent_variable__B2LC.type__125F,((__LOCAL *)var__RUNI)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__SUNI);
}

static void* put_result__J5DN(__CALL_SLOT *Self__K5DN,__BOOLEAN is_last__L5DN)
// ({CALL_SLOT},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__N5DN;
  void *result__O5DN;
  __INTEGER idx__P5DN;
  void *var_result__Q5DN;
  __BOOLEAN __tmp__CBEN;
  var__N5DN=NULL;
  result__O5DN=NULL;
  idx__P5DN= 0;
  var_result__Q5DN=NULL;
  if (is_last__L5DN) {
    result__O5DN=Self__K5DN;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__P5DN=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__Q5DN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__Q5DN != (void *)NULL)) {
        if ((idx__P5DN <= ((__FAST_ARRAYoLOCALo *)var_result__Q5DN)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__N5DN=((void **)((__FAST_ARRAYoLOCALo *)var_result__Q5DN)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__P5DN];
          __tmp__CBEN=TRUE__;
        } else {
          __tmp__CBEN=FALSE__;
        };
        if ((! __tmp__CBEN)) {
          if ((idx__P5DN == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__Q5DN)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__N5DN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__K5DN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__P5DN !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__K5DN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__N5DN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__N5DN == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__K5DN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__N5DN=create__name__style__type__25JG(Self__K5DN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__GIKL(Self__K5DN)));
    };
    add_last__T2FH(stack_result__WI4F,var__N5DN);
    result__O5DN=write__value__T5FH(var__N5DN,Self__K5DN->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__RIDN(Self__K5DN,((__LOCAL *)var__N5DN)->parent_variable__B2LC.type__125F,((__LOCAL *)var__N5DN)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__O5DN);
}

static void* put_result__YCLL(__READ_SLOT *Self__ZCLL,__BOOLEAN is_last__0CLL)
// ({READ_SLOT},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__2CLL;
  void *result__3CLL;
  __INTEGER idx__4CLL;
  void *var_result__5CLL;
  __BOOLEAN __tmp__RELL;
  var__2CLL=NULL;
  result__3CLL=NULL;
  idx__4CLL= 0;
  var_result__5CLL=NULL;
  if (is_last__0CLL) {
    result__3CLL=Self__ZCLL;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__4CLL=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__5CLL=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__5CLL != (void *)NULL)) {
        if ((idx__4CLL <= ((__FAST_ARRAYoLOCALo *)var_result__5CLL)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__2CLL=((void **)((__FAST_ARRAYoLOCALo *)var_result__5CLL)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__4CLL];
          __tmp__RELL=TRUE__;
        } else {
          __tmp__RELL=FALSE__;
        };
        if ((! __tmp__RELL)) {
          if ((idx__4CLL == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__5CLL)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__2CLL=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__ZCLL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__4CLL !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__ZCLL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__2CLL=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__2CLL == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__ZCLL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__2CLL=create__name__style__type__25JG(Self__ZCLL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__ZCLL->slot__EVGK)->parent_variable__AJZD.type__125F));
    };
    add_last__T2FH(stack_result__WI4F,var__2CLL);
    result__3CLL=write__value__T5FH(var__2CLL,Self__ZCLL->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__VPKL(Self__ZCLL,((__LOCAL *)var__2CLL)->parent_variable__B2LC.type__125F,((__LOCAL *)var__2CLL)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__3CLL);
}

static void* put_result__JHLL(__READ_GLOBAL *Self__KHLL,__BOOLEAN is_last__LHLL)
// ({READ_GLOBAL},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__NHLL;
  void *result__OHLL;
  __INTEGER idx__PHLL;
  void *var_result__QHLL;
  __BOOLEAN __tmp__CJLL;
  var__NHLL=NULL;
  result__OHLL=NULL;
  idx__PHLL= 0;
  var_result__QHLL=NULL;
  if (is_last__LHLL) {
    result__OHLL=Self__KHLL;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__PHLL=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__QHLL=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__QHLL != (void *)NULL)) {
        if ((idx__PHLL <= ((__FAST_ARRAYoLOCALo *)var_result__QHLL)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__NHLL=((void **)((__FAST_ARRAYoLOCALo *)var_result__QHLL)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__PHLL];
          __tmp__CJLL=TRUE__;
        } else {
          __tmp__CJLL=FALSE__;
        };
        if ((! __tmp__CJLL)) {
          if ((idx__PHLL == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__QHLL)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__NHLL=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__KHLL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__PHLL !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__KHLL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__NHLL=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__NHLL == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__KHLL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__NHLL=create__name__style__type__25JG(Self__KHLL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)((__SLOT_DATA *)Self__KHLL->global__RHJK)->parent_variable__AJZD.type__125F));
    };
    add_last__T2FH(stack_result__WI4F,var__NHLL);
    result__OHLL=write__value__T5FH(var__NHLL,Self__KHLL->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__UYKL(Self__KHLL,((__LOCAL *)var__NHLL)->parent_variable__B2LC.type__125F,((__LOCAL *)var__NHLL)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__OHLL);
}

static void* put_result__I13O(__EXPR_NOT_LOGIC *Self__J13O,__BOOLEAN is_last__K13O)
// ({EXPR_NOT_LOGIC},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__M13O;
  void *result__N13O;
  __INTEGER idx__O13O;
  void *var_result__P13O;
  __BOOLEAN __tmp__B33O;
  var__M13O=NULL;
  result__N13O=NULL;
  idx__O13O= 0;
  var_result__P13O=NULL;
  if (is_last__K13O) {
    result__N13O=Self__J13O;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__O13O=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__P13O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__P13O != (void *)NULL)) {
        if ((idx__O13O <= ((__FAST_ARRAYoLOCALo *)var_result__P13O)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__M13O=((void **)((__FAST_ARRAYoLOCALo *)var_result__P13O)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__O13O];
          __tmp__B33O=TRUE__;
        } else {
          __tmp__B33O=FALSE__;
        };
        if ((! __tmp__B33O)) {
          if ((idx__O13O == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__P13O)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__M13O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__J13O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__O13O !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__J13O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__M13O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__M13O == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__J13O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__M13O=create__name__style__type__25JG(Self__J13O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__JRZM()));
    };
    add_last__T2FH(stack_result__WI4F,var__M13O);
    result__N13O=write__value__T5FH(var__M13O,Self__J13O->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__IW2O(Self__J13O,((__LOCAL *)var__M13O)->parent_variable__B2LC.type__125F,((__LOCAL *)var__M13O)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__N13O);
}

static void* put_result__WUJO(__EXPR_OR_LOGIC *Self__XUJO,__BOOLEAN is_last__YUJO)
// ({EXPR_OR_LOGIC},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__0UJO;
  void *result__1UJO;
  __INTEGER idx__2UJO;
  void *var_result__3UJO;
  __BOOLEAN __tmp__PWJO;
  var__0UJO=NULL;
  result__1UJO=NULL;
  idx__2UJO= 0;
  var_result__3UJO=NULL;
  if (is_last__YUJO) {
    result__1UJO=Self__XUJO;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__2UJO=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__3UJO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__3UJO != (void *)NULL)) {
        if ((idx__2UJO <= ((__FAST_ARRAYoLOCALo *)var_result__3UJO)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__0UJO=((void **)((__FAST_ARRAYoLOCALo *)var_result__3UJO)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__2UJO];
          __tmp__PWJO=TRUE__;
        } else {
          __tmp__PWJO=FALSE__;
        };
        if ((! __tmp__PWJO)) {
          if ((idx__2UJO == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__3UJO)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__0UJO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__XUJO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__2UJO !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XUJO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__0UJO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__0UJO == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XUJO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__0UJO=create__name__style__type__25JG(Self__XUJO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__VLEO()));
    };
    add_last__T2FH(stack_result__WI4F,var__0UJO);
    result__1UJO=write__value__T5FH(var__0UJO,Self__XUJO->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__AYIO(Self__XUJO,((__LOCAL *)var__0UJO)->parent_variable__B2LC.type__125F,((__LOCAL *)var__0UJO)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__1UJO);
}

static void* put_result__3YSO(__EXPR_OR_OR_LOGIC *Self__4YSO,__BOOLEAN is_last__5YSO)
// ({EXPR_OR_OR_LOGIC},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__BZSO;
  void *result__CZSO;
  __INTEGER idx__DZSO;
  void *var_result__EZSO;
  __BOOLEAN __tmp__W0SO;
  var__BZSO=NULL;
  result__CZSO=NULL;
  idx__DZSO= 0;
  var_result__EZSO=NULL;
  if (is_last__5YSO) {
    result__CZSO=Self__4YSO;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__DZSO=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__EZSO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__EZSO != (void *)NULL)) {
        if ((idx__DZSO <= ((__FAST_ARRAYoLOCALo *)var_result__EZSO)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__BZSO=((void **)((__FAST_ARRAYoLOCALo *)var_result__EZSO)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__DZSO];
          __tmp__W0SO=TRUE__;
        } else {
          __tmp__W0SO=FALSE__;
        };
        if ((! __tmp__W0SO)) {
          if ((idx__DZSO == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__EZSO)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__BZSO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__4YSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__DZSO !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__4YSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__BZSO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__BZSO == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__4YSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__BZSO=create__name__style__type__25JG(Self__4YSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__LVIO()));
    };
    add_last__T2FH(stack_result__WI4F,var__BZSO);
    result__CZSO=write__value__T5FH(var__BZSO,Self__4YSO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__IFSO(Self__4YSO,((__LOCAL *)var__BZSO)->parent_variable__B2LC.type__125F,((__LOCAL *)var__BZSO)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__CZSO);
}

static void* put_result__HZJO(__EXPR_AND_LOGIC *Self__IZJO,__BOOLEAN is_last__JZJO)
// ({EXPR_AND_LOGIC},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__LZJO;
  void *result__MZJO;
  __INTEGER idx__NZJO;
  void *var_result__OZJO;
  __BOOLEAN __tmp__A1JO;
  var__LZJO=NULL;
  result__MZJO=NULL;
  idx__NZJO= 0;
  var_result__OZJO=NULL;
  if (is_last__JZJO) {
    result__MZJO=Self__IZJO;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__NZJO=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__OZJO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__OZJO != (void *)NULL)) {
        if ((idx__NZJO <= ((__FAST_ARRAYoLOCALo *)var_result__OZJO)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__LZJO=((void **)((__FAST_ARRAYoLOCALo *)var_result__OZJO)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__NZJO];
          __tmp__A1JO=TRUE__;
        } else {
          __tmp__A1JO=FALSE__;
        };
        if ((! __tmp__A1JO)) {
          if ((idx__NZJO == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__OZJO)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__LZJO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__IZJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__NZJO !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IZJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__LZJO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__LZJO == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IZJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__LZJO=create__name__style__type__25JG(Self__IZJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__0LEO()));
    };
    add_last__T2FH(stack_result__WI4F,var__LZJO);
    result__MZJO=write__value__T5FH(var__LZJO,Self__IZJO->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__5AJO(Self__IZJO,((__LOCAL *)var__LZJO)->parent_variable__B2LC.type__125F,((__LOCAL *)var__LZJO)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__MZJO);
}

static void* put_result__P3SO(__EXPR_AND_AND_LOGIC *Self__Q3SO,__BOOLEAN is_last__R3SO)
// ({EXPR_AND_AND_LOGIC},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__T3SO;
  void *result__U3SO;
  __INTEGER idx__V3SO;
  void *var_result__W3SO;
  __BOOLEAN __tmp__I5SO;
  var__T3SO=NULL;
  result__U3SO=NULL;
  idx__V3SO= 0;
  var_result__W3SO=NULL;
  if (is_last__R3SO) {
    result__U3SO=Self__Q3SO;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__V3SO=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__W3SO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__W3SO != (void *)NULL)) {
        if ((idx__V3SO <= ((__FAST_ARRAYoLOCALo *)var_result__W3SO)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__T3SO=((void **)((__FAST_ARRAYoLOCALo *)var_result__W3SO)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__V3SO];
          __tmp__I5SO=TRUE__;
        } else {
          __tmp__I5SO=FALSE__;
        };
        if ((! __tmp__I5SO)) {
          if ((idx__V3SO == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__W3SO)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__T3SO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__Q3SO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__V3SO !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__Q3SO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__T3SO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__T3SO == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__Q3SO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__T3SO=create__name__style__type__25JG(Self__Q3SO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__RVIO()));
    };
    add_last__T2FH(stack_result__WI4F,var__T3SO);
    result__U3SO=write__value__T5FH(var__T3SO,Self__Q3SO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__IOSO(Self__Q3SO,((__LOCAL *)var__T3SO)->parent_variable__B2LC.type__125F,((__LOCAL *)var__T3SO)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__U3SO);
}

static void* put_result__WLYM(__EXPR_NEG *Self__XLYM,__BOOLEAN is_last__YLYM)
// ({EXPR_NEG},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__0LYM;
  void *result__1LYM;
  __INTEGER idx__2LYM;
  void *var_result__3LYM;
  __BOOLEAN __tmp__PNYM;
  var__0LYM=NULL;
  result__1LYM=NULL;
  idx__2LYM= 0;
  var_result__3LYM=NULL;
  if (is_last__YLYM) {
    result__1LYM=Self__XLYM;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__2LYM=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__3LYM=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__3LYM != (void *)NULL)) {
        if ((idx__2LYM <= ((__FAST_ARRAYoLOCALo *)var_result__3LYM)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__0LYM=((void **)((__FAST_ARRAYoLOCALo *)var_result__3LYM)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__2LYM];
          __tmp__PNYM=TRUE__;
        } else {
          __tmp__PNYM=FALSE__;
        };
        if ((! __tmp__PNYM)) {
          if ((idx__2LYM == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__3LYM)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__0LYM=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__XLYM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__2LYM !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XLYM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__0LYM=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__0LYM == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__XLYM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__0LYM=create__name__style__type__25JG(Self__XLYM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__Z2IM(Self__XLYM)));
    };
    add_last__T2FH(stack_result__WI4F,var__0LYM);
    result__1LYM=write__value__T5FH(var__0LYM,Self__XLYM->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__SVXM(Self__XLYM,((__LOCAL *)var__0LYM)->parent_variable__B2LC.type__125F,((__LOCAL *)var__0LYM)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__1LYM);
}

static void* put_result__HQYM(__EXPR_ADD *Self__IQYM,__BOOLEAN is_last__JQYM)
// ({EXPR_ADD},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__LQYM;
  void *result__MQYM;
  __INTEGER idx__NQYM;
  void *var_result__OQYM;
  __BOOLEAN __tmp__ASYM;
  var__LQYM=NULL;
  result__MQYM=NULL;
  idx__NQYM= 0;
  var_result__OQYM=NULL;
  if (is_last__JQYM) {
    result__MQYM=Self__IQYM;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__NQYM=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__OQYM=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__OQYM != (void *)NULL)) {
        if ((idx__NQYM <= ((__FAST_ARRAYoLOCALo *)var_result__OQYM)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__LQYM=((void **)((__FAST_ARRAYoLOCALo *)var_result__OQYM)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__NQYM];
          __tmp__ASYM=TRUE__;
        } else {
          __tmp__ASYM=FALSE__;
        };
        if ((! __tmp__ASYM)) {
          if ((idx__NQYM == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__OQYM)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__LQYM=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__IQYM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__NQYM !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IQYM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__LQYM=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__LQYM == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__IQYM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__LQYM=create__name__style__type__25JG(Self__IQYM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__IXML(Self__IQYM)));
    };
    add_last__T2FH(stack_result__WI4F,var__LQYM);
    result__MQYM=write__value__T5FH(var__LQYM,Self__IQYM->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__R4XM(Self__IQYM,((__LOCAL *)var__LQYM)->parent_variable__B2LC.type__125F,((__LOCAL *)var__LQYM)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__MQYM);
}

static void* put_result__0DEN(__EXPR_NOT *Self__1DEN,__BOOLEAN is_last__2DEN)
// ({EXPR_NOT},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__4DEN;
  void *result__5DEN;
  __INTEGER idx__AEEN;
  void *var_result__BEEN;
  __BOOLEAN __tmp__TFEN;
  var__4DEN=NULL;
  result__5DEN=NULL;
  idx__AEEN= 0;
  var_result__BEEN=NULL;
  if (is_last__2DEN) {
    result__5DEN=Self__1DEN;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__AEEN=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__BEEN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__BEEN != (void *)NULL)) {
        if ((idx__AEEN <= ((__FAST_ARRAYoLOCALo *)var_result__BEEN)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__4DEN=((void **)((__FAST_ARRAYoLOCALo *)var_result__BEEN)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__AEEN];
          __tmp__TFEN=TRUE__;
        } else {
          __tmp__TFEN=FALSE__;
        };
        if ((! __tmp__TFEN)) {
          if ((idx__AEEN == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__BEEN)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__4DEN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__1DEN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__AEEN !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1DEN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__4DEN=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__4DEN == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1DEN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__4DEN=create__name__style__type__25JG(Self__1DEN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__BTXM(Self__1DEN)));
    };
    add_last__T2FH(stack_result__WI4F,var__4DEN);
    result__5DEN=write__value__T5FH(var__4DEN,Self__1DEN->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__QRDN(Self__1DEN,((__LOCAL *)var__4DEN)->parent_variable__B2LC.type__125F,((__LOCAL *)var__4DEN)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__5DEN);
}

static void* put_result__Y3JO(__EXPR_MOD *Self__Z3JO,__BOOLEAN is_last__03JO)
// ({EXPR_MOD},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__23JO;
  void *result__33JO;
  __INTEGER idx__43JO;
  void *var_result__53JO;
  __BOOLEAN __tmp__R5JO;
  var__23JO=NULL;
  result__33JO=NULL;
  idx__43JO= 0;
  var_result__53JO=NULL;
  if (is_last__03JO) {
    result__33JO=Self__Z3JO;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__43JO=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__53JO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__53JO != (void *)NULL)) {
        if ((idx__43JO <= ((__FAST_ARRAYoLOCALo *)var_result__53JO)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__23JO=((void **)((__FAST_ARRAYoLOCALo *)var_result__53JO)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__43JO];
          __tmp__R5JO=TRUE__;
        } else {
          __tmp__R5JO=FALSE__;
        };
        if ((! __tmp__R5JO)) {
          if ((idx__43JO == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__53JO)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__23JO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__Z3JO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__43JO !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__Z3JO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__23JO=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__23JO == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__Z3JO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__23JO=create__name__style__type__25JG(Self__Z3JO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__5LEO(Self__Z3JO)));
    };
    add_last__T2FH(stack_result__WI4F,var__23JO);
    result__33JO=write__value__T5FH(var__23JO,Self__Z3JO->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__4JJO(Self__Z3JO,((__LOCAL *)var__23JO)->parent_variable__B2LC.type__125F,((__LOCAL *)var__23JO)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__33JO);
}

static void* put_result__0ZIP(__EXPR_SUP_EQ *Self__1ZIP,__BOOLEAN is_last__2ZIP)
// ({EXPR_SUP_EQ},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__4ZIP;
  void *result__5ZIP;
  __INTEGER idx__A0IP;
  void *var_result__B0IP;
  __BOOLEAN __tmp__T1IP;
  var__4ZIP=NULL;
  result__5ZIP=NULL;
  idx__A0IP= 0;
  var_result__B0IP=NULL;
  if (is_last__2ZIP) {
    result__5ZIP=Self__1ZIP;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__A0IP=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__B0IP=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__B0IP != (void *)NULL)) {
        if ((idx__A0IP <= ((__FAST_ARRAYoLOCALo *)var_result__B0IP)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__4ZIP=((void **)((__FAST_ARRAYoLOCALo *)var_result__B0IP)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__A0IP];
          __tmp__T1IP=TRUE__;
        } else {
          __tmp__T1IP=FALSE__;
        };
        if ((! __tmp__T1IP)) {
          if ((idx__A0IP == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__B0IP)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__4ZIP=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__1ZIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__A0IP !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1ZIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__4ZIP=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__4ZIP == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1ZIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__4ZIP=create__name__style__type__25JG(Self__1ZIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__W2DP()));
    };
    add_last__T2FH(stack_result__WI4F,var__4ZIP);
    result__5ZIP=write__value__T5FH(var__4ZIP,Self__1ZIP->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__SQIP(Self__1ZIP,((__LOCAL *)var__4ZIP)->parent_variable__B2LC.type__125F,((__LOCAL *)var__4ZIP)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__5ZIP);
}

static void* put_result__Z53O(__EXPR_INF *Self__053O,__BOOLEAN is_last__153O)
// ({EXPR_INF},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__353O;
  void *result__453O;
  __INTEGER idx__553O;
  void *var_result__AA4O;
  __BOOLEAN __tmp__SB4O;
  var__353O=NULL;
  result__453O=NULL;
  idx__553O= 0;
  var_result__AA4O=NULL;
  if (is_last__153O) {
    result__453O=Self__053O;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__553O=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__AA4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__AA4O != (void *)NULL)) {
        if ((idx__553O <= ((__FAST_ARRAYoLOCALo *)var_result__AA4O)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__353O=((void **)((__FAST_ARRAYoLOCALo *)var_result__AA4O)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__553O];
          __tmp__SB4O=TRUE__;
        } else {
          __tmp__SB4O=FALSE__;
        };
        if ((! __tmp__SB4O)) {
          if ((idx__553O == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__AA4O)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__353O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__053O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__553O !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__053O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__353O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__353O == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__053O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__353O=create__name__style__type__25JG(Self__053O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__FQQN()));
    };
    add_last__T2FH(stack_result__WI4F,var__353O);
    result__453O=write__value__T5FH(var__353O,Self__053O->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__H52O(Self__053O,((__LOCAL *)var__353O)->parent_variable__B2LC.type__125F,((__LOCAL *)var__353O)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__453O);
}

static void* put_result__KE4O(__EXPR_INF_EQ *Self__LE4O,__BOOLEAN is_last__ME4O)
// ({EXPR_INF_EQ},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__OE4O;
  void *result__PE4O;
  __INTEGER idx__QE4O;
  void *var_result__RE4O;
  __BOOLEAN __tmp__DG4O;
  var__OE4O=NULL;
  result__PE4O=NULL;
  idx__QE4O= 0;
  var_result__RE4O=NULL;
  if (is_last__ME4O) {
    result__PE4O=Self__LE4O;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__QE4O=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__RE4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__RE4O != (void *)NULL)) {
        if ((idx__QE4O <= ((__FAST_ARRAYoLOCALo *)var_result__RE4O)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__OE4O=((void **)((__FAST_ARRAYoLOCALo *)var_result__RE4O)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__QE4O];
          __tmp__DG4O=TRUE__;
        } else {
          __tmp__DG4O=FALSE__;
        };
        if ((! __tmp__DG4O)) {
          if ((idx__QE4O == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__RE4O)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__OE4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__LE4O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__QE4O !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__LE4O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__OE4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__OE4O == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__LE4O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__OE4O=create__name__style__type__25JG(Self__LE4O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__KQQN()));
    };
    add_last__T2FH(stack_result__WI4F,var__OE4O);
    result__PE4O=write__value__T5FH(var__OE4O,Self__LE4O->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__GI3O(Self__LE4O,((__LOCAL *)var__OE4O)->parent_variable__B2LC.type__125F,((__LOCAL *)var__OE4O)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__PE4O);
}

static void* put_result__0C0N(__EXPR_OR *Self__1C0N,__BOOLEAN is_last__2C0N)
// ({EXPR_OR},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__4C0N;
  void *result__5C0N;
  __INTEGER idx__AD0N;
  void *var_result__BD0N;
  __BOOLEAN __tmp__TE0N;
  var__4C0N=NULL;
  result__5C0N=NULL;
  idx__AD0N= 0;
  var_result__BD0N=NULL;
  if (is_last__2C0N) {
    result__5C0N=Self__1C0N;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__AD0N=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__BD0N=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__BD0N != (void *)NULL)) {
        if ((idx__AD0N <= ((__FAST_ARRAYoLOCALo *)var_result__BD0N)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__4C0N=((void **)((__FAST_ARRAYoLOCALo *)var_result__BD0N)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__AD0N];
          __tmp__TE0N=TRUE__;
        } else {
          __tmp__TE0N=FALSE__;
        };
        if ((! __tmp__TE0N)) {
          if ((idx__AD0N == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__BD0N)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__4C0N=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__1C0N->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__AD0N !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1C0N->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__4C0N=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__4C0N == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__1C0N->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__4C0N=create__name__style__type__25JG(Self__1C0N->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__NOPN(Self__1C0N)));
    };
    add_last__T2FH(stack_result__WI4F,var__4C0N);
    result__5C0N=write__value__T5FH(var__4C0N,Self__1C0N->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__MZZN(Self__1C0N,((__LOCAL *)var__4C0N)->parent_variable__B2LC.type__125F,((__LOCAL *)var__4C0N)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__5C0N);
}

static void* put_result__1I4O(__EXPR_XOR *Self__2I4O,__BOOLEAN is_last__3I4O)
// ({EXPR_XOR},{TRUExFALSE}) With resultNo recursive, No inlinable.
{
  void *var__5I4O;
  void *result__AJ4O;
  __INTEGER idx__BJ4O;
  void *var_result__CJ4O;
  __BOOLEAN __tmp__UK4O;
  var__5I4O=NULL;
  result__AJ4O=NULL;
  idx__BJ4O= 0;
  var_result__CJ4O=NULL;
  if (is_last__3I4O) {
    result__AJ4O=Self__2I4O;
  } else {
    if ((((void *)profil_first__4PQC != (void *)NULL) && ((void *)((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.code__HZJH == (void *)list_current__IF1))) {
      idx__BJ4O=(__INTEGER)((__INTEGER)(((__FAST_ARRAYoLOCALo *)stack_result__WI4F)->parent_arrayed_collection__QI4F.upper__TI4F +  1) - stack_result_lower__DI4F);
      var_result__CJ4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_list__SA2H;
      if (((void *)var_result__CJ4O != (void *)NULL)) {
        if ((idx__BJ4O <= ((__FAST_ARRAYoLOCALo *)var_result__CJ4O)->parent_arrayed_collection__QI4F.upper__TI4F)) {
          var__5I4O=((void **)((__FAST_ARRAYoLOCALo *)var_result__CJ4O)->parent_arrayed_collection__QI4F.storage__FXPG)[idx__BJ4O];
          __tmp__UK4O=TRUE__;
        } else {
          __tmp__UK4O=FALSE__;
        };
        if ((! __tmp__UK4O)) {
          if ((idx__BJ4O == (__INTEGER)(((__FAST_ARRAYoLOCALo *)var_result__CJ4O)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
            var__5I4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
          } else {
            put_error__text__0AH( 1,(&__string_566));
            put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
            put_position__ECH(Self__2I4O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
            send_error__2FH();
          };
        };
      } else {
        if ((idx__BJ4O !=  0)) {
          put_error__text__0AH( 1,(&__string_567));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__2I4O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
        var__5I4O=((__PROFIL_SLOT *)profil_first__4PQC)->parent_profil__51LC.result_last__XGKH;
        if (((void *)var__5I4O == (void *)NULL)) {
          put_error__text__0AH( 1,(&__string_568));
          put_position__ECH(((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)((__PROFIL_SLOT *)profil_first__4PQC)->slot_code__X4NL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.parent_itm_object__PD.position__BJM);
          put_position__ECH(Self__2I4O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM);
          send_error__2FH();
        };
      };
    } else {
      var__5I4O=create__name__style__type__25JG(Self__2I4O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,(&__string_60),'+',((__TYPE_FULL *)static_type__XCSO(Self__2I4O)));
    };
    add_last__T2FH(stack_result__WI4F,var__5I4O);
    result__AJ4O=write__value__T5FH(var__5I4O,Self__2I4O->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM,check_type__with__FR3O(Self__2I4O,((__LOCAL *)var__5I4O)->parent_variable__B2LC.type__125F,((__LOCAL *)var__5I4O)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM));
  };
  return(result__AJ4O);
}

static void** create__0SWG(__INTEGER nb_elements__2SWG)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__5JAH;
  void **Result__ERYG;
  Result__ERYG=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__2SWG * ((__INTEGER )(sizeof(void *)))))));
  Self__5JAH=(__INTEGER)(nb_elements__2SWG -  1);
  while ((Self__5JAH >=  0)) {
    Result__ERYG[Self__5JAH]=NULL;
    Self__5JAH=(__INTEGER)(Self__5JAH -  1);
  };
  return(Result__ERYG);
}

static void* check__with__and__0SZH(void *v__2SZH,void *t__3SZH,__POSITION p__4SZH)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *__tmp__BTZH;
  void *__tmp__DTZH;
  void *__tmp__ETZH,*block__ATZH;
  void *__tmp__FUZH;
  switch (((struct ___OBJ *)v__2SZH)->__id) {
  case __LIST__: {
    __tmp__BTZH=static_type__GIQG(v__2SZH);
  } break;
  case __STRING_CST__: {
    __tmp__BTZH=((__STRING_CST *)v__2SZH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__BTZH=((__EXTERNAL_C *)v__2SZH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__BTZH=((__PROTOTYPE_CST *)v__2SZH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__BTZH=((__INTEGER_CST *)v__2SZH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__BTZH=((__LOCAL *)((__READ_LOCAL *)v__2SZH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__BTZH=static_type__0N1H(v__2SZH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__BTZH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__BTZH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__BTZH=((__REAL_CST *)v__2SZH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__BTZH=((__CHARACTER_CST *)v__2SZH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__BTZH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__BTZH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__BTZH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__BTZH=static_type__MP1H(v__2SZH);
  } break;
  case __EXPR_MUL__: {
    __tmp__BTZH=static_type__SP1H(v__2SZH);
  } break;
  case __EXPR_DIV__: {
    __tmp__BTZH=static_type__XP1H(v__2SZH);
  } break;
  case __EXPR_AND__: {
    __tmp__BTZH=static_type__2P1H(v__2SZH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__BTZH=static_type__BQ1H(v__2SZH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__BTZH=static_type__GQ1H(v__2SZH);
  } break;
  case __PUT_TO__: {
    __tmp__BTZH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__BTZH=static_type__PQ1H(v__2SZH);
  } break;
  case __SIZE_OF__: {
    __tmp__BTZH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__BTZH=((__CAST *)v__2SZH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__BTZH=static_type__GIKL(v__2SZH);
  } break;
  case __READ_SLOT__: {
    __tmp__BTZH=((__SLOT_DATA *)((__READ_SLOT *)v__2SZH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__BTZH=((__SLOT_DATA *)((__READ_GLOBAL *)v__2SZH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__BTZH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__BTZH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__BTZH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__BTZH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__BTZH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__BTZH=static_type__Z2IM(v__2SZH);
  } break;
  case __EXPR_ADD__: {
    __tmp__BTZH=static_type__IXML(v__2SZH);
  } break;
  case __EXPR_NOT__: {
    __tmp__BTZH=static_type__BTXM(v__2SZH);
  } break;
  case __EXPR_MOD__: {
    __tmp__BTZH=static_type__5LEO(v__2SZH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__BTZH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__BTZH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__BTZH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__BTZH=static_type__NOPN(v__2SZH);
  } break;
  case __EXPR_XOR__: {
    __tmp__BTZH=static_type__XCSO(v__2SZH);
  } break;
  };
  __tmp__DTZH=((__TYPE_FULL *)__tmp__BTZH)->parent_type__KTL;
  if (__tmp__DTZH==NULL) {
    __tmp__ETZH=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__DTZH)->__id) {
    case __TYPE__: {
      __tmp__ETZH=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__ETZH=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__ETZH=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__ETZH=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__ETZH=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__ETZH=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__ETZH=((void *)__tmp__DTZH);
    } break;
    }
  };
  block__ATZH=__tmp__ETZH;
  if ((((void *)__tmp__ETZH != (void *)NULL) && ((void *)((__PROFIL_BLOCK *)__tmp__ETZH)->context_extern__OMXH != (void *)NULL))) {
    copy__BNK(string_tmp__RB,(&__string_569));
    append__MOK(string_tmp__RB,((__LOCAL *)((__PROFIL_BLOCK *)__tmp__ETZH)->context_extern__OMXH)->parent_variable__B2LC.parent_named__A2LC.name__1QB);
    append__MOK(string_tmp__RB,(&__string_570));
    put_error__text__0AH( 1,string_tmp__RB);
    put_position__ECH(((__LIST *)((__PROFIL_BLOCK *)__tmp__ETZH)->parent_profil__GHAG.code__HZJH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
    put_position__ECH(p__4SZH);
    put_position__ECH(((__LOCAL *)((__PROFIL_BLOCK *)__tmp__ETZH)->context_extern__OMXH)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
    send_error__2FH();
  };
  switch (((struct ___OBJ *)v__2SZH)->__id) {
  case __LIST__: {
    __tmp__FUZH=check_type__with__T5CN(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __STRING_CST__: {
    __tmp__FUZH=check_type__with__Q22H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXTERNAL_C__: {
    __tmp__FUZH=check_type__with__PF3H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__FUZH=check_type__with__OO3H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __INTEGER_CST__: {
    __tmp__FUZH=check_type__with__NX3H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __READ_LOCAL__: {
    __tmp__FUZH=check_type__with__LEFJ(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__FUZH=check_type__with__LA4H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__FUZH=check_type__with__KJ4H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__FUZH=check_type__with__JS4H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __REAL_CST__: {
    __tmp__FUZH=check_type__with__I14H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __CHARACTER_CST__: {
    __tmp__FUZH=check_type__with__HE5H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __IS_EXPANDED__: {
    __tmp__FUZH=check_type__with__FN5H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__FUZH=check_type__with__DW5H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_SUP__: {
    __tmp__FUZH=check_type__with__C55H(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_SUB__: {
    __tmp__FUZH=check_type__with__BIAI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_MUL__: {
    __tmp__FUZH=check_type__with__ARAI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_DIV__: {
    __tmp__FUZH=check_type__with__5ZAI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_AND__: {
    __tmp__FUZH=check_type__with__4CBI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__FUZH=check_type__with__3LBI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__FUZH=check_type__with__2UBI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __PUT_TO__: {
    __tmp__FUZH=check_type__with__03BI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __ITEM__: {
    __tmp__FUZH=check_type__with__YGCI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __SIZE_OF__: {
    __tmp__FUZH=check_type__with__WPCI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __CAST__: {
    __tmp__FUZH=check_type__with__UYCI(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __CALL_SLOT__: {
    __tmp__FUZH=check_type__with__RIDN(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __READ_SLOT__: {
    __tmp__FUZH=check_type__with__VPKL(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __READ_GLOBAL__: {
    __tmp__FUZH=check_type__with__UYKL(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__FUZH=check_type__with__IW2O(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__FUZH=check_type__with__AYIO(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__FUZH=check_type__with__IFSO(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__FUZH=check_type__with__5AJO(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__FUZH=check_type__with__IOSO(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_NEG__: {
    __tmp__FUZH=check_type__with__SVXM(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_ADD__: {
    __tmp__FUZH=check_type__with__R4XM(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_NOT__: {
    __tmp__FUZH=check_type__with__QRDN(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_MOD__: {
    __tmp__FUZH=check_type__with__4JJO(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__FUZH=check_type__with__SQIP(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_INF__: {
    __tmp__FUZH=check_type__with__H52O(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__FUZH=check_type__with__GI3O(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_OR__: {
    __tmp__FUZH=check_type__with__MZZN(v__2SZH,t__3SZH,p__4SZH);
  } break;
  case __EXPR_XOR__: {
    __tmp__FUZH=check_type__with__FR3O(v__2SZH,t__3SZH,p__4SZH);
  } break;
  };
  return(__tmp__FUZH);
}

static void* new_write__slot__receiver__value__ITUH(__POSITION p__KTUH,void *s__LTUH,void *rec__MTUH,void *val__NTUH)
// ({POSITION},{NULLxSLOT_DATAxSLOT_CODE},{NULLxREAD_LOCAL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __DTA_WR_VALUE *result__MNXH,*Self__KNFI;
  __POINTER ptr__NNXH;
  __INTEGER typ_id__SNXH;
  __UINTEGER_32 sz__PNXH,a__EB3Q,new_size__CB3Q,t__IB3Q,a__KB3Q;
  void *__tmp__QNFI;
  __STRING_CST *Self__WYEQ;
  __PROTOTYPE_CST *Self__XYEQ;
  __INTEGER_CST *Self__YYEQ;
  __REAL_CST *Self__0YEQ;
  __CHARACTER_CST *Self__2YEQ;
  __IS_EXPANDED *Self__3YEQ;
  void *result__RTUH;
  result__MNXH=NULL;
  ptr__NNXH=((__POINTER )(NULL));
  typ_id__SNXH= 0;
  sz__PNXH=((__UINTEGER_32 )sizeof(__DTA_WR_VALUE));
  if ((sz__PNXH ==  0)) {
    result__MNXH=DTA_WR_VALUE__;
  } else {
    typ_id__SNXH=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__PNXH);
    if ((typ_id__SNXH == (__INTEGER)(-  1))) {
      a__EB3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__CB3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__PNXH + a__EB3Q) & (__UINTEGER_32)(~ a__EB3Q));
      ptr__NNXH=micro_alloc__table__lab__BOI(new_size__CB3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CB3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__CB3Q);
    } else {
      t__IB3Q=((__UINTEGER_32 )typ_id__SNXH);
      a__KB3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__NNXH=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__PNXH + a__KB3Q) & (__UINTEGER_32)(~ a__KB3Q)),((__POINTER )(&(table_type[(t__IB3Q)]))),(__UINTEGER_32)(t__IB3Q |  1));
    };
    result__MNXH=((__DTA_WR_VALUE *)ptr__NNXH);
    *(result__MNXH) = *(DTA_WR_VALUE__);
  };
  Self__KNFI=((__DTA_WR_VALUE *)result__MNXH);
  Self__KNFI->parent_dta__PTUH.parent_itm_object__5LQC.position__BJM=p__KTUH;
  Self__KNFI->parent_dta__PTUH.context__OJZD=profil_second__3PQC;
  Self__KNFI->parent_dta__PTUH.slot__PJZD=s__LTUH;
  Self__KNFI->parent_dta__PTUH.self_arg__QJZD=rec__MTUH;
  switch (((struct ___OBJ *)val__NTUH)->__id) {
  case __LIST__: {
    __tmp__QNFI=my_copy__2HYM(val__NTUH);
  } break;
  case __STRING_CST__: {
    Self__WYEQ=((__STRING_CST *)val__NTUH);
    __tmp__QNFI=create__text__AUMH(Self__WYEQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__WYEQ->string__ZK2H);
  } break;
  case __EXTERNAL_C__: {
    __tmp__QNFI=my_copy__2K2H(val__NTUH);
  } break;
  case __PROTOTYPE_CST__: {
    Self__XYEQ=((__PROTOTYPE_CST *)val__NTUH);
    __tmp__QNFI=create__type__CLQC(Self__XYEQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XYEQ->parent_constant__E3LC.static_type__F4YD);
  } break;
  case __INTEGER_CST__: {
    Self__YYEQ=((__INTEGER_CST *)val__NTUH);
    __tmp__QNFI=create__value__type__DNQC(Self__YYEQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YYEQ->value__PAZD,Self__YYEQ->parent_constant__P3LC.static_type__F4YD);
  } break;
  case __READ_LOCAL__: {
    __tmp__QNFI=my_copy__OAFJ(val__NTUH);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__QNFI=my_copy__KM2H(val__NTUH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__QNFI=my_copy__DN2H(val__NTUH);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__QNFI=my_copy__QN2H(val__NTUH);
  } break;
  case __REAL_CST__: {
    Self__0YEQ=((__REAL_CST *)val__NTUH);
    __tmp__QNFI=create__value__type__1SMH(Self__0YEQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__0YEQ->value__5N2H,Self__0YEQ->parent_constant__M3JH.static_type__F4YD);
  } break;
  case __CHARACTER_CST__: {
    Self__2YEQ=((__CHARACTER_CST *)val__NTUH);
    __tmp__QNFI=create__char__WTMH(Self__2YEQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2YEQ->text__HO2H);
  } break;
  case __IS_EXPANDED__: {
    Self__3YEQ=((__IS_EXPANDED *)val__NTUH);
    __tmp__QNFI=create__receiver__WRWH(Self__3YEQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__3YEQ->receiver__OO2H));
  } break;
  case __GET_TYPE_ID__: {
    __tmp__QNFI=my_copy__TO2H(val__NTUH);
  } break;
  case __EXPR_SUP__: {
    __tmp__QNFI=my_copy__2O2H(val__NTUH);
  } break;
  case __EXPR_SUB__: {
    __tmp__QNFI=my_copy__HP2H(val__NTUH);
  } break;
  case __EXPR_MUL__: {
    __tmp__QNFI=my_copy__TP2H(val__NTUH);
  } break;
  case __EXPR_DIV__: {
    __tmp__QNFI=my_copy__4P2H(val__NTUH);
  } break;
  case __EXPR_AND__: {
    __tmp__QNFI=my_copy__JQ2H(val__NTUH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__QNFI=my_copy__UQ2H(val__NTUH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__QNFI=my_copy__5Q2H(val__NTUH);
  } break;
  case __PUT_TO__: {
    __tmp__QNFI=my_copy__KR2H(val__NTUH);
  } break;
  case __ITEM__: {
    __tmp__QNFI=my_copy__1R2H(val__NTUH);
  } break;
  case __SIZE_OF__: {
    __tmp__QNFI=my_copy__HS2H(val__NTUH);
  } break;
  case __CAST__: {
    __tmp__QNFI=my_copy__QS2H(val__NTUH);
  } break;
  case __CALL_SLOT__: {
    __tmp__QNFI=my_copy__PIYM(val__NTUH);
  } break;
  case __READ_SLOT__: {
    __tmp__QNFI=my_copy__AVGK(val__NTUH);
  } break;
  case __READ_GLOBAL__: {
    __tmp__QNFI=my_copy__NVGK(val__NTUH);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__QNFI=my_copy__RFCN(val__NTUH);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__QNFI=my_copy__JMEO(val__NTUH);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__QNFI=my_copy__RTJO(val__NTUH);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__QNFI=my_copy__WMEO(val__NTUH);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__QNFI=my_copy__3TJO(val__NTUH);
  } break;
  case __EXPR_NEG__: {
    __tmp__QNFI=my_copy__YEJM(val__NTUH);
  } break;
  case __EXPR_ADD__: {
    __tmp__QNFI=my_copy__YRLL(val__NTUH);
  } break;
  case __EXPR_NOT__: {
    __tmp__QNFI=my_copy__GLYM(val__NTUH);
  } break;
  case __EXPR_MOD__: {
    __tmp__QNFI=my_copy__BNEO(val__NTUH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__QNFI=my_copy__M3DP(val__NTUH);
  } break;
  case __EXPR_INF__: {
    __tmp__QNFI=my_copy__PBSN(val__NTUH);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__QNFI=my_copy__0BSN(val__NTUH);
  } break;
  case __EXPR_OR__: {
    __tmp__QNFI=my_copy__ZOPN(val__NTUH);
  } break;
  case __EXPR_XOR__: {
    __tmp__QNFI=my_copy__CYSO(val__NTUH);
  } break;
  };
  Self__KNFI->parent_dta__PTUH.result_expr__RJZD=__tmp__QNFI;
  Self__KNFI->value__RNFI=val__NTUH;
  result__RTUH=create__with__GWUC(rec__MTUH,result__MNXH);
  add_last__I4YD(node_list__PMQC,result__RTUH);
  return(result__RTUH);
}

static void* check__with__and__TLXH(void *v__VLXH,void *t__WLXH,__POSITION p__XLXH)
// ({NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxTYPE_FULL},{POSITION}) With resultNo recursive, No inlinable.
{
  void *__tmp__0LXH;
  void *__tmp__2LXH;
  void *__tmp__3LXH,*block__ZLXH;
  void *__tmp__5MXH;
  switch (((struct ___OBJ *)v__VLXH)->__id) {
  case __LIST__: {
    __tmp__0LXH=static_type__GIQG(v__VLXH);
  } break;
  case __STRING_CST__: {
    __tmp__0LXH=((__STRING_CST *)v__VLXH)->parent_constant__5F.static_type__F4YD;
  } break;
  case __EXTERNAL_C__: {
    __tmp__0LXH=((__EXTERNAL_C *)v__VLXH)->static_type__UXZD;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__0LXH=((__PROTOTYPE_CST *)v__VLXH)->parent_constant__E3LC.static_type__F4YD;
  } break;
  case __INTEGER_CST__: {
    __tmp__0LXH=((__INTEGER_CST *)v__VLXH)->parent_constant__P3LC.static_type__F4YD;
  } break;
  case __READ_LOCAL__: {
    __tmp__0LXH=((__LOCAL *)((__READ_LOCAL *)v__VLXH)->local__ALZD)->parent_variable__B2LC.type__125F;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__0LXH=static_type__0N1H(v__VLXH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__0LXH=static_type__TO1H();
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__0LXH=static_type__YO1H();
  } break;
  case __REAL_CST__: {
    __tmp__0LXH=((__REAL_CST *)v__VLXH)->parent_constant__M3JH.static_type__F4YD;
  } break;
  case __CHARACTER_CST__: {
    __tmp__0LXH=((__CHARACTER_CST *)v__VLXH)->parent_constant__53JH.static_type__F4YD;
  } break;
  case __IS_EXPANDED__: {
    __tmp__0LXH=static_type__3O1H();
  } break;
  case __GET_TYPE_ID__: {
    __tmp__0LXH=static_type__CP1H();
  } break;
  case __EXPR_SUP__: {
    __tmp__0LXH=static_type__HP1H();
  } break;
  case __EXPR_SUB__: {
    __tmp__0LXH=static_type__MP1H(v__VLXH);
  } break;
  case __EXPR_MUL__: {
    __tmp__0LXH=static_type__SP1H(v__VLXH);
  } break;
  case __EXPR_DIV__: {
    __tmp__0LXH=static_type__XP1H(v__VLXH);
  } break;
  case __EXPR_AND__: {
    __tmp__0LXH=static_type__2P1H(v__VLXH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__0LXH=static_type__BQ1H(v__VLXH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__0LXH=static_type__GQ1H(v__VLXH);
  } break;
  case __PUT_TO__: {
    __tmp__0LXH=TYPE_VOID__->parent_type__UIB.default__AKC;
  } break;
  case __ITEM__: {
    __tmp__0LXH=static_type__PQ1H(v__VLXH);
  } break;
  case __SIZE_OF__: {
    __tmp__0LXH=static_type__1Q1H();
  } break;
  case __CAST__: {
    __tmp__0LXH=((__CAST *)v__VLXH)->static_type__SO1H;
  } break;
  case __CALL_SLOT__: {
    __tmp__0LXH=static_type__GIKL(v__VLXH);
  } break;
  case __READ_SLOT__: {
    __tmp__0LXH=((__SLOT_DATA *)((__READ_SLOT *)v__VLXH)->slot__EVGK)->parent_variable__AJZD.type__125F;
  } break;
  case __READ_GLOBAL__: {
    __tmp__0LXH=((__SLOT_DATA *)((__READ_GLOBAL *)v__VLXH)->global__RHJK)->parent_variable__AJZD.type__125F;
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__0LXH=static_type__JRZM();
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__0LXH=static_type__VLEO();
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__0LXH=static_type__LVIO();
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__0LXH=static_type__0LEO();
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__0LXH=static_type__RVIO();
  } break;
  case __EXPR_NEG__: {
    __tmp__0LXH=static_type__Z2IM(v__VLXH);
  } break;
  case __EXPR_ADD__: {
    __tmp__0LXH=static_type__IXML(v__VLXH);
  } break;
  case __EXPR_NOT__: {
    __tmp__0LXH=static_type__BTXM(v__VLXH);
  } break;
  case __EXPR_MOD__: {
    __tmp__0LXH=static_type__5LEO(v__VLXH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__0LXH=static_type__W2DP();
  } break;
  case __EXPR_INF__: {
    __tmp__0LXH=static_type__FQQN();
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__0LXH=static_type__KQQN();
  } break;
  case __EXPR_OR__: {
    __tmp__0LXH=static_type__NOPN(v__VLXH);
  } break;
  case __EXPR_XOR__: {
    __tmp__0LXH=static_type__XCSO(v__VLXH);
  } break;
  };
  __tmp__2LXH=((__TYPE_FULL *)__tmp__0LXH)->parent_type__KTL;
  if (__tmp__2LXH==NULL) {
    __tmp__3LXH=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__2LXH)->__id) {
    case __TYPE__: {
      __tmp__3LXH=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__3LXH=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__3LXH=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__3LXH=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__3LXH=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__3LXH=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__3LXH=((void *)__tmp__2LXH);
    } break;
    }
  };
  block__ZLXH=__tmp__3LXH;
  if ((((void *)__tmp__3LXH != (void *)NULL) && ((void *)((__PROFIL_BLOCK *)__tmp__3LXH)->context_extern__OMXH != (void *)NULL))) {
    copy__BNK(string_tmp__RB,(&__string_569));
    append__MOK(string_tmp__RB,((__LOCAL *)((__PROFIL_BLOCK *)__tmp__3LXH)->context_extern__OMXH)->parent_variable__B2LC.parent_named__A2LC.name__1QB);
    append__MOK(string_tmp__RB,(&__string_570));
    put_error__text__0AH( 1,string_tmp__RB);
    put_position__ECH(((__LIST *)((__PROFIL_BLOCK *)__tmp__3LXH)->parent_profil__GHAG.code__HZJH)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
    put_position__ECH(p__XLXH);
    put_position__ECH(((__LOCAL *)((__PROFIL_BLOCK *)__tmp__3LXH)->context_extern__OMXH)->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM);
    send_error__2FH();
  };
  switch (((struct ___OBJ *)v__VLXH)->__id) {
  case __LIST__: {
    __tmp__5MXH=check_type__with__T5CN(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __STRING_CST__: {
    __tmp__5MXH=check_type__with__Q22H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXTERNAL_C__: {
    __tmp__5MXH=check_type__with__PF3H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__5MXH=check_type__with__OO3H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __INTEGER_CST__: {
    __tmp__5MXH=check_type__with__NX3H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __READ_LOCAL__: {
    __tmp__5MXH=check_type__with__LEFJ(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__5MXH=check_type__with__LA4H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__5MXH=check_type__with__KJ4H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__5MXH=check_type__with__JS4H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __REAL_CST__: {
    __tmp__5MXH=check_type__with__I14H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __CHARACTER_CST__: {
    __tmp__5MXH=check_type__with__HE5H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __IS_EXPANDED__: {
    __tmp__5MXH=check_type__with__FN5H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __GET_TYPE_ID__: {
    __tmp__5MXH=check_type__with__DW5H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_SUP__: {
    __tmp__5MXH=check_type__with__C55H(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_SUB__: {
    __tmp__5MXH=check_type__with__BIAI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_MUL__: {
    __tmp__5MXH=check_type__with__ARAI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_DIV__: {
    __tmp__5MXH=check_type__with__5ZAI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_AND__: {
    __tmp__5MXH=check_type__with__4CBI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__5MXH=check_type__with__3LBI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__5MXH=check_type__with__2UBI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __PUT_TO__: {
    __tmp__5MXH=check_type__with__03BI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __ITEM__: {
    __tmp__5MXH=check_type__with__YGCI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __SIZE_OF__: {
    __tmp__5MXH=check_type__with__WPCI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __CAST__: {
    __tmp__5MXH=check_type__with__UYCI(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __CALL_SLOT__: {
    __tmp__5MXH=check_type__with__RIDN(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __READ_SLOT__: {
    __tmp__5MXH=check_type__with__VPKL(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __READ_GLOBAL__: {
    __tmp__5MXH=check_type__with__UYKL(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__5MXH=check_type__with__IW2O(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__5MXH=check_type__with__AYIO(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__5MXH=check_type__with__IFSO(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__5MXH=check_type__with__5AJO(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__5MXH=check_type__with__IOSO(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_NEG__: {
    __tmp__5MXH=check_type__with__SVXM(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_ADD__: {
    __tmp__5MXH=check_type__with__R4XM(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_NOT__: {
    __tmp__5MXH=check_type__with__QRDN(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_MOD__: {
    __tmp__5MXH=check_type__with__4JJO(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__5MXH=check_type__with__SQIP(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_INF__: {
    __tmp__5MXH=check_type__with__H52O(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__5MXH=check_type__with__GI3O(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_OR__: {
    __tmp__5MXH=check_type__with__MZZN(v__VLXH,t__WLXH,p__XLXH);
  } break;
  case __EXPR_XOR__: {
    __tmp__5MXH=check_type__with__FR3O(v__VLXH,t__WLXH,p__XLXH);
  } break;
  };
  return(__tmp__5MXH);
}

static __BOOLEAN is_sub_type_with_name__F35N(__TYPE *Self__G35N,void *n__H35N)
// ({TYPE},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__K35N;
  void *type_parent__L35N;
  void *__tmp__H45N,*__tmp__245N,*__tmp__F55N;
  void *__tmp__I45N,*__tmp__345N;
  __SECTION_ *Self__ILKQ;
  void *__tmp__G55N;
  __BOOLEAN result__J35N,__tmp__T45N,__tmp__I55N;
  result__J35N=FALSE__;
  idx__K35N= 0;
  type_parent__L35N=NULL;
  if (((void *)n__H35N == (void *)((__PROTOTYPE *)Self__G35N->prototype__RD)->parent_named__QD.name__1QB)) {
    result__J35N=TRUE__;
  } else {
    idx__K35N= 0;
    while_do__KFBO:
    {
      if ((idx__K35N <= ((__FAST_ARRAYoSLOTo *)Self__G35N->slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__H45N=((void **)((__FAST_ARRAYoSLOTo *)Self__G35N->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__K35N];
        if (((struct ___OBJ *)__tmp__H45N)->__id==__SLOT_DATA__) {
          __tmp__I45N=id_section__UG4F(__tmp__H45N);
        } else {
          __tmp__I45N=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__H45N)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__ILKQ=((__SECTION_ *)__tmp__I45N);
        __tmp__T45N=(((void *)Self__ILKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__ILKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__T45N=FALSE__;
      };
      if ((__tmp__T45N && (! result__J35N))) {
        __tmp__245N=((void **)((__FAST_ARRAYoSLOTo *)Self__G35N->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__K35N];
        if (((struct ___OBJ *)__tmp__245N)->__id==__SLOT_DATA__) {
          __tmp__345N=id_section__UG4F(__tmp__245N);
        } else {
          __tmp__345N=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__245N)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__345N)->name__1I0D == (void *)(&__string_23))) {
          __tmp__F55N=((void **)((__FAST_ARRAYoSLOTo *)Self__G35N->slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__K35N];
          if (((struct ___OBJ *)__tmp__F55N)->__id==__SLOT_DATA__) {
            __tmp__G55N=get_type_result__PG2G(__tmp__F55N);
          } else {
            __tmp__G55N=get_type_result__ZH2G(__tmp__F55N);
          };
          type_parent__L35N=((__TYPE_FULL *)__tmp__G55N)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__L35N)->__id) {
          case __TYPE__: {
            __tmp__I55N=is_sub_type_with_name__F35N(type_parent__L35N,n__H35N);
          } break;
          case __TYPE_NULL__: {
            __tmp__I55N=is_sub_type_with_name__O55N(type_parent__L35N,n__H35N);
          } break;
          case __TYPE_VOID__: {
            __tmp__I55N=is_sub_type_with_name__XBAO(type_parent__L35N,n__H35N);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__I55N=is_sub_type_with_name__AEAO(type_parent__L35N,n__H35N);
          } break;
          case __TYPE_ID__: {
            __tmp__I55N=is_sub_type_with_name__JGAO(type_parent__L35N,n__H35N);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__I55N=is_sub_type_with_name__SIAO(type_parent__L35N,n__H35N);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__I55N=is_sub_type_with_name__1KAO(type_parent__L35N,n__H35N);
          } break;
          };
          result__J35N=__tmp__I55N;
        };
        idx__K35N=(__INTEGER)(idx__K35N +  1);
        goto while_do__KFBO;
      };
    };
  };
  return(result__J35N);
}

static __BOOLEAN is_sub_type_with_name__O55N(__TYPE_NULL *Self__P55N,void *n__Q55N)
// ({TYPE_NULL},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__T55N;
  void *type_parent__U55N;
  void *__tmp__QAAO,*__tmp__FBAO,*__tmp__OBAO;
  void *__tmp__RAAO,*__tmp__GBAO;
  __SECTION_ *Self__JLKQ;
  void *__tmp__PBAO;
  __BOOLEAN result__S55N,__tmp__2AAO,__tmp__RBAO;
  result__S55N=FALSE__;
  idx__T55N= 0;
  type_parent__U55N=NULL;
  if (((void *)n__Q55N == (void *)((__PROTOTYPE *)Self__P55N->parent_type__TIB.prototype__RD)->parent_named__QD.name__1QB)) {
    result__S55N=TRUE__;
  } else {
    idx__T55N= 0;
    while_do__VFBO:
    {
      if ((idx__T55N <= ((__FAST_ARRAYoSLOTo *)Self__P55N->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__QAAO=((void **)((__FAST_ARRAYoSLOTo *)Self__P55N->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__T55N];
        if (((struct ___OBJ *)__tmp__QAAO)->__id==__SLOT_DATA__) {
          __tmp__RAAO=id_section__UG4F(__tmp__QAAO);
        } else {
          __tmp__RAAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__QAAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__JLKQ=((__SECTION_ *)__tmp__RAAO);
        __tmp__2AAO=(((void *)Self__JLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__JLKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__2AAO=FALSE__;
      };
      if ((__tmp__2AAO && (! result__S55N))) {
        __tmp__FBAO=((void **)((__FAST_ARRAYoSLOTo *)Self__P55N->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__T55N];
        if (((struct ___OBJ *)__tmp__FBAO)->__id==__SLOT_DATA__) {
          __tmp__GBAO=id_section__UG4F(__tmp__FBAO);
        } else {
          __tmp__GBAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__FBAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__GBAO)->name__1I0D == (void *)(&__string_23))) {
          __tmp__OBAO=((void **)((__FAST_ARRAYoSLOTo *)Self__P55N->parent_type__TIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__T55N];
          if (((struct ___OBJ *)__tmp__OBAO)->__id==__SLOT_DATA__) {
            __tmp__PBAO=get_type_result__PG2G(__tmp__OBAO);
          } else {
            __tmp__PBAO=get_type_result__ZH2G(__tmp__OBAO);
          };
          type_parent__U55N=((__TYPE_FULL *)__tmp__PBAO)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__U55N)->__id) {
          case __TYPE__: {
            __tmp__RBAO=is_sub_type_with_name__F35N(type_parent__U55N,n__Q55N);
          } break;
          case __TYPE_NULL__: {
            __tmp__RBAO=is_sub_type_with_name__O55N(type_parent__U55N,n__Q55N);
          } break;
          case __TYPE_VOID__: {
            __tmp__RBAO=is_sub_type_with_name__XBAO(type_parent__U55N,n__Q55N);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__RBAO=is_sub_type_with_name__AEAO(type_parent__U55N,n__Q55N);
          } break;
          case __TYPE_ID__: {
            __tmp__RBAO=is_sub_type_with_name__JGAO(type_parent__U55N,n__Q55N);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__RBAO=is_sub_type_with_name__SIAO(type_parent__U55N,n__Q55N);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__RBAO=is_sub_type_with_name__1KAO(type_parent__U55N,n__Q55N);
          } break;
          };
          result__S55N=__tmp__RBAO;
        };
        idx__T55N=(__INTEGER)(idx__T55N +  1);
        goto while_do__VFBO;
      };
    };
  };
  return(result__S55N);
}

static __BOOLEAN is_sub_type_with_name__XBAO(__TYPE_VOID *Self__YBAO,void *n__ZBAO)
// ({TYPE_VOID},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__2BAO;
  void *type_parent__3BAO;
  void *__tmp__ZCAO,*__tmp__ODAO,*__tmp__XDAO;
  void *__tmp__0CAO,*__tmp__PDAO;
  __SECTION_ *Self__KLKQ;
  void *__tmp__YDAO;
  __BOOLEAN result__1BAO,__tmp__FDAO,__tmp__0DAO;
  result__1BAO=FALSE__;
  idx__2BAO= 0;
  type_parent__3BAO=NULL;
  if (((void *)n__ZBAO == (void *)((__PROTOTYPE *)Self__YBAO->parent_type__UIB.prototype__RD)->parent_named__QD.name__1QB)) {
    result__1BAO=TRUE__;
  } else {
    idx__2BAO= 0;
    while_do__AGBO:
    {
      if ((idx__2BAO <= ((__FAST_ARRAYoSLOTo *)Self__YBAO->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__ZCAO=((void **)((__FAST_ARRAYoSLOTo *)Self__YBAO->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__2BAO];
        if (((struct ___OBJ *)__tmp__ZCAO)->__id==__SLOT_DATA__) {
          __tmp__0CAO=id_section__UG4F(__tmp__ZCAO);
        } else {
          __tmp__0CAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__ZCAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__KLKQ=((__SECTION_ *)__tmp__0CAO);
        __tmp__FDAO=(((void *)Self__KLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__KLKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__FDAO=FALSE__;
      };
      if ((__tmp__FDAO && (! result__1BAO))) {
        __tmp__ODAO=((void **)((__FAST_ARRAYoSLOTo *)Self__YBAO->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__2BAO];
        if (((struct ___OBJ *)__tmp__ODAO)->__id==__SLOT_DATA__) {
          __tmp__PDAO=id_section__UG4F(__tmp__ODAO);
        } else {
          __tmp__PDAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__ODAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__PDAO)->name__1I0D == (void *)(&__string_23))) {
          __tmp__XDAO=((void **)((__FAST_ARRAYoSLOTo *)Self__YBAO->parent_type__UIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__2BAO];
          if (((struct ___OBJ *)__tmp__XDAO)->__id==__SLOT_DATA__) {
            __tmp__YDAO=get_type_result__PG2G(__tmp__XDAO);
          } else {
            __tmp__YDAO=get_type_result__ZH2G(__tmp__XDAO);
          };
          type_parent__3BAO=((__TYPE_FULL *)__tmp__YDAO)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__3BAO)->__id) {
          case __TYPE__: {
            __tmp__0DAO=is_sub_type_with_name__F35N(type_parent__3BAO,n__ZBAO);
          } break;
          case __TYPE_NULL__: {
            __tmp__0DAO=is_sub_type_with_name__O55N(type_parent__3BAO,n__ZBAO);
          } break;
          case __TYPE_VOID__: {
            __tmp__0DAO=is_sub_type_with_name__XBAO(type_parent__3BAO,n__ZBAO);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__0DAO=is_sub_type_with_name__AEAO(type_parent__3BAO,n__ZBAO);
          } break;
          case __TYPE_ID__: {
            __tmp__0DAO=is_sub_type_with_name__JGAO(type_parent__3BAO,n__ZBAO);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__0DAO=is_sub_type_with_name__SIAO(type_parent__3BAO,n__ZBAO);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__0DAO=is_sub_type_with_name__1KAO(type_parent__3BAO,n__ZBAO);
          } break;
          };
          result__1BAO=__tmp__0DAO;
        };
        idx__2BAO=(__INTEGER)(idx__2BAO +  1);
        goto while_do__AGBO;
      };
    };
  };
  return(result__1BAO);
}

static __BOOLEAN is_sub_type_with_name__AEAO(__TYPE_CONTEXT *Self__BEAO,void *n__CEAO)
// ({TYPE_CONTEXT},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__FEAO;
  void *type_parent__GEAO;
  void *__tmp__CFAO,*__tmp__XFAO,*__tmp__AGAO;
  void *__tmp__DFAO,*__tmp__YFAO;
  __SECTION_ *Self__LLKQ;
  void *__tmp__BGAO;
  __BOOLEAN result__EEAO,__tmp__OFAO,__tmp__DGAO;
  result__EEAO=FALSE__;
  idx__FEAO= 0;
  type_parent__GEAO=NULL;
  if (((void *)n__CEAO == (void *)((__PROTOTYPE *)Self__BEAO->parent_type__VIB.prototype__RD)->parent_named__QD.name__1QB)) {
    result__EEAO=TRUE__;
  } else {
    idx__FEAO= 0;
    while_do__LGBO:
    {
      if ((idx__FEAO <= ((__FAST_ARRAYoSLOTo *)Self__BEAO->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__CFAO=((void **)((__FAST_ARRAYoSLOTo *)Self__BEAO->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__FEAO];
        if (((struct ___OBJ *)__tmp__CFAO)->__id==__SLOT_DATA__) {
          __tmp__DFAO=id_section__UG4F(__tmp__CFAO);
        } else {
          __tmp__DFAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__CFAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__LLKQ=((__SECTION_ *)__tmp__DFAO);
        __tmp__OFAO=(((void *)Self__LLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__LLKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__OFAO=FALSE__;
      };
      if ((__tmp__OFAO && (! result__EEAO))) {
        __tmp__XFAO=((void **)((__FAST_ARRAYoSLOTo *)Self__BEAO->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__FEAO];
        if (((struct ___OBJ *)__tmp__XFAO)->__id==__SLOT_DATA__) {
          __tmp__YFAO=id_section__UG4F(__tmp__XFAO);
        } else {
          __tmp__YFAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__XFAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__YFAO)->name__1I0D == (void *)(&__string_23))) {
          __tmp__AGAO=((void **)((__FAST_ARRAYoSLOTo *)Self__BEAO->parent_type__VIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__FEAO];
          if (((struct ___OBJ *)__tmp__AGAO)->__id==__SLOT_DATA__) {
            __tmp__BGAO=get_type_result__PG2G(__tmp__AGAO);
          } else {
            __tmp__BGAO=get_type_result__ZH2G(__tmp__AGAO);
          };
          type_parent__GEAO=((__TYPE_FULL *)__tmp__BGAO)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__GEAO)->__id) {
          case __TYPE__: {
            __tmp__DGAO=is_sub_type_with_name__F35N(type_parent__GEAO,n__CEAO);
          } break;
          case __TYPE_NULL__: {
            __tmp__DGAO=is_sub_type_with_name__O55N(type_parent__GEAO,n__CEAO);
          } break;
          case __TYPE_VOID__: {
            __tmp__DGAO=is_sub_type_with_name__XBAO(type_parent__GEAO,n__CEAO);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__DGAO=is_sub_type_with_name__AEAO(type_parent__GEAO,n__CEAO);
          } break;
          case __TYPE_ID__: {
            __tmp__DGAO=is_sub_type_with_name__JGAO(type_parent__GEAO,n__CEAO);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__DGAO=is_sub_type_with_name__SIAO(type_parent__GEAO,n__CEAO);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__DGAO=is_sub_type_with_name__1KAO(type_parent__GEAO,n__CEAO);
          } break;
          };
          result__EEAO=__tmp__DGAO;
        };
        idx__FEAO=(__INTEGER)(idx__FEAO +  1);
        goto while_do__LGBO;
      };
    };
  };
  return(result__EEAO);
}

static __BOOLEAN is_sub_type_with_name__JGAO(__TYPE_ID *Self__KGAO,void *n__LGAO)
// ({TYPE_ID},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__OGAO;
  void *type_parent__PGAO;
  void *__tmp__LHAO,*__tmp__AIAO,*__tmp__JIAO;
  void *__tmp__MHAO,*__tmp__BIAO;
  __SECTION_ *Self__MLKQ;
  void *__tmp__KIAO;
  __BOOLEAN result__NGAO,__tmp__XHAO,__tmp__MIAO;
  result__NGAO=FALSE__;
  idx__OGAO= 0;
  type_parent__PGAO=NULL;
  if (((void *)n__LGAO == (void *)((__PROTOTYPE *)Self__KGAO->parent_type__WIB.prototype__RD)->parent_named__QD.name__1QB)) {
    result__NGAO=TRUE__;
  } else {
    idx__OGAO= 0;
    while_do__WGBO:
    {
      if ((idx__OGAO <= ((__FAST_ARRAYoSLOTo *)Self__KGAO->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__LHAO=((void **)((__FAST_ARRAYoSLOTo *)Self__KGAO->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__OGAO];
        if (((struct ___OBJ *)__tmp__LHAO)->__id==__SLOT_DATA__) {
          __tmp__MHAO=id_section__UG4F(__tmp__LHAO);
        } else {
          __tmp__MHAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__LHAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__MLKQ=((__SECTION_ *)__tmp__MHAO);
        __tmp__XHAO=(((void *)Self__MLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__MLKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__XHAO=FALSE__;
      };
      if ((__tmp__XHAO && (! result__NGAO))) {
        __tmp__AIAO=((void **)((__FAST_ARRAYoSLOTo *)Self__KGAO->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__OGAO];
        if (((struct ___OBJ *)__tmp__AIAO)->__id==__SLOT_DATA__) {
          __tmp__BIAO=id_section__UG4F(__tmp__AIAO);
        } else {
          __tmp__BIAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__AIAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__BIAO)->name__1I0D == (void *)(&__string_23))) {
          __tmp__JIAO=((void **)((__FAST_ARRAYoSLOTo *)Self__KGAO->parent_type__WIB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__OGAO];
          if (((struct ___OBJ *)__tmp__JIAO)->__id==__SLOT_DATA__) {
            __tmp__KIAO=get_type_result__PG2G(__tmp__JIAO);
          } else {
            __tmp__KIAO=get_type_result__ZH2G(__tmp__JIAO);
          };
          type_parent__PGAO=((__TYPE_FULL *)__tmp__KIAO)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__PGAO)->__id) {
          case __TYPE__: {
            __tmp__MIAO=is_sub_type_with_name__F35N(type_parent__PGAO,n__LGAO);
          } break;
          case __TYPE_NULL__: {
            __tmp__MIAO=is_sub_type_with_name__O55N(type_parent__PGAO,n__LGAO);
          } break;
          case __TYPE_VOID__: {
            __tmp__MIAO=is_sub_type_with_name__XBAO(type_parent__PGAO,n__LGAO);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__MIAO=is_sub_type_with_name__AEAO(type_parent__PGAO,n__LGAO);
          } break;
          case __TYPE_ID__: {
            __tmp__MIAO=is_sub_type_with_name__JGAO(type_parent__PGAO,n__LGAO);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__MIAO=is_sub_type_with_name__SIAO(type_parent__PGAO,n__LGAO);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__MIAO=is_sub_type_with_name__1KAO(type_parent__PGAO,n__LGAO);
          } break;
          };
          result__NGAO=__tmp__MIAO;
        };
        idx__OGAO=(__INTEGER)(idx__OGAO +  1);
        goto while_do__WGBO;
      };
    };
  };
  return(result__NGAO);
}

static __BOOLEAN is_sub_type_with_name__SIAO(__TYPE_GENERIC *Self__TIAO,void *n__UIAO)
// ({TYPE_GENERIC},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__XIAO;
  void *type_parent__YIAO;
  void *__tmp__UJAO,*__tmp__JKAO,*__tmp__SKAO;
  void *__tmp__VJAO,*__tmp__KKAO;
  __SECTION_ *Self__NLKQ;
  void *__tmp__TKAO;
  __BOOLEAN result__WIAO,__tmp__AKAO,__tmp__VKAO;
  result__WIAO=FALSE__;
  idx__XIAO= 0;
  type_parent__YIAO=NULL;
  if (((void *)n__UIAO == (void *)((__PROTOTYPE *)Self__TIAO->parent_type__T2IB.prototype__RD)->parent_named__QD.name__1QB)) {
    result__WIAO=TRUE__;
  } else {
    idx__XIAO= 0;
    while_do__BHBO:
    {
      if ((idx__XIAO <= ((__FAST_ARRAYoSLOTo *)Self__TIAO->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__UJAO=((void **)((__FAST_ARRAYoSLOTo *)Self__TIAO->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__XIAO];
        if (((struct ___OBJ *)__tmp__UJAO)->__id==__SLOT_DATA__) {
          __tmp__VJAO=id_section__UG4F(__tmp__UJAO);
        } else {
          __tmp__VJAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__UJAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__NLKQ=((__SECTION_ *)__tmp__VJAO);
        __tmp__AKAO=(((void *)Self__NLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__NLKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__AKAO=FALSE__;
      };
      if ((__tmp__AKAO && (! result__WIAO))) {
        __tmp__JKAO=((void **)((__FAST_ARRAYoSLOTo *)Self__TIAO->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__XIAO];
        if (((struct ___OBJ *)__tmp__JKAO)->__id==__SLOT_DATA__) {
          __tmp__KKAO=id_section__UG4F(__tmp__JKAO);
        } else {
          __tmp__KKAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__JKAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__KKAO)->name__1I0D == (void *)(&__string_23))) {
          __tmp__SKAO=((void **)((__FAST_ARRAYoSLOTo *)Self__TIAO->parent_type__T2IB.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__XIAO];
          if (((struct ___OBJ *)__tmp__SKAO)->__id==__SLOT_DATA__) {
            __tmp__TKAO=get_type_result__PG2G(__tmp__SKAO);
          } else {
            __tmp__TKAO=get_type_result__ZH2G(__tmp__SKAO);
          };
          type_parent__YIAO=((__TYPE_FULL *)__tmp__TKAO)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__YIAO)->__id) {
          case __TYPE__: {
            __tmp__VKAO=is_sub_type_with_name__F35N(type_parent__YIAO,n__UIAO);
          } break;
          case __TYPE_NULL__: {
            __tmp__VKAO=is_sub_type_with_name__O55N(type_parent__YIAO,n__UIAO);
          } break;
          case __TYPE_VOID__: {
            __tmp__VKAO=is_sub_type_with_name__XBAO(type_parent__YIAO,n__UIAO);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__VKAO=is_sub_type_with_name__AEAO(type_parent__YIAO,n__UIAO);
          } break;
          case __TYPE_ID__: {
            __tmp__VKAO=is_sub_type_with_name__JGAO(type_parent__YIAO,n__UIAO);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__VKAO=is_sub_type_with_name__SIAO(type_parent__YIAO,n__UIAO);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__VKAO=is_sub_type_with_name__1KAO(type_parent__YIAO,n__UIAO);
          } break;
          };
          result__WIAO=__tmp__VKAO;
        };
        idx__XIAO=(__INTEGER)(idx__XIAO +  1);
        goto while_do__BHBO;
      };
    };
  };
  return(result__WIAO);
}

static __BOOLEAN is_sub_type_with_name__1KAO(__PROFIL_BLOCK *Self__2KAO,void *n__3KAO)
// ({PROFIL_BLOCK},{NULLxSTRING_CONSTANT}) With resultRecursive, No inlinable.
{
  __INTEGER idx__ALAO;
  void *type_parent__BLAO;
  void *__tmp__3LAO,*__tmp__SMAO,*__tmp__1MAO;
  void *__tmp__4LAO,*__tmp__TMAO;
  __SECTION_ *Self__OLKQ;
  void *__tmp__2MAO;
  __BOOLEAN result__5KAO,__tmp__JMAO,__tmp__4MAO;
  result__5KAO=FALSE__;
  idx__ALAO= 0;
  type_parent__BLAO=NULL;
  if (((void *)n__3KAO == (void *)((__PROTOTYPE *)prototype__IMEJ())->parent_named__QD.name__1QB)) {
    result__5KAO=TRUE__;
  } else {
    idx__ALAO= 0;
    while_do__MHBO:
    {
      if ((idx__ALAO <= ((__FAST_ARRAYoSLOTo *)Self__2KAO->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.upper__WSL)) {
        __tmp__3LAO=((void **)((__FAST_ARRAYoSLOTo *)Self__2KAO->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__ALAO];
        if (((struct ___OBJ *)__tmp__3LAO)->__id==__SLOT_DATA__) {
          __tmp__4LAO=id_section__UG4F(__tmp__3LAO);
        } else {
          __tmp__4LAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__3LAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        Self__OLKQ=((__SECTION_ *)__tmp__4LAO);
        __tmp__JMAO=(((void *)Self__OLKQ->name__1I0D == (void *)(&__string_23)) || ((void *)Self__OLKQ->name__1I0D == (void *)(&__string_24)));
      } else {
        __tmp__JMAO=FALSE__;
      };
      if ((__tmp__JMAO && (! result__5KAO))) {
        __tmp__SMAO=((void **)((__FAST_ARRAYoSLOTo *)Self__2KAO->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__ALAO];
        if (((struct ___OBJ *)__tmp__SMAO)->__id==__SLOT_DATA__) {
          __tmp__TMAO=id_section__UG4F(__tmp__SMAO);
        } else {
          __tmp__TMAO=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)__tmp__SMAO)->parent_slot__Y22F)->base_slot__P22F)->id_section__EACC;
        };
        if (((void *)((__SECTION_ *)__tmp__TMAO)->name__1I0D == (void *)(&__string_23))) {
          __tmp__1MAO=((void **)((__FAST_ARRAYoSLOTo *)Self__2KAO->parent_type__HHAG.slot_run__1JC)->parent_arrayed_collection__ZJC.storage__SSL)[idx__ALAO];
          if (((struct ___OBJ *)__tmp__1MAO)->__id==__SLOT_DATA__) {
            __tmp__2MAO=get_type_result__PG2G(__tmp__1MAO);
          } else {
            __tmp__2MAO=get_type_result__ZH2G(__tmp__1MAO);
          };
          type_parent__BLAO=((__TYPE_FULL *)__tmp__2MAO)->parent_type__KTL;
          switch (((struct ___OBJ *)type_parent__BLAO)->__id) {
          case __TYPE__: {
            __tmp__4MAO=is_sub_type_with_name__F35N(type_parent__BLAO,n__3KAO);
          } break;
          case __TYPE_NULL__: {
            __tmp__4MAO=is_sub_type_with_name__O55N(type_parent__BLAO,n__3KAO);
          } break;
          case __TYPE_VOID__: {
            __tmp__4MAO=is_sub_type_with_name__XBAO(type_parent__BLAO,n__3KAO);
          } break;
          case __TYPE_CONTEXT__: {
            __tmp__4MAO=is_sub_type_with_name__AEAO(type_parent__BLAO,n__3KAO);
          } break;
          case __TYPE_ID__: {
            __tmp__4MAO=is_sub_type_with_name__JGAO(type_parent__BLAO,n__3KAO);
          } break;
          case __TYPE_GENERIC__: {
            __tmp__4MAO=is_sub_type_with_name__SIAO(type_parent__BLAO,n__3KAO);
          } break;
          case __PROFIL_BLOCK__: {
            __tmp__4MAO=is_sub_type_with_name__1KAO(type_parent__BLAO,n__3KAO);
          } break;
          };
          result__5KAO=__tmp__4MAO;
        };
        idx__ALAO=(__INTEGER)(idx__ALAO +  1);
        goto while_do__MHBO;
      };
    };
  };
  return(result__5KAO);
}

static void* get_type__252J(__ITM_ARG *Self__352J)
// ({ITM_ARG}) With resultNo recursive, No inlinable.
{
  void *__tmp__GA3J;
  void *__tmp__HA3J,*__tmp__O0EQ;
  __ITM_TYPE_STYLE *Self__N0EQ;
  __tmp__GA3J=Self__352J->type__432D;
  switch (((struct ___OBJ *)__tmp__GA3J)->__id) {
  case __ITM_TYPE_SIMPLE__: {
    if (((__ITM_TYPE_SIMPLE *)__tmp__GA3J)->to_run__2VK==0) {
      __tmp__HA3J=((__ITM_TYPE_SIMPLE *)__tmp__GA3J)->to_run__1VK;
    } else {
      __tmp__HA3J=to_run__XVK(__tmp__GA3J);
    };
  } break;
  case __ITM_TYPE_STYLE__: {
    if (((__ITM_TYPE_STYLE *)__tmp__GA3J)->to_run__V1IB==0) {
      __tmp__HA3J=((__ITM_TYPE_STYLE *)__tmp__GA3J)->to_run__U1IB;
    } else {
      Self__N0EQ=((__ITM_TYPE_STYLE *)__tmp__GA3J);
      __tmp__O0EQ=get__XUN(Self__N0EQ);
      Self__N0EQ->to_run__U1IB=__tmp__O0EQ;
      Self__N0EQ->to_run__V1IB=0;
      __tmp__HA3J=__tmp__O0EQ;
    };
  } break;
  case __ITM_TYPE_GENERIC__: {
    __tmp__HA3J=to_run__W1IB(__tmp__GA3J);
  } break;
  case __ITM_TYPE_SELF__: {
    __tmp__HA3J=to_run__MPXD();
  } break;
  case __ITM_TYPE_GENERIC_ELT__: {
    __tmp__HA3J=to_run__DKEF(__tmp__GA3J);
  } break;
  };
  return(__tmp__HA3J);
}

static void* get_type__IA3J(__ITM_ARGS *Self__JA3J,__INTEGER idx__KA3J)
// ({ITM_ARGS},{INTEGER}) With resultNo recursive, No inlinable.
{
  void *__tmp__XA3J;
  void *__tmp__YA3J,*__tmp__V0EQ;
  __ITM_TYPE_STYLE *Self__U0EQ;
  __tmp__XA3J=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__JA3J->type__GH3D)->list_type__VZVD)->parent_arrayed_collection__PIB.storage__5WK)[idx__KA3J];
  switch (((struct ___OBJ *)__tmp__XA3J)->__id) {
  case __ITM_TYPE_SIMPLE__: {
    if (((__ITM_TYPE_SIMPLE *)__tmp__XA3J)->to_run__2VK==0) {
      __tmp__YA3J=((__ITM_TYPE_SIMPLE *)__tmp__XA3J)->to_run__1VK;
    } else {
      __tmp__YA3J=to_run__XVK(__tmp__XA3J);
    };
  } break;
  case __ITM_TYPE_STYLE__: {
    if (((__ITM_TYPE_STYLE *)__tmp__XA3J)->to_run__V1IB==0) {
      __tmp__YA3J=((__ITM_TYPE_STYLE *)__tmp__XA3J)->to_run__U1IB;
    } else {
      Self__U0EQ=((__ITM_TYPE_STYLE *)__tmp__XA3J);
      __tmp__V0EQ=get__XUN(Self__U0EQ);
      Self__U0EQ->to_run__U1IB=__tmp__V0EQ;
      Self__U0EQ->to_run__V1IB=0;
      __tmp__YA3J=__tmp__V0EQ;
    };
  } break;
  case __ITM_TYPE_GENERIC__: {
    __tmp__YA3J=to_run__W1IB(__tmp__XA3J);
  } break;
  case __ITM_TYPE_SELF__: {
    __tmp__YA3J=to_run__MPXD();
  } break;
  case __ITM_TYPE_GENERIC_ELT__: {
    __tmp__YA3J=to_run__DKEF(__tmp__XA3J);
  } break;
  };
  return(__tmp__YA3J);
}

static void** create__F3KN(__INTEGER nb_elements__H3KN)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__QOUN;
  void **Result__RANN;
  Result__RANN=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__H3KN * ((__INTEGER )(sizeof(void *)))))));
  Self__QOUN=(__INTEGER)(nb_elements__H3KN -  1);
  while ((Self__QOUN >=  0)) {
    Result__RANN[Self__QOUN]=NULL;
    Self__QOUN=(__INTEGER)(Self__QOUN -  1);
  };
  return(Result__RANN);
}

static void append_cast_name_in__Y1CJ(__ITM_TYPE_SIMPLE *Self__Z1CJ,void *buf__01CJ)
// ({ITM_TYPE_SIMPLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__A2CJ,Self__MQDJ;
  __tmp__A2CJ=((__STRING_CONSTANT *)Self__Z1CJ->name__UMC)->count__XHB;
  Self__MQDJ= 1;
  while ((Self__MQDJ <= __tmp__A2CJ)) {
    add_last__YPK(buf__01CJ,to_lower__OA1(((__CHARACTER *)((__STRING_CONSTANT *)Self__Z1CJ->name__UMC)->storage__C5K)[(__INTEGER)(Self__MQDJ -  1)]));
    Self__MQDJ=(__INTEGER)(Self__MQDJ +  1);
  };
}

static void append_cast_name_in__L2CJ(__ITM_TYPE_STYLE *Self__M2CJ,void *buf__N2CJ)
// ({ITM_TYPE_STYLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__T2CJ,Self__5QDJ;
  __tmp__T2CJ=((__STRING_CONSTANT *)Self__M2CJ->parent_itm_type_simple__3IB.name__UMC)->count__XHB;
  Self__5QDJ= 1;
  while ((Self__5QDJ <= __tmp__T2CJ)) {
    add_last__YPK(buf__N2CJ,to_lower__OA1(((__CHARACTER *)((__STRING_CONSTANT *)Self__M2CJ->parent_itm_type_simple__3IB.name__UMC)->storage__C5K)[(__INTEGER)(Self__5QDJ -  1)]));
    Self__5QDJ=(__INTEGER)(Self__5QDJ +  1);
  };
}

static void append_cast_name_in__42CJ(__ITM_TYPE_GENERIC *Self__52CJ,void *buf__A3CJ)
// ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
{
  __INTEGER __tmp__VRDJ,Self__N4DJ,__tmp__I3CJ,Self__ESDJ;
  void *__tmp__P3CJ,*__tmp__S3CJ;
  __FAST_ARRAYoITM_TYPE_MONOo *Self__RE3Q;
  __tmp__VRDJ=((__STRING_CONSTANT *)Self__52CJ->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC)->count__XHB;
  Self__N4DJ= 1;
  while ((Self__N4DJ <= __tmp__VRDJ)) {
    add_last__YPK(buf__A3CJ,to_lower__OA1(((__CHARACTER *)((__STRING_CONSTANT *)Self__52CJ->parent_itm_type_style__LLB.parent_itm_type_simple__3IB.name__UMC)->storage__C5K)[(__INTEGER)(Self__N4DJ -  1)]));
    Self__N4DJ=(__INTEGER)(Self__N4DJ +  1);
  };
  append__MOK(buf__A3CJ,(&__string_571));
  __tmp__I3CJ=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__52CJ->list_type__MRC)->parent_arrayed_collection__PIB.upper__BWK -  1);
  Self__ESDJ= 0;
  while ((Self__ESDJ <= __tmp__I3CJ)) {
    __tmp__P3CJ=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__52CJ->list_type__MRC)->parent_arrayed_collection__PIB.storage__5WK)[Self__ESDJ];
    switch (((struct ___OBJ *)__tmp__P3CJ)->__id) {
    case __ITM_TYPE_SIMPLE__: {
      append_cast_name_in__Y1CJ(__tmp__P3CJ,buf__A3CJ);
    } break;
    case __ITM_TYPE_STYLE__: {
      append_cast_name_in__L2CJ(__tmp__P3CJ,buf__A3CJ);
    } break;
    case __ITM_TYPE_GENERIC__: {
      append_cast_name_in__42CJ(__tmp__P3CJ,buf__A3CJ);
    } break;
    case __ITM_TYPE_SELF__: {
      append_cast_name_in__T3CJ(__tmp__P3CJ,buf__A3CJ);
    } break;
    case __ITM_TYPE_GENERIC_ELT__: {
      add_last__YPK(buf__A3CJ,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )'a') + ((__INTEGER_8 )((__ITM_TYPE_GENERIC_ELT *)__tmp__P3CJ)->index__0E0D))))));
    } break;
    };
    append__MOK(buf__A3CJ,(&__string_572));
    Self__ESDJ=(__INTEGER)(Self__ESDJ +  1);
  };
  Self__RE3Q=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__52CJ->list_type__MRC);
  __tmp__S3CJ=((void **)Self__RE3Q->parent_arrayed_collection__PIB.storage__5WK)[Self__RE3Q->parent_arrayed_collection__PIB.upper__BWK];
  switch (((struct ___OBJ *)__tmp__S3CJ)->__id) {
  case __ITM_TYPE_SIMPLE__: {
    append_cast_name_in__Y1CJ(__tmp__S3CJ,buf__A3CJ);
  } break;
  case __ITM_TYPE_STYLE__: {
    append_cast_name_in__L2CJ(__tmp__S3CJ,buf__A3CJ);
  } break;
  case __ITM_TYPE_GENERIC__: {
    append_cast_name_in__42CJ(__tmp__S3CJ,buf__A3CJ);
  } break;
  case __ITM_TYPE_SELF__: {
    append_cast_name_in__T3CJ(__tmp__S3CJ,buf__A3CJ);
  } break;
  case __ITM_TYPE_GENERIC_ELT__: {
    add_last__YPK(buf__A3CJ,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )'a') + ((__INTEGER_8 )((__ITM_TYPE_GENERIC_ELT *)__tmp__S3CJ)->index__0E0D))))));
  } break;
  };
}

static void append_cast_name_in__T3CJ(__ITM_TYPE_SELF *Self__U3CJ,void *buf__V3CJ)
// ({ITM_TYPE_SELF},{NULLxSTRING}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__13CJ,Self__0SDJ;
  __tmp__13CJ=((__STRING_CONSTANT *)Self__U3CJ->parent_itm_type_simple__5KD.name__UMC)->count__XHB;
  Self__0SDJ= 1;
  while ((Self__0SDJ <= __tmp__13CJ)) {
    add_last__YPK(buf__V3CJ,to_lower__OA1(((__CHARACTER *)((__STRING_CONSTANT *)Self__U3CJ->parent_itm_type_simple__5KD.name__UMC)->storage__C5K)[(__INTEGER)(Self__0SDJ -  1)]));
    Self__0SDJ=(__INTEGER)(Self__0SDJ +  1);
  };
}

static __BOOLEAN is_integer__M4NI(void *n__O4NI)
// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
{
  return((((((((((void *)n__O4NI == (void *)(&__string_47)) || ((void *)n__O4NI == (void *)(&__string_48))) || ((void *)n__O4NI == (void *)(&__string_49))) || ((void *)n__O4NI == (void *)(&__string_50))) || ((void *)n__O4NI == (void *)(&__string_51))) || ((void *)n__O4NI == (void *)(&__string_52))) || ((void *)n__O4NI == (void *)(&__string_53))) || ((void *)n__O4NI == (void *)(&__string_54))));
}

static void unset_life__UXBM(void *p__WXBM)
// ({PROFIL_SLOTxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__AYBM;
  if (((struct ___OBJ *)p__WXBM)->__id==__PROFIL_SLOT__) {
    __tmp__AYBM=((__PROFIL_SLOT *)p__WXBM)->parent_profil__51LC.life_index__01RI;
  } else {
    __tmp__AYBM=((__PROFIL_BLOCK *)p__WXBM)->parent_profil__GHAG.life_index__01RI;
  };
  if ((__tmp__AYBM < life_limit__2PQC)) {
    life_limit__2PQC=(__INTEGER)(life_limit__2PQC -  1);
    if ((__tmp__AYBM < life_limit__2PQC)) {
      if ((__tmp__AYBM > current__X30C)) {
        swap__with__3GEM(__tmp__AYBM,life_limit__2PQC);
      } else {
        swap__with__3GEM(__tmp__AYBM,current__X30C);
        swap__with__3GEM(current__X30C,life_limit__2PQC);
        current__X30C=(__INTEGER)(current__X30C -  1);
      };
    };
  };
}

static void* new_write__with__S4CK(__NODE_STYLE *Self__T4CK,void *var__U4CK,void *e__V4CK,void *slot__W4CK)
// ({NODE_STYLE},{NULLxLOCALxSLOT_DATA},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{NULLxSLOT_DATA}) With resultNo recursive, No inlinable.
{
  void *rd__Y4CK;
  void *__tmp__H5CK;
  __STRING_CST *Self__43EQ;
  __PROTOTYPE_CST *Self__53EQ;
  __INTEGER_CST *Self__A4EQ;
  __REAL_CST *Self__C4EQ;
  __CHARACTER_CST *Self__E4EQ;
  __IS_EXPANDED *Self__F4EQ;
  __POSITION __tmp__L5CK;
  void *__tmp__M5CK;
  rd__Y4CK=NULL;
  if ((((__SLOT_DATA *)slot__W4CK)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) {
    position__V54J(Self__T4CK);
    rd__Y4CK=read__with__FYKJ(((__SLOT_DATA *)slot__W4CK),NULL);
  } else {
    position__V54J(Self__T4CK);
    switch (((struct ___OBJ *)e__V4CK)->__id) {
    case __LIST__: {
      __tmp__H5CK=my_copy__2HYM(e__V4CK);
    } break;
    case __STRING_CST__: {
      Self__43EQ=((__STRING_CST *)e__V4CK);
      __tmp__H5CK=create__text__AUMH(Self__43EQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__43EQ->string__ZK2H);
    } break;
    case __EXTERNAL_C__: {
      __tmp__H5CK=my_copy__2K2H(e__V4CK);
    } break;
    case __PROTOTYPE_CST__: {
      Self__53EQ=((__PROTOTYPE_CST *)e__V4CK);
      __tmp__H5CK=create__type__CLQC(Self__53EQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__53EQ->parent_constant__E3LC.static_type__F4YD);
    } break;
    case __INTEGER_CST__: {
      Self__A4EQ=((__INTEGER_CST *)e__V4CK);
      __tmp__H5CK=create__value__type__DNQC(Self__A4EQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__A4EQ->value__PAZD,Self__A4EQ->parent_constant__P3LC.static_type__F4YD);
    } break;
    case __READ_LOCAL__: {
      __tmp__H5CK=my_copy__OAFJ(e__V4CK);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__H5CK=my_copy__KM2H(e__V4CK);
    } break;
    case __EXPR_EQUAL__: {
      __tmp__H5CK=my_copy__DN2H(e__V4CK);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__H5CK=my_copy__QN2H(e__V4CK);
    } break;
    case __REAL_CST__: {
      Self__C4EQ=((__REAL_CST *)e__V4CK);
      __tmp__H5CK=create__value__type__1SMH(Self__C4EQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__C4EQ->value__5N2H,Self__C4EQ->parent_constant__M3JH.static_type__F4YD);
    } break;
    case __CHARACTER_CST__: {
      Self__E4EQ=((__CHARACTER_CST *)e__V4CK);
      __tmp__H5CK=create__char__WTMH(Self__E4EQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__E4EQ->text__HO2H);
    } break;
    case __IS_EXPANDED__: {
      Self__F4EQ=((__IS_EXPANDED *)e__V4CK);
      __tmp__H5CK=create__receiver__WRWH(Self__F4EQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__F4EQ->receiver__OO2H));
    } break;
    case __GET_TYPE_ID__: {
      __tmp__H5CK=my_copy__TO2H(e__V4CK);
    } break;
    case __EXPR_SUP__: {
      __tmp__H5CK=my_copy__2O2H(e__V4CK);
    } break;
    case __EXPR_SUB__: {
      __tmp__H5CK=my_copy__HP2H(e__V4CK);
    } break;
    case __EXPR_MUL__: {
      __tmp__H5CK=my_copy__TP2H(e__V4CK);
    } break;
    case __EXPR_DIV__: {
      __tmp__H5CK=my_copy__4P2H(e__V4CK);
    } break;
    case __EXPR_AND__: {
      __tmp__H5CK=my_copy__JQ2H(e__V4CK);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__H5CK=my_copy__UQ2H(e__V4CK);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__H5CK=my_copy__5Q2H(e__V4CK);
    } break;
    case __PUT_TO__: {
      __tmp__H5CK=my_copy__KR2H(e__V4CK);
    } break;
    case __ITEM__: {
      __tmp__H5CK=my_copy__1R2H(e__V4CK);
    } break;
    case __SIZE_OF__: {
      __tmp__H5CK=my_copy__HS2H(e__V4CK);
    } break;
    case __CAST__: {
      __tmp__H5CK=my_copy__QS2H(e__V4CK);
    } break;
    case __CALL_SLOT__: {
      __tmp__H5CK=my_copy__PIYM(e__V4CK);
    } break;
    case __READ_SLOT__: {
      __tmp__H5CK=my_copy__AVGK(e__V4CK);
    } break;
    case __READ_GLOBAL__: {
      __tmp__H5CK=my_copy__NVGK(e__V4CK);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__H5CK=my_copy__RFCN(e__V4CK);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__H5CK=my_copy__JMEO(e__V4CK);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__H5CK=my_copy__RTJO(e__V4CK);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__H5CK=my_copy__WMEO(e__V4CK);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__H5CK=my_copy__3TJO(e__V4CK);
    } break;
    case __EXPR_NEG__: {
      __tmp__H5CK=my_copy__YEJM(e__V4CK);
    } break;
    case __EXPR_ADD__: {
      __tmp__H5CK=my_copy__YRLL(e__V4CK);
    } break;
    case __EXPR_NOT__: {
      __tmp__H5CK=my_copy__GLYM(e__V4CK);
    } break;
    case __EXPR_MOD__: {
      __tmp__H5CK=my_copy__BNEO(e__V4CK);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__H5CK=my_copy__M3DP(e__V4CK);
    } break;
    case __EXPR_INF__: {
      __tmp__H5CK=my_copy__PBSN(e__V4CK);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__H5CK=my_copy__0BSN(e__V4CK);
    } break;
    case __EXPR_OR__: {
      __tmp__H5CK=my_copy__ZOPN(e__V4CK);
    } break;
    case __EXPR_XOR__: {
      __tmp__H5CK=my_copy__CYSO(e__V4CK);
    } break;
    };
    rd__Y4CK=read__with__FYKJ(slot__W4CK,__tmp__H5CK);
  };
  __tmp__L5CK=position__V54J(Self__T4CK);
  if (((struct ___OBJ *)var__U4CK)->__id==__LOCAL__) {
    __tmp__M5CK=write__value__T5FH(var__U4CK,__tmp__L5CK,rd__Y4CK);
  } else {
    __tmp__M5CK=write_direct__with__value__05DH(((__SLOT_DATA *)var__U4CK),__tmp__L5CK,NULL,rd__Y4CK);
  };
  return(__tmp__M5CK);
}

static __PROFIL_SLOT* clone__FI5K()
// () With resultNo recursive, No inlinable.
{
  __PROFIL_SLOT *result__II5K;
  __POINTER ptr__JI5K;
  __INTEGER typ_id__OI5K;
  __UINTEGER_32 sz__LI5K,a__2E3Q,new_size__0E3Q,t__AF3Q,a__CF3Q;
  result__II5K=NULL;
  ptr__JI5K=((__POINTER )(NULL));
  typ_id__OI5K= 0;
  sz__LI5K=((__UINTEGER_32 )sizeof(__PROFIL_SLOT));
  if ((sz__LI5K ==  0)) {
    result__II5K=PROFIL_SLOT__;
  } else {
    typ_id__OI5K=-1;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__LI5K);
    if ((typ_id__OI5K == (__INTEGER)(-  1))) {
      a__2E3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__0E3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__LI5K + a__2E3Q) & (__UINTEGER_32)(~ a__2E3Q));
      ptr__JI5K=micro_alloc__table__lab__BOI(new_size__0E3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0E3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__0E3Q);
    } else {
      t__AF3Q=((__UINTEGER_32 )typ_id__OI5K);
      a__CF3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__JI5K=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__LI5K + a__CF3Q) & (__UINTEGER_32)(~ a__CF3Q)),((__POINTER )(&(table_type[(t__AF3Q)]))),(__UINTEGER_32)(t__AF3Q |  1));
    };
    result__II5K=((__PROFIL_SLOT *)ptr__JI5K);
    *(result__II5K) = *(PROFIL_SLOT__);
  };
  return(result__II5K);
}

static void add_last__5J5K(__FAST_ARRAYoPROFIL_SLOTo *Self__AK5K,void *element__BK5K)
// ({FAST_ARRAYoPROFIL_SLOTo},{NULLxPROFIL_SLOT}) VoidNo recursive, No inlinable.
{
  __INTEGER new_capacity__CK5K,__tmp__GL5K,__tmp__Y1HL,Self__ZMSL;
  __BOOLEAN __tmp__QK5K;
  void **__tmp__FL5K,**new__F1HL;
  new_capacity__CK5K= 0;
  if (((__INTEGER)(Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG +  1) <= (__INTEGER)(Self__AK5K->parent_arrayed_collection__H15F.capacity__ZUPG -  1))) {
    Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG=(__INTEGER)(Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG +  1);
    __tmp__QK5K=TRUE__;
  } else {
    __tmp__QK5K=FALSE__;
  };
  if ((! __tmp__QK5K)) {
    if ((Self__AK5K->parent_arrayed_collection__H15F.capacity__ZUPG ==  0)) {
      Self__AK5K->parent_arrayed_collection__H15F.storage__EVPG=create__0SWG( 2);
      Self__AK5K->parent_arrayed_collection__H15F.capacity__ZUPG= 2;
      Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG= 0;
    } else {
      new_capacity__CK5K=(__INTEGER)(Self__AK5K->parent_arrayed_collection__H15F.capacity__ZUPG <<  1);
      __tmp__FL5K=Self__AK5K->parent_arrayed_collection__H15F.storage__EVPG;
      __tmp__GL5K=Self__AK5K->parent_arrayed_collection__H15F.capacity__ZUPG;
      new__F1HL=((void **)realloc_dynamic__old_size__new_size__K3OB(((__POINTER )((void **)__tmp__FL5K)),((__UINTEGER_32 )(__INTEGER)(__tmp__GL5K * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__CK5K * ((__INTEGER )(sizeof(void *)))))));
      __tmp__Y1HL=(__INTEGER)(new_capacity__CK5K -  1);
      Self__ZMSL=__tmp__GL5K;
      while ((Self__ZMSL <= __tmp__Y1HL)) {
        new__F1HL[Self__ZMSL]=NULL;
        Self__ZMSL=(__INTEGER)(Self__ZMSL +  1);
      };
      Self__AK5K->parent_arrayed_collection__H15F.storage__EVPG=new__F1HL;
      Self__AK5K->parent_arrayed_collection__H15F.capacity__ZUPG=new_capacity__CK5K;
      Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG=(__INTEGER)(Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG +  1);
    };
  };
  ((void **)Self__AK5K->parent_arrayed_collection__H15F.storage__EVPG)[Self__AK5K->parent_arrayed_collection__H15F.upper__IVPG]=element__BK5K;
}

static void* get__result__Z3KM(__TYPE_FULL *Self__03KM,__POSITION p__13KM,__INTEGER n__23KM)
// ({TYPE_FULL},{POSITION},{INTEGER}) With resultNo recursive, No inlinable.
{
  copy__BNK(string_tmp__RB,(&__string_15));
  if ((n__23KM !=  0)) {
    add_last__YPK(string_tmp__RB,'_');
    append_in__4VC(((__INTEGER_32 )n__23KM),string_tmp__RB);
  };
  return(create__name__style__type__25JG(p__13KM,get__QEC(string_tmp__RB),'+',Self__03KM));
}

static void* write_argument__WCOL(__PROFIL_SLOT *Self__XCOL,void *args__YCOL)
// ({PROFIL_SLOT},{NULLxFAST_ARRAYoEXPRo}) With resultNo recursive, No inlinable.
{
  void *loc__0COL;
  void *val__1COL,*__tmp__GDOL;
  __POSITION __tmp__HDOL,__tmp__DEOL;
  __INTEGER __tmp__VDOL,Self__KSRL;
  __READ_LOCAL *Self__MAFQ,*Self__OAFQ;
  __READ_GLOBAL *Self__PAFQ;
  __FAST_ARRAYoEXPRo *Self__NF3Q;
  void *result__3COL;
  loc__0COL=NULL;
  val__1COL=NULL;
  if (((__INTEGER)(((__FAST_ARRAYoEXPRo *)args__YCOL)->parent_arrayed_collection__42LC.upper__USSH +  1) != (__INTEGER)(((__FAST_ARRAYoLOCALo *)Self__XCOL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F +  1))) {
    Self__NF3Q=((__FAST_ARRAYoEXPRo *)args__YCOL);
    __tmp__GDOL=((void **)Self__NF3Q->parent_arrayed_collection__42LC.storage__1SDI)[Self__NF3Q->parent_arrayed_collection__42LC.upper__USSH];
    switch (((struct ___OBJ *)__tmp__GDOL)->__id) {
    case __LIST__: {
      __tmp__HDOL=((__LIST *)__tmp__GDOL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __STRING_CST__: {
      __tmp__HDOL=((__STRING_CST *)__tmp__GDOL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXTERNAL_C__: {
      __tmp__HDOL=((__EXTERNAL_C *)__tmp__GDOL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__HDOL=((__PROTOTYPE_CST *)__tmp__GDOL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __INTEGER_CST__: {
      __tmp__HDOL=((__INTEGER_CST *)__tmp__GDOL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_LOCAL__: {
      __tmp__HDOL=((__READ_LOCAL *)__tmp__GDOL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HDOL=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HDOL=((__EXPR_EQUAL *)__tmp__GDOL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HDOL=((__EXPR_NOT_EQUAL *)__tmp__GDOL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __REAL_CST__: {
      __tmp__HDOL=((__REAL_CST *)__tmp__GDOL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CHARACTER_CST__: {
      __tmp__HDOL=((__CHARACTER_CST *)__tmp__GDOL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __IS_EXPANDED__: {
      __tmp__HDOL=((__IS_EXPANDED *)__tmp__GDOL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__HDOL=((__GET_TYPE_ID *)__tmp__GDOL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP__: {
      __tmp__HDOL=((__EXPR_SUP *)__tmp__GDOL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUB__: {
      __tmp__HDOL=((__EXPR_SUB *)__tmp__GDOL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MUL__: {
      __tmp__HDOL=((__EXPR_MUL *)__tmp__GDOL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_DIV__: {
      __tmp__HDOL=((__EXPR_DIV *)__tmp__GDOL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND__: {
      __tmp__HDOL=((__EXPR_AND *)__tmp__GDOL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HDOL=((__EXPR_SHIFT_R *)__tmp__GDOL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HDOL=((__EXPR_SHIFT_L *)__tmp__GDOL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __PUT_TO__: {
      __tmp__HDOL=((__PUT_TO *)__tmp__GDOL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __ITEM__: {
      __tmp__HDOL=((__ITEM *)__tmp__GDOL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __SIZE_OF__: {
      __tmp__HDOL=((__SIZE_OF *)__tmp__GDOL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CAST__: {
      __tmp__HDOL=((__CAST *)__tmp__GDOL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __CALL_SLOT__: {
      __tmp__HDOL=((__CALL_SLOT *)__tmp__GDOL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_SLOT__: {
      __tmp__HDOL=((__READ_SLOT *)__tmp__GDOL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __READ_GLOBAL__: {
      __tmp__HDOL=((__READ_GLOBAL *)__tmp__GDOL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HDOL=((__EXPR_NOT_LOGIC *)__tmp__GDOL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HDOL=((__EXPR_OR_LOGIC *)__tmp__GDOL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HDOL=((__EXPR_OR_OR_LOGIC *)__tmp__GDOL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HDOL=((__EXPR_AND_LOGIC *)__tmp__GDOL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HDOL=((__EXPR_AND_AND_LOGIC *)__tmp__GDOL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NEG__: {
      __tmp__HDOL=((__EXPR_NEG *)__tmp__GDOL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_ADD__: {
      __tmp__HDOL=((__EXPR_ADD *)__tmp__GDOL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_NOT__: {
      __tmp__HDOL=((__EXPR_NOT *)__tmp__GDOL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_MOD__: {
      __tmp__HDOL=((__EXPR_MOD *)__tmp__GDOL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HDOL=((__EXPR_SUP_EQ *)__tmp__GDOL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF__: {
      __tmp__HDOL=((__EXPR_INF *)__tmp__GDOL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HDOL=((__EXPR_INF_EQ *)__tmp__GDOL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_OR__: {
      __tmp__HDOL=((__EXPR_OR *)__tmp__GDOL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    case __EXPR_XOR__: {
      __tmp__HDOL=((__EXPR_XOR *)__tmp__GDOL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
    } break;
    };
    put_error__text__0AH( 1,(&__string_334));
    put_position__ECH(__tmp__HDOL);
    send_error__2FH();
  };
  result__3COL=create_with_capacity__UIPH((__INTEGER)(((__FAST_ARRAYoLOCALo *)Self__XCOL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F +  1));
  __tmp__VDOL=((__FAST_ARRAYoLOCALo *)Self__XCOL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.upper__TI4F;
  Self__KSRL= 0;
  while ((Self__KSRL <= __tmp__VDOL)) {
    loc__0COL=((void **)((__FAST_ARRAYoLOCALo *)Self__XCOL->parent_profil__51LC.argument_list__N5JH)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__KSRL];
    val__1COL=((void **)((__FAST_ARRAYoEXPRo *)args__YCOL)->parent_arrayed_collection__42LC.storage__1SDI)[Self__KSRL];
    if (((void *)loc__0COL != (void *)NULL)) {
      switch (((struct ___OBJ *)val__1COL)->__id) {
      case __LIST__: {
        __tmp__DEOL=((__LIST *)val__1COL)->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __STRING_CST__: {
        __tmp__DEOL=((__STRING_CST *)val__1COL)->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXTERNAL_C__: {
        __tmp__DEOL=((__EXTERNAL_C *)val__1COL)->parent_expr__W2LC.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__DEOL=((__PROTOTYPE_CST *)val__1COL)->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __INTEGER_CST__: {
        __tmp__DEOL=((__INTEGER_CST *)val__1COL)->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_LOCAL__: {
        __tmp__DEOL=((__READ_LOCAL *)val__1COL)->parent_read__FJZD.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__DEOL=EXPR__->parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__DEOL=((__EXPR_EQUAL *)val__1COL)->parent_expr_binary_cmp__1LJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__DEOL=((__EXPR_NOT_EQUAL *)val__1COL)->parent_expr_binary_cmp__DMJH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __REAL_CST__: {
        __tmp__DEOL=((__REAL_CST *)val__1COL)->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CHARACTER_CST__: {
        __tmp__DEOL=((__CHARACTER_CST *)val__1COL)->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __IS_EXPANDED__: {
        __tmp__DEOL=((__IS_EXPANDED *)val__1COL)->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__DEOL=((__GET_TYPE_ID *)val__1COL)->parent_expr__AAKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP__: {
        __tmp__DEOL=((__EXPR_SUP *)val__1COL)->parent_expr_binary_cmp__TAKH.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUB__: {
        __tmp__DEOL=((__EXPR_SUB *)val__1COL)->parent_expr_binary__HBKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MUL__: {
        __tmp__DEOL=((__EXPR_MUL *)val__1COL)->parent_expr_binary__0BKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_DIV__: {
        __tmp__DEOL=((__EXPR_DIV *)val__1COL)->parent_expr_binary__NCKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND__: {
        __tmp__DEOL=((__EXPR_AND *)val__1COL)->parent_expr_binary__ADKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__DEOL=((__EXPR_SHIFT_R *)val__1COL)->parent_expr_binary__TDKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__DEOL=((__EXPR_SHIFT_L *)val__1COL)->parent_expr_binary__GEKH.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __PUT_TO__: {
        __tmp__DEOL=((__PUT_TO *)val__1COL)->parent_expr__4EKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __ITEM__: {
        __tmp__DEOL=((__ITEM *)val__1COL)->parent_expr__RFKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __SIZE_OF__: {
        __tmp__DEOL=((__SIZE_OF *)val__1COL)->parent_expr__NGKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CAST__: {
        __tmp__DEOL=((__CAST *)val__1COL)->parent_expr__5GKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __CALL_SLOT__: {
        __tmp__DEOL=((__CALL_SLOT *)val__1COL)->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_SLOT__: {
        __tmp__DEOL=((__READ_SLOT *)val__1COL)->parent_read__X0TI.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __READ_GLOBAL__: {
        __tmp__DEOL=((__READ_GLOBAL *)val__1COL)->parent_read__U0UJ.parent_expr__EJZD.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__DEOL=((__EXPR_NOT_LOGIC *)val__1COL)->parent_expr_unary_logic__0EUK.parent_expr__ZEUK.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__DEOL=((__EXPR_OR_LOGIC *)val__1COL)->parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__DEOL=((__EXPR_OR_OR_LOGIC *)val__1COL)->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__DEOL=((__EXPR_AND_LOGIC *)val__1COL)->parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__DEOL=((__EXPR_AND_AND_LOGIC *)val__1COL)->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.parent_expr__VHCL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NEG__: {
        __tmp__DEOL=((__EXPR_NEG *)val__1COL)->parent_expr_unary__JZDL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_ADD__: {
        __tmp__DEOL=((__EXPR_ADD *)val__1COL)->parent_expr_binary__UZDL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_NOT__: {
        __tmp__DEOL=((__EXPR_NOT *)val__1COL)->parent_expr_unary__M5VL.parent_expr__IZDL.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_MOD__: {
        __tmp__DEOL=((__EXPR_MOD *)val__1COL)->parent_expr_binary__PDWL.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__DEOL=((__EXPR_SUP_EQ *)val__1COL)->parent_expr_binary_cmp__EP1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF__: {
        __tmp__DEOL=((__EXPR_INF *)val__1COL)->parent_expr_binary_cmp__WQ1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__DEOL=((__EXPR_INF_EQ *)val__1COL)->parent_expr_binary_cmp__MR1M.parent_expr__0LJH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_OR__: {
        __tmp__DEOL=((__EXPR_OR *)val__1COL)->parent_expr_binary__ET1M.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      case __EXPR_XOR__: {
        __tmp__DEOL=((__EXPR_XOR *)val__1COL)->parent_expr_binary__UA5N.parent_expr__GBKH.parent_instr__UE.parent_itm_object__TE.position__BJM;
      } break;
      };
      add_last__JPDI(result__3COL,write__value__T5FH(loc__0COL,__tmp__DEOL,val__1COL));
    } else {
      add_last__JPDI(result__3COL,NULL);
      switch (((struct ___OBJ *)val__1COL)->__id) {
      case __LIST__: {
        remove__KPJJ(val__1COL);
      } break;
      case __STRING_CST__: {
      } break;
      case __EXTERNAL_C__: {
        remove__UUAK(val__1COL);
      } break;
      case __PROTOTYPE_CST__: {
      } break;
      case __INTEGER_CST__: {
      } break;
      case __READ_LOCAL__: {
        Self__MAFQ=((__READ_LOCAL *)val__1COL);
        unread__YVJK(Self__MAFQ->local__ALZD,Self__MAFQ);
      } break;
      case __EXPR_MULTIPLE__: {
        remove__TVAK(val__1COL);
      } break;
      case __EXPR_EQUAL__: {
        remove__DWAK(val__1COL);
      } break;
      case __EXPR_NOT_EQUAL__: {
        remove__HWAK(val__1COL);
      } break;
      case __REAL_CST__: {
      } break;
      case __CHARACTER_CST__: {
      } break;
      case __IS_EXPANDED__: {
        Self__OAFQ=((__READ_LOCAL *)((__IS_EXPANDED *)val__1COL)->receiver__OO2H);
        unread__YVJK(Self__OAFQ->local__ALZD,Self__OAFQ);
      } break;
      case __GET_TYPE_ID__: {
        remove__SWAK(val__1COL);
      } break;
      case __EXPR_SUP__: {
        remove__VWAK(val__1COL);
      } break;
      case __EXPR_SUB__: {
        remove__ZWAK(val__1COL);
      } break;
      case __EXPR_MUL__: {
        remove__3WAK(val__1COL);
      } break;
      case __EXPR_DIV__: {
        remove__BXAK(val__1COL);
      } break;
      case __EXPR_AND__: {
        remove__FXAK(val__1COL);
      } break;
      case __EXPR_SHIFT_R__: {
        remove__JXAK(val__1COL);
      } break;
      case __EXPR_SHIFT_L__: {
        remove__NXAK(val__1COL);
      } break;
      case __PUT_TO__: {
        remove__RXAK(val__1COL);
      } break;
      case __ITEM__: {
        remove__SYAK(val__1COL);
      } break;
      case __SIZE_OF__: {
        remove__WYAK(val__1COL);
      } break;
      case __CAST__: {
        remove__ZYAK(val__1COL);
      } break;
      case __CALL_SLOT__: {
        remove__2NML(val__1COL);
      } break;
      case __READ_SLOT__: {
        remove__4GHK(val__1COL);
      } break;
      case __READ_GLOBAL__: {
        Self__PAFQ=((__READ_GLOBAL *)val__1COL);
        unread__15ML(Self__PAFQ->global__RHJK,Self__PAFQ);
      } break;
      case __EXPR_NOT_LOGIC__: {
        remove__GWZM(val__1COL);
      } break;
      case __EXPR_OR_LOGIC__: {
        remove__WPEO(val__1COL);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        remove__WMKO(val__1COL);
      } break;
      case __EXPR_AND_LOGIC__: {
        remove__0PEO(val__1COL);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        remove__1MKO(val__1COL);
      } break;
      case __EXPR_NEG__: {
        remove__3KJM(val__1COL);
      } break;
      case __EXPR_ADD__: {
        remove__QQML(val__1COL);
      } break;
      case __EXPR_NOT__: {
        remove__D5YM(val__1COL);
      } break;
      case __EXPR_MOD__: {
        remove__4PEO(val__1COL);
      } break;
      case __EXPR_SUP_EQ__: {
        remove__X5DP(val__1COL);
      } break;
      case __EXPR_INF__: {
        remove__KZQN(val__1COL);
      } break;
      case __EXPR_INF_EQ__: {
        remove__OZQN(val__1COL);
      } break;
      case __EXPR_OR__: {
        remove__LUPN(val__1COL);
      } break;
      case __EXPR_XOR__: {
        remove__AQTO(val__1COL);
      } break;
      };
    };
    Self__KSRL=(__INTEGER)(Self__KSRL +  1);
  };
  return(result__3COL);
}

static void remove__EEPL(__CASE *Self__FEPL)
// ({CASE}) VoidNo recursive, No inlinable.
{
  void *__tmp__JEPL;
  void *__tmp__KEPL,*tb__GEPL;
  __PROFIL_BLOCK *Self__TEPL;
  remove__KPJJ(Self__FEPL->code__BQAG);
  __tmp__JEPL=Self__FEPL->id__QMAG;
  if (__tmp__JEPL==NULL) {
    __tmp__KEPL=NULL;
  } else {
    switch (((struct ___OBJ *)__tmp__JEPL)->__id) {
    case __TYPE__: {
      __tmp__KEPL=NULL;
    } break;
    case __TYPE_NULL__: {
      __tmp__KEPL=NULL;
    } break;
    case __TYPE_VOID__: {
      __tmp__KEPL=NULL;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__KEPL=NULL;
    } break;
    case __TYPE_ID__: {
      __tmp__KEPL=NULL;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__KEPL=NULL;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__KEPL=((void *)__tmp__JEPL);
    } break;
    }
  };
  tb__GEPL=__tmp__KEPL;
  if (((void *)__tmp__KEPL != (void *)NULL)) {
    Self__TEPL=((__PROFIL_BLOCK *)__tmp__KEPL);
    ((__SLOT_DATA *)Self__TEPL->slot_value__H4IH)->parent_variable__AJZD.ensure_count__QEAG=(__INTEGER)(((__SLOT_DATA *)Self__TEPL->slot_value__H4IH)->parent_variable__AJZD.ensure_count__QEAG -  1);
  };
}

static void set_late_binding__OOSL()
// () VoidRecursive, No inlinable.
{
  void *__tmp__QOSL;
  __tmp__QOSL=type_block__BLB;
  switch (((struct ___OBJ *)__tmp__QOSL)->__id) {
  case __TYPE__: {
    ((__TYPE *)__tmp__QOSL)->last_pass_binding__YYZI=pass_count__Z3LC;
  } break;
  case __TYPE_NULL__: {
    ((__TYPE_NULL *)__tmp__QOSL)->parent_type__TIB.last_pass_binding__YYZI=pass_count__Z3LC;
  } break;
  case __TYPE_VOID__: {
    ((__TYPE_VOID *)__tmp__QOSL)->parent_type__UIB.last_pass_binding__YYZI=pass_count__Z3LC;
  } break;
  case __TYPE_CONTEXT__: {
    ((__TYPE_CONTEXT *)__tmp__QOSL)->parent_type__VIB.last_pass_binding__YYZI=pass_count__Z3LC;
  } break;
  case __TYPE_ID__: {
    ((__TYPE_ID *)__tmp__QOSL)->parent_type__WIB.last_pass_binding__YYZI=pass_count__Z3LC;
  } break;
  case __TYPE_GENERIC__: {
    ((__TYPE_GENERIC *)__tmp__QOSL)->parent_type__T2IB.last_pass_binding__YYZI=pass_count__Z3LC;
  } break;
  case __PROFIL_BLOCK__: {
    set_late_binding__OOSL();
  } break;
  };
}

static void execute__UPHL(__SLOT_DATA *Self__VPHL)
// ({SLOT_DATA}) VoidRecursive, No inlinable.
{
  void *s__YPHL;
  void *val__ZPHL,*old_list_current__0PHL;
  void *__tmp__PRJL;
  __INTEGER __tmp__RQHL,Self__BBKL;
  void *__tmp__4QHL,*__tmp__PRHL;
  __LIST *Self__NGIL;
  void *lst__WPHL,*__tmp__QRJL;
  __CHARACTER __tmp__YQHL;
  lst__WPHL=NULL;
  s__YPHL=NULL;
  val__ZPHL=Self__VPHL->value__M4OG;
  Self__VPHL->value__M4OG=NULL;
  add__to__1H5G(((__LIST *)list_main__WE)->expr_list__JUOG,val__ZPHL,(__INTEGER)(((__LIST *)list_main__WE)->index__PXRG -  1));
  if (((__UINTEGER_8)(((__TYPE_FULL *)Self__VPHL->parent_variable__AJZD.type__125F)->flag__LTL &  1) !=  0)) {
    __tmp__PRJL=((__TYPE_FULL *)Self__VPHL->parent_variable__AJZD.type__125F)->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__PRJL)->__id) {
    case __TYPE__: {
      __tmp__QRJL=((__TYPE *)__tmp__PRJL)->slot_run__1JC;
    } break;
    case __TYPE_NULL__: {
      __tmp__QRJL=((__TYPE_NULL *)__tmp__PRJL)->parent_type__TIB.slot_run__1JC;
    } break;
    case __TYPE_VOID__: {
      __tmp__QRJL=((__TYPE_VOID *)__tmp__PRJL)->parent_type__UIB.slot_run__1JC;
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__QRJL=((__TYPE_CONTEXT *)__tmp__PRJL)->parent_type__VIB.slot_run__1JC;
    } break;
    case __TYPE_ID__: {
      __tmp__QRJL=((__TYPE_ID *)__tmp__PRJL)->parent_type__WIB.slot_run__1JC;
    } break;
    case __TYPE_GENERIC__: {
      __tmp__QRJL=((__TYPE_GENERIC *)__tmp__PRJL)->parent_type__T2IB.slot_run__1JC;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__QRJL=((__PROFIL_BLOCK *)__tmp__PRJL)->parent_type__HHAG.slot_run__1JC;
    } break;
    };
    lst__WPHL=__tmp__QRJL;
    if (((void *)__tmp__QRJL != (void *)NULL)) {
      __tmp__RQHL=((__FAST_ARRAYoSLOTo *)__tmp__QRJL)->parent_arrayed_collection__ZJC.upper__WSL;
      Self__BBKL= 0;
      while ((Self__BBKL <= __tmp__RQHL)) {
        s__YPHL=((void **)((__FAST_ARRAYoSLOTo *)lst__WPHL)->parent_arrayed_collection__ZJC.storage__SSL)[Self__BBKL];
        if (((struct ___OBJ *)s__YPHL)->__id==__SLOT_DATA__) {
          __tmp__YQHL=((__SLOT_DATA *)s__YPHL)->parent_variable__AJZD.parent_named__A2LC.style__LDGC;
        } else {
          __tmp__YQHL=((__ITM_SLOT *)((__SLOT *)((__SLOT_CODE *)s__YPHL)->parent_slot__Y22F)->base_slot__P22F)->parent_named__XIM.style__LDGC;
        };
        if ((__tmp__YQHL == '+')) {
          if (((struct ___OBJ *)s__YPHL)->__id==__SLOT_DATA__) {
            __tmp__4QHL=((__SLOT *)((__SLOT_DATA *)s__YPHL)->parent_slot__BJZD)->slot_data_intern__1JZD;
          } else {
            __tmp__4QHL=((__SLOT *)((__SLOT_CODE *)s__YPHL)->parent_slot__Y22F)->slot_data_intern__1JZD;
          };
          if ((((void *)__tmp__4QHL != (void *)NULL) && ((void *)((__SLOT_DATA *)__tmp__4QHL)->value__M4OG != (void *)NULL))) {
            execute__UPHL(__tmp__4QHL);
          };
          if (((struct ___OBJ *)s__YPHL)->__id==__SLOT_DATA__) {
            __tmp__PRHL=((__SLOT *)((__SLOT_DATA *)s__YPHL)->parent_slot__BJZD)->slot_id__04OG;
          } else {
            __tmp__PRHL=((__SLOT *)((__SLOT_CODE *)s__YPHL)->parent_slot__Y22F)->slot_id__04OG;
          };
          if ((((void *)__tmp__PRHL != (void *)NULL) && ((void *)((__SLOT_DATA *)__tmp__PRHL)->value__M4OG != (void *)NULL))) {
            execute__UPHL(__tmp__PRHL);
          };
        };
        Self__BBKL=(__INTEGER)(Self__BBKL +  1);
      };
    };
  };
  old_list_current__0PHL=list_current__IF1;
  list_current__IF1=NULL;
  execute_link__LUOG(val__ZPHL);
  Self__NGIL=((__LIST *)list_main__WE);
  Self__NGIL->index__PXRG=(__INTEGER)(Self__NGIL->index__PXRG +  1);
  list_current__IF1=old_list_current__0PHL;
}

static void remove__OGAM(void *p__QGAM)
// ({PROFIL_SLOTxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__0GAM;
  __FAST_ARRAYoPROFILo *Self__DG3Q;
  unset_life__UXBM(p__QGAM);
  if (((struct ___OBJ *)p__QGAM)->__id==__PROFIL_SLOT__) {
    __tmp__0GAM=((__PROFIL_SLOT *)p__QGAM)->parent_profil__51LC.life_index__01RI;
  } else {
    __tmp__0GAM=((__PROFIL_BLOCK *)p__QGAM)->parent_profil__GHAG.life_index__01RI;
  };
  if ((__tmp__0GAM != ((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.upper__KNB)) {
    swap__with__3GEM(__tmp__0GAM,((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.upper__KNB);
  };
  Self__DG3Q=((__FAST_ARRAYoPROFILo *)profil_list__ENB);
  Self__DG3Q->parent_arrayed_collection__DNB.upper__KNB=(__INTEGER)(Self__DG3Q->parent_arrayed_collection__DNB.upper__KNB -  1);
}

static void insert__to__PDDM(__LIST *Self__QDDM,void *e__RDDM,__INTEGER idx__SDDM)
// ({LIST},{NULLxLISTxSTRING_CSTxPUSHxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxSWITCHxNODE_TYPExREAD_LOCALxEXPR_MULTIPLExNODE_STYLExWRITE_GLOBALxWRITE_SLOTxEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxNOPxREAD_SLOTxWRITE_LOCALxREAD_GLOBALxEXPR_NOT_LOGICxLOOPxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxLOOP_ENDxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR},{INTEGER}) VoidNo recursive, No inlinable.
{
  add__to__1H5G(Self__QDDM->expr_list__JUOG,e__RDDM,(__INTEGER)(idx__SDDM -  1));
  if ((idx__SDDM <= Self__QDDM->index__PXRG)) {
    Self__QDDM->index__PXRG=(__INTEGER)(Self__QDDM->index__PXRG +  1);
  };
}

static void argument_to_assignment__index__alias__ITLM(__CALL_SLOT *Self__JTLM,void *lst__KTLM,__INTEGER idx__LTLM,__BOOLEAN is_alias__MTLM)
// ({CALL_SLOT},{NULLxLIST},{INTEGER},{TRUExFALSE}) VoidNo recursive, No inlinable.
{
  void *val__NTLM,*new_wrt__OTLM;
  void *new_val__PTLM,*__tmp__PULM,*__tmp__MVLM,*__tmp__XVLM;
  void *__tmp__GWLM;
  void *loc__QTLM,*__tmp__MULM,*__tmp__DWLM;
  __INTEGER Self__BJMM;
  void *__tmp__KULM,*__tmp__YULM,*__tmp__BWLM,*__tmp__PWLM;
  __POSITION __tmp__NULM,__tmp__EWLM;
  void *__tmp__NVLM,*__tmp__VVLM;
  val__NTLM=NULL;
  new_wrt__OTLM=NULL;
  new_val__PTLM=NULL;
  loc__QTLM=NULL;
  Self__BJMM=((__FAST_ARRAYoWRITEo *)Self__JTLM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
  while ((Self__BJMM >=  1)) {
    val__NTLM=((void **)((__FAST_ARRAYoWRITEo *)Self__JTLM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__BJMM];
    if (((void *)val__NTLM != (void *)NULL)) {
      ((void **)((__FAST_ARRAYoWRITEo *)Self__JTLM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__BJMM]=NULL;
      if (is_alias__MTLM) {
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__KULM=((__WRITE_GLOBAL *)val__NTLM)->global__4U1H;
        } break;
        case __WRITE_SLOT__: {
          __tmp__KULM=((__WRITE_SLOT *)val__NTLM)->slot__5T1H;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__KULM=((__WRITE_LOCAL *)val__NTLM)->local__2RIJ;
        } break;
        };
        if (__tmp__KULM==NULL) {
          __tmp__MULM=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__KULM)->__id) {
          case __LOCAL__: {
            __tmp__MULM=((void *)__tmp__KULM);
          } break;
          case __SLOT_DATA__: {
            __tmp__MULM=NULL;
          } break;
          }
        };
        loc__QTLM=__tmp__MULM;
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__NULM=((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
        } break;
        case __WRITE_SLOT__: {
          __tmp__NULM=((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__NULM=((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
        } break;
        };
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__PULM=((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__PULM=((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__PULM=((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.value__HBEH;
        } break;
        };
        new_wrt__OTLM=write__value__T5FH(__tmp__MULM,__tmp__NULM,__tmp__PULM);
        unwrite__OGNL(__tmp__MULM,val__NTLM);
      } else {
        new_wrt__OTLM=val__NTLM;
      };
      insert__to__PDDM(lst__KTLM,new_wrt__OTLM,idx__LTLM);
      switch (((struct ___OBJ *)new_wrt__OTLM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__YULM=((__WRITE_GLOBAL *)new_wrt__OTLM)->global__4U1H;
      } break;
      case __WRITE_SLOT__: {
        __tmp__YULM=((__WRITE_SLOT *)new_wrt__OTLM)->slot__5T1H;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__YULM=((__WRITE_LOCAL *)new_wrt__OTLM)->local__2RIJ;
      } break;
      };
      if (((struct ___OBJ *)__tmp__YULM)->__id==__LOCAL__) {
        ((__LOCAL *)__tmp__YULM)->parent_variable__B2LC.parent_named__A2LC.style__LDGC='+';
      } else {
        ((__SLOT_DATA *)__tmp__YULM)->parent_variable__AJZD.parent_named__A2LC.style__LDGC='+';
      };
    };
    Self__BJMM=(__INTEGER)(Self__BJMM -  1);
  };
  if ((! (((__FAST_ARRAYoWRITEo *)Self__JTLM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI <  0))) {
    val__NTLM=((void **)((__FAST_ARRAYoWRITEo *)Self__JTLM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0];
    if (((void *)val__NTLM != (void *)NULL)) {
      ((void **)((__FAST_ARRAYoWRITEo *)Self__JTLM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[ 0]=NULL;
      switch (((struct ___OBJ *)val__NTLM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__MVLM=((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.value__HBEH;
      } break;
      case __WRITE_SLOT__: {
        __tmp__MVLM=((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.value__HBEH;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__MVLM=((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.value__HBEH;
      } break;
      };
      switch (((struct ___OBJ *)__tmp__MVLM)->__id) {
      case __LIST__: {
        __tmp__NVLM=static_type__GIQG(__tmp__MVLM);
      } break;
      case __STRING_CST__: {
        __tmp__NVLM=((__STRING_CST *)__tmp__MVLM)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__NVLM=((__EXTERNAL_C *)__tmp__MVLM)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__NVLM=((__PROTOTYPE_CST *)__tmp__MVLM)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__NVLM=((__INTEGER_CST *)__tmp__MVLM)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__NVLM=((__LOCAL *)((__READ_LOCAL *)__tmp__MVLM)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__NVLM=static_type__0N1H(__tmp__MVLM);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__NVLM=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__NVLM=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__NVLM=((__REAL_CST *)__tmp__MVLM)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__NVLM=((__CHARACTER_CST *)__tmp__MVLM)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__NVLM=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__NVLM=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__NVLM=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__NVLM=static_type__MP1H(__tmp__MVLM);
      } break;
      case __EXPR_MUL__: {
        __tmp__NVLM=static_type__SP1H(__tmp__MVLM);
      } break;
      case __EXPR_DIV__: {
        __tmp__NVLM=static_type__XP1H(__tmp__MVLM);
      } break;
      case __EXPR_AND__: {
        __tmp__NVLM=static_type__2P1H(__tmp__MVLM);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__NVLM=static_type__BQ1H(__tmp__MVLM);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__NVLM=static_type__GQ1H(__tmp__MVLM);
      } break;
      case __PUT_TO__: {
        __tmp__NVLM=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__NVLM=static_type__PQ1H(__tmp__MVLM);
      } break;
      case __SIZE_OF__: {
        __tmp__NVLM=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__NVLM=((__CAST *)__tmp__MVLM)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__NVLM=static_type__GIKL(__tmp__MVLM);
      } break;
      case __READ_SLOT__: {
        __tmp__NVLM=((__SLOT_DATA *)((__READ_SLOT *)__tmp__MVLM)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__NVLM=((__SLOT_DATA *)((__READ_GLOBAL *)__tmp__MVLM)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__NVLM=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__NVLM=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__NVLM=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__NVLM=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__NVLM=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__NVLM=static_type__Z2IM(__tmp__MVLM);
      } break;
      case __EXPR_ADD__: {
        __tmp__NVLM=static_type__IXML(__tmp__MVLM);
      } break;
      case __EXPR_NOT__: {
        __tmp__NVLM=static_type__BTXM(__tmp__MVLM);
      } break;
      case __EXPR_MOD__: {
        __tmp__NVLM=static_type__5LEO(__tmp__MVLM);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__NVLM=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__NVLM=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__NVLM=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__NVLM=static_type__NOPN(__tmp__MVLM);
      } break;
      case __EXPR_XOR__: {
        __tmp__NVLM=static_type__XCSO(__tmp__MVLM);
      } break;
      };
      if ((! ((__UINTEGER_8)(((__TYPE_FULL *)__tmp__NVLM)->flag__LTL &  1) !=  0))) {
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__VVLM=((__SLOT_DATA *)((__WRITE_GLOBAL *)val__NTLM)->global__4U1H)->parent_variable__AJZD.type__125F;
        } break;
        case __WRITE_SLOT__: {
          __tmp__VVLM=((__SLOT_DATA *)((__WRITE_SLOT *)val__NTLM)->slot__5T1H)->parent_variable__AJZD.type__125F;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__VVLM=((__LOCAL *)((__WRITE_LOCAL *)val__NTLM)->local__2RIJ)->parent_variable__B2LC.type__125F;
        } break;
        };
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__XVLM=((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__XVLM=((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__XVLM=((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.value__HBEH;
        } break;
        };
        new_val__PTLM=create__value__S1WH(CAST__,__tmp__VVLM,__tmp__XVLM);
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          ((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.value__HBEH=new_val__PTLM;
        } break;
        case __WRITE_SLOT__: {
          ((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.value__HBEH=new_val__PTLM;
        } break;
        case __WRITE_LOCAL__: {
          ((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.value__HBEH=new_val__PTLM;
        } break;
        };
      };
      if (is_alias__MTLM) {
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__BWLM=((__WRITE_GLOBAL *)val__NTLM)->global__4U1H;
        } break;
        case __WRITE_SLOT__: {
          __tmp__BWLM=((__WRITE_SLOT *)val__NTLM)->slot__5T1H;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__BWLM=((__WRITE_LOCAL *)val__NTLM)->local__2RIJ;
        } break;
        };
        if (__tmp__BWLM==NULL) {
          __tmp__DWLM=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__BWLM)->__id) {
          case __LOCAL__: {
            __tmp__DWLM=((void *)__tmp__BWLM);
          } break;
          case __SLOT_DATA__: {
            __tmp__DWLM=NULL;
          } break;
          }
        };
        loc__QTLM=__tmp__DWLM;
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__EWLM=((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
        } break;
        case __WRITE_SLOT__: {
          __tmp__EWLM=((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__EWLM=((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
        } break;
        };
        switch (((struct ___OBJ *)val__NTLM)->__id) {
        case __WRITE_GLOBAL__: {
          __tmp__GWLM=((__WRITE_GLOBAL *)val__NTLM)->parent_write__QBGH.value__HBEH;
        } break;
        case __WRITE_SLOT__: {
          __tmp__GWLM=((__WRITE_SLOT *)val__NTLM)->parent_write__3BGH.value__HBEH;
        } break;
        case __WRITE_LOCAL__: {
          __tmp__GWLM=((__WRITE_LOCAL *)val__NTLM)->parent_write__X50I.value__HBEH;
        } break;
        };
        new_wrt__OTLM=write__value__T5FH(__tmp__DWLM,__tmp__EWLM,__tmp__GWLM);
        unwrite__OGNL(__tmp__DWLM,val__NTLM);
      } else {
        new_wrt__OTLM=val__NTLM;
      };
      insert__to__PDDM(lst__KTLM,new_wrt__OTLM,idx__LTLM);
      switch (((struct ___OBJ *)new_wrt__OTLM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__PWLM=((__WRITE_GLOBAL *)new_wrt__OTLM)->global__4U1H;
      } break;
      case __WRITE_SLOT__: {
        __tmp__PWLM=((__WRITE_SLOT *)new_wrt__OTLM)->slot__5T1H;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__PWLM=((__WRITE_LOCAL *)new_wrt__OTLM)->local__2RIJ;
      } break;
      };
      if (((struct ___OBJ *)__tmp__PWLM)->__id==__LOCAL__) {
        ((__LOCAL *)__tmp__PWLM)->parent_variable__B2LC.parent_named__A2LC.style__LDGC='+';
      } else {
        ((__SLOT_DATA *)__tmp__PWLM)->parent_variable__AJZD.parent_named__A2LC.style__LDGC='+';
      };
    };
  };
}

static void* execute_inline__QFZL(__CALL_SLOT *Self__RFZL)
// ({CALL_SLOT}) With resultNo recursive, No inlinable.
{
  void *result__TFZL,*__tmp__5KZL,*__tmp__ALZL;
  void *new_src__UFZL;
  void *wrt__VFZL;
  void *loc__XFZL;
  void *prof_block__YFZL,*__tmp__EJZL;
  void *__tmp__1GZL,*__tmp__IIZL,*__tmp__RIZL,*__tmp__BJZL,*__tmp__DJZL;
  void *__tmp__OJZL,*__tmp__XJZL,*__tmp__QLZL,*__tmp__BH3Q;
  __INTEGER __tmp__2GZL,__tmp__WHZL,Self__FGPN,__tmp__RJZL,Self__EKZN;
  __INTEGER __tmp__XKZL,Self__WKZN,__tmp__TLZL,Self__KLZN,Self__PTZN;
  __INTEGER limit_up__QTZN;
  __PROFIL_SLOT *Self__BV2L;
  __LOCAL *Self__SLFQ,*Self__TLFQ;
  __STRING_CST *Self__1LFQ;
  __PROTOTYPE_CST *Self__2LFQ;
  __INTEGER_CST *Self__3LFQ;
  __REAL_CST *Self__5LFQ;
  __CHARACTER_CST *Self__BMFQ;
  __IS_EXPANDED *Self__CMFQ;
  __READ_LOCAL *Self__DMFQ,*Self__FMFQ;
  __READ_GLOBAL *Self__GMFQ;
  __BOOLEAN __tmp__MIZL,__tmp__SIZL;
  void *__tmp__PJZL,*__tmp__YJZL,*__tmp__RLZL,*__tmp__U05Q,*__tmp__V05Q;
  void *__tmp__0LZL;
  void **__tmp__W05Q;
  result__TFZL=NULL;
  new_src__UFZL=NULL;
  wrt__VFZL=NULL;
  loc__XFZL=NULL;
  prof_block__YFZL=NULL;
  if (((void *)source__Q53L(Self__RFZL) == (void *)list_current__IF1)) {
    put_error__text__0AH( 1,(&__string_573));
    put_position__ECH(((__LIST *)source__Q53L(Self__RFZL))->parent_expr__VE.parent_instr__UE.parent_itm_object__TE.position__BJM);
    put_position__ECH(Self__RFZL->parent_expr__O41H.parent_instr__UE.parent_itm_object__TE.position__BJM);
    send_error__2FH();
  };
  if (((! is_interrupt__2MQL(Self__RFZL)) && (! is_external__23NM(Self__RFZL)))) {
    __tmp__1GZL=Self__RFZL->profil__QA2H;
    if (((struct ___OBJ *)__tmp__1GZL)->__id==__PROFIL_SLOT__) {
      __tmp__2GZL=((__PROFIL_SLOT *)__tmp__1GZL)->parent_profil__51LC.link_count__FALJ;
    } else {
      __tmp__2GZL=((__PROFIL_BLOCK *)__tmp__1GZL)->parent_profil__GHAG.link_count__FALJ;
    };
    if ((__tmp__2GZL ==  1)) {
      if ((old_seq_or_and__CYRG == seq_or_and__AYRG)) {
        argument_to_assignment__index__alias__ITLM(Self__RFZL,source__Q53L(Self__RFZL), 1,FALSE__);
        if (((void *)Self__RFZL->result_list__1A2H != (void *)NULL)) {
          __tmp__WHZL=((__FAST_ARRAYoWRITEo *)Self__RFZL->result_list__1A2H)->parent_arrayed_collection__TAEH.upper__NPDI;
          Self__FGPN= 0;
          while ((Self__FGPN <= __tmp__WHZL)) {
            add__to__1H5G(((__LIST *)source__Q53L(Self__RFZL))->expr_list__JUOG,((void **)((__FAST_ARRAYoWRITEo *)Self__RFZL->result_list__1A2H)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__FGPN],(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)source__Q53L(Self__RFZL))->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1));
            Self__FGPN=(__INTEGER)(Self__FGPN +  1);
          };
        };
        result__TFZL=execute_link__LUOG(source__Q53L(Self__RFZL));
        __tmp__IIZL=Self__RFZL->profil__QA2H;
        if (((struct ___OBJ *)__tmp__IIZL)->__id==__PROFIL_SLOT__) {
          Self__BV2L=((__PROFIL_SLOT *)__tmp__IIZL);
          remove__OGAM(Self__BV2L);
          remove_profil__3FAM(Self__BV2L->slot_code__X4NL,Self__BV2L);
        } else {
          remove__OGAM(((__PROFIL_BLOCK *)__tmp__IIZL));
        };
        modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
      };
      __tmp__MIZL=TRUE__;
    } else {
      __tmp__MIZL=FALSE__;
    };
    if ((! __tmp__MIZL)) {
      __tmp__RIZL=Self__RFZL->profil__QA2H;
      if (((struct ___OBJ *)__tmp__RIZL)->__id==__PROFIL_SLOT__) {
        __tmp__SIZL=(((__PROFIL_SLOT *)__tmp__RIZL)->parent_profil__51LC.stat__BNEJ ==  1);
      } else {
        __tmp__SIZL=(((__PROFIL_BLOCK *)__tmp__RIZL)->parent_profil__GHAG.stat__BNEJ ==  1);
      };
      if (__tmp__SIZL) {
        if ((old_seq_or_and__CYRG == seq_or_and__AYRG)) {
          __tmp__BJZL=Self__RFZL->profil__QA2H;
          if (((struct ___OBJ *)__tmp__BJZL)->__id==__PROFIL_SLOT__) {
            unlink__ZVQL(__tmp__BJZL);
          } else {
            unlink__XWQL(__tmp__BJZL);
          };
          __tmp__DJZL=Self__RFZL->profil__QA2H;
          if (__tmp__DJZL==NULL) {
            __tmp__EJZL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__DJZL)->__id) {
            case __PROFIL_SLOT__: {
              __tmp__EJZL=NULL;
            } break;
            case __PROFIL_BLOCK__: {
              __tmp__EJZL=((void *)__tmp__DJZL);
            } break;
            }
          };
          prof_block__YFZL=__tmp__EJZL;
          if (((void *)__tmp__EJZL != (void *)NULL)) {
            if (((struct ___OBJ *)Self__RFZL->profil__QA2H)->__id==__PROFIL_SLOT__) {
            };
            __tmp__OJZL=Self__RFZL->profil__QA2H;
            if (((struct ___OBJ *)__tmp__OJZL)->__id==__PROFIL_SLOT__) {
              __tmp__PJZL=((__PROFIL_SLOT *)__tmp__OJZL)->parent_profil__51LC.argument_list__N5JH;
            } else {
              __tmp__PJZL=((__PROFIL_BLOCK *)__tmp__OJZL)->parent_profil__GHAG.argument_list__N5JH;
            };
            __tmp__RJZL=((__FAST_ARRAYoLOCALo *)__tmp__PJZL)->parent_arrayed_collection__QI4F.upper__TI4F;
            Self__EKZN= 0;
            while ((Self__EKZN <= __tmp__RJZL)) {
              __tmp__XJZL=Self__RFZL->profil__QA2H;
              if (((struct ___OBJ *)__tmp__XJZL)->__id==__PROFIL_SLOT__) {
                __tmp__YJZL=((__PROFIL_SLOT *)__tmp__XJZL)->parent_profil__51LC.argument_list__N5JH;
              } else {
                __tmp__YJZL=((__PROFIL_BLOCK *)__tmp__XJZL)->parent_profil__GHAG.argument_list__N5JH;
              };
              loc__XFZL=((void **)((__FAST_ARRAYoLOCALo *)__tmp__YJZL)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__EKZN];
              if (((void *)loc__XFZL != (void *)NULL)) {
                Self__SLFQ=((__LOCAL *)loc__XFZL);
                Self__TLFQ=((__LOCAL *)loc__XFZL);
                Self__SLFQ->my_alias__PWAH=create__name__style__type__25JG(Self__TLFQ->parent_variable__B2LC.parent_named__A2LC.parent_itm_object__PD.position__BJM,Self__TLFQ->parent_variable__B2LC.parent_named__A2LC.name__1QB,Self__TLFQ->parent_variable__B2LC.parent_named__A2LC.style__LDGC,Self__TLFQ->parent_variable__B2LC.type__125F);
              };
              Self__EKZN=(__INTEGER)(Self__EKZN +  1);
            };
          } else {
            is_alias__4WAH=TRUE__;
          };
          new_src__UFZL=my_copy__2HYM(source__Q53L(Self__RFZL));
          argument_to_assignment__index__alias__ITLM(Self__RFZL,new_src__UFZL, 1,TRUE__);
          if (((void *)Self__RFZL->result_list__1A2H != (void *)NULL)) {
            __tmp__XKZL=((__FAST_ARRAYoWRITEo *)Self__RFZL->result_list__1A2H)->parent_arrayed_collection__TAEH.upper__NPDI;
            Self__WKZN= 0;
            while ((Self__WKZN <= __tmp__XKZL)) {
              wrt__VFZL=((void **)((__FAST_ARRAYoWRITEo *)Self__RFZL->result_list__1A2H)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__WKZN];
              switch (((struct ___OBJ *)wrt__VFZL)->__id) {
              case __WRITE_GLOBAL__: {
                __tmp__5KZL=((__WRITE_GLOBAL *)wrt__VFZL)->parent_write__QBGH.value__HBEH;
              } break;
              case __WRITE_SLOT__: {
                __tmp__5KZL=((__WRITE_SLOT *)wrt__VFZL)->parent_write__3BGH.value__HBEH;
              } break;
              case __WRITE_LOCAL__: {
                __tmp__5KZL=((__WRITE_LOCAL *)wrt__VFZL)->parent_write__X50I.value__HBEH;
              } break;
              };
              switch (((struct ___OBJ *)__tmp__5KZL)->__id) {
              case __LIST__: {
                __tmp__ALZL=my_copy__2HYM(__tmp__5KZL);
              } break;
              case __STRING_CST__: {
                Self__1LFQ=((__STRING_CST *)__tmp__5KZL);
                __tmp__ALZL=create__text__AUMH(Self__1LFQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1LFQ->string__ZK2H);
              } break;
              case __EXTERNAL_C__: {
                __tmp__ALZL=my_copy__2K2H(__tmp__5KZL);
              } break;
              case __PROTOTYPE_CST__: {
                Self__2LFQ=((__PROTOTYPE_CST *)__tmp__5KZL);
                __tmp__ALZL=create__type__CLQC(Self__2LFQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__2LFQ->parent_constant__E3LC.static_type__F4YD);
              } break;
              case __INTEGER_CST__: {
                Self__3LFQ=((__INTEGER_CST *)__tmp__5KZL);
                __tmp__ALZL=create__value__type__DNQC(Self__3LFQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3LFQ->value__PAZD,Self__3LFQ->parent_constant__P3LC.static_type__F4YD);
              } break;
              case __READ_LOCAL__: {
                __tmp__ALZL=my_copy__OAFJ(__tmp__5KZL);
              } break;
              case __EXPR_MULTIPLE__: {
                __tmp__ALZL=my_copy__KM2H(__tmp__5KZL);
              } break;
              case __EXPR_EQUAL__: {
                __tmp__ALZL=my_copy__DN2H(__tmp__5KZL);
              } break;
              case __EXPR_NOT_EQUAL__: {
                __tmp__ALZL=my_copy__QN2H(__tmp__5KZL);
              } break;
              case __REAL_CST__: {
                Self__5LFQ=((__REAL_CST *)__tmp__5KZL);
                __tmp__ALZL=create__value__type__1SMH(Self__5LFQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__5LFQ->value__5N2H,Self__5LFQ->parent_constant__M3JH.static_type__F4YD);
              } break;
              case __CHARACTER_CST__: {
                Self__BMFQ=((__CHARACTER_CST *)__tmp__5KZL);
                __tmp__ALZL=create__char__WTMH(Self__BMFQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__BMFQ->text__HO2H);
              } break;
              case __IS_EXPANDED__: {
                Self__CMFQ=((__IS_EXPANDED *)__tmp__5KZL);
                __tmp__ALZL=create__receiver__WRWH(Self__CMFQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__CMFQ->receiver__OO2H));
              } break;
              case __GET_TYPE_ID__: {
                __tmp__ALZL=my_copy__TO2H(__tmp__5KZL);
              } break;
              case __EXPR_SUP__: {
                __tmp__ALZL=my_copy__2O2H(__tmp__5KZL);
              } break;
              case __EXPR_SUB__: {
                __tmp__ALZL=my_copy__HP2H(__tmp__5KZL);
              } break;
              case __EXPR_MUL__: {
                __tmp__ALZL=my_copy__TP2H(__tmp__5KZL);
              } break;
              case __EXPR_DIV__: {
                __tmp__ALZL=my_copy__4P2H(__tmp__5KZL);
              } break;
              case __EXPR_AND__: {
                __tmp__ALZL=my_copy__JQ2H(__tmp__5KZL);
              } break;
              case __EXPR_SHIFT_R__: {
                __tmp__ALZL=my_copy__UQ2H(__tmp__5KZL);
              } break;
              case __EXPR_SHIFT_L__: {
                __tmp__ALZL=my_copy__5Q2H(__tmp__5KZL);
              } break;
              case __PUT_TO__: {
                __tmp__ALZL=my_copy__KR2H(__tmp__5KZL);
              } break;
              case __ITEM__: {
                __tmp__ALZL=my_copy__1R2H(__tmp__5KZL);
              } break;
              case __SIZE_OF__: {
                __tmp__ALZL=my_copy__HS2H(__tmp__5KZL);
              } break;
              case __CAST__: {
                __tmp__ALZL=my_copy__QS2H(__tmp__5KZL);
              } break;
              case __CALL_SLOT__: {
                __tmp__ALZL=my_copy__PIYM(__tmp__5KZL);
              } break;
              case __READ_SLOT__: {
                __tmp__ALZL=my_copy__AVGK(__tmp__5KZL);
              } break;
              case __READ_GLOBAL__: {
                __tmp__ALZL=my_copy__NVGK(__tmp__5KZL);
              } break;
              case __EXPR_NOT_LOGIC__: {
                __tmp__ALZL=my_copy__RFCN(__tmp__5KZL);
              } break;
              case __EXPR_OR_LOGIC__: {
                __tmp__ALZL=my_copy__JMEO(__tmp__5KZL);
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                __tmp__ALZL=my_copy__RTJO(__tmp__5KZL);
              } break;
              case __EXPR_AND_LOGIC__: {
                __tmp__ALZL=my_copy__WMEO(__tmp__5KZL);
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                __tmp__ALZL=my_copy__3TJO(__tmp__5KZL);
              } break;
              case __EXPR_NEG__: {
                __tmp__ALZL=my_copy__YEJM(__tmp__5KZL);
              } break;
              case __EXPR_ADD__: {
                __tmp__ALZL=my_copy__YRLL(__tmp__5KZL);
              } break;
              case __EXPR_NOT__: {
                __tmp__ALZL=my_copy__GLYM(__tmp__5KZL);
              } break;
              case __EXPR_MOD__: {
                __tmp__ALZL=my_copy__BNEO(__tmp__5KZL);
              } break;
              case __EXPR_SUP_EQ__: {
                __tmp__ALZL=my_copy__M3DP(__tmp__5KZL);
              } break;
              case __EXPR_INF__: {
                __tmp__ALZL=my_copy__PBSN(__tmp__5KZL);
              } break;
              case __EXPR_INF_EQ__: {
                __tmp__ALZL=my_copy__0BSN(__tmp__5KZL);
              } break;
              case __EXPR_OR__: {
                __tmp__ALZL=my_copy__ZOPN(__tmp__5KZL);
              } break;
              case __EXPR_XOR__: {
                __tmp__ALZL=my_copy__CYSO(__tmp__5KZL);
              } break;
              };
              switch (((struct ___OBJ *)wrt__VFZL)->__id) {
              case __WRITE_GLOBAL__: {
                ((__WRITE_GLOBAL *)wrt__VFZL)->parent_write__QBGH.value__HBEH=__tmp__ALZL;
              } break;
              case __WRITE_SLOT__: {
                ((__WRITE_SLOT *)wrt__VFZL)->parent_write__3BGH.value__HBEH=__tmp__ALZL;
              } break;
              case __WRITE_LOCAL__: {
                ((__WRITE_LOCAL *)wrt__VFZL)->parent_write__X50I.value__HBEH=__tmp__ALZL;
              } break;
              };
              switch (((struct ___OBJ *)__tmp__5KZL)->__id) {
              case __LIST__: {
                remove__KPJJ(__tmp__5KZL);
              } break;
              case __STRING_CST__: {
              } break;
              case __EXTERNAL_C__: {
                remove__UUAK(__tmp__5KZL);
              } break;
              case __PROTOTYPE_CST__: {
              } break;
              case __INTEGER_CST__: {
              } break;
              case __READ_LOCAL__: {
                Self__DMFQ=((__READ_LOCAL *)__tmp__5KZL);
                unread__YVJK(Self__DMFQ->local__ALZD,Self__DMFQ);
              } break;
              case __EXPR_MULTIPLE__: {
                remove__TVAK(__tmp__5KZL);
              } break;
              case __EXPR_EQUAL__: {
                remove__DWAK(__tmp__5KZL);
              } break;
              case __EXPR_NOT_EQUAL__: {
                remove__HWAK(__tmp__5KZL);
              } break;
              case __REAL_CST__: {
              } break;
              case __CHARACTER_CST__: {
              } break;
              case __IS_EXPANDED__: {
                Self__FMFQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__5KZL)->receiver__OO2H);
                unread__YVJK(Self__FMFQ->local__ALZD,Self__FMFQ);
              } break;
              case __GET_TYPE_ID__: {
                remove__SWAK(__tmp__5KZL);
              } break;
              case __EXPR_SUP__: {
                remove__VWAK(__tmp__5KZL);
              } break;
              case __EXPR_SUB__: {
                remove__ZWAK(__tmp__5KZL);
              } break;
              case __EXPR_MUL__: {
                remove__3WAK(__tmp__5KZL);
              } break;
              case __EXPR_DIV__: {
                remove__BXAK(__tmp__5KZL);
              } break;
              case __EXPR_AND__: {
                remove__FXAK(__tmp__5KZL);
              } break;
              case __EXPR_SHIFT_R__: {
                remove__JXAK(__tmp__5KZL);
              } break;
              case __EXPR_SHIFT_L__: {
                remove__NXAK(__tmp__5KZL);
              } break;
              case __PUT_TO__: {
                remove__RXAK(__tmp__5KZL);
              } break;
              case __ITEM__: {
                remove__SYAK(__tmp__5KZL);
              } break;
              case __SIZE_OF__: {
                remove__WYAK(__tmp__5KZL);
              } break;
              case __CAST__: {
                remove__ZYAK(__tmp__5KZL);
              } break;
              case __CALL_SLOT__: {
                remove__2NML(__tmp__5KZL);
              } break;
              case __READ_SLOT__: {
                remove__4GHK(__tmp__5KZL);
              } break;
              case __READ_GLOBAL__: {
                Self__GMFQ=((__READ_GLOBAL *)__tmp__5KZL);
                unread__15ML(Self__GMFQ->global__RHJK,Self__GMFQ);
              } break;
              case __EXPR_NOT_LOGIC__: {
                remove__GWZM(__tmp__5KZL);
              } break;
              case __EXPR_OR_LOGIC__: {
                remove__WPEO(__tmp__5KZL);
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                remove__WMKO(__tmp__5KZL);
              } break;
              case __EXPR_AND_LOGIC__: {
                remove__0PEO(__tmp__5KZL);
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                remove__1MKO(__tmp__5KZL);
              } break;
              case __EXPR_NEG__: {
                remove__3KJM(__tmp__5KZL);
              } break;
              case __EXPR_ADD__: {
                remove__QQML(__tmp__5KZL);
              } break;
              case __EXPR_NOT__: {
                remove__D5YM(__tmp__5KZL);
              } break;
              case __EXPR_MOD__: {
                remove__4PEO(__tmp__5KZL);
              } break;
              case __EXPR_SUP_EQ__: {
                remove__X5DP(__tmp__5KZL);
              } break;
              case __EXPR_INF__: {
                remove__KZQN(__tmp__5KZL);
              } break;
              case __EXPR_INF_EQ__: {
                remove__OZQN(__tmp__5KZL);
              } break;
              case __EXPR_OR__: {
                remove__LUPN(__tmp__5KZL);
              } break;
              case __EXPR_XOR__: {
                remove__AQTO(__tmp__5KZL);
              } break;
              };
              add__to__1H5G(((__LIST *)new_src__UFZL)->expr_list__JUOG,wrt__VFZL,(__INTEGER)((__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)new_src__UFZL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1) -  1));
              Self__WKZN=(__INTEGER)(Self__WKZN +  1);
            };
          };
          if (((void *)__tmp__EJZL != (void *)NULL)) {
            if (((struct ___OBJ *)Self__RFZL->profil__QA2H)->__id==__PROFIL_SLOT__) {
            };
            __tmp__QLZL=Self__RFZL->profil__QA2H;
            if (((struct ___OBJ *)__tmp__QLZL)->__id==__PROFIL_SLOT__) {
              __tmp__RLZL=((__PROFIL_SLOT *)__tmp__QLZL)->parent_profil__51LC.argument_list__N5JH;
            } else {
              __tmp__RLZL=((__PROFIL_BLOCK *)__tmp__QLZL)->parent_profil__GHAG.argument_list__N5JH;
            };
            __tmp__TLZL=((__FAST_ARRAYoLOCALo *)__tmp__RLZL)->parent_arrayed_collection__QI4F.upper__TI4F;
            Self__KLZN= 0;
            __tmp__BH3Q=Self__RFZL->profil__QA2H;
            __tmp__U05Q=((__PROFIL_SLOT *)__tmp__BH3Q)->parent_profil__51LC.argument_list__N5JH;
            __tmp__V05Q=((__PROFIL_BLOCK *)__tmp__BH3Q)->parent_profil__GHAG.argument_list__N5JH;
            while ((Self__KLZN <= __tmp__TLZL)) {
              if (((struct ___OBJ *)__tmp__BH3Q)->__id==__PROFIL_SLOT__) {
                __tmp__0LZL=__tmp__U05Q;
              } else {
                __tmp__0LZL=__tmp__V05Q;
              };
              loc__XFZL=((void **)((__FAST_ARRAYoLOCALo *)__tmp__0LZL)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__KLZN];
              if (((void *)loc__XFZL != (void *)NULL)) {
                ((__LOCAL *)loc__XFZL)->my_alias__PWAH=NULL;
              };
              Self__KLZN=(__INTEGER)(Self__KLZN +  1);
            };
          } else {
            Self__PTZN= 0;
            limit_up__QTZN=((__FAST_ARRAYoLOCALo *)list_alias__ZLZN)->parent_arrayed_collection__QI4F.upper__TI4F;
            __tmp__W05Q=((__FAST_ARRAYoLOCALo *)list_alias__ZLZN)->parent_arrayed_collection__QI4F.storage__FXPG;
            while ((Self__PTZN <= limit_up__QTZN)) {
              ((__LOCAL *)((void **)__tmp__W05Q)[Self__PTZN])->my_alias__PWAH=NULL;
              Self__PTZN=(__INTEGER)(Self__PTZN +  1);
            };
            ((__FAST_ARRAYoLOCALo *)list_alias__ZLZN)->parent_arrayed_collection__QI4F.upper__TI4F=(__INTEGER)(-  1);
            is_alias__4WAH=FALSE__;
          };
          result__TFZL=execute_link__LUOG(new_src__UFZL);
          modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
        };
      };
    };
  };
  return(result__TFZL);
}

static void execute_normal__BMAM(__CALL_SLOT *Self__CMAM)
// ({CALL_SLOT}) VoidRecursive, No inlinable.
{
  void *wrt__DMAM,*__tmp__SMAM;
  __INTEGER __tmp__JMAM,Self__14BM;
  void *__tmp__RMAM;
  __WRITE_LOCAL *Self__04GM;
  void *__tmp__O5GM,*__tmp__MAHM,*__tmp__JBHM,*__tmp__RBHM,*__tmp__SBHM;
  void *__tmp__P5GM,*read__34GM;
  void *__tmp__V5GM;
  void *__tmp__NAHM;
  __READ_LOCAL *Self__CNFQ,*Self__GMKQ;
  __READ_GLOBAL *Self__FNFQ;
  __LIST *Self__UNZQ;
  void *__tmp__FNAM,*__tmp__ONAM,*__tmp__DOAM,*__tmp__POAM;
  __BOOLEAN result__44GM,__tmp__Z5GM,__tmp__AAHM,__tmp__UAHM;
  __BOOLEAN __tmp__PNAM,__tmp__EOAM,__tmp__QOAM;
  void *__tmp__GNAM;
  wrt__DMAM=NULL;
  __tmp__JMAM=((__FAST_ARRAYoWRITEo *)Self__CMAM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.upper__NPDI;
  Self__14BM= 0;
  while ((Self__14BM <= __tmp__JMAM)) {
    __tmp__RMAM=((void **)((__FAST_ARRAYoWRITEo *)Self__CMAM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__14BM];
    if (__tmp__RMAM==NULL) {
      __tmp__SMAM=NULL;
    } else {
      switch (((struct ___OBJ *)__tmp__RMAM)->__id) {
      case __WRITE_GLOBAL__: {
        __tmp__SMAM=NULL;
      } break;
      case __WRITE_SLOT__: {
        __tmp__SMAM=NULL;
      } break;
      case __WRITE_LOCAL__: {
        __tmp__SMAM=((void *)__tmp__RMAM);
      } break;
      }
    };
    wrt__DMAM=__tmp__SMAM;
    if (((void *)__tmp__SMAM != (void *)NULL)) {
      Self__04GM=((__WRITE_LOCAL *)__tmp__SMAM);
      result__44GM=FALSE__;
      __tmp__O5GM=Self__04GM->parent_write__X50I.value__HBEH;
      if (__tmp__O5GM==NULL) {
        __tmp__P5GM=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__O5GM)->__id) {
        case __LIST__: {
          __tmp__P5GM=NULL;
        } break;
        case __STRING_CST__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXTERNAL_C__: {
          __tmp__P5GM=NULL;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__P5GM=NULL;
        } break;
        case __INTEGER_CST__: {
          __tmp__P5GM=NULL;
        } break;
        case __READ_LOCAL__: {
          __tmp__P5GM=((void *)__tmp__O5GM);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__P5GM=NULL;
        } break;
        case __REAL_CST__: {
          __tmp__P5GM=NULL;
        } break;
        case __CHARACTER_CST__: {
          __tmp__P5GM=NULL;
        } break;
        case __IS_EXPANDED__: {
          __tmp__P5GM=NULL;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_SUP__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_SUB__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_MUL__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_DIV__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_AND__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__P5GM=NULL;
        } break;
        case __PUT_TO__: {
          __tmp__P5GM=NULL;
        } break;
        case __ITEM__: {
          __tmp__P5GM=NULL;
        } break;
        case __SIZE_OF__: {
          __tmp__P5GM=NULL;
        } break;
        case __CAST__: {
          __tmp__P5GM=NULL;
        } break;
        case __CALL_SLOT__: {
          __tmp__P5GM=NULL;
        } break;
        case __READ_SLOT__: {
          __tmp__P5GM=((void *)__tmp__O5GM);
        } break;
        case __READ_GLOBAL__: {
          __tmp__P5GM=((void *)__tmp__O5GM);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_NEG__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_ADD__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_NOT__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_MOD__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_INF__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_OR__: {
          __tmp__P5GM=NULL;
        } break;
        case __EXPR_XOR__: {
          __tmp__P5GM=NULL;
        } break;
        }
      };
      read__34GM=__tmp__P5GM;
      if (((void *)__tmp__P5GM != (void *)NULL)) {
        switch (((struct ___OBJ *)__tmp__P5GM)->__id) {
        case __READ_LOCAL__: {
          __tmp__V5GM=((__READ_LOCAL *)__tmp__P5GM)->local__ALZD;
        } break;
        case __READ_SLOT__: {
          __tmp__V5GM=((__READ_SLOT *)__tmp__P5GM)->slot__EVGK;
        } break;
        case __READ_GLOBAL__: {
          __tmp__V5GM=((__READ_GLOBAL *)__tmp__P5GM)->global__RHJK;
        } break;
        };
        __tmp__Z5GM=((void *)__tmp__V5GM == (void *)Self__04GM->local__2RIJ);
      } else {
        __tmp__Z5GM=FALSE__;
      };
      if (__tmp__Z5GM) {
        remove__25IK(Self__04GM);
        result__44GM=TRUE__;
        __tmp__AAHM=TRUE__;
      } else {
        __tmp__AAHM=FALSE__;
      };
      if ((! __tmp__AAHM)) {
        if ((((__LOCAL *)Self__04GM->local__2RIJ)->parent_variable__B2LC.ensure_count__QEAG ==  0)) {
          __tmp__MAHM=Self__04GM->parent_write__X50I.value__HBEH;
          switch (((struct ___OBJ *)__tmp__MAHM)->__id) {
          case __LIST__: {
            __tmp__NAHM=execute_unlink__0SRJ(__tmp__MAHM);
          } break;
          case __STRING_CST__: {
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__NAHM=execute_unlink__42LK(__tmp__MAHM);
          } break;
          case __PROTOTYPE_CST__: {
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __INTEGER_CST__: {
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __READ_LOCAL__: {
            Self__CNFQ=((__READ_LOCAL *)__tmp__MAHM);
            unread__YVJK(Self__CNFQ->local__ALZD,Self__CNFQ);
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__NAHM=execute_unlink__PBMK(__tmp__MAHM);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__NAHM=execute_unlink__WGMK(__tmp__MAHM);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__NAHM=execute_unlink__HHMK(__tmp__MAHM);
          } break;
          case __REAL_CST__: {
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __CHARACTER_CST__: {
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __IS_EXPANDED__: {
            Self__GMKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MAHM)->receiver__OO2H);
            unread__YVJK(Self__GMKQ->local__ALZD,Self__GMKQ);
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=NULL;
          } break;
          case __GET_TYPE_ID__: {
            remove__SWAK(((__GET_TYPE_ID *)__tmp__MAHM));
            __tmp__NAHM=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__NAHM=execute_unlink__IIMK(__tmp__MAHM);
          } break;
          case __EXPR_SUB__: {
            __tmp__NAHM=execute_unlink__ZIMK(__tmp__MAHM);
          } break;
          case __EXPR_MUL__: {
            __tmp__NAHM=execute_unlink__KJMK(__tmp__MAHM);
          } break;
          case __EXPR_DIV__: {
            __tmp__NAHM=execute_unlink__1JMK(__tmp__MAHM);
          } break;
          case __EXPR_AND__: {
            __tmp__NAHM=execute_unlink__MKMK(__tmp__MAHM);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__NAHM=execute_unlink__3KMK(__tmp__MAHM);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__NAHM=execute_unlink__OLMK(__tmp__MAHM);
          } break;
          case __PUT_TO__: {
            __tmp__NAHM=execute_link__BOPK(((__PUT_TO *)__tmp__MAHM));
          } break;
          case __ITEM__: {
            __tmp__NAHM=execute_unlink__CMMK(__tmp__MAHM);
          } break;
          case __SIZE_OF__: {
            __tmp__NAHM=execute_unlink__SMMK(__tmp__MAHM);
          } break;
          case __CAST__: {
            __tmp__NAHM=execute_unlink__XMMK(__tmp__MAHM);
          } break;
          case __CALL_SLOT__: {
            __tmp__NAHM=execute_unlink__2NQL(__tmp__MAHM);
          } break;
          case __READ_SLOT__: {
            __tmp__NAHM=execute_unlink__WDAL(__tmp__MAHM);
          } break;
          case __READ_GLOBAL__: {
            Self__FNFQ=((__READ_GLOBAL *)__tmp__MAHM);
            unread__15ML(Self__FNFQ->global__RHJK,Self__FNFQ);
            modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
            __tmp__NAHM=execute_access_unlink__VMDL(Self__FNFQ);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__NAHM=execute_unlink__CRZM(__tmp__MAHM);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__NAHM=execute_unlink__B2EO(__tmp__MAHM);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__NAHM=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__MAHM));
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__NAHM=execute_unlink__R2EO(__tmp__MAHM);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__NAHM=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__MAHM));
          } break;
          case __EXPR_NEG__: {
            __tmp__NAHM=execute_unlink__XYJM(__tmp__MAHM);
          } break;
          case __EXPR_ADD__: {
            __tmp__NAHM=execute_unlink__3NNL(__tmp__MAHM);
          } break;
          case __EXPR_NOT__: {
            __tmp__NAHM=execute_unlink__YLZM(__tmp__MAHM);
          } break;
          case __EXPR_MOD__: {
            __tmp__NAHM=execute_unlink__B3EO(__tmp__MAHM);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__NAHM=execute_unlink__AJEP(__tmp__MAHM);
          } break;
          case __EXPR_INF__: {
            __tmp__NAHM=execute_unlink__CPQN(__tmp__MAHM);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__NAHM=execute_unlink__SPQN(__tmp__MAHM);
          } break;
          case __EXPR_OR__: {
            __tmp__NAHM=execute_unlink__JDQN(__tmp__MAHM);
          } break;
          case __EXPR_XOR__: {
            __tmp__NAHM=execute_unlink__YNUO(__tmp__MAHM);
          } break;
          };
          if (((void *)__tmp__NAHM == (void *)NULL)) {
            result__44GM=TRUE__;
            __tmp__UAHM=TRUE__;
          } else {
            __tmp__UAHM=FALSE__;
          };
          if ((! __tmp__UAHM)) {
            if ((old_seq_or_and__CYRG == seq_or_and__AYRG)) {
              Self__UNZQ=((__LIST *)list_current__IF1);
              add__to__1H5G(Self__UNZQ->expr_list__JUOG,__tmp__NAHM,(__INTEGER)(Self__UNZQ->index__PXRG -  1));
              Self__UNZQ->index__PXRG=(__INTEGER)(Self__UNZQ->index__PXRG +  1);
              result__44GM=TRUE__;
            } else {
              if (__tmp__NAHM==NULL) {
                __tmp__JBHM=NULL;
              } else {
                switch (((struct ___OBJ *)__tmp__NAHM)->__id) {
                case __LIST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __STRING_CST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXTERNAL_C__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __PROTOTYPE_CST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __INTEGER_CST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __READ_LOCAL__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_MULTIPLE__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_EQUAL__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_NOT_EQUAL__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __REAL_CST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __CHARACTER_CST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __IS_EXPANDED__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __GET_TYPE_ID__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_SUP__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_SUB__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_MUL__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_DIV__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_AND__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_SHIFT_R__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_SHIFT_L__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __PUT_TO__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __ITEM__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __SIZE_OF__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __CAST__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __CALL_SLOT__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __READ_SLOT__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __READ_GLOBAL__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_NOT_LOGIC__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __LOOP__: {
                  __tmp__JBHM=NULL;
                } break;
                case __EXPR_OR_LOGIC__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_OR_OR_LOGIC__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_AND_LOGIC__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_AND_AND_LOGIC__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_NEG__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_ADD__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_NOT__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_MOD__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_SUP_EQ__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_INF__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_INF_EQ__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_OR__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                case __EXPR_XOR__: {
                  __tmp__JBHM=((void *)__tmp__NAHM);
                } break;
                }
              };
              Self__04GM->parent_write__X50I.value__HBEH=__tmp__JBHM;
            };
          };
        } else {
          __tmp__RBHM=Self__04GM->parent_write__X50I.value__HBEH;
          switch (((struct ___OBJ *)__tmp__RBHM)->__id) {
          case __LIST__: {
            __tmp__SBHM=execute_link__LUOG(__tmp__RBHM);
          } break;
          case __STRING_CST__: {
            __tmp__SBHM=((__STRING_CST *)__tmp__RBHM);
          } break;
          case __EXTERNAL_C__: {
            __tmp__SBHM=execute_link__U5ZK(__tmp__RBHM);
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__SBHM=((__PROTOTYPE_CST *)__tmp__RBHM);
          } break;
          case __INTEGER_CST__: {
            __tmp__SBHM=((__INTEGER_CST *)__tmp__RBHM);
          } break;
          case __READ_LOCAL__: {
            __tmp__SBHM=execute_link__EHAL(__tmp__RBHM);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__SBHM=execute_link__YLAL();
          } break;
          case __EXPR_EQUAL__: {
            __tmp__SBHM=execute_link__2LAL(__tmp__RBHM);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__SBHM=execute_link__FQAL(__tmp__RBHM);
          } break;
          case __REAL_CST__: {
            __tmp__SBHM=((__REAL_CST *)__tmp__RBHM);
          } break;
          case __CHARACTER_CST__: {
            __tmp__SBHM=((__CHARACTER_CST *)__tmp__RBHM);
          } break;
          case __IS_EXPANDED__: {
            __tmp__SBHM=execute_link__UUAL(__tmp__RBHM);
          } break;
          case __GET_TYPE_ID__: {
            __tmp__SBHM=execute_link__1VAL(__tmp__RBHM);
          } break;
          case __EXPR_SUP__: {
            __tmp__SBHM=execute_link__AWAL(__tmp__RBHM);
          } break;
          case __EXPR_SUB__: {
            __tmp__SBHM=execute_link__J0AL(__tmp__RBHM);
          } break;
          case __EXPR_MUL__: {
            __tmp__SBHM=execute_link__S4AL(__tmp__RBHM);
          } break;
          case __EXPR_DIV__: {
            __tmp__SBHM=execute_link__1CBL(__tmp__RBHM);
          } break;
          case __EXPR_AND__: {
            __tmp__SBHM=execute_link__EHBL(__tmp__RBHM);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__SBHM=execute_link__NLBL(__tmp__RBHM);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__SBHM=execute_link__WPBL(__tmp__RBHM);
          } break;
          case __PUT_TO__: {
            __tmp__SBHM=execute_link__BOPK(__tmp__RBHM);
          } break;
          case __ITEM__: {
            __tmp__SBHM=execute_link__5TBL(__tmp__RBHM);
          } break;
          case __SIZE_OF__: {
            __tmp__SBHM=execute_link__GUBL(__tmp__RBHM);
          } break;
          case __CAST__: {
            __tmp__SBHM=execute_link__LUBL(__tmp__RBHM);
          } break;
          case __CALL_SLOT__: {
            __tmp__SBHM=execute_link__A2TL(__tmp__RBHM);
          } break;
          case __READ_SLOT__: {
            __tmp__SBHM=execute_link__EYBL(__tmp__RBHM);
          } break;
          case __READ_GLOBAL__: {
            __tmp__SBHM=execute_link__U2BL(__tmp__RBHM);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__SBHM=execute_link__SRZM(__tmp__RBHM);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__SBHM=execute_link__OBFO(__tmp__RBHM);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__SBHM=execute_link__GJLO(__tmp__RBHM);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__SBHM=execute_link__HHFO(__tmp__RBHM);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__SBHM=execute_link__KPLO(__tmp__RBHM);
          } break;
          case __EXPR_NEG__: {
            __tmp__SBHM=execute_link__0GKM(__tmp__RBHM);
          } break;
          case __EXPR_ADD__: {
            __tmp__SBHM=execute_link__RROL(__tmp__RBHM);
          } break;
          case __EXPR_NOT__: {
            __tmp__SBHM=execute_link__GUZM(__tmp__RBHM);
          } break;
          case __EXPR_MOD__: {
            __tmp__SBHM=execute_link__ANFO(__tmp__RBHM);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__SBHM=execute_link__YLEP(__tmp__RBHM);
          } break;
          case __EXPR_INF__: {
            __tmp__SBHM=execute_link__VQQN(__tmp__RBHM);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__SBHM=execute_link__4UQN(__tmp__RBHM);
          } break;
          case __EXPR_OR__: {
            __tmp__SBHM=execute_link__1HQN(__tmp__RBHM);
          } break;
          case __EXPR_XOR__: {
            __tmp__SBHM=execute_link__IYUO(__tmp__RBHM);
          } break;
          };
          Self__04GM->parent_write__X50I.value__HBEH=__tmp__SBHM;
        };
      };
      if (result__44GM) {
        modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
        ((void **)((__FAST_ARRAYoWRITEo *)Self__CMAM->argument_list__OTHJ)->parent_arrayed_collection__TAEH.storage__LQDI)[Self__14BM]=NULL;
        if ((((__LOCAL *)((__WRITE_LOCAL *)__tmp__SMAM)->local__2RIJ)->parent_variable__B2LC.ensure_count__QEAG ==  0)) {
          __tmp__FNAM=Self__CMAM->profil__QA2H;
          if (((struct ___OBJ *)__tmp__FNAM)->__id==__PROFIL_SLOT__) {
            __tmp__GNAM=((__PROFIL_SLOT *)__tmp__FNAM)->parent_profil__51LC.argument_list__N5JH;
          } else {
            __tmp__GNAM=((__PROFIL_BLOCK *)__tmp__FNAM)->parent_profil__GHAG.argument_list__N5JH;
          };
          ((void **)((__FAST_ARRAYoLOCALo *)__tmp__GNAM)->parent_arrayed_collection__QI4F.storage__FXPG)[Self__14BM]=NULL;
        };
      };
    };
    Self__14BM=(__INTEGER)(Self__14BM +  1);
  };
  __tmp__ONAM=Self__CMAM->profil__QA2H;
  if (((struct ___OBJ *)__tmp__ONAM)->__id==__PROFIL_SLOT__) {
    __tmp__PNAM=((__PROFIL_SLOT *)__tmp__ONAM)->is_context_sensitive__5POL;
  } else {
    __tmp__PNAM=((void *)((__PROFIL_BLOCK *)__tmp__ONAM)->context_extern__OMXH != (void *)NULL);
  };
  if (__tmp__PNAM) {
    seq_call_local_and_loop__51IL=(__UINTEGER_32)(seq_call_local_and_loop__51IL +  1);
  };
  seq_call_and_loop__VREJ=(__UINTEGER_32)(seq_call_and_loop__VREJ +  1);
  seq_inline__FXRG=(__UINTEGER_32)(seq_inline__FXRG +  1);
  __tmp__DOAM=Self__CMAM->profil__QA2H;
  if (((struct ___OBJ *)__tmp__DOAM)->__id==__PROFIL_SLOT__) {
    __tmp__EOAM=((__INTEGER_8)(((__PROFIL_SLOT *)__tmp__DOAM)->parent_profil__51LC.stat__BNEJ &  2) !=  0);
  } else {
    __tmp__EOAM=((__INTEGER_8)(((__PROFIL_BLOCK *)__tmp__DOAM)->parent_profil__GHAG.stat__BNEJ &  2) !=  0);
  };
  if ((! __tmp__EOAM)) {
    count_no_recursive__GBCL=(__INTEGER)(count_no_recursive__GBCL +  1);
  };
  __tmp__POAM=Self__CMAM->profil__QA2H;
  if (((struct ___OBJ *)__tmp__POAM)->__id==__PROFIL_SLOT__) {
    __tmp__QOAM=((__PROFIL_SLOT *)__tmp__POAM)->is_context_sensitive__5POL;
  } else {
    __tmp__QOAM=((void *)((__PROFIL_BLOCK *)__tmp__POAM)->context_extern__OMXH != (void *)NULL);
  };
  if (__tmp__QOAM) {
    count_context_sensitive__VSEJ=(__INTEGER)(count_context_sensitive__VSEJ +  1);
  };
}

static void set_life__2OAM(__PROFIL_SLOT *Self__3OAM)
// ({PROFIL_SLOT}) VoidNo recursive, No inlinable.
{
  void *old_list_current__RPEM;
  set_life__KBCM(Self__3OAM);
  if (mode_recursive__WYUC) {
    old_list_current__RPEM=NULL;
    if ((Self__3OAM->parent_profil__51LC.stat__BNEJ == (__INTEGER)(-  1))) {
      Self__3OAM->parent_profil__51LC.count_intern_call__WTSL=(__INTEGER)(Self__3OAM->parent_profil__51LC.count_intern_call__WTSL +  1);
      if ((Self__3OAM->parent_profil__51LC.count_intern_call__WTSL ==  1)) {
        old_list_current__RPEM=list_current__IF1;
        execute__2LHM(Self__3OAM, 3);
        list_current__IF1=old_list_current__RPEM;
        if ((Self__3OAM->parent_profil__51LC.count_intern_call__WTSL ==  1)) {
          Self__3OAM->parent_profil__51LC.stat__BNEJ= 0;
        } else {
          Self__3OAM->parent_profil__51LC.stat__BNEJ= 2;
        };
      };
    };
  };
}

static void set_life__GPAM(__PROFIL_BLOCK *Self__HPAM)
// ({PROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  void *old_list_current__5QEM;
  set_life__KBCM(Self__HPAM);
  if (mode_recursive__WYUC) {
    old_list_current__5QEM=NULL;
    if ((Self__HPAM->parent_profil__GHAG.stat__BNEJ == (__INTEGER)(-  1))) {
      Self__HPAM->parent_profil__GHAG.count_intern_call__WTSL=(__INTEGER)(Self__HPAM->parent_profil__GHAG.count_intern_call__WTSL +  1);
      if ((Self__HPAM->parent_profil__GHAG.count_intern_call__WTSL ==  1)) {
        old_list_current__5QEM=list_current__IF1;
        execute__OREJ(Self__HPAM, 3);
        list_current__IF1=old_list_current__5QEM;
        if ((Self__HPAM->parent_profil__GHAG.count_intern_call__WTSL ==  1)) {
          Self__HPAM->parent_profil__GHAG.stat__BNEJ= 0;
        } else {
          Self__HPAM->parent_profil__GHAG.stat__BNEJ= 2;
        };
      };
    };
  };
}

static void* execute_access_unlink__5LDL(__READ_SLOT *Self__AMDL)
// ({READ_SLOT}) With resultRecursive, No inlinable.
{
  void *__tmp__MMDL;
  void *__tmp__NMDL;
  __READ_LOCAL *Self__QOFQ,*Self__KMKQ;
  __READ_GLOBAL *Self__TOFQ;
  if (((void *)((__SLOT_DATA *)Self__AMDL->slot__EVGK)->value__M4OG != (void *)NULL)) {
    execute__UPHL(Self__AMDL->slot__EVGK);
  };
  __tmp__MMDL=Self__AMDL->receiver__I1TI;
  switch (((struct ___OBJ *)__tmp__MMDL)->__id) {
  case __LIST__: {
    __tmp__NMDL=execute_unlink__0SRJ(__tmp__MMDL);
  } break;
  case __STRING_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __EXTERNAL_C__: {
    __tmp__NMDL=execute_unlink__42LK(__tmp__MMDL);
  } break;
  case __PROTOTYPE_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __INTEGER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __READ_LOCAL__: {
    Self__QOFQ=((__READ_LOCAL *)__tmp__MMDL);
    unread__YVJK(Self__QOFQ->local__ALZD,Self__QOFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NMDL=execute_unlink__PBMK(__tmp__MMDL);
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NMDL=execute_unlink__WGMK(__tmp__MMDL);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NMDL=execute_unlink__HHMK(__tmp__MMDL);
  } break;
  case __REAL_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __CHARACTER_CST__: {
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __IS_EXPANDED__: {
    Self__KMKQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__MMDL)->receiver__OO2H);
    unread__YVJK(Self__KMKQ->local__ALZD,Self__KMKQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=NULL;
  } break;
  case __GET_TYPE_ID__: {
    remove__SWAK(((__GET_TYPE_ID *)__tmp__MMDL));
    __tmp__NMDL=NULL;
  } break;
  case __EXPR_SUP__: {
    __tmp__NMDL=execute_unlink__IIMK(__tmp__MMDL);
  } break;
  case __EXPR_SUB__: {
    __tmp__NMDL=execute_unlink__ZIMK(__tmp__MMDL);
  } break;
  case __EXPR_MUL__: {
    __tmp__NMDL=execute_unlink__KJMK(__tmp__MMDL);
  } break;
  case __EXPR_DIV__: {
    __tmp__NMDL=execute_unlink__1JMK(__tmp__MMDL);
  } break;
  case __EXPR_AND__: {
    __tmp__NMDL=execute_unlink__MKMK(__tmp__MMDL);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NMDL=execute_unlink__3KMK(__tmp__MMDL);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NMDL=execute_unlink__OLMK(__tmp__MMDL);
  } break;
  case __PUT_TO__: {
    __tmp__NMDL=execute_link__BOPK(((__PUT_TO *)__tmp__MMDL));
  } break;
  case __ITEM__: {
    __tmp__NMDL=execute_unlink__CMMK(__tmp__MMDL);
  } break;
  case __SIZE_OF__: {
    __tmp__NMDL=execute_unlink__SMMK(__tmp__MMDL);
  } break;
  case __CAST__: {
    __tmp__NMDL=execute_unlink__XMMK(__tmp__MMDL);
  } break;
  case __CALL_SLOT__: {
    __tmp__NMDL=execute_unlink__2NQL(__tmp__MMDL);
  } break;
  case __READ_SLOT__: {
    __tmp__NMDL=execute_unlink__WDAL(__tmp__MMDL);
  } break;
  case __READ_GLOBAL__: {
    Self__TOFQ=((__READ_GLOBAL *)__tmp__MMDL);
    unread__15ML(Self__TOFQ->global__RHJK,Self__TOFQ);
    modify_count__F4LC=(__INTEGER)(modify_count__F4LC +  1);
    __tmp__NMDL=execute_access_unlink__VMDL(Self__TOFQ);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NMDL=execute_unlink__CRZM(__tmp__MMDL);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NMDL=execute_unlink__B2EO(__tmp__MMDL);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NMDL=execute_link__GJLO(((__EXPR_OR_OR_LOGIC *)__tmp__MMDL));
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NMDL=execute_unlink__R2EO(__tmp__MMDL);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NMDL=execute_link__KPLO(((__EXPR_AND_AND_LOGIC *)__tmp__MMDL));
  } break;
  case __EXPR_NEG__: {
    __tmp__NMDL=execute_unlink__XYJM(__tmp__MMDL);
  } break;
  case __EXPR_ADD__: {
    __tmp__NMDL=execute_unlink__3NNL(__tmp__MMDL);
  } break;
  case __EXPR_NOT__: {
    __tmp__NMDL=execute_unlink__YLZM(__tmp__MMDL);
  } break;
  case __EXPR_MOD__: {
    __tmp__NMDL=execute_unlink__B3EO(__tmp__MMDL);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NMDL=execute_unlink__AJEP(__tmp__MMDL);
  } break;
  case __EXPR_INF__: {
    __tmp__NMDL=execute_unlink__CPQN(__tmp__MMDL);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NMDL=execute_unlink__SPQN(__tmp__MMDL);
  } break;
  case __EXPR_OR__: {
    __tmp__NMDL=execute_unlink__JDQN(__tmp__MMDL);
  } break;
  case __EXPR_XOR__: {
    __tmp__NMDL=execute_unlink__YNUO(__tmp__MMDL);
  } break;
  };
  return(__tmp__NMDL);
}

static __BOOLEAN __infix_equal_equal__WF1L(__STRING_CST *Self__XF1L,void *other__YF1L)
// ({STRING_CST},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *__tmp__2F1L,*p__0F1L;
  if (other__YF1L==NULL) {
    __tmp__2F1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__YF1L)->__id) {
    case __LIST__: {
      __tmp__2F1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__2F1L=((void *)other__YF1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__2F1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2F1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__2F1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2F1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__2F1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2F1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2F1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2F1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__2F1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__2F1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__2F1L=NULL;
    } break;
    case __CAST__: {
      __tmp__2F1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__2F1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__2F1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__2F1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__2F1L=NULL;
    } break;
    }
  };
  p__0F1L=__tmp__2F1L;
  return((((void *)__tmp__2F1L != (void *)NULL) && ((void *)Self__XF1L->string__ZK2H == (void *)((__STRING_CST *)__tmp__2F1L)->string__ZK2H)));
}

static __BOOLEAN __infix_equal_equal__LG1L(__PROTOTYPE_CST *Self__MG1L,void *other__NG1L)
// ({PROTOTYPE_CST},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *__tmp__RG1L,*p__PG1L;
  if (other__NG1L==NULL) {
    __tmp__RG1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__NG1L)->__id) {
    case __LIST__: {
      __tmp__RG1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__RG1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RG1L=((void *)other__NG1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__RG1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RG1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__RG1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__RG1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__RG1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RG1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__RG1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__RG1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__RG1L=NULL;
    } break;
    case __CAST__: {
      __tmp__RG1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__RG1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__RG1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__RG1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__RG1L=NULL;
    } break;
    }
  };
  p__PG1L=__tmp__RG1L;
  return((((void *)__tmp__RG1L != (void *)NULL) && ((void *)Self__MG1L->parent_constant__E3LC.static_type__F4YD == (void *)((__PROTOTYPE_CST *)__tmp__RG1L)->parent_constant__E3LC.static_type__F4YD)));
}

static __BOOLEAN __infix_equal_equal__2G1L(__INTEGER_CST *Self__3G1L,void *other__4G1L)
// ({INTEGER_CST},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *__tmp__CH1L,*p__AH1L;
  if (other__4G1L==NULL) {
    __tmp__CH1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__4G1L)->__id) {
    case __LIST__: {
      __tmp__CH1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__CH1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__CH1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__CH1L=((void *)other__4G1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__CH1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__CH1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__CH1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__CH1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__CH1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__CH1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__CH1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__CH1L=NULL;
    } break;
    case __CAST__: {
      __tmp__CH1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__CH1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__CH1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__CH1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__CH1L=NULL;
    } break;
    }
  };
  p__AH1L=__tmp__CH1L;
  return(((((void *)__tmp__CH1L != (void *)NULL) && (Self__3G1L->value__PAZD == ((__INTEGER_CST *)__tmp__CH1L)->value__PAZD)) && ((void *)Self__3G1L->parent_constant__P3LC.static_type__F4YD == (void *)((__INTEGER_CST *)__tmp__CH1L)->parent_constant__P3LC.static_type__F4YD)));
}

static __BOOLEAN __infix_equal_equal__WH1L(__READ_LOCAL *Self__XH1L,void *other__YH1L)
// ({READ_LOCAL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *__tmp__2H1L,*rd__0H1L;
  if (other__YH1L==NULL) {
    __tmp__2H1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__YH1L)->__id) {
    case __LIST__: {
      __tmp__2H1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__2H1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2H1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__2H1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__2H1L=((void *)other__YH1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2H1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__2H1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2H1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2H1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2H1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__2H1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__2H1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__2H1L=NULL;
    } break;
    case __CAST__: {
      __tmp__2H1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__2H1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__2H1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__2H1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__2H1L=NULL;
    } break;
    }
  };
  rd__0H1L=__tmp__2H1L;
  return((((void *)__tmp__2H1L != (void *)NULL) && ((void *)Self__XH1L->local__ALZD == (void *)((__READ_LOCAL *)__tmp__2H1L)->local__ALZD)));
}

static __BOOLEAN __infix_equal_equal__MI1L(__EXPR_EQUAL *Self__NI1L,void *other__OI1L)
// ({EXPR_EQUAL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_EQUAL *__tmp__SI1L,*same__QI1L;
  void *__tmp__YI1L,*__tmp__ZI1L,*__tmp__BJ1L,*__tmp__CJ1L;
  __BOOLEAN __tmp__0I1L,__tmp__GJ1L,__tmp__DJ1L,__tmp__HJ1L;
  if (other__OI1L==NULL) {
    __tmp__SI1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__OI1L)->__id) {
    case __LIST__: {
      __tmp__SI1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__SI1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__SI1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__SI1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__SI1L=((__EXPR_EQUAL *)other__OI1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__SI1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__SI1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__SI1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__SI1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__SI1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__SI1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__SI1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__SI1L=NULL;
    } break;
    case __CAST__: {
      __tmp__SI1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__SI1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__SI1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__SI1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__SI1L=NULL;
    } break;
    }
  };
  same__QI1L=__tmp__SI1L;
  if (((void *)__tmp__SI1L != (void *)NULL)) {
    __tmp__YI1L=Self__NI1L->parent_expr_binary_cmp__1LJH.left__HN2H;
    __tmp__ZI1L=__tmp__SI1L->parent_expr_binary_cmp__1LJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__YI1L)->__id) {
    case __LIST__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__0I1L=__infix_equal_equal__WF1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0I1L=__infix_equal_equal__LG1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__0I1L=__infix_equal_equal__2G1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__0I1L=__infix_equal_equal__WH1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0I1L=__infix_equal_equal__MI1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0I1L=__infix_equal_equal__IJ1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __REAL_CST__: {
      __tmp__0I1L=__infix_equal_equal__EK1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__0I1L=__infix_equal_equal__4K1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__0I1L=__infix_equal_equal__XL1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__0I1L=__infix_equal_equal__TM1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__0I1L=__infix_equal_equal__PN1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__0I1L=__infix_equal_equal__LO1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_AND__: {
      __tmp__0I1L=__infix_equal_equal__HP1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0I1L=__infix_equal_equal__DQ1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0I1L=__infix_equal_equal__5Q1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __PUT_TO__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__0I1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__0I1L=__infix_equal_equal__LS1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__0I1L=__infix_equal_equal__HT1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0I1L=__infix_equal_equal__CZHO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0I1L=__infix_equal_equal__SXFO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0I1L=__infix_equal_equal__TBMO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0I1L=__infix_equal_equal__OYFO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0I1L=__infix_equal_equal__QCMO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__0I1L=__infix_equal_equal__J5KM(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__0I1L=__infix_equal_equal__ZT1L(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__0I1L=__infix_equal_equal__QB0M(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__0I1L=__infix_equal_equal__KZFO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0I1L=__infix_equal_equal__OTEP(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_INF__: {
      __tmp__0I1L=__infix_equal_equal__UZHO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0I1L=__infix_equal_equal__Q0HO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_OR__: {
      __tmp__0I1L=__infix_equal_equal__32QN(__tmp__YI1L,__tmp__ZI1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__0I1L=__infix_equal_equal__GOVO(__tmp__YI1L,__tmp__ZI1L);
    } break;
    };
    __tmp__GJ1L=__tmp__0I1L;
  } else {
    __tmp__GJ1L=FALSE__;
  };
  if (__tmp__GJ1L) {
    __tmp__BJ1L=Self__NI1L->parent_expr_binary_cmp__1LJH.right__LN2H;
    __tmp__CJ1L=__tmp__SI1L->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__BJ1L)->__id) {
    case __LIST__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__DJ1L=__infix_equal_equal__WF1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__DJ1L=__infix_equal_equal__LG1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__DJ1L=__infix_equal_equal__2G1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__DJ1L=__infix_equal_equal__WH1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__DJ1L=__infix_equal_equal__MI1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__DJ1L=__infix_equal_equal__IJ1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __REAL_CST__: {
      __tmp__DJ1L=__infix_equal_equal__EK1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__DJ1L=__infix_equal_equal__4K1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__DJ1L=__infix_equal_equal__XL1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__DJ1L=__infix_equal_equal__TM1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__DJ1L=__infix_equal_equal__PN1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__DJ1L=__infix_equal_equal__LO1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_AND__: {
      __tmp__DJ1L=__infix_equal_equal__HP1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__DJ1L=__infix_equal_equal__DQ1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__DJ1L=__infix_equal_equal__5Q1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __PUT_TO__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__DJ1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__DJ1L=__infix_equal_equal__LS1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__DJ1L=__infix_equal_equal__HT1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__DJ1L=__infix_equal_equal__CZHO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__DJ1L=__infix_equal_equal__SXFO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__DJ1L=__infix_equal_equal__TBMO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__DJ1L=__infix_equal_equal__OYFO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__DJ1L=__infix_equal_equal__QCMO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__DJ1L=__infix_equal_equal__J5KM(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__DJ1L=__infix_equal_equal__ZT1L(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__DJ1L=__infix_equal_equal__QB0M(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__DJ1L=__infix_equal_equal__KZFO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__DJ1L=__infix_equal_equal__OTEP(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_INF__: {
      __tmp__DJ1L=__infix_equal_equal__UZHO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__DJ1L=__infix_equal_equal__Q0HO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_OR__: {
      __tmp__DJ1L=__infix_equal_equal__32QN(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__DJ1L=__infix_equal_equal__GOVO(__tmp__BJ1L,__tmp__CJ1L);
    } break;
    };
    __tmp__HJ1L=__tmp__DJ1L;
  } else {
    __tmp__HJ1L=FALSE__;
  };
  return(__tmp__HJ1L);
}

static __BOOLEAN __infix_equal_equal__IJ1L(__EXPR_NOT_EQUAL *Self__JJ1L,void *other__KJ1L)
// ({EXPR_NOT_EQUAL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_NOT_EQUAL *__tmp__OJ1L,*same__MJ1L;
  void *__tmp__UJ1L,*__tmp__VJ1L,*__tmp__3J1L,*__tmp__4J1L;
  __BOOLEAN __tmp__WJ1L,__tmp__CK1L,__tmp__5J1L,__tmp__DK1L;
  if (other__KJ1L==NULL) {
    __tmp__OJ1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__KJ1L)->__id) {
    case __LIST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OJ1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OJ1L=((__EXPR_NOT_EQUAL *)other__KJ1L);
    } break;
    case __REAL_CST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OJ1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OJ1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__OJ1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__OJ1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__OJ1L=NULL;
    } break;
    case __CAST__: {
      __tmp__OJ1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__OJ1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__OJ1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__OJ1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__OJ1L=NULL;
    } break;
    }
  };
  same__MJ1L=__tmp__OJ1L;
  if (((void *)__tmp__OJ1L != (void *)NULL)) {
    __tmp__UJ1L=Self__JJ1L->parent_expr_binary_cmp__DMJH.left__HN2H;
    __tmp__VJ1L=__tmp__OJ1L->parent_expr_binary_cmp__DMJH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__UJ1L)->__id) {
    case __LIST__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__WJ1L=__infix_equal_equal__WF1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WJ1L=__infix_equal_equal__LG1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__WJ1L=__infix_equal_equal__2G1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__WJ1L=__infix_equal_equal__WH1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WJ1L=__infix_equal_equal__MI1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WJ1L=__infix_equal_equal__IJ1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __REAL_CST__: {
      __tmp__WJ1L=__infix_equal_equal__EK1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__WJ1L=__infix_equal_equal__4K1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__WJ1L=__infix_equal_equal__XL1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__WJ1L=__infix_equal_equal__TM1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__WJ1L=__infix_equal_equal__PN1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__WJ1L=__infix_equal_equal__LO1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_AND__: {
      __tmp__WJ1L=__infix_equal_equal__HP1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WJ1L=__infix_equal_equal__DQ1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WJ1L=__infix_equal_equal__5Q1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __PUT_TO__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__WJ1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__WJ1L=__infix_equal_equal__LS1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__WJ1L=__infix_equal_equal__HT1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WJ1L=__infix_equal_equal__CZHO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WJ1L=__infix_equal_equal__SXFO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WJ1L=__infix_equal_equal__TBMO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WJ1L=__infix_equal_equal__OYFO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WJ1L=__infix_equal_equal__QCMO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__WJ1L=__infix_equal_equal__J5KM(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__WJ1L=__infix_equal_equal__ZT1L(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__WJ1L=__infix_equal_equal__QB0M(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__WJ1L=__infix_equal_equal__KZFO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WJ1L=__infix_equal_equal__OTEP(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_INF__: {
      __tmp__WJ1L=__infix_equal_equal__UZHO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WJ1L=__infix_equal_equal__Q0HO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_OR__: {
      __tmp__WJ1L=__infix_equal_equal__32QN(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__WJ1L=__infix_equal_equal__GOVO(__tmp__UJ1L,__tmp__VJ1L);
    } break;
    };
    __tmp__CK1L=__tmp__WJ1L;
  } else {
    __tmp__CK1L=FALSE__;
  };
  if (__tmp__CK1L) {
    __tmp__3J1L=Self__JJ1L->parent_expr_binary_cmp__DMJH.right__LN2H;
    __tmp__4J1L=__tmp__OJ1L->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__3J1L)->__id) {
    case __LIST__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__5J1L=__infix_equal_equal__WF1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__5J1L=__infix_equal_equal__LG1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__5J1L=__infix_equal_equal__2G1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__5J1L=__infix_equal_equal__WH1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__5J1L=__infix_equal_equal__MI1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__5J1L=__infix_equal_equal__IJ1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __REAL_CST__: {
      __tmp__5J1L=__infix_equal_equal__EK1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__5J1L=__infix_equal_equal__4K1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__5J1L=__infix_equal_equal__XL1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__5J1L=__infix_equal_equal__TM1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__5J1L=__infix_equal_equal__PN1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__5J1L=__infix_equal_equal__LO1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_AND__: {
      __tmp__5J1L=__infix_equal_equal__HP1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__5J1L=__infix_equal_equal__DQ1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__5J1L=__infix_equal_equal__5Q1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __PUT_TO__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__5J1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__5J1L=__infix_equal_equal__LS1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__5J1L=__infix_equal_equal__HT1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__5J1L=__infix_equal_equal__CZHO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__5J1L=__infix_equal_equal__SXFO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__5J1L=__infix_equal_equal__TBMO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__5J1L=__infix_equal_equal__OYFO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__5J1L=__infix_equal_equal__QCMO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__5J1L=__infix_equal_equal__J5KM(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__5J1L=__infix_equal_equal__ZT1L(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__5J1L=__infix_equal_equal__QB0M(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__5J1L=__infix_equal_equal__KZFO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__5J1L=__infix_equal_equal__OTEP(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_INF__: {
      __tmp__5J1L=__infix_equal_equal__UZHO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__5J1L=__infix_equal_equal__Q0HO(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_OR__: {
      __tmp__5J1L=__infix_equal_equal__32QN(__tmp__3J1L,__tmp__4J1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__5J1L=__infix_equal_equal__GOVO(__tmp__3J1L,__tmp__4J1L);
    } break;
    };
    __tmp__DK1L=__tmp__5J1L;
  } else {
    __tmp__DK1L=FALSE__;
  };
  return(__tmp__DK1L);
}

static __BOOLEAN __infix_equal_equal__EK1L(__REAL_CST *Self__FK1L,void *other__GK1L)
// ({REAL_CST},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *__tmp__KK1L,*p__IK1L;
  if (other__GK1L==NULL) {
    __tmp__KK1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__GK1L)->__id) {
    case __LIST__: {
      __tmp__KK1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__KK1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__KK1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__KK1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__KK1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__KK1L=((void *)other__GK1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__KK1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__KK1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__KK1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__KK1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__KK1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__KK1L=NULL;
    } break;
    case __CAST__: {
      __tmp__KK1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__KK1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__KK1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__KK1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__KK1L=NULL;
    } break;
    }
  };
  p__IK1L=__tmp__KK1L;
  return(((((void *)__tmp__KK1L != (void *)NULL) && ((void *)Self__FK1L->value__5N2H == (void *)((__REAL_CST *)__tmp__KK1L)->value__5N2H)) && ((void *)Self__FK1L->parent_constant__M3JH.static_type__F4YD == (void *)((__REAL_CST *)__tmp__KK1L)->parent_constant__M3JH.static_type__F4YD)));
}

static __BOOLEAN __infix_equal_equal__4K1L(__CHARACTER_CST *Self__5K1L,void *other__AL1L)
// ({CHARACTER_CST},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  __CHARACTER_CST *__tmp__EL1L,*s__CL1L;
  if (other__AL1L==NULL) {
    __tmp__EL1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__AL1L)->__id) {
    case __LIST__: {
      __tmp__EL1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__EL1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__EL1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__EL1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__EL1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__EL1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__EL1L=((__CHARACTER_CST *)other__AL1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__EL1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__EL1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__EL1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__EL1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__EL1L=NULL;
    } break;
    case __CAST__: {
      __tmp__EL1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__EL1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__EL1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__EL1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__EL1L=NULL;
    } break;
    }
  };
  s__CL1L=__tmp__EL1L;
  return((((void *)__tmp__EL1L != (void *)NULL) && ((void *)Self__5K1L->text__HO2H == (void *)__tmp__EL1L->text__HO2H)));
}

static __BOOLEAN __infix_equal_equal__XL1L(__EXPR_SUP *Self__YL1L,void *other__ZL1L)
// ({EXPR_SUP},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_SUP *__tmp__3L1L,*same__1L1L;
  void *__tmp__DM1L,*__tmp__EM1L,*__tmp__MM1L,*__tmp__NM1L;
  __BOOLEAN __tmp__FM1L,__tmp__RM1L,__tmp__OM1L,__tmp__SM1L;
  if (other__ZL1L==NULL) {
    __tmp__3L1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__ZL1L)->__id) {
    case __LIST__: {
      __tmp__3L1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__3L1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__3L1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__3L1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3L1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__3L1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__3L1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__3L1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__3L1L=((__EXPR_SUP *)other__ZL1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3L1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__3L1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__3L1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__3L1L=NULL;
    } break;
    case __CAST__: {
      __tmp__3L1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__3L1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__3L1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__3L1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__3L1L=NULL;
    } break;
    }
  };
  same__1L1L=__tmp__3L1L;
  if (((void *)__tmp__3L1L != (void *)NULL)) {
    __tmp__DM1L=Self__YL1L->parent_expr_binary_cmp__TAKH.left__HN2H;
    __tmp__EM1L=__tmp__3L1L->parent_expr_binary_cmp__TAKH.left__HN2H;
    switch (((struct ___OBJ *)__tmp__DM1L)->__id) {
    case __LIST__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__FM1L=__infix_equal_equal__WF1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FM1L=__infix_equal_equal__LG1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__FM1L=__infix_equal_equal__2G1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__FM1L=__infix_equal_equal__WH1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FM1L=__infix_equal_equal__MI1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FM1L=__infix_equal_equal__IJ1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __REAL_CST__: {
      __tmp__FM1L=__infix_equal_equal__EK1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__FM1L=__infix_equal_equal__4K1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__FM1L=__infix_equal_equal__XL1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__FM1L=__infix_equal_equal__TM1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__FM1L=__infix_equal_equal__PN1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__FM1L=__infix_equal_equal__LO1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_AND__: {
      __tmp__FM1L=__infix_equal_equal__HP1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FM1L=__infix_equal_equal__DQ1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FM1L=__infix_equal_equal__5Q1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __PUT_TO__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__FM1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__FM1L=__infix_equal_equal__LS1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__FM1L=__infix_equal_equal__HT1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FM1L=__infix_equal_equal__CZHO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FM1L=__infix_equal_equal__SXFO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FM1L=__infix_equal_equal__TBMO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FM1L=__infix_equal_equal__OYFO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FM1L=__infix_equal_equal__QCMO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__FM1L=__infix_equal_equal__J5KM(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__FM1L=__infix_equal_equal__ZT1L(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__FM1L=__infix_equal_equal__QB0M(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__FM1L=__infix_equal_equal__KZFO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FM1L=__infix_equal_equal__OTEP(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_INF__: {
      __tmp__FM1L=__infix_equal_equal__UZHO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FM1L=__infix_equal_equal__Q0HO(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_OR__: {
      __tmp__FM1L=__infix_equal_equal__32QN(__tmp__DM1L,__tmp__EM1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__FM1L=__infix_equal_equal__GOVO(__tmp__DM1L,__tmp__EM1L);
    } break;
    };
    __tmp__RM1L=__tmp__FM1L;
  } else {
    __tmp__RM1L=FALSE__;
  };
  if (__tmp__RM1L) {
    __tmp__MM1L=Self__YL1L->parent_expr_binary_cmp__TAKH.right__LN2H;
    __tmp__NM1L=__tmp__3L1L->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__MM1L)->__id) {
    case __LIST__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__OM1L=__infix_equal_equal__WF1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OM1L=__infix_equal_equal__LG1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__OM1L=__infix_equal_equal__2G1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__OM1L=__infix_equal_equal__WH1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OM1L=__infix_equal_equal__MI1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OM1L=__infix_equal_equal__IJ1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __REAL_CST__: {
      __tmp__OM1L=__infix_equal_equal__EK1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__OM1L=__infix_equal_equal__4K1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__OM1L=__infix_equal_equal__XL1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__OM1L=__infix_equal_equal__TM1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__OM1L=__infix_equal_equal__PN1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__OM1L=__infix_equal_equal__LO1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_AND__: {
      __tmp__OM1L=__infix_equal_equal__HP1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OM1L=__infix_equal_equal__DQ1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OM1L=__infix_equal_equal__5Q1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __PUT_TO__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__OM1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__OM1L=__infix_equal_equal__LS1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__OM1L=__infix_equal_equal__HT1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OM1L=__infix_equal_equal__CZHO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OM1L=__infix_equal_equal__SXFO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OM1L=__infix_equal_equal__TBMO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OM1L=__infix_equal_equal__OYFO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OM1L=__infix_equal_equal__QCMO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__OM1L=__infix_equal_equal__J5KM(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__OM1L=__infix_equal_equal__ZT1L(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__OM1L=__infix_equal_equal__QB0M(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__OM1L=__infix_equal_equal__KZFO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OM1L=__infix_equal_equal__OTEP(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_INF__: {
      __tmp__OM1L=__infix_equal_equal__UZHO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OM1L=__infix_equal_equal__Q0HO(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_OR__: {
      __tmp__OM1L=__infix_equal_equal__32QN(__tmp__MM1L,__tmp__NM1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__OM1L=__infix_equal_equal__GOVO(__tmp__MM1L,__tmp__NM1L);
    } break;
    };
    __tmp__SM1L=__tmp__OM1L;
  } else {
    __tmp__SM1L=FALSE__;
  };
  return(__tmp__SM1L);
}

static __BOOLEAN __infix_equal_equal__TM1L(__EXPR_SUB *Self__UM1L,void *other__VM1L)
// ({EXPR_SUB},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_SUB *__tmp__ZM1L,*same__XM1L;
  void *__tmp__5M1L,*__tmp__AN1L,*__tmp__IN1L,*__tmp__JN1L;
  __BOOLEAN __tmp__BN1L,__tmp__NN1L,__tmp__KN1L,__tmp__ON1L;
  if (other__VM1L==NULL) {
    __tmp__ZM1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__VM1L)->__id) {
    case __LIST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZM1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZM1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZM1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ZM1L=((__EXPR_SUB *)other__VM1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZM1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ZM1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__ZM1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ZM1L=NULL;
    } break;
    case __CAST__: {
      __tmp__ZM1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZM1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ZM1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ZM1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ZM1L=NULL;
    } break;
    }
  };
  same__XM1L=__tmp__ZM1L;
  if (((void *)__tmp__ZM1L != (void *)NULL)) {
    __tmp__5M1L=Self__UM1L->parent_expr_binary__HBKH.left__PP1H;
    __tmp__AN1L=__tmp__ZM1L->parent_expr_binary__HBKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__5M1L)->__id) {
    case __LIST__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__BN1L=__infix_equal_equal__WF1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BN1L=__infix_equal_equal__LG1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__BN1L=__infix_equal_equal__2G1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__BN1L=__infix_equal_equal__WH1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BN1L=__infix_equal_equal__MI1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BN1L=__infix_equal_equal__IJ1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __REAL_CST__: {
      __tmp__BN1L=__infix_equal_equal__EK1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__BN1L=__infix_equal_equal__4K1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__BN1L=__infix_equal_equal__XL1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__BN1L=__infix_equal_equal__TM1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__BN1L=__infix_equal_equal__PN1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__BN1L=__infix_equal_equal__LO1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_AND__: {
      __tmp__BN1L=__infix_equal_equal__HP1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BN1L=__infix_equal_equal__DQ1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BN1L=__infix_equal_equal__5Q1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __PUT_TO__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__BN1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__BN1L=__infix_equal_equal__LS1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__BN1L=__infix_equal_equal__HT1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BN1L=__infix_equal_equal__CZHO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BN1L=__infix_equal_equal__SXFO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BN1L=__infix_equal_equal__TBMO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BN1L=__infix_equal_equal__OYFO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BN1L=__infix_equal_equal__QCMO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__BN1L=__infix_equal_equal__J5KM(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__BN1L=__infix_equal_equal__ZT1L(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__BN1L=__infix_equal_equal__QB0M(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__BN1L=__infix_equal_equal__KZFO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BN1L=__infix_equal_equal__OTEP(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_INF__: {
      __tmp__BN1L=__infix_equal_equal__UZHO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BN1L=__infix_equal_equal__Q0HO(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_OR__: {
      __tmp__BN1L=__infix_equal_equal__32QN(__tmp__5M1L,__tmp__AN1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__BN1L=__infix_equal_equal__GOVO(__tmp__5M1L,__tmp__AN1L);
    } break;
    };
    __tmp__NN1L=__tmp__BN1L;
  } else {
    __tmp__NN1L=FALSE__;
  };
  if (__tmp__NN1L) {
    __tmp__IN1L=Self__UM1L->parent_expr_binary__HBKH.right__OP2H;
    __tmp__JN1L=__tmp__ZM1L->parent_expr_binary__HBKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__IN1L)->__id) {
    case __LIST__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__KN1L=__infix_equal_equal__WF1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__KN1L=__infix_equal_equal__LG1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__KN1L=__infix_equal_equal__2G1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__KN1L=__infix_equal_equal__WH1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__KN1L=__infix_equal_equal__MI1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__KN1L=__infix_equal_equal__IJ1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __REAL_CST__: {
      __tmp__KN1L=__infix_equal_equal__EK1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__KN1L=__infix_equal_equal__4K1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__KN1L=__infix_equal_equal__XL1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__KN1L=__infix_equal_equal__TM1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__KN1L=__infix_equal_equal__PN1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__KN1L=__infix_equal_equal__LO1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_AND__: {
      __tmp__KN1L=__infix_equal_equal__HP1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__KN1L=__infix_equal_equal__DQ1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__KN1L=__infix_equal_equal__5Q1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __PUT_TO__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__KN1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__KN1L=__infix_equal_equal__LS1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__KN1L=__infix_equal_equal__HT1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__KN1L=__infix_equal_equal__CZHO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__KN1L=__infix_equal_equal__SXFO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__KN1L=__infix_equal_equal__TBMO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__KN1L=__infix_equal_equal__OYFO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__KN1L=__infix_equal_equal__QCMO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__KN1L=__infix_equal_equal__J5KM(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__KN1L=__infix_equal_equal__ZT1L(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__KN1L=__infix_equal_equal__QB0M(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__KN1L=__infix_equal_equal__KZFO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__KN1L=__infix_equal_equal__OTEP(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_INF__: {
      __tmp__KN1L=__infix_equal_equal__UZHO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__KN1L=__infix_equal_equal__Q0HO(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_OR__: {
      __tmp__KN1L=__infix_equal_equal__32QN(__tmp__IN1L,__tmp__JN1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__KN1L=__infix_equal_equal__GOVO(__tmp__IN1L,__tmp__JN1L);
    } break;
    };
    __tmp__ON1L=__tmp__KN1L;
  } else {
    __tmp__ON1L=FALSE__;
  };
  return(__tmp__ON1L);
}

static __BOOLEAN __infix_equal_equal__PN1L(__EXPR_MUL *Self__QN1L,void *other__RN1L)
// ({EXPR_MUL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_MUL *__tmp__VN1L,*same__TN1L;
  void *__tmp__1N1L,*__tmp__2N1L,*__tmp__EO1L,*__tmp__FO1L;
  __BOOLEAN __tmp__3N1L,__tmp__JO1L,__tmp__GO1L,__tmp__KO1L;
  if (other__RN1L==NULL) {
    __tmp__VN1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__RN1L)->__id) {
    case __LIST__: {
      __tmp__VN1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VN1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VN1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__VN1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VN1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__VN1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VN1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VN1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__VN1L=((__EXPR_MUL *)other__RN1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VN1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__VN1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__VN1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__VN1L=NULL;
    } break;
    case __CAST__: {
      __tmp__VN1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__VN1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__VN1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__VN1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__VN1L=NULL;
    } break;
    }
  };
  same__TN1L=__tmp__VN1L;
  if (((void *)__tmp__VN1L != (void *)NULL)) {
    __tmp__1N1L=Self__QN1L->parent_expr_binary__0BKH.left__PP1H;
    __tmp__2N1L=__tmp__VN1L->parent_expr_binary__0BKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__1N1L)->__id) {
    case __LIST__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__3N1L=__infix_equal_equal__WF1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__3N1L=__infix_equal_equal__LG1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__3N1L=__infix_equal_equal__2G1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__3N1L=__infix_equal_equal__WH1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3N1L=__infix_equal_equal__MI1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3N1L=__infix_equal_equal__IJ1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __REAL_CST__: {
      __tmp__3N1L=__infix_equal_equal__EK1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__3N1L=__infix_equal_equal__4K1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__3N1L=__infix_equal_equal__XL1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__3N1L=__infix_equal_equal__TM1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__3N1L=__infix_equal_equal__PN1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__3N1L=__infix_equal_equal__LO1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_AND__: {
      __tmp__3N1L=__infix_equal_equal__HP1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3N1L=__infix_equal_equal__DQ1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3N1L=__infix_equal_equal__5Q1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __PUT_TO__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__3N1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__3N1L=__infix_equal_equal__LS1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__3N1L=__infix_equal_equal__HT1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3N1L=__infix_equal_equal__CZHO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3N1L=__infix_equal_equal__SXFO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3N1L=__infix_equal_equal__TBMO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3N1L=__infix_equal_equal__OYFO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3N1L=__infix_equal_equal__QCMO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__3N1L=__infix_equal_equal__J5KM(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__3N1L=__infix_equal_equal__ZT1L(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__3N1L=__infix_equal_equal__QB0M(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__3N1L=__infix_equal_equal__KZFO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3N1L=__infix_equal_equal__OTEP(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_INF__: {
      __tmp__3N1L=__infix_equal_equal__UZHO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3N1L=__infix_equal_equal__Q0HO(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_OR__: {
      __tmp__3N1L=__infix_equal_equal__32QN(__tmp__1N1L,__tmp__2N1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__3N1L=__infix_equal_equal__GOVO(__tmp__1N1L,__tmp__2N1L);
    } break;
    };
    __tmp__JO1L=__tmp__3N1L;
  } else {
    __tmp__JO1L=FALSE__;
  };
  if (__tmp__JO1L) {
    __tmp__EO1L=Self__QN1L->parent_expr_binary__0BKH.right__OP2H;
    __tmp__FO1L=__tmp__VN1L->parent_expr_binary__0BKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__EO1L)->__id) {
    case __LIST__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__GO1L=__infix_equal_equal__WF1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GO1L=__infix_equal_equal__LG1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__GO1L=__infix_equal_equal__2G1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__GO1L=__infix_equal_equal__WH1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GO1L=__infix_equal_equal__MI1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GO1L=__infix_equal_equal__IJ1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __REAL_CST__: {
      __tmp__GO1L=__infix_equal_equal__EK1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__GO1L=__infix_equal_equal__4K1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__GO1L=__infix_equal_equal__XL1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__GO1L=__infix_equal_equal__TM1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__GO1L=__infix_equal_equal__PN1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__GO1L=__infix_equal_equal__LO1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_AND__: {
      __tmp__GO1L=__infix_equal_equal__HP1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GO1L=__infix_equal_equal__DQ1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GO1L=__infix_equal_equal__5Q1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __PUT_TO__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__GO1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__GO1L=__infix_equal_equal__LS1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__GO1L=__infix_equal_equal__HT1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GO1L=__infix_equal_equal__CZHO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GO1L=__infix_equal_equal__SXFO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GO1L=__infix_equal_equal__TBMO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GO1L=__infix_equal_equal__OYFO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GO1L=__infix_equal_equal__QCMO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__GO1L=__infix_equal_equal__J5KM(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__GO1L=__infix_equal_equal__ZT1L(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__GO1L=__infix_equal_equal__QB0M(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__GO1L=__infix_equal_equal__KZFO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GO1L=__infix_equal_equal__OTEP(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_INF__: {
      __tmp__GO1L=__infix_equal_equal__UZHO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GO1L=__infix_equal_equal__Q0HO(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_OR__: {
      __tmp__GO1L=__infix_equal_equal__32QN(__tmp__EO1L,__tmp__FO1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__GO1L=__infix_equal_equal__GOVO(__tmp__EO1L,__tmp__FO1L);
    } break;
    };
    __tmp__KO1L=__tmp__GO1L;
  } else {
    __tmp__KO1L=FALSE__;
  };
  return(__tmp__KO1L);
}

static __BOOLEAN __infix_equal_equal__LO1L(__EXPR_DIV *Self__MO1L,void *other__NO1L)
// ({EXPR_DIV},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_DIV *__tmp__RO1L,*same__PO1L;
  void *__tmp__XO1L,*__tmp__YO1L,*__tmp__AP1L,*__tmp__BP1L;
  __BOOLEAN __tmp__ZO1L,__tmp__FP1L,__tmp__CP1L,__tmp__GP1L;
  if (other__NO1L==NULL) {
    __tmp__RO1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__NO1L)->__id) {
    case __LIST__: {
      __tmp__RO1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__RO1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RO1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__RO1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RO1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__RO1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__RO1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__RO1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__RO1L=((__EXPR_DIV *)other__NO1L);
    } break;
    case __EXPR_AND__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RO1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__RO1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__RO1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__RO1L=NULL;
    } break;
    case __CAST__: {
      __tmp__RO1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__RO1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__RO1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__RO1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__RO1L=NULL;
    } break;
    }
  };
  same__PO1L=__tmp__RO1L;
  if (((void *)__tmp__RO1L != (void *)NULL)) {
    __tmp__XO1L=Self__MO1L->parent_expr_binary__NCKH.left__PP1H;
    __tmp__YO1L=__tmp__RO1L->parent_expr_binary__NCKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__XO1L)->__id) {
    case __LIST__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__ZO1L=__infix_equal_equal__WF1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZO1L=__infix_equal_equal__LG1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__ZO1L=__infix_equal_equal__2G1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__ZO1L=__infix_equal_equal__WH1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZO1L=__infix_equal_equal__MI1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZO1L=__infix_equal_equal__IJ1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __REAL_CST__: {
      __tmp__ZO1L=__infix_equal_equal__EK1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZO1L=__infix_equal_equal__4K1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__ZO1L=__infix_equal_equal__XL1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__ZO1L=__infix_equal_equal__TM1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZO1L=__infix_equal_equal__PN1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZO1L=__infix_equal_equal__LO1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_AND__: {
      __tmp__ZO1L=__infix_equal_equal__HP1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZO1L=__infix_equal_equal__DQ1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZO1L=__infix_equal_equal__5Q1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __PUT_TO__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZO1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__ZO1L=__infix_equal_equal__LS1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZO1L=__infix_equal_equal__HT1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZO1L=__infix_equal_equal__CZHO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZO1L=__infix_equal_equal__SXFO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZO1L=__infix_equal_equal__TBMO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZO1L=__infix_equal_equal__OYFO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZO1L=__infix_equal_equal__QCMO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__ZO1L=__infix_equal_equal__J5KM(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZO1L=__infix_equal_equal__ZT1L(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZO1L=__infix_equal_equal__QB0M(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZO1L=__infix_equal_equal__KZFO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZO1L=__infix_equal_equal__OTEP(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_INF__: {
      __tmp__ZO1L=__infix_equal_equal__UZHO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZO1L=__infix_equal_equal__Q0HO(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_OR__: {
      __tmp__ZO1L=__infix_equal_equal__32QN(__tmp__XO1L,__tmp__YO1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZO1L=__infix_equal_equal__GOVO(__tmp__XO1L,__tmp__YO1L);
    } break;
    };
    __tmp__FP1L=__tmp__ZO1L;
  } else {
    __tmp__FP1L=FALSE__;
  };
  if (__tmp__FP1L) {
    __tmp__AP1L=Self__MO1L->parent_expr_binary__NCKH.right__OP2H;
    __tmp__BP1L=__tmp__RO1L->parent_expr_binary__NCKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__AP1L)->__id) {
    case __LIST__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__CP1L=__infix_equal_equal__WF1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__CP1L=__infix_equal_equal__LG1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__CP1L=__infix_equal_equal__2G1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__CP1L=__infix_equal_equal__WH1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__CP1L=__infix_equal_equal__MI1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__CP1L=__infix_equal_equal__IJ1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __REAL_CST__: {
      __tmp__CP1L=__infix_equal_equal__EK1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__CP1L=__infix_equal_equal__4K1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__CP1L=__infix_equal_equal__XL1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__CP1L=__infix_equal_equal__TM1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__CP1L=__infix_equal_equal__PN1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__CP1L=__infix_equal_equal__LO1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_AND__: {
      __tmp__CP1L=__infix_equal_equal__HP1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__CP1L=__infix_equal_equal__DQ1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__CP1L=__infix_equal_equal__5Q1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __PUT_TO__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__CP1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__CP1L=__infix_equal_equal__LS1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__CP1L=__infix_equal_equal__HT1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__CP1L=__infix_equal_equal__CZHO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__CP1L=__infix_equal_equal__SXFO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__CP1L=__infix_equal_equal__TBMO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__CP1L=__infix_equal_equal__OYFO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__CP1L=__infix_equal_equal__QCMO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__CP1L=__infix_equal_equal__J5KM(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__CP1L=__infix_equal_equal__ZT1L(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__CP1L=__infix_equal_equal__QB0M(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__CP1L=__infix_equal_equal__KZFO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__CP1L=__infix_equal_equal__OTEP(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_INF__: {
      __tmp__CP1L=__infix_equal_equal__UZHO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__CP1L=__infix_equal_equal__Q0HO(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_OR__: {
      __tmp__CP1L=__infix_equal_equal__32QN(__tmp__AP1L,__tmp__BP1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__CP1L=__infix_equal_equal__GOVO(__tmp__AP1L,__tmp__BP1L);
    } break;
    };
    __tmp__GP1L=__tmp__CP1L;
  } else {
    __tmp__GP1L=FALSE__;
  };
  return(__tmp__GP1L);
}

static __BOOLEAN __infix_equal_equal__HP1L(__EXPR_AND *Self__IP1L,void *other__JP1L)
// ({EXPR_AND},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_AND *__tmp__NP1L,*same__LP1L;
  void *__tmp__TP1L,*__tmp__UP1L,*__tmp__2P1L,*__tmp__3P1L;
  __BOOLEAN __tmp__VP1L,__tmp__BQ1L,__tmp__4P1L,__tmp__CQ1L;
  if (other__JP1L==NULL) {
    __tmp__NP1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__JP1L)->__id) {
    case __LIST__: {
      __tmp__NP1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__NP1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__NP1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__NP1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__NP1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__NP1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__NP1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__NP1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__NP1L=((__EXPR_AND *)other__JP1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__NP1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__NP1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__NP1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__NP1L=NULL;
    } break;
    case __CAST__: {
      __tmp__NP1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__NP1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__NP1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__NP1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__NP1L=NULL;
    } break;
    }
  };
  same__LP1L=__tmp__NP1L;
  if (((void *)__tmp__NP1L != (void *)NULL)) {
    __tmp__TP1L=Self__IP1L->parent_expr_binary__ADKH.left__PP1H;
    __tmp__UP1L=__tmp__NP1L->parent_expr_binary__ADKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__TP1L)->__id) {
    case __LIST__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__VP1L=__infix_equal_equal__WF1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VP1L=__infix_equal_equal__LG1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__VP1L=__infix_equal_equal__2G1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__VP1L=__infix_equal_equal__WH1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VP1L=__infix_equal_equal__MI1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VP1L=__infix_equal_equal__IJ1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __REAL_CST__: {
      __tmp__VP1L=__infix_equal_equal__EK1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__VP1L=__infix_equal_equal__4K1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__VP1L=__infix_equal_equal__XL1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__VP1L=__infix_equal_equal__TM1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__VP1L=__infix_equal_equal__PN1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__VP1L=__infix_equal_equal__LO1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_AND__: {
      __tmp__VP1L=__infix_equal_equal__HP1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VP1L=__infix_equal_equal__DQ1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VP1L=__infix_equal_equal__5Q1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __PUT_TO__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__VP1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__VP1L=__infix_equal_equal__LS1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__VP1L=__infix_equal_equal__HT1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VP1L=__infix_equal_equal__CZHO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VP1L=__infix_equal_equal__SXFO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VP1L=__infix_equal_equal__TBMO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VP1L=__infix_equal_equal__OYFO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VP1L=__infix_equal_equal__QCMO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__VP1L=__infix_equal_equal__J5KM(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__VP1L=__infix_equal_equal__ZT1L(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__VP1L=__infix_equal_equal__QB0M(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__VP1L=__infix_equal_equal__KZFO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VP1L=__infix_equal_equal__OTEP(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_INF__: {
      __tmp__VP1L=__infix_equal_equal__UZHO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VP1L=__infix_equal_equal__Q0HO(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_OR__: {
      __tmp__VP1L=__infix_equal_equal__32QN(__tmp__TP1L,__tmp__UP1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__VP1L=__infix_equal_equal__GOVO(__tmp__TP1L,__tmp__UP1L);
    } break;
    };
    __tmp__BQ1L=__tmp__VP1L;
  } else {
    __tmp__BQ1L=FALSE__;
  };
  if (__tmp__BQ1L) {
    __tmp__2P1L=Self__IP1L->parent_expr_binary__ADKH.right__OP2H;
    __tmp__3P1L=__tmp__NP1L->parent_expr_binary__ADKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__2P1L)->__id) {
    case __LIST__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__4P1L=__infix_equal_equal__WF1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__4P1L=__infix_equal_equal__LG1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__4P1L=__infix_equal_equal__2G1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__4P1L=__infix_equal_equal__WH1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__4P1L=__infix_equal_equal__MI1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__4P1L=__infix_equal_equal__IJ1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __REAL_CST__: {
      __tmp__4P1L=__infix_equal_equal__EK1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__4P1L=__infix_equal_equal__4K1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__4P1L=__infix_equal_equal__XL1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__4P1L=__infix_equal_equal__TM1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__4P1L=__infix_equal_equal__PN1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__4P1L=__infix_equal_equal__LO1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_AND__: {
      __tmp__4P1L=__infix_equal_equal__HP1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__4P1L=__infix_equal_equal__DQ1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__4P1L=__infix_equal_equal__5Q1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __PUT_TO__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__4P1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__4P1L=__infix_equal_equal__LS1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__4P1L=__infix_equal_equal__HT1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__4P1L=__infix_equal_equal__CZHO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__4P1L=__infix_equal_equal__SXFO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__4P1L=__infix_equal_equal__TBMO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__4P1L=__infix_equal_equal__OYFO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__4P1L=__infix_equal_equal__QCMO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__4P1L=__infix_equal_equal__J5KM(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__4P1L=__infix_equal_equal__ZT1L(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__4P1L=__infix_equal_equal__QB0M(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__4P1L=__infix_equal_equal__KZFO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__4P1L=__infix_equal_equal__OTEP(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_INF__: {
      __tmp__4P1L=__infix_equal_equal__UZHO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__4P1L=__infix_equal_equal__Q0HO(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_OR__: {
      __tmp__4P1L=__infix_equal_equal__32QN(__tmp__2P1L,__tmp__3P1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__4P1L=__infix_equal_equal__GOVO(__tmp__2P1L,__tmp__3P1L);
    } break;
    };
    __tmp__CQ1L=__tmp__4P1L;
  } else {
    __tmp__CQ1L=FALSE__;
  };
  return(__tmp__CQ1L);
}

static __BOOLEAN __infix_equal_equal__DQ1L(__EXPR_SHIFT_R *Self__EQ1L,void *other__FQ1L)
// ({EXPR_SHIFT_R},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_SHIFT_R *__tmp__JQ1L,*same__HQ1L;
  void *__tmp__PQ1L,*__tmp__QQ1L,*__tmp__YQ1L,*__tmp__ZQ1L;
  __BOOLEAN __tmp__RQ1L,__tmp__3Q1L,__tmp__0Q1L,__tmp__4Q1L;
  if (other__FQ1L==NULL) {
    __tmp__JQ1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__FQ1L)->__id) {
    case __LIST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__JQ1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JQ1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__JQ1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JQ1L=((__EXPR_SHIFT_R *)other__FQ1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JQ1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__JQ1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__JQ1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__JQ1L=NULL;
    } break;
    case __CAST__: {
      __tmp__JQ1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__JQ1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__JQ1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__JQ1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__JQ1L=NULL;
    } break;
    }
  };
  same__HQ1L=__tmp__JQ1L;
  if (((void *)__tmp__JQ1L != (void *)NULL)) {
    __tmp__PQ1L=Self__EQ1L->parent_expr_binary__TDKH.left__PP1H;
    __tmp__QQ1L=__tmp__JQ1L->parent_expr_binary__TDKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__PQ1L)->__id) {
    case __LIST__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__RQ1L=__infix_equal_equal__WF1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RQ1L=__infix_equal_equal__LG1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__RQ1L=__infix_equal_equal__2G1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__RQ1L=__infix_equal_equal__WH1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RQ1L=__infix_equal_equal__MI1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RQ1L=__infix_equal_equal__IJ1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __REAL_CST__: {
      __tmp__RQ1L=__infix_equal_equal__EK1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__RQ1L=__infix_equal_equal__4K1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__RQ1L=__infix_equal_equal__XL1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__RQ1L=__infix_equal_equal__TM1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__RQ1L=__infix_equal_equal__PN1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__RQ1L=__infix_equal_equal__LO1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_AND__: {
      __tmp__RQ1L=__infix_equal_equal__HP1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RQ1L=__infix_equal_equal__DQ1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RQ1L=__infix_equal_equal__5Q1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __PUT_TO__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__RQ1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__RQ1L=__infix_equal_equal__LS1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__RQ1L=__infix_equal_equal__HT1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RQ1L=__infix_equal_equal__CZHO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RQ1L=__infix_equal_equal__SXFO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RQ1L=__infix_equal_equal__TBMO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RQ1L=__infix_equal_equal__OYFO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RQ1L=__infix_equal_equal__QCMO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__RQ1L=__infix_equal_equal__J5KM(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__RQ1L=__infix_equal_equal__ZT1L(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__RQ1L=__infix_equal_equal__QB0M(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__RQ1L=__infix_equal_equal__KZFO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RQ1L=__infix_equal_equal__OTEP(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_INF__: {
      __tmp__RQ1L=__infix_equal_equal__UZHO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RQ1L=__infix_equal_equal__Q0HO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_OR__: {
      __tmp__RQ1L=__infix_equal_equal__32QN(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__RQ1L=__infix_equal_equal__GOVO(__tmp__PQ1L,__tmp__QQ1L);
    } break;
    };
    __tmp__3Q1L=__tmp__RQ1L;
  } else {
    __tmp__3Q1L=FALSE__;
  };
  if (__tmp__3Q1L) {
    __tmp__YQ1L=Self__EQ1L->parent_expr_binary__TDKH.right__OP2H;
    __tmp__ZQ1L=__tmp__JQ1L->parent_expr_binary__TDKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__YQ1L)->__id) {
    case __LIST__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__0Q1L=__infix_equal_equal__WF1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0Q1L=__infix_equal_equal__LG1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__0Q1L=__infix_equal_equal__2G1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__0Q1L=__infix_equal_equal__WH1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0Q1L=__infix_equal_equal__MI1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0Q1L=__infix_equal_equal__IJ1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __REAL_CST__: {
      __tmp__0Q1L=__infix_equal_equal__EK1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__0Q1L=__infix_equal_equal__4K1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__0Q1L=__infix_equal_equal__XL1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__0Q1L=__infix_equal_equal__TM1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__0Q1L=__infix_equal_equal__PN1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__0Q1L=__infix_equal_equal__LO1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_AND__: {
      __tmp__0Q1L=__infix_equal_equal__HP1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0Q1L=__infix_equal_equal__DQ1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0Q1L=__infix_equal_equal__5Q1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __PUT_TO__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__0Q1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__0Q1L=__infix_equal_equal__LS1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__0Q1L=__infix_equal_equal__HT1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0Q1L=__infix_equal_equal__CZHO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0Q1L=__infix_equal_equal__SXFO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0Q1L=__infix_equal_equal__TBMO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0Q1L=__infix_equal_equal__OYFO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0Q1L=__infix_equal_equal__QCMO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__0Q1L=__infix_equal_equal__J5KM(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__0Q1L=__infix_equal_equal__ZT1L(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__0Q1L=__infix_equal_equal__QB0M(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__0Q1L=__infix_equal_equal__KZFO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0Q1L=__infix_equal_equal__OTEP(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_INF__: {
      __tmp__0Q1L=__infix_equal_equal__UZHO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0Q1L=__infix_equal_equal__Q0HO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_OR__: {
      __tmp__0Q1L=__infix_equal_equal__32QN(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__0Q1L=__infix_equal_equal__GOVO(__tmp__YQ1L,__tmp__ZQ1L);
    } break;
    };
    __tmp__4Q1L=__tmp__0Q1L;
  } else {
    __tmp__4Q1L=FALSE__;
  };
  return(__tmp__4Q1L);
}

static __BOOLEAN __infix_equal_equal__5Q1L(__EXPR_SHIFT_L *Self__AR1L,void *other__BR1L)
// ({EXPR_SHIFT_L},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_SHIFT_L *__tmp__FR1L,*same__DR1L;
  void *__tmp__LR1L,*__tmp__MR1L,*__tmp__UR1L,*__tmp__VR1L;
  __BOOLEAN __tmp__NR1L,__tmp__ZR1L,__tmp__WR1L,__tmp__0R1L;
  if (other__BR1L==NULL) {
    __tmp__FR1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__BR1L)->__id) {
    case __LIST__: {
      __tmp__FR1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FR1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FR1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__FR1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FR1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__FR1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__FR1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__FR1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FR1L=((__EXPR_SHIFT_L *)other__BR1L);
    } break;
    case __PUT_TO__: {
      __tmp__FR1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__FR1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__FR1L=NULL;
    } break;
    case __CAST__: {
      __tmp__FR1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__FR1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__FR1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__FR1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__FR1L=NULL;
    } break;
    }
  };
  same__DR1L=__tmp__FR1L;
  if (((void *)__tmp__FR1L != (void *)NULL)) {
    __tmp__LR1L=Self__AR1L->parent_expr_binary__GEKH.left__PP1H;
    __tmp__MR1L=__tmp__FR1L->parent_expr_binary__GEKH.left__PP1H;
    switch (((struct ___OBJ *)__tmp__LR1L)->__id) {
    case __LIST__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__NR1L=__infix_equal_equal__WF1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__NR1L=__infix_equal_equal__LG1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__NR1L=__infix_equal_equal__2G1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__NR1L=__infix_equal_equal__WH1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__NR1L=__infix_equal_equal__MI1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__NR1L=__infix_equal_equal__IJ1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __REAL_CST__: {
      __tmp__NR1L=__infix_equal_equal__EK1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__NR1L=__infix_equal_equal__4K1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__NR1L=__infix_equal_equal__XL1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__NR1L=__infix_equal_equal__TM1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__NR1L=__infix_equal_equal__PN1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__NR1L=__infix_equal_equal__LO1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_AND__: {
      __tmp__NR1L=__infix_equal_equal__HP1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__NR1L=__infix_equal_equal__DQ1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__NR1L=__infix_equal_equal__5Q1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __PUT_TO__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__NR1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__NR1L=__infix_equal_equal__LS1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__NR1L=__infix_equal_equal__HT1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__NR1L=__infix_equal_equal__CZHO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__NR1L=__infix_equal_equal__SXFO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__NR1L=__infix_equal_equal__TBMO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__NR1L=__infix_equal_equal__OYFO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__NR1L=__infix_equal_equal__QCMO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__NR1L=__infix_equal_equal__J5KM(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__NR1L=__infix_equal_equal__ZT1L(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__NR1L=__infix_equal_equal__QB0M(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__NR1L=__infix_equal_equal__KZFO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__NR1L=__infix_equal_equal__OTEP(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_INF__: {
      __tmp__NR1L=__infix_equal_equal__UZHO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__NR1L=__infix_equal_equal__Q0HO(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_OR__: {
      __tmp__NR1L=__infix_equal_equal__32QN(__tmp__LR1L,__tmp__MR1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__NR1L=__infix_equal_equal__GOVO(__tmp__LR1L,__tmp__MR1L);
    } break;
    };
    __tmp__ZR1L=__tmp__NR1L;
  } else {
    __tmp__ZR1L=FALSE__;
  };
  if (__tmp__ZR1L) {
    __tmp__UR1L=Self__AR1L->parent_expr_binary__GEKH.right__OP2H;
    __tmp__VR1L=__tmp__FR1L->parent_expr_binary__GEKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__UR1L)->__id) {
    case __LIST__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__WR1L=__infix_equal_equal__WF1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WR1L=__infix_equal_equal__LG1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__WR1L=__infix_equal_equal__2G1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__WR1L=__infix_equal_equal__WH1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WR1L=__infix_equal_equal__MI1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WR1L=__infix_equal_equal__IJ1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __REAL_CST__: {
      __tmp__WR1L=__infix_equal_equal__EK1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__WR1L=__infix_equal_equal__4K1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__WR1L=__infix_equal_equal__XL1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__WR1L=__infix_equal_equal__TM1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__WR1L=__infix_equal_equal__PN1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__WR1L=__infix_equal_equal__LO1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_AND__: {
      __tmp__WR1L=__infix_equal_equal__HP1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WR1L=__infix_equal_equal__DQ1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WR1L=__infix_equal_equal__5Q1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __PUT_TO__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__WR1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__WR1L=__infix_equal_equal__LS1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__WR1L=__infix_equal_equal__HT1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WR1L=__infix_equal_equal__CZHO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WR1L=__infix_equal_equal__SXFO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WR1L=__infix_equal_equal__TBMO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WR1L=__infix_equal_equal__OYFO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WR1L=__infix_equal_equal__QCMO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__WR1L=__infix_equal_equal__J5KM(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__WR1L=__infix_equal_equal__ZT1L(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__WR1L=__infix_equal_equal__QB0M(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__WR1L=__infix_equal_equal__KZFO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WR1L=__infix_equal_equal__OTEP(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_INF__: {
      __tmp__WR1L=__infix_equal_equal__UZHO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WR1L=__infix_equal_equal__Q0HO(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_OR__: {
      __tmp__WR1L=__infix_equal_equal__32QN(__tmp__UR1L,__tmp__VR1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__WR1L=__infix_equal_equal__GOVO(__tmp__UR1L,__tmp__VR1L);
    } break;
    };
    __tmp__0R1L=__tmp__WR1L;
  } else {
    __tmp__0R1L=FALSE__;
  };
  return(__tmp__0R1L);
}

static __BOOLEAN __infix_equal_equal__LS1L(__READ_SLOT *Self__MS1L,void *other__NS1L)
// ({READ_SLOT},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  void *__tmp__RS1L,*rd__PS1L;
  void *__tmp__5S1L,*__tmp__AT1L;
  __BOOLEAN __tmp__BT1L,__tmp__FT1L;
  if (other__NS1L==NULL) {
    __tmp__RS1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__NS1L)->__id) {
    case __LIST__: {
      __tmp__RS1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__RS1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__RS1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__RS1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__RS1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__RS1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__RS1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__RS1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__RS1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__RS1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__RS1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__RS1L=NULL;
    } break;
    case __CAST__: {
      __tmp__RS1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__RS1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__RS1L=((void *)other__NS1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__RS1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__RS1L=NULL;
    } break;
    }
  };
  rd__PS1L=__tmp__RS1L;
  if ((((void *)__tmp__RS1L != (void *)NULL) && ((void *)Self__MS1L->slot__EVGK == (void *)((__READ_SLOT *)__tmp__RS1L)->slot__EVGK))) {
    __tmp__5S1L=Self__MS1L->receiver__I1TI;
    __tmp__AT1L=((__READ_SLOT *)__tmp__RS1L)->receiver__I1TI;
    switch (((struct ___OBJ *)__tmp__5S1L)->__id) {
    case __LIST__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__BT1L=__infix_equal_equal__WF1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BT1L=__infix_equal_equal__LG1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__BT1L=__infix_equal_equal__2G1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__BT1L=__infix_equal_equal__WH1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BT1L=__infix_equal_equal__MI1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BT1L=__infix_equal_equal__IJ1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __REAL_CST__: {
      __tmp__BT1L=__infix_equal_equal__EK1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__BT1L=__infix_equal_equal__4K1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__BT1L=__infix_equal_equal__XL1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__BT1L=__infix_equal_equal__TM1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__BT1L=__infix_equal_equal__PN1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__BT1L=__infix_equal_equal__LO1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_AND__: {
      __tmp__BT1L=__infix_equal_equal__HP1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BT1L=__infix_equal_equal__DQ1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BT1L=__infix_equal_equal__5Q1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __PUT_TO__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__BT1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__BT1L=__infix_equal_equal__LS1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__BT1L=__infix_equal_equal__HT1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BT1L=__infix_equal_equal__CZHO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BT1L=__infix_equal_equal__SXFO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BT1L=__infix_equal_equal__TBMO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BT1L=__infix_equal_equal__OYFO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BT1L=__infix_equal_equal__QCMO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__BT1L=__infix_equal_equal__J5KM(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__BT1L=__infix_equal_equal__ZT1L(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__BT1L=__infix_equal_equal__QB0M(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__BT1L=__infix_equal_equal__KZFO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BT1L=__infix_equal_equal__OTEP(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_INF__: {
      __tmp__BT1L=__infix_equal_equal__UZHO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BT1L=__infix_equal_equal__Q0HO(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_OR__: {
      __tmp__BT1L=__infix_equal_equal__32QN(__tmp__5S1L,__tmp__AT1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__BT1L=__infix_equal_equal__GOVO(__tmp__5S1L,__tmp__AT1L);
    } break;
    };
    __tmp__FT1L=__tmp__BT1L;
  } else {
    __tmp__FT1L=FALSE__;
  };
  return(__tmp__FT1L);
}

static __BOOLEAN __infix_equal_equal__HT1L(__READ_GLOBAL *Self__IT1L,void *other__JT1L)
// ({READ_GLOBAL},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *__tmp__NT1L,*rd__LT1L;
  if (other__JT1L==NULL) {
    __tmp__NT1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__JT1L)->__id) {
    case __LIST__: {
      __tmp__NT1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__NT1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__NT1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__NT1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__NT1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__NT1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__NT1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__NT1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__NT1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__NT1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__NT1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__NT1L=NULL;
    } break;
    case __CAST__: {
      __tmp__NT1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__NT1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__NT1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__NT1L=((void *)other__JT1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__NT1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__NT1L=NULL;
    } break;
    }
  };
  rd__LT1L=__tmp__NT1L;
  return((((void *)__tmp__NT1L != (void *)NULL) && ((void *)Self__IT1L->global__RHJK == (void *)((__READ_GLOBAL *)__tmp__NT1L)->global__RHJK)));
}

static __BOOLEAN __infix_equal_equal__CZHO(__EXPR_NOT_LOGIC *Self__DZHO,void *other__EZHO)
// ({EXPR_NOT_LOGIC},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_NOT_LOGIC *__tmp__IZHO,*same__GZHO;
  void *__tmp__OZHO,*__tmp__PZHO;
  __BOOLEAN __tmp__QZHO,__tmp__TZHO;
  if (other__EZHO==NULL) {
    __tmp__IZHO=NULL;
  } else {
    switch (((struct ___OBJ *)other__EZHO)->__id) {
    case __LIST__: {
      __tmp__IZHO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__IZHO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__IZHO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__IZHO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__IZHO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__IZHO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__IZHO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__IZHO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__IZHO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__IZHO=NULL;
    } break;
    case __ITEM__: {
      __tmp__IZHO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__IZHO=NULL;
    } break;
    case __CAST__: {
      __tmp__IZHO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__IZHO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__IZHO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__IZHO=((__EXPR_NOT_LOGIC *)other__EZHO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__IZHO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__IZHO=NULL;
    } break;
    }
  };
  same__GZHO=__tmp__IZHO;
  if (((void *)__tmp__IZHO != (void *)NULL)) {
    __tmp__OZHO=Self__DZHO->parent_expr_unary_logic__0EUK.right__AQZM;
    __tmp__PZHO=__tmp__IZHO->parent_expr_unary_logic__0EUK.right__AQZM;
    switch (((struct ___OBJ *)__tmp__OZHO)->__id) {
    case __LIST__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__QZHO=__infix_equal_equal__WF1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QZHO=__infix_equal_equal__LG1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __INTEGER_CST__: {
      __tmp__QZHO=__infix_equal_equal__2G1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __READ_LOCAL__: {
      __tmp__QZHO=__infix_equal_equal__WH1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QZHO=__infix_equal_equal__MI1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QZHO=__infix_equal_equal__IJ1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __REAL_CST__: {
      __tmp__QZHO=__infix_equal_equal__EK1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__QZHO=__infix_equal_equal__4K1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__QZHO=__infix_equal_equal__XL1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_SUB__: {
      __tmp__QZHO=__infix_equal_equal__TM1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_MUL__: {
      __tmp__QZHO=__infix_equal_equal__PN1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_DIV__: {
      __tmp__QZHO=__infix_equal_equal__LO1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_AND__: {
      __tmp__QZHO=__infix_equal_equal__HP1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QZHO=__infix_equal_equal__DQ1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QZHO=__infix_equal_equal__5Q1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __PUT_TO__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__QZHO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__QZHO=__infix_equal_equal__LS1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__QZHO=__infix_equal_equal__HT1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QZHO=__infix_equal_equal__CZHO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QZHO=__infix_equal_equal__SXFO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QZHO=__infix_equal_equal__TBMO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QZHO=__infix_equal_equal__OYFO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QZHO=__infix_equal_equal__QCMO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_NEG__: {
      __tmp__QZHO=__infix_equal_equal__J5KM(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_ADD__: {
      __tmp__QZHO=__infix_equal_equal__ZT1L(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_NOT__: {
      __tmp__QZHO=__infix_equal_equal__QB0M(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_MOD__: {
      __tmp__QZHO=__infix_equal_equal__KZFO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QZHO=__infix_equal_equal__OTEP(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_INF__: {
      __tmp__QZHO=__infix_equal_equal__UZHO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QZHO=__infix_equal_equal__Q0HO(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_OR__: {
      __tmp__QZHO=__infix_equal_equal__32QN(__tmp__OZHO,__tmp__PZHO);
    } break;
    case __EXPR_XOR__: {
      __tmp__QZHO=__infix_equal_equal__GOVO(__tmp__OZHO,__tmp__PZHO);
    } break;
    };
    __tmp__TZHO=__tmp__QZHO;
  } else {
    __tmp__TZHO=FALSE__;
  };
  return(__tmp__TZHO);
}

static __BOOLEAN __infix_equal_equal__SXFO(__EXPR_OR_LOGIC *Self__TXFO,void *other__UXFO)
// ({EXPR_OR_LOGIC},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_OR_LOGIC *__tmp__YXFO,*same__WXFO;
  void *__tmp__4XFO,*__tmp__5XFO,*__tmp__HYFO,*__tmp__IYFO;
  __BOOLEAN __tmp__AYFO,__tmp__MYFO,__tmp__JYFO,__tmp__NYFO;
  if (other__UXFO==NULL) {
    __tmp__YXFO=NULL;
  } else {
    switch (((struct ___OBJ *)other__UXFO)->__id) {
    case __LIST__: {
      __tmp__YXFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YXFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YXFO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__YXFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YXFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__YXFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YXFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YXFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YXFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__YXFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__YXFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__YXFO=NULL;
    } break;
    case __CAST__: {
      __tmp__YXFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__YXFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__YXFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YXFO=((__EXPR_OR_LOGIC *)other__UXFO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__YXFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__YXFO=NULL;
    } break;
    }
  };
  same__WXFO=__tmp__YXFO;
  if (((void *)__tmp__YXFO != (void *)NULL)) {
    __tmp__4XFO=Self__TXFO->parent_expr_binary_logic__WHCL.left__NMEO;
    __tmp__5XFO=__tmp__YXFO->parent_expr_binary_logic__WHCL.left__NMEO;
    switch (((struct ___OBJ *)__tmp__4XFO)->__id) {
    case __LIST__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__AYFO=__infix_equal_equal__WF1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__AYFO=__infix_equal_equal__LG1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__AYFO=__infix_equal_equal__2G1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__AYFO=__infix_equal_equal__WH1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__AYFO=__infix_equal_equal__MI1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__AYFO=__infix_equal_equal__IJ1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __REAL_CST__: {
      __tmp__AYFO=__infix_equal_equal__EK1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__AYFO=__infix_equal_equal__4K1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__AYFO=__infix_equal_equal__XL1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_SUB__: {
      __tmp__AYFO=__infix_equal_equal__TM1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_MUL__: {
      __tmp__AYFO=__infix_equal_equal__PN1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_DIV__: {
      __tmp__AYFO=__infix_equal_equal__LO1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_AND__: {
      __tmp__AYFO=__infix_equal_equal__HP1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__AYFO=__infix_equal_equal__DQ1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__AYFO=__infix_equal_equal__5Q1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __PUT_TO__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__AYFO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__AYFO=__infix_equal_equal__LS1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__AYFO=__infix_equal_equal__HT1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__AYFO=__infix_equal_equal__CZHO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__AYFO=__infix_equal_equal__SXFO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__AYFO=__infix_equal_equal__TBMO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__AYFO=__infix_equal_equal__OYFO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__AYFO=__infix_equal_equal__QCMO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_NEG__: {
      __tmp__AYFO=__infix_equal_equal__J5KM(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_ADD__: {
      __tmp__AYFO=__infix_equal_equal__ZT1L(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_NOT__: {
      __tmp__AYFO=__infix_equal_equal__QB0M(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_MOD__: {
      __tmp__AYFO=__infix_equal_equal__KZFO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__AYFO=__infix_equal_equal__OTEP(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_INF__: {
      __tmp__AYFO=__infix_equal_equal__UZHO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__AYFO=__infix_equal_equal__Q0HO(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_OR__: {
      __tmp__AYFO=__infix_equal_equal__32QN(__tmp__4XFO,__tmp__5XFO);
    } break;
    case __EXPR_XOR__: {
      __tmp__AYFO=__infix_equal_equal__GOVO(__tmp__4XFO,__tmp__5XFO);
    } break;
    };
    __tmp__MYFO=__tmp__AYFO;
  } else {
    __tmp__MYFO=FALSE__;
  };
  if (__tmp__MYFO) {
    __tmp__HYFO=Self__TXFO->parent_expr_binary_logic__WHCL.right__RMEO;
    __tmp__IYFO=__tmp__YXFO->parent_expr_binary_logic__WHCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__HYFO)->__id) {
    case __LIST__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__JYFO=__infix_equal_equal__WF1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__JYFO=__infix_equal_equal__LG1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__JYFO=__infix_equal_equal__2G1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__JYFO=__infix_equal_equal__WH1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__JYFO=__infix_equal_equal__MI1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__JYFO=__infix_equal_equal__IJ1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __REAL_CST__: {
      __tmp__JYFO=__infix_equal_equal__EK1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__JYFO=__infix_equal_equal__4K1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__JYFO=__infix_equal_equal__XL1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_SUB__: {
      __tmp__JYFO=__infix_equal_equal__TM1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_MUL__: {
      __tmp__JYFO=__infix_equal_equal__PN1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_DIV__: {
      __tmp__JYFO=__infix_equal_equal__LO1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_AND__: {
      __tmp__JYFO=__infix_equal_equal__HP1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__JYFO=__infix_equal_equal__DQ1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__JYFO=__infix_equal_equal__5Q1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __PUT_TO__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__JYFO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__JYFO=__infix_equal_equal__LS1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__JYFO=__infix_equal_equal__HT1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__JYFO=__infix_equal_equal__CZHO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__JYFO=__infix_equal_equal__SXFO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__JYFO=__infix_equal_equal__TBMO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__JYFO=__infix_equal_equal__OYFO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__JYFO=__infix_equal_equal__QCMO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_NEG__: {
      __tmp__JYFO=__infix_equal_equal__J5KM(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_ADD__: {
      __tmp__JYFO=__infix_equal_equal__ZT1L(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_NOT__: {
      __tmp__JYFO=__infix_equal_equal__QB0M(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_MOD__: {
      __tmp__JYFO=__infix_equal_equal__KZFO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__JYFO=__infix_equal_equal__OTEP(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_INF__: {
      __tmp__JYFO=__infix_equal_equal__UZHO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__JYFO=__infix_equal_equal__Q0HO(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_OR__: {
      __tmp__JYFO=__infix_equal_equal__32QN(__tmp__HYFO,__tmp__IYFO);
    } break;
    case __EXPR_XOR__: {
      __tmp__JYFO=__infix_equal_equal__GOVO(__tmp__HYFO,__tmp__IYFO);
    } break;
    };
    __tmp__NYFO=__tmp__JYFO;
  } else {
    __tmp__NYFO=FALSE__;
  };
  return(__tmp__NYFO);
}

static __BOOLEAN __infix_equal_equal__TBMO(__EXPR_OR_OR_LOGIC *Self__UBMO,void *other__VBMO)
// ({EXPR_OR_OR_LOGIC},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_OR_OR_LOGIC *__tmp__ZBMO,*same__XBMO;
  void *__tmp__5BMO,*__tmp__ACMO,*__tmp__ICMO,*__tmp__JCMO;
  __BOOLEAN __tmp__BCMO,__tmp__NCMO,__tmp__KCMO,__tmp__OCMO;
  if (other__VBMO==NULL) {
    __tmp__ZBMO=NULL;
  } else {
    switch (((struct ___OBJ *)other__VBMO)->__id) {
    case __LIST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZBMO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZBMO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZBMO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZBMO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__ZBMO=NULL;
    } break;
    case __ITEM__: {
      __tmp__ZBMO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__ZBMO=NULL;
    } break;
    case __CAST__: {
      __tmp__ZBMO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__ZBMO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__ZBMO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZBMO=((__EXPR_OR_OR_LOGIC *)other__VBMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__ZBMO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__ZBMO=NULL;
    } break;
    }
  };
  same__XBMO=__tmp__ZBMO;
  if (((void *)__tmp__ZBMO != (void *)NULL)) {
    __tmp__5BMO=Self__UBMO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
    __tmp__ACMO=__tmp__ZBMO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
    switch (((struct ___OBJ *)__tmp__5BMO)->__id) {
    case __LIST__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__BCMO=__infix_equal_equal__WF1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BCMO=__infix_equal_equal__LG1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __INTEGER_CST__: {
      __tmp__BCMO=__infix_equal_equal__2G1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __READ_LOCAL__: {
      __tmp__BCMO=__infix_equal_equal__WH1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BCMO=__infix_equal_equal__MI1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BCMO=__infix_equal_equal__IJ1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __REAL_CST__: {
      __tmp__BCMO=__infix_equal_equal__EK1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__BCMO=__infix_equal_equal__4K1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__BCMO=__infix_equal_equal__XL1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_SUB__: {
      __tmp__BCMO=__infix_equal_equal__TM1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_MUL__: {
      __tmp__BCMO=__infix_equal_equal__PN1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_DIV__: {
      __tmp__BCMO=__infix_equal_equal__LO1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_AND__: {
      __tmp__BCMO=__infix_equal_equal__HP1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BCMO=__infix_equal_equal__DQ1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BCMO=__infix_equal_equal__5Q1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __PUT_TO__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__BCMO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__BCMO=__infix_equal_equal__LS1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__BCMO=__infix_equal_equal__HT1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BCMO=__infix_equal_equal__CZHO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BCMO=__infix_equal_equal__SXFO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BCMO=__infix_equal_equal__TBMO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BCMO=__infix_equal_equal__OYFO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BCMO=__infix_equal_equal__QCMO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__BCMO=__infix_equal_equal__J5KM(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_ADD__: {
      __tmp__BCMO=__infix_equal_equal__ZT1L(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_NOT__: {
      __tmp__BCMO=__infix_equal_equal__QB0M(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_MOD__: {
      __tmp__BCMO=__infix_equal_equal__KZFO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BCMO=__infix_equal_equal__OTEP(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_INF__: {
      __tmp__BCMO=__infix_equal_equal__UZHO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BCMO=__infix_equal_equal__Q0HO(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_OR__: {
      __tmp__BCMO=__infix_equal_equal__32QN(__tmp__5BMO,__tmp__ACMO);
    } break;
    case __EXPR_XOR__: {
      __tmp__BCMO=__infix_equal_equal__GOVO(__tmp__5BMO,__tmp__ACMO);
    } break;
    };
    __tmp__NCMO=__tmp__BCMO;
  } else {
    __tmp__NCMO=FALSE__;
  };
  if (__tmp__NCMO) {
    __tmp__ICMO=Self__UBMO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
    __tmp__JCMO=__tmp__ZBMO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__ICMO)->__id) {
    case __LIST__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__KCMO=__infix_equal_equal__WF1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__KCMO=__infix_equal_equal__LG1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __INTEGER_CST__: {
      __tmp__KCMO=__infix_equal_equal__2G1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __READ_LOCAL__: {
      __tmp__KCMO=__infix_equal_equal__WH1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__KCMO=__infix_equal_equal__MI1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__KCMO=__infix_equal_equal__IJ1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __REAL_CST__: {
      __tmp__KCMO=__infix_equal_equal__EK1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__KCMO=__infix_equal_equal__4K1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__KCMO=__infix_equal_equal__XL1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_SUB__: {
      __tmp__KCMO=__infix_equal_equal__TM1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_MUL__: {
      __tmp__KCMO=__infix_equal_equal__PN1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_DIV__: {
      __tmp__KCMO=__infix_equal_equal__LO1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_AND__: {
      __tmp__KCMO=__infix_equal_equal__HP1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__KCMO=__infix_equal_equal__DQ1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__KCMO=__infix_equal_equal__5Q1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __PUT_TO__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__KCMO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__KCMO=__infix_equal_equal__LS1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__KCMO=__infix_equal_equal__HT1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__KCMO=__infix_equal_equal__CZHO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__KCMO=__infix_equal_equal__SXFO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__KCMO=__infix_equal_equal__TBMO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__KCMO=__infix_equal_equal__OYFO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__KCMO=__infix_equal_equal__QCMO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__KCMO=__infix_equal_equal__J5KM(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_ADD__: {
      __tmp__KCMO=__infix_equal_equal__ZT1L(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_NOT__: {
      __tmp__KCMO=__infix_equal_equal__QB0M(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_MOD__: {
      __tmp__KCMO=__infix_equal_equal__KZFO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__KCMO=__infix_equal_equal__OTEP(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_INF__: {
      __tmp__KCMO=__infix_equal_equal__UZHO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__KCMO=__infix_equal_equal__Q0HO(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_OR__: {
      __tmp__KCMO=__infix_equal_equal__32QN(__tmp__ICMO,__tmp__JCMO);
    } break;
    case __EXPR_XOR__: {
      __tmp__KCMO=__infix_equal_equal__GOVO(__tmp__ICMO,__tmp__JCMO);
    } break;
    };
    __tmp__OCMO=__tmp__KCMO;
  } else {
    __tmp__OCMO=FALSE__;
  };
  return(__tmp__OCMO);
}

static __BOOLEAN __infix_equal_equal__OYFO(__EXPR_AND_LOGIC *Self__PYFO,void *other__QYFO)
// ({EXPR_AND_LOGIC},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_AND_LOGIC *__tmp__UYFO,*same__SYFO;
  void *__tmp__0YFO,*__tmp__1YFO,*__tmp__DZFO,*__tmp__EZFO;
  __BOOLEAN __tmp__2YFO,__tmp__IZFO,__tmp__FZFO,__tmp__JZFO;
  if (other__QYFO==NULL) {
    __tmp__UYFO=NULL;
  } else {
    switch (((struct ___OBJ *)other__QYFO)->__id) {
    case __LIST__: {
      __tmp__UYFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__UYFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__UYFO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__UYFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__UYFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__UYFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__UYFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__UYFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__UYFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__UYFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__UYFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__UYFO=NULL;
    } break;
    case __CAST__: {
      __tmp__UYFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__UYFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__UYFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__UYFO=((__EXPR_AND_LOGIC *)other__QYFO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__UYFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__UYFO=NULL;
    } break;
    }
  };
  same__SYFO=__tmp__UYFO;
  if (((void *)__tmp__UYFO != (void *)NULL)) {
    __tmp__0YFO=Self__PYFO->parent_expr_binary_logic__WJCL.left__NMEO;
    __tmp__1YFO=__tmp__UYFO->parent_expr_binary_logic__WJCL.left__NMEO;
    switch (((struct ___OBJ *)__tmp__0YFO)->__id) {
    case __LIST__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__2YFO=__infix_equal_equal__WF1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2YFO=__infix_equal_equal__LG1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__2YFO=__infix_equal_equal__2G1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__2YFO=__infix_equal_equal__WH1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2YFO=__infix_equal_equal__MI1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2YFO=__infix_equal_equal__IJ1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __REAL_CST__: {
      __tmp__2YFO=__infix_equal_equal__EK1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__2YFO=__infix_equal_equal__4K1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__2YFO=__infix_equal_equal__XL1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_SUB__: {
      __tmp__2YFO=__infix_equal_equal__TM1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_MUL__: {
      __tmp__2YFO=__infix_equal_equal__PN1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_DIV__: {
      __tmp__2YFO=__infix_equal_equal__LO1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_AND__: {
      __tmp__2YFO=__infix_equal_equal__HP1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2YFO=__infix_equal_equal__DQ1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2YFO=__infix_equal_equal__5Q1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __PUT_TO__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__2YFO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__2YFO=__infix_equal_equal__LS1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__2YFO=__infix_equal_equal__HT1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2YFO=__infix_equal_equal__CZHO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2YFO=__infix_equal_equal__SXFO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2YFO=__infix_equal_equal__TBMO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2YFO=__infix_equal_equal__OYFO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2YFO=__infix_equal_equal__QCMO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_NEG__: {
      __tmp__2YFO=__infix_equal_equal__J5KM(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_ADD__: {
      __tmp__2YFO=__infix_equal_equal__ZT1L(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_NOT__: {
      __tmp__2YFO=__infix_equal_equal__QB0M(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_MOD__: {
      __tmp__2YFO=__infix_equal_equal__KZFO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2YFO=__infix_equal_equal__OTEP(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_INF__: {
      __tmp__2YFO=__infix_equal_equal__UZHO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2YFO=__infix_equal_equal__Q0HO(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_OR__: {
      __tmp__2YFO=__infix_equal_equal__32QN(__tmp__0YFO,__tmp__1YFO);
    } break;
    case __EXPR_XOR__: {
      __tmp__2YFO=__infix_equal_equal__GOVO(__tmp__0YFO,__tmp__1YFO);
    } break;
    };
    __tmp__IZFO=__tmp__2YFO;
  } else {
    __tmp__IZFO=FALSE__;
  };
  if (__tmp__IZFO) {
    __tmp__DZFO=Self__PYFO->parent_expr_binary_logic__WJCL.right__RMEO;
    __tmp__EZFO=__tmp__UYFO->parent_expr_binary_logic__WJCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__DZFO)->__id) {
    case __LIST__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__FZFO=__infix_equal_equal__WF1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FZFO=__infix_equal_equal__LG1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__FZFO=__infix_equal_equal__2G1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__FZFO=__infix_equal_equal__WH1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FZFO=__infix_equal_equal__MI1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FZFO=__infix_equal_equal__IJ1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __REAL_CST__: {
      __tmp__FZFO=__infix_equal_equal__EK1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__FZFO=__infix_equal_equal__4K1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__FZFO=__infix_equal_equal__XL1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_SUB__: {
      __tmp__FZFO=__infix_equal_equal__TM1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_MUL__: {
      __tmp__FZFO=__infix_equal_equal__PN1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_DIV__: {
      __tmp__FZFO=__infix_equal_equal__LO1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_AND__: {
      __tmp__FZFO=__infix_equal_equal__HP1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FZFO=__infix_equal_equal__DQ1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FZFO=__infix_equal_equal__5Q1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __PUT_TO__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__FZFO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__FZFO=__infix_equal_equal__LS1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__FZFO=__infix_equal_equal__HT1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FZFO=__infix_equal_equal__CZHO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FZFO=__infix_equal_equal__SXFO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FZFO=__infix_equal_equal__TBMO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FZFO=__infix_equal_equal__OYFO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FZFO=__infix_equal_equal__QCMO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_NEG__: {
      __tmp__FZFO=__infix_equal_equal__J5KM(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_ADD__: {
      __tmp__FZFO=__infix_equal_equal__ZT1L(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_NOT__: {
      __tmp__FZFO=__infix_equal_equal__QB0M(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_MOD__: {
      __tmp__FZFO=__infix_equal_equal__KZFO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FZFO=__infix_equal_equal__OTEP(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_INF__: {
      __tmp__FZFO=__infix_equal_equal__UZHO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FZFO=__infix_equal_equal__Q0HO(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_OR__: {
      __tmp__FZFO=__infix_equal_equal__32QN(__tmp__DZFO,__tmp__EZFO);
    } break;
    case __EXPR_XOR__: {
      __tmp__FZFO=__infix_equal_equal__GOVO(__tmp__DZFO,__tmp__EZFO);
    } break;
    };
    __tmp__JZFO=__tmp__FZFO;
  } else {
    __tmp__JZFO=FALSE__;
  };
  return(__tmp__JZFO);
}

static __BOOLEAN __infix_equal_equal__QCMO(__EXPR_AND_AND_LOGIC *Self__RCMO,void *other__SCMO)
// ({EXPR_AND_AND_LOGIC},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_AND_AND_LOGIC *__tmp__WCMO,*same__UCMO;
  void *__tmp__2CMO,*__tmp__3CMO,*__tmp__FDMO,*__tmp__GDMO;
  __BOOLEAN __tmp__4CMO,__tmp__KDMO,__tmp__HDMO,__tmp__LDMO;
  if (other__SCMO==NULL) {
    __tmp__WCMO=NULL;
  } else {
    switch (((struct ___OBJ *)other__SCMO)->__id) {
    case __LIST__: {
      __tmp__WCMO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WCMO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WCMO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__WCMO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WCMO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__WCMO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WCMO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WCMO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WCMO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__WCMO=NULL;
    } break;
    case __ITEM__: {
      __tmp__WCMO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__WCMO=NULL;
    } break;
    case __CAST__: {
      __tmp__WCMO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__WCMO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__WCMO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WCMO=((__EXPR_AND_AND_LOGIC *)other__SCMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__WCMO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__WCMO=NULL;
    } break;
    }
  };
  same__UCMO=__tmp__WCMO;
  if (((void *)__tmp__WCMO != (void *)NULL)) {
    __tmp__2CMO=Self__RCMO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
    __tmp__3CMO=__tmp__WCMO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
    switch (((struct ___OBJ *)__tmp__2CMO)->__id) {
    case __LIST__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__4CMO=__infix_equal_equal__WF1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__4CMO=__infix_equal_equal__LG1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __INTEGER_CST__: {
      __tmp__4CMO=__infix_equal_equal__2G1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __READ_LOCAL__: {
      __tmp__4CMO=__infix_equal_equal__WH1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__4CMO=__infix_equal_equal__MI1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__4CMO=__infix_equal_equal__IJ1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __REAL_CST__: {
      __tmp__4CMO=__infix_equal_equal__EK1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__4CMO=__infix_equal_equal__4K1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__4CMO=__infix_equal_equal__XL1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_SUB__: {
      __tmp__4CMO=__infix_equal_equal__TM1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_MUL__: {
      __tmp__4CMO=__infix_equal_equal__PN1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_DIV__: {
      __tmp__4CMO=__infix_equal_equal__LO1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_AND__: {
      __tmp__4CMO=__infix_equal_equal__HP1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__4CMO=__infix_equal_equal__DQ1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__4CMO=__infix_equal_equal__5Q1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __PUT_TO__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__4CMO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__4CMO=__infix_equal_equal__LS1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__4CMO=__infix_equal_equal__HT1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__4CMO=__infix_equal_equal__CZHO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__4CMO=__infix_equal_equal__SXFO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__4CMO=__infix_equal_equal__TBMO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__4CMO=__infix_equal_equal__OYFO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__4CMO=__infix_equal_equal__QCMO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__4CMO=__infix_equal_equal__J5KM(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_ADD__: {
      __tmp__4CMO=__infix_equal_equal__ZT1L(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_NOT__: {
      __tmp__4CMO=__infix_equal_equal__QB0M(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_MOD__: {
      __tmp__4CMO=__infix_equal_equal__KZFO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__4CMO=__infix_equal_equal__OTEP(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_INF__: {
      __tmp__4CMO=__infix_equal_equal__UZHO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__4CMO=__infix_equal_equal__Q0HO(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_OR__: {
      __tmp__4CMO=__infix_equal_equal__32QN(__tmp__2CMO,__tmp__3CMO);
    } break;
    case __EXPR_XOR__: {
      __tmp__4CMO=__infix_equal_equal__GOVO(__tmp__2CMO,__tmp__3CMO);
    } break;
    };
    __tmp__KDMO=__tmp__4CMO;
  } else {
    __tmp__KDMO=FALSE__;
  };
  if (__tmp__KDMO) {
    __tmp__FDMO=Self__RCMO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
    __tmp__GDMO=__tmp__WCMO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__FDMO)->__id) {
    case __LIST__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__HDMO=__infix_equal_equal__WF1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__HDMO=__infix_equal_equal__LG1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __INTEGER_CST__: {
      __tmp__HDMO=__infix_equal_equal__2G1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __READ_LOCAL__: {
      __tmp__HDMO=__infix_equal_equal__WH1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HDMO=__infix_equal_equal__MI1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HDMO=__infix_equal_equal__IJ1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __REAL_CST__: {
      __tmp__HDMO=__infix_equal_equal__EK1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__HDMO=__infix_equal_equal__4K1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__HDMO=__infix_equal_equal__XL1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_SUB__: {
      __tmp__HDMO=__infix_equal_equal__TM1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_MUL__: {
      __tmp__HDMO=__infix_equal_equal__PN1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_DIV__: {
      __tmp__HDMO=__infix_equal_equal__LO1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_AND__: {
      __tmp__HDMO=__infix_equal_equal__HP1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HDMO=__infix_equal_equal__DQ1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HDMO=__infix_equal_equal__5Q1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __PUT_TO__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__HDMO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__HDMO=__infix_equal_equal__LS1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__HDMO=__infix_equal_equal__HT1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HDMO=__infix_equal_equal__CZHO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HDMO=__infix_equal_equal__SXFO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HDMO=__infix_equal_equal__TBMO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HDMO=__infix_equal_equal__OYFO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HDMO=__infix_equal_equal__QCMO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__HDMO=__infix_equal_equal__J5KM(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_ADD__: {
      __tmp__HDMO=__infix_equal_equal__ZT1L(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_NOT__: {
      __tmp__HDMO=__infix_equal_equal__QB0M(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_MOD__: {
      __tmp__HDMO=__infix_equal_equal__KZFO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HDMO=__infix_equal_equal__OTEP(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_INF__: {
      __tmp__HDMO=__infix_equal_equal__UZHO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HDMO=__infix_equal_equal__Q0HO(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_OR__: {
      __tmp__HDMO=__infix_equal_equal__32QN(__tmp__FDMO,__tmp__GDMO);
    } break;
    case __EXPR_XOR__: {
      __tmp__HDMO=__infix_equal_equal__GOVO(__tmp__FDMO,__tmp__GDMO);
    } break;
    };
    __tmp__LDMO=__tmp__HDMO;
  } else {
    __tmp__LDMO=FALSE__;
  };
  return(__tmp__LDMO);
}

static __BOOLEAN __infix_equal_equal__J5KM(__EXPR_NEG *Self__K5KM,void *other__L5KM)
// ({EXPR_NEG},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_NEG *__tmp__P5KM,*same__N5KM;
  void *__tmp__V5KM,*__tmp__W5KM;
  __BOOLEAN __tmp__X5KM,__tmp__05KM;
  if (other__L5KM==NULL) {
    __tmp__P5KM=NULL;
  } else {
    switch (((struct ___OBJ *)other__L5KM)->__id) {
    case __LIST__: {
      __tmp__P5KM=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__P5KM=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__P5KM=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__P5KM=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__P5KM=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__P5KM=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__P5KM=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__P5KM=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__P5KM=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__P5KM=NULL;
    } break;
    case __ITEM__: {
      __tmp__P5KM=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__P5KM=NULL;
    } break;
    case __CAST__: {
      __tmp__P5KM=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__P5KM=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__P5KM=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__P5KM=((__EXPR_NEG *)other__L5KM);
    } break;
    case __EXPR_ADD__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__P5KM=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__P5KM=NULL;
    } break;
    }
  };
  same__N5KM=__tmp__P5KM;
  if (((void *)__tmp__P5KM != (void *)NULL)) {
    __tmp__V5KM=Self__K5KM->parent_expr_unary__JZDL.right__XZDL;
    __tmp__W5KM=__tmp__P5KM->parent_expr_unary__JZDL.right__XZDL;
    switch (((struct ___OBJ *)__tmp__V5KM)->__id) {
    case __LIST__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__X5KM=__infix_equal_equal__WF1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXTERNAL_C__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__X5KM=__infix_equal_equal__LG1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __INTEGER_CST__: {
      __tmp__X5KM=__infix_equal_equal__2G1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __READ_LOCAL__: {
      __tmp__X5KM=__infix_equal_equal__WH1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__X5KM=__infix_equal_equal__MI1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__X5KM=__infix_equal_equal__IJ1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __REAL_CST__: {
      __tmp__X5KM=__infix_equal_equal__EK1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __CHARACTER_CST__: {
      __tmp__X5KM=__infix_equal_equal__4K1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __IS_EXPANDED__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__X5KM=__infix_equal_equal__XL1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_SUB__: {
      __tmp__X5KM=__infix_equal_equal__TM1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_MUL__: {
      __tmp__X5KM=__infix_equal_equal__PN1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_DIV__: {
      __tmp__X5KM=__infix_equal_equal__LO1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_AND__: {
      __tmp__X5KM=__infix_equal_equal__HP1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__X5KM=__infix_equal_equal__DQ1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__X5KM=__infix_equal_equal__5Q1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __PUT_TO__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __CAST__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__X5KM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__X5KM=__infix_equal_equal__LS1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__X5KM=__infix_equal_equal__HT1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__X5KM=__infix_equal_equal__CZHO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__X5KM=__infix_equal_equal__SXFO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__X5KM=__infix_equal_equal__TBMO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__X5KM=__infix_equal_equal__OYFO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__X5KM=__infix_equal_equal__QCMO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_NEG__: {
      __tmp__X5KM=__infix_equal_equal__J5KM(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_ADD__: {
      __tmp__X5KM=__infix_equal_equal__ZT1L(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_NOT__: {
      __tmp__X5KM=__infix_equal_equal__QB0M(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_MOD__: {
      __tmp__X5KM=__infix_equal_equal__KZFO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__X5KM=__infix_equal_equal__OTEP(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_INF__: {
      __tmp__X5KM=__infix_equal_equal__UZHO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__X5KM=__infix_equal_equal__Q0HO(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_OR__: {
      __tmp__X5KM=__infix_equal_equal__32QN(__tmp__V5KM,__tmp__W5KM);
    } break;
    case __EXPR_XOR__: {
      __tmp__X5KM=__infix_equal_equal__GOVO(__tmp__V5KM,__tmp__W5KM);
    } break;
    };
    __tmp__05KM=__tmp__X5KM;
  } else {
    __tmp__05KM=FALSE__;
  };
  return(__tmp__05KM);
}

static __BOOLEAN __infix_equal_equal__ZT1L(__EXPR_ADD *Self__0T1L,void *other__1T1L)
// ({EXPR_ADD},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_ADD *__tmp__5T1L,*same__3T1L;
  void *__tmp__FU1L,*__tmp__GU1L,*__tmp__OU1L,*__tmp__PU1L;
  __BOOLEAN __tmp__HU1L,__tmp__TU1L,__tmp__QU1L,__tmp__UU1L;
  if (other__1T1L==NULL) {
    __tmp__5T1L=NULL;
  } else {
    switch (((struct ___OBJ *)other__1T1L)->__id) {
    case __LIST__: {
      __tmp__5T1L=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__5T1L=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__5T1L=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__5T1L=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__5T1L=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__5T1L=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__5T1L=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__5T1L=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__5T1L=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__5T1L=NULL;
    } break;
    case __ITEM__: {
      __tmp__5T1L=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__5T1L=NULL;
    } break;
    case __CAST__: {
      __tmp__5T1L=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__5T1L=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__5T1L=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__5T1L=((__EXPR_ADD *)other__1T1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__5T1L=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__5T1L=NULL;
    } break;
    }
  };
  same__3T1L=__tmp__5T1L;
  if (((void *)__tmp__5T1L != (void *)NULL)) {
    __tmp__FU1L=Self__0T1L->parent_expr_binary__UZDL.left__PP1H;
    __tmp__GU1L=__tmp__5T1L->parent_expr_binary__UZDL.left__PP1H;
    switch (((struct ___OBJ *)__tmp__FU1L)->__id) {
    case __LIST__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__HU1L=__infix_equal_equal__WF1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__HU1L=__infix_equal_equal__LG1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__HU1L=__infix_equal_equal__2G1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__HU1L=__infix_equal_equal__WH1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__HU1L=__infix_equal_equal__MI1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__HU1L=__infix_equal_equal__IJ1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __REAL_CST__: {
      __tmp__HU1L=__infix_equal_equal__EK1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__HU1L=__infix_equal_equal__4K1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__HU1L=__infix_equal_equal__XL1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__HU1L=__infix_equal_equal__TM1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__HU1L=__infix_equal_equal__PN1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__HU1L=__infix_equal_equal__LO1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_AND__: {
      __tmp__HU1L=__infix_equal_equal__HP1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__HU1L=__infix_equal_equal__DQ1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__HU1L=__infix_equal_equal__5Q1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __PUT_TO__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__HU1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__HU1L=__infix_equal_equal__LS1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__HU1L=__infix_equal_equal__HT1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__HU1L=__infix_equal_equal__CZHO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__HU1L=__infix_equal_equal__SXFO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__HU1L=__infix_equal_equal__TBMO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__HU1L=__infix_equal_equal__OYFO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__HU1L=__infix_equal_equal__QCMO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__HU1L=__infix_equal_equal__J5KM(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__HU1L=__infix_equal_equal__ZT1L(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__HU1L=__infix_equal_equal__QB0M(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__HU1L=__infix_equal_equal__KZFO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__HU1L=__infix_equal_equal__OTEP(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_INF__: {
      __tmp__HU1L=__infix_equal_equal__UZHO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__HU1L=__infix_equal_equal__Q0HO(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_OR__: {
      __tmp__HU1L=__infix_equal_equal__32QN(__tmp__FU1L,__tmp__GU1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__HU1L=__infix_equal_equal__GOVO(__tmp__FU1L,__tmp__GU1L);
    } break;
    };
    __tmp__TU1L=__tmp__HU1L;
  } else {
    __tmp__TU1L=FALSE__;
  };
  if (__tmp__TU1L) {
    __tmp__OU1L=Self__0T1L->parent_expr_binary__UZDL.right__OP2H;
    __tmp__PU1L=__tmp__5T1L->parent_expr_binary__UZDL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__OU1L)->__id) {
    case __LIST__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__QU1L=__infix_equal_equal__WF1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXTERNAL_C__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QU1L=__infix_equal_equal__LG1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __INTEGER_CST__: {
      __tmp__QU1L=__infix_equal_equal__2G1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __READ_LOCAL__: {
      __tmp__QU1L=__infix_equal_equal__WH1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QU1L=__infix_equal_equal__MI1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QU1L=__infix_equal_equal__IJ1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __REAL_CST__: {
      __tmp__QU1L=__infix_equal_equal__EK1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __CHARACTER_CST__: {
      __tmp__QU1L=__infix_equal_equal__4K1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __IS_EXPANDED__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__QU1L=__infix_equal_equal__XL1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_SUB__: {
      __tmp__QU1L=__infix_equal_equal__TM1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_MUL__: {
      __tmp__QU1L=__infix_equal_equal__PN1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_DIV__: {
      __tmp__QU1L=__infix_equal_equal__LO1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_AND__: {
      __tmp__QU1L=__infix_equal_equal__HP1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QU1L=__infix_equal_equal__DQ1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QU1L=__infix_equal_equal__5Q1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __PUT_TO__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __CAST__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__QU1L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__QU1L=__infix_equal_equal__LS1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__QU1L=__infix_equal_equal__HT1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QU1L=__infix_equal_equal__CZHO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QU1L=__infix_equal_equal__SXFO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QU1L=__infix_equal_equal__TBMO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QU1L=__infix_equal_equal__OYFO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QU1L=__infix_equal_equal__QCMO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_NEG__: {
      __tmp__QU1L=__infix_equal_equal__J5KM(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_ADD__: {
      __tmp__QU1L=__infix_equal_equal__ZT1L(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_NOT__: {
      __tmp__QU1L=__infix_equal_equal__QB0M(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_MOD__: {
      __tmp__QU1L=__infix_equal_equal__KZFO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QU1L=__infix_equal_equal__OTEP(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_INF__: {
      __tmp__QU1L=__infix_equal_equal__UZHO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QU1L=__infix_equal_equal__Q0HO(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_OR__: {
      __tmp__QU1L=__infix_equal_equal__32QN(__tmp__OU1L,__tmp__PU1L);
    } break;
    case __EXPR_XOR__: {
      __tmp__QU1L=__infix_equal_equal__GOVO(__tmp__OU1L,__tmp__PU1L);
    } break;
    };
    __tmp__UU1L=__tmp__QU1L;
  } else {
    __tmp__UU1L=FALSE__;
  };
  return(__tmp__UU1L);
}

static __BOOLEAN __infix_equal_equal__QB0M(__EXPR_NOT *Self__RB0M,void *other__SB0M)
// ({EXPR_NOT},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_NOT *__tmp__WB0M,*same__UB0M;
  void *__tmp__2B0M,*__tmp__3B0M;
  __BOOLEAN __tmp__4B0M,__tmp__BC0M;
  if (other__SB0M==NULL) {
    __tmp__WB0M=NULL;
  } else {
    switch (((struct ___OBJ *)other__SB0M)->__id) {
    case __LIST__: {
      __tmp__WB0M=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__WB0M=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__WB0M=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__WB0M=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__WB0M=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__WB0M=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__WB0M=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__WB0M=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__WB0M=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__WB0M=NULL;
    } break;
    case __ITEM__: {
      __tmp__WB0M=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__WB0M=NULL;
    } break;
    case __CAST__: {
      __tmp__WB0M=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__WB0M=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__WB0M=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__WB0M=((__EXPR_NOT *)other__SB0M);
    } break;
    case __EXPR_MOD__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__WB0M=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__WB0M=NULL;
    } break;
    }
  };
  same__UB0M=__tmp__WB0M;
  if (((void *)__tmp__WB0M != (void *)NULL)) {
    __tmp__2B0M=Self__RB0M->parent_expr_unary__M5VL.right__XZDL;
    __tmp__3B0M=__tmp__WB0M->parent_expr_unary__M5VL.right__XZDL;
    switch (((struct ___OBJ *)__tmp__2B0M)->__id) {
    case __LIST__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__4B0M=__infix_equal_equal__WF1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXTERNAL_C__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__4B0M=__infix_equal_equal__LG1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __INTEGER_CST__: {
      __tmp__4B0M=__infix_equal_equal__2G1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __READ_LOCAL__: {
      __tmp__4B0M=__infix_equal_equal__WH1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__4B0M=__infix_equal_equal__MI1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__4B0M=__infix_equal_equal__IJ1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __REAL_CST__: {
      __tmp__4B0M=__infix_equal_equal__EK1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __CHARACTER_CST__: {
      __tmp__4B0M=__infix_equal_equal__4K1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __IS_EXPANDED__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__4B0M=__infix_equal_equal__XL1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_SUB__: {
      __tmp__4B0M=__infix_equal_equal__TM1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_MUL__: {
      __tmp__4B0M=__infix_equal_equal__PN1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_DIV__: {
      __tmp__4B0M=__infix_equal_equal__LO1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_AND__: {
      __tmp__4B0M=__infix_equal_equal__HP1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__4B0M=__infix_equal_equal__DQ1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__4B0M=__infix_equal_equal__5Q1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __PUT_TO__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __CAST__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__4B0M=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__4B0M=__infix_equal_equal__LS1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __READ_GLOBAL__: {
      __tmp__4B0M=__infix_equal_equal__HT1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__4B0M=__infix_equal_equal__CZHO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__4B0M=__infix_equal_equal__SXFO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__4B0M=__infix_equal_equal__TBMO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__4B0M=__infix_equal_equal__OYFO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__4B0M=__infix_equal_equal__QCMO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_NEG__: {
      __tmp__4B0M=__infix_equal_equal__J5KM(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_ADD__: {
      __tmp__4B0M=__infix_equal_equal__ZT1L(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_NOT__: {
      __tmp__4B0M=__infix_equal_equal__QB0M(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_MOD__: {
      __tmp__4B0M=__infix_equal_equal__KZFO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__4B0M=__infix_equal_equal__OTEP(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_INF__: {
      __tmp__4B0M=__infix_equal_equal__UZHO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__4B0M=__infix_equal_equal__Q0HO(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_OR__: {
      __tmp__4B0M=__infix_equal_equal__32QN(__tmp__2B0M,__tmp__3B0M);
    } break;
    case __EXPR_XOR__: {
      __tmp__4B0M=__infix_equal_equal__GOVO(__tmp__2B0M,__tmp__3B0M);
    } break;
    };
    __tmp__BC0M=__tmp__4B0M;
  } else {
    __tmp__BC0M=FALSE__;
  };
  return(__tmp__BC0M);
}

static __BOOLEAN __infix_equal_equal__KZFO(__EXPR_MOD *Self__LZFO,void *other__MZFO)
// ({EXPR_MOD},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_MOD *__tmp__QZFO,*same__OZFO;
  void *__tmp__WZFO,*__tmp__XZFO,*__tmp__5ZFO,*__tmp__A0FO;
  __BOOLEAN __tmp__YZFO,__tmp__E0FO,__tmp__B0FO,__tmp__F0FO;
  if (other__MZFO==NULL) {
    __tmp__QZFO=NULL;
  } else {
    switch (((struct ___OBJ *)other__MZFO)->__id) {
    case __LIST__: {
      __tmp__QZFO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__QZFO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QZFO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__QZFO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QZFO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__QZFO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__QZFO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__QZFO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QZFO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__QZFO=NULL;
    } break;
    case __ITEM__: {
      __tmp__QZFO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__QZFO=NULL;
    } break;
    case __CAST__: {
      __tmp__QZFO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__QZFO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__QZFO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__QZFO=((__EXPR_MOD *)other__MZFO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__QZFO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__QZFO=NULL;
    } break;
    }
  };
  same__OZFO=__tmp__QZFO;
  if (((void *)__tmp__QZFO != (void *)NULL)) {
    __tmp__WZFO=Self__LZFO->parent_expr_binary__PDWL.left__PP1H;
    __tmp__XZFO=__tmp__QZFO->parent_expr_binary__PDWL.left__PP1H;
    switch (((struct ___OBJ *)__tmp__WZFO)->__id) {
    case __LIST__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__YZFO=__infix_equal_equal__WF1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YZFO=__infix_equal_equal__LG1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __INTEGER_CST__: {
      __tmp__YZFO=__infix_equal_equal__2G1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __READ_LOCAL__: {
      __tmp__YZFO=__infix_equal_equal__WH1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YZFO=__infix_equal_equal__MI1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YZFO=__infix_equal_equal__IJ1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __REAL_CST__: {
      __tmp__YZFO=__infix_equal_equal__EK1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__YZFO=__infix_equal_equal__4K1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__YZFO=__infix_equal_equal__XL1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_SUB__: {
      __tmp__YZFO=__infix_equal_equal__TM1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_MUL__: {
      __tmp__YZFO=__infix_equal_equal__PN1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_DIV__: {
      __tmp__YZFO=__infix_equal_equal__LO1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_AND__: {
      __tmp__YZFO=__infix_equal_equal__HP1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YZFO=__infix_equal_equal__DQ1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YZFO=__infix_equal_equal__5Q1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __PUT_TO__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__YZFO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__YZFO=__infix_equal_equal__LS1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__YZFO=__infix_equal_equal__HT1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YZFO=__infix_equal_equal__CZHO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YZFO=__infix_equal_equal__SXFO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YZFO=__infix_equal_equal__TBMO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YZFO=__infix_equal_equal__OYFO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YZFO=__infix_equal_equal__QCMO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_NEG__: {
      __tmp__YZFO=__infix_equal_equal__J5KM(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_ADD__: {
      __tmp__YZFO=__infix_equal_equal__ZT1L(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_NOT__: {
      __tmp__YZFO=__infix_equal_equal__QB0M(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_MOD__: {
      __tmp__YZFO=__infix_equal_equal__KZFO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YZFO=__infix_equal_equal__OTEP(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_INF__: {
      __tmp__YZFO=__infix_equal_equal__UZHO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YZFO=__infix_equal_equal__Q0HO(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_OR__: {
      __tmp__YZFO=__infix_equal_equal__32QN(__tmp__WZFO,__tmp__XZFO);
    } break;
    case __EXPR_XOR__: {
      __tmp__YZFO=__infix_equal_equal__GOVO(__tmp__WZFO,__tmp__XZFO);
    } break;
    };
    __tmp__E0FO=__tmp__YZFO;
  } else {
    __tmp__E0FO=FALSE__;
  };
  if (__tmp__E0FO) {
    __tmp__5ZFO=Self__LZFO->parent_expr_binary__PDWL.right__OP2H;
    __tmp__A0FO=__tmp__QZFO->parent_expr_binary__PDWL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__5ZFO)->__id) {
    case __LIST__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__B0FO=__infix_equal_equal__WF1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__B0FO=__infix_equal_equal__LG1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __INTEGER_CST__: {
      __tmp__B0FO=__infix_equal_equal__2G1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __READ_LOCAL__: {
      __tmp__B0FO=__infix_equal_equal__WH1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__B0FO=__infix_equal_equal__MI1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__B0FO=__infix_equal_equal__IJ1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __REAL_CST__: {
      __tmp__B0FO=__infix_equal_equal__EK1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__B0FO=__infix_equal_equal__4K1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__B0FO=__infix_equal_equal__XL1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_SUB__: {
      __tmp__B0FO=__infix_equal_equal__TM1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_MUL__: {
      __tmp__B0FO=__infix_equal_equal__PN1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_DIV__: {
      __tmp__B0FO=__infix_equal_equal__LO1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_AND__: {
      __tmp__B0FO=__infix_equal_equal__HP1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__B0FO=__infix_equal_equal__DQ1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__B0FO=__infix_equal_equal__5Q1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __PUT_TO__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__B0FO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__B0FO=__infix_equal_equal__LS1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__B0FO=__infix_equal_equal__HT1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__B0FO=__infix_equal_equal__CZHO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__B0FO=__infix_equal_equal__SXFO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__B0FO=__infix_equal_equal__TBMO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__B0FO=__infix_equal_equal__OYFO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__B0FO=__infix_equal_equal__QCMO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_NEG__: {
      __tmp__B0FO=__infix_equal_equal__J5KM(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_ADD__: {
      __tmp__B0FO=__infix_equal_equal__ZT1L(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_NOT__: {
      __tmp__B0FO=__infix_equal_equal__QB0M(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_MOD__: {
      __tmp__B0FO=__infix_equal_equal__KZFO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__B0FO=__infix_equal_equal__OTEP(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_INF__: {
      __tmp__B0FO=__infix_equal_equal__UZHO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__B0FO=__infix_equal_equal__Q0HO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_OR__: {
      __tmp__B0FO=__infix_equal_equal__32QN(__tmp__5ZFO,__tmp__A0FO);
    } break;
    case __EXPR_XOR__: {
      __tmp__B0FO=__infix_equal_equal__GOVO(__tmp__5ZFO,__tmp__A0FO);
    } break;
    };
    __tmp__F0FO=__tmp__B0FO;
  } else {
    __tmp__F0FO=FALSE__;
  };
  return(__tmp__F0FO);
}

static __BOOLEAN __infix_equal_equal__OTEP(__EXPR_SUP_EQ *Self__PTEP,void *other__QTEP)
// ({EXPR_SUP_EQ},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_SUP_EQ *__tmp__UTEP,*same__STEP;
  void *__tmp__0TEP,*__tmp__1TEP,*__tmp__DUEP,*__tmp__EUEP;
  __BOOLEAN __tmp__2TEP,__tmp__IUEP,__tmp__FUEP,__tmp__JUEP;
  if (other__QTEP==NULL) {
    __tmp__UTEP=NULL;
  } else {
    switch (((struct ___OBJ *)other__QTEP)->__id) {
    case __LIST__: {
      __tmp__UTEP=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__UTEP=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__UTEP=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__UTEP=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__UTEP=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__UTEP=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__UTEP=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__UTEP=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__UTEP=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__UTEP=NULL;
    } break;
    case __ITEM__: {
      __tmp__UTEP=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__UTEP=NULL;
    } break;
    case __CAST__: {
      __tmp__UTEP=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__UTEP=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__UTEP=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__UTEP=((__EXPR_SUP_EQ *)other__QTEP);
    } break;
    case __EXPR_INF__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__UTEP=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__UTEP=NULL;
    } break;
    }
  };
  same__STEP=__tmp__UTEP;
  if (((void *)__tmp__UTEP != (void *)NULL)) {
    __tmp__0TEP=Self__PTEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    __tmp__1TEP=__tmp__UTEP->parent_expr_binary_cmp__EP1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__0TEP)->__id) {
    case __LIST__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__2TEP=__infix_equal_equal__WF1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXTERNAL_C__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2TEP=__infix_equal_equal__LG1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __INTEGER_CST__: {
      __tmp__2TEP=__infix_equal_equal__2G1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __READ_LOCAL__: {
      __tmp__2TEP=__infix_equal_equal__WH1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2TEP=__infix_equal_equal__MI1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2TEP=__infix_equal_equal__IJ1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __REAL_CST__: {
      __tmp__2TEP=__infix_equal_equal__EK1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __CHARACTER_CST__: {
      __tmp__2TEP=__infix_equal_equal__4K1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __IS_EXPANDED__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__2TEP=__infix_equal_equal__XL1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_SUB__: {
      __tmp__2TEP=__infix_equal_equal__TM1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__2TEP=__infix_equal_equal__PN1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__2TEP=__infix_equal_equal__LO1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_AND__: {
      __tmp__2TEP=__infix_equal_equal__HP1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2TEP=__infix_equal_equal__DQ1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2TEP=__infix_equal_equal__5Q1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __PUT_TO__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __CAST__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__2TEP=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__2TEP=__infix_equal_equal__LS1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __READ_GLOBAL__: {
      __tmp__2TEP=__infix_equal_equal__HT1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2TEP=__infix_equal_equal__CZHO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2TEP=__infix_equal_equal__SXFO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2TEP=__infix_equal_equal__TBMO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2TEP=__infix_equal_equal__OYFO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2TEP=__infix_equal_equal__QCMO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_NEG__: {
      __tmp__2TEP=__infix_equal_equal__J5KM(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__2TEP=__infix_equal_equal__ZT1L(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__2TEP=__infix_equal_equal__QB0M(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__2TEP=__infix_equal_equal__KZFO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2TEP=__infix_equal_equal__OTEP(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_INF__: {
      __tmp__2TEP=__infix_equal_equal__UZHO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2TEP=__infix_equal_equal__Q0HO(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_OR__: {
      __tmp__2TEP=__infix_equal_equal__32QN(__tmp__0TEP,__tmp__1TEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__2TEP=__infix_equal_equal__GOVO(__tmp__0TEP,__tmp__1TEP);
    } break;
    };
    __tmp__IUEP=__tmp__2TEP;
  } else {
    __tmp__IUEP=FALSE__;
  };
  if (__tmp__IUEP) {
    __tmp__DUEP=Self__PTEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    __tmp__EUEP=__tmp__UTEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__DUEP)->__id) {
    case __LIST__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__FUEP=__infix_equal_equal__WF1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXTERNAL_C__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FUEP=__infix_equal_equal__LG1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __INTEGER_CST__: {
      __tmp__FUEP=__infix_equal_equal__2G1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __READ_LOCAL__: {
      __tmp__FUEP=__infix_equal_equal__WH1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FUEP=__infix_equal_equal__MI1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FUEP=__infix_equal_equal__IJ1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __REAL_CST__: {
      __tmp__FUEP=__infix_equal_equal__EK1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __CHARACTER_CST__: {
      __tmp__FUEP=__infix_equal_equal__4K1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __IS_EXPANDED__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__FUEP=__infix_equal_equal__XL1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_SUB__: {
      __tmp__FUEP=__infix_equal_equal__TM1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__FUEP=__infix_equal_equal__PN1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__FUEP=__infix_equal_equal__LO1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_AND__: {
      __tmp__FUEP=__infix_equal_equal__HP1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FUEP=__infix_equal_equal__DQ1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FUEP=__infix_equal_equal__5Q1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __PUT_TO__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __CAST__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__FUEP=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__FUEP=__infix_equal_equal__LS1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __READ_GLOBAL__: {
      __tmp__FUEP=__infix_equal_equal__HT1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FUEP=__infix_equal_equal__CZHO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FUEP=__infix_equal_equal__SXFO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FUEP=__infix_equal_equal__TBMO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FUEP=__infix_equal_equal__OYFO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FUEP=__infix_equal_equal__QCMO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_NEG__: {
      __tmp__FUEP=__infix_equal_equal__J5KM(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__FUEP=__infix_equal_equal__ZT1L(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__FUEP=__infix_equal_equal__QB0M(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__FUEP=__infix_equal_equal__KZFO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FUEP=__infix_equal_equal__OTEP(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_INF__: {
      __tmp__FUEP=__infix_equal_equal__UZHO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FUEP=__infix_equal_equal__Q0HO(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_OR__: {
      __tmp__FUEP=__infix_equal_equal__32QN(__tmp__DUEP,__tmp__EUEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__FUEP=__infix_equal_equal__GOVO(__tmp__DUEP,__tmp__EUEP);
    } break;
    };
    __tmp__JUEP=__tmp__FUEP;
  } else {
    __tmp__JUEP=FALSE__;
  };
  return(__tmp__JUEP);
}

static __BOOLEAN __infix_equal_equal__UZHO(__EXPR_INF *Self__VZHO,void *other__WZHO)
// ({EXPR_INF},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_INF *__tmp__0ZHO,*same__YZHO;
  void *__tmp__A0HO,*__tmp__B0HO,*__tmp__J0HO,*__tmp__K0HO;
  __BOOLEAN __tmp__C0HO,__tmp__O0HO,__tmp__L0HO,__tmp__P0HO;
  if (other__WZHO==NULL) {
    __tmp__0ZHO=NULL;
  } else {
    switch (((struct ___OBJ *)other__WZHO)->__id) {
    case __LIST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0ZHO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0ZHO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__0ZHO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0ZHO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__0ZHO=NULL;
    } break;
    case __ITEM__: {
      __tmp__0ZHO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__0ZHO=NULL;
    } break;
    case __CAST__: {
      __tmp__0ZHO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__0ZHO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__0ZHO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__0ZHO=((__EXPR_INF *)other__WZHO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__0ZHO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__0ZHO=NULL;
    } break;
    }
  };
  same__YZHO=__tmp__0ZHO;
  if (((void *)__tmp__0ZHO != (void *)NULL)) {
    __tmp__A0HO=Self__VZHO->parent_expr_binary_cmp__WQ1M.left__HN2H;
    __tmp__B0HO=__tmp__0ZHO->parent_expr_binary_cmp__WQ1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__A0HO)->__id) {
    case __LIST__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__C0HO=__infix_equal_equal__WF1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__C0HO=__infix_equal_equal__LG1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __INTEGER_CST__: {
      __tmp__C0HO=__infix_equal_equal__2G1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __READ_LOCAL__: {
      __tmp__C0HO=__infix_equal_equal__WH1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__C0HO=__infix_equal_equal__MI1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__C0HO=__infix_equal_equal__IJ1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __REAL_CST__: {
      __tmp__C0HO=__infix_equal_equal__EK1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__C0HO=__infix_equal_equal__4K1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__C0HO=__infix_equal_equal__XL1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_SUB__: {
      __tmp__C0HO=__infix_equal_equal__TM1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_MUL__: {
      __tmp__C0HO=__infix_equal_equal__PN1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_DIV__: {
      __tmp__C0HO=__infix_equal_equal__LO1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_AND__: {
      __tmp__C0HO=__infix_equal_equal__HP1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__C0HO=__infix_equal_equal__DQ1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__C0HO=__infix_equal_equal__5Q1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __PUT_TO__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__C0HO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__C0HO=__infix_equal_equal__LS1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__C0HO=__infix_equal_equal__HT1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__C0HO=__infix_equal_equal__CZHO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__C0HO=__infix_equal_equal__SXFO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__C0HO=__infix_equal_equal__TBMO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__C0HO=__infix_equal_equal__OYFO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__C0HO=__infix_equal_equal__QCMO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_NEG__: {
      __tmp__C0HO=__infix_equal_equal__J5KM(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_ADD__: {
      __tmp__C0HO=__infix_equal_equal__ZT1L(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_NOT__: {
      __tmp__C0HO=__infix_equal_equal__QB0M(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_MOD__: {
      __tmp__C0HO=__infix_equal_equal__KZFO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__C0HO=__infix_equal_equal__OTEP(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_INF__: {
      __tmp__C0HO=__infix_equal_equal__UZHO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__C0HO=__infix_equal_equal__Q0HO(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_OR__: {
      __tmp__C0HO=__infix_equal_equal__32QN(__tmp__A0HO,__tmp__B0HO);
    } break;
    case __EXPR_XOR__: {
      __tmp__C0HO=__infix_equal_equal__GOVO(__tmp__A0HO,__tmp__B0HO);
    } break;
    };
    __tmp__O0HO=__tmp__C0HO;
  } else {
    __tmp__O0HO=FALSE__;
  };
  if (__tmp__O0HO) {
    __tmp__J0HO=Self__VZHO->parent_expr_binary_cmp__WQ1M.right__LN2H;
    __tmp__K0HO=__tmp__0ZHO->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__J0HO)->__id) {
    case __LIST__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__L0HO=__infix_equal_equal__WF1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__L0HO=__infix_equal_equal__LG1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __INTEGER_CST__: {
      __tmp__L0HO=__infix_equal_equal__2G1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __READ_LOCAL__: {
      __tmp__L0HO=__infix_equal_equal__WH1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__L0HO=__infix_equal_equal__MI1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__L0HO=__infix_equal_equal__IJ1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __REAL_CST__: {
      __tmp__L0HO=__infix_equal_equal__EK1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__L0HO=__infix_equal_equal__4K1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__L0HO=__infix_equal_equal__XL1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_SUB__: {
      __tmp__L0HO=__infix_equal_equal__TM1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_MUL__: {
      __tmp__L0HO=__infix_equal_equal__PN1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_DIV__: {
      __tmp__L0HO=__infix_equal_equal__LO1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_AND__: {
      __tmp__L0HO=__infix_equal_equal__HP1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__L0HO=__infix_equal_equal__DQ1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__L0HO=__infix_equal_equal__5Q1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __PUT_TO__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__L0HO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__L0HO=__infix_equal_equal__LS1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__L0HO=__infix_equal_equal__HT1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__L0HO=__infix_equal_equal__CZHO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__L0HO=__infix_equal_equal__SXFO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__L0HO=__infix_equal_equal__TBMO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__L0HO=__infix_equal_equal__OYFO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__L0HO=__infix_equal_equal__QCMO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_NEG__: {
      __tmp__L0HO=__infix_equal_equal__J5KM(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_ADD__: {
      __tmp__L0HO=__infix_equal_equal__ZT1L(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_NOT__: {
      __tmp__L0HO=__infix_equal_equal__QB0M(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_MOD__: {
      __tmp__L0HO=__infix_equal_equal__KZFO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__L0HO=__infix_equal_equal__OTEP(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_INF__: {
      __tmp__L0HO=__infix_equal_equal__UZHO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__L0HO=__infix_equal_equal__Q0HO(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_OR__: {
      __tmp__L0HO=__infix_equal_equal__32QN(__tmp__J0HO,__tmp__K0HO);
    } break;
    case __EXPR_XOR__: {
      __tmp__L0HO=__infix_equal_equal__GOVO(__tmp__J0HO,__tmp__K0HO);
    } break;
    };
    __tmp__P0HO=__tmp__L0HO;
  } else {
    __tmp__P0HO=FALSE__;
  };
  return(__tmp__P0HO);
}

static __BOOLEAN __infix_equal_equal__Q0HO(__EXPR_INF_EQ *Self__R0HO,void *other__S0HO)
// ({EXPR_INF_EQ},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_INF_EQ *__tmp__W0HO,*same__U0HO;
  void *__tmp__20HO,*__tmp__30HO,*__tmp__F1HO,*__tmp__G1HO;
  __BOOLEAN __tmp__40HO,__tmp__K1HO,__tmp__H1HO,__tmp__L1HO;
  if (other__S0HO==NULL) {
    __tmp__W0HO=NULL;
  } else {
    switch (((struct ___OBJ *)other__S0HO)->__id) {
    case __LIST__: {
      __tmp__W0HO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__W0HO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__W0HO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__W0HO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__W0HO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__W0HO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__W0HO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__W0HO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__W0HO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__W0HO=NULL;
    } break;
    case __ITEM__: {
      __tmp__W0HO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__W0HO=NULL;
    } break;
    case __CAST__: {
      __tmp__W0HO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__W0HO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__W0HO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__W0HO=((__EXPR_INF_EQ *)other__S0HO);
    } break;
    case __EXPR_OR__: {
      __tmp__W0HO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__W0HO=NULL;
    } break;
    }
  };
  same__U0HO=__tmp__W0HO;
  if (((void *)__tmp__W0HO != (void *)NULL)) {
    __tmp__20HO=Self__R0HO->parent_expr_binary_cmp__MR1M.left__HN2H;
    __tmp__30HO=__tmp__W0HO->parent_expr_binary_cmp__MR1M.left__HN2H;
    switch (((struct ___OBJ *)__tmp__20HO)->__id) {
    case __LIST__: {
      __tmp__40HO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__40HO=__infix_equal_equal__WF1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__40HO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__40HO=__infix_equal_equal__LG1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __INTEGER_CST__: {
      __tmp__40HO=__infix_equal_equal__2G1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __READ_LOCAL__: {
      __tmp__40HO=__infix_equal_equal__WH1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__40HO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__40HO=__infix_equal_equal__MI1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__40HO=__infix_equal_equal__IJ1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __REAL_CST__: {
      __tmp__40HO=__infix_equal_equal__EK1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__40HO=__infix_equal_equal__4K1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__40HO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__40HO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__40HO=__infix_equal_equal__XL1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_SUB__: {
      __tmp__40HO=__infix_equal_equal__TM1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_MUL__: {
      __tmp__40HO=__infix_equal_equal__PN1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_DIV__: {
      __tmp__40HO=__infix_equal_equal__LO1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_AND__: {
      __tmp__40HO=__infix_equal_equal__HP1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__40HO=__infix_equal_equal__DQ1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__40HO=__infix_equal_equal__5Q1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __PUT_TO__: {
      __tmp__40HO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__40HO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__40HO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__40HO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__40HO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__40HO=__infix_equal_equal__LS1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__40HO=__infix_equal_equal__HT1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__40HO=__infix_equal_equal__CZHO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__40HO=__infix_equal_equal__SXFO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__40HO=__infix_equal_equal__TBMO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__40HO=__infix_equal_equal__OYFO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__40HO=__infix_equal_equal__QCMO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_NEG__: {
      __tmp__40HO=__infix_equal_equal__J5KM(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_ADD__: {
      __tmp__40HO=__infix_equal_equal__ZT1L(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_NOT__: {
      __tmp__40HO=__infix_equal_equal__QB0M(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_MOD__: {
      __tmp__40HO=__infix_equal_equal__KZFO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__40HO=__infix_equal_equal__OTEP(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_INF__: {
      __tmp__40HO=__infix_equal_equal__UZHO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__40HO=__infix_equal_equal__Q0HO(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_OR__: {
      __tmp__40HO=__infix_equal_equal__32QN(__tmp__20HO,__tmp__30HO);
    } break;
    case __EXPR_XOR__: {
      __tmp__40HO=__infix_equal_equal__GOVO(__tmp__20HO,__tmp__30HO);
    } break;
    };
    __tmp__K1HO=__tmp__40HO;
  } else {
    __tmp__K1HO=FALSE__;
  };
  if (__tmp__K1HO) {
    __tmp__F1HO=Self__R0HO->parent_expr_binary_cmp__MR1M.right__LN2H;
    __tmp__G1HO=__tmp__W0HO->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__F1HO)->__id) {
    case __LIST__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__H1HO=__infix_equal_equal__WF1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__H1HO=__infix_equal_equal__LG1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __INTEGER_CST__: {
      __tmp__H1HO=__infix_equal_equal__2G1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __READ_LOCAL__: {
      __tmp__H1HO=__infix_equal_equal__WH1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__H1HO=__infix_equal_equal__MI1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__H1HO=__infix_equal_equal__IJ1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __REAL_CST__: {
      __tmp__H1HO=__infix_equal_equal__EK1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__H1HO=__infix_equal_equal__4K1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__H1HO=__infix_equal_equal__XL1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_SUB__: {
      __tmp__H1HO=__infix_equal_equal__TM1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_MUL__: {
      __tmp__H1HO=__infix_equal_equal__PN1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_DIV__: {
      __tmp__H1HO=__infix_equal_equal__LO1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_AND__: {
      __tmp__H1HO=__infix_equal_equal__HP1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__H1HO=__infix_equal_equal__DQ1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__H1HO=__infix_equal_equal__5Q1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __PUT_TO__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__H1HO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__H1HO=__infix_equal_equal__LS1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__H1HO=__infix_equal_equal__HT1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__H1HO=__infix_equal_equal__CZHO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__H1HO=__infix_equal_equal__SXFO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__H1HO=__infix_equal_equal__TBMO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__H1HO=__infix_equal_equal__OYFO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__H1HO=__infix_equal_equal__QCMO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_NEG__: {
      __tmp__H1HO=__infix_equal_equal__J5KM(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_ADD__: {
      __tmp__H1HO=__infix_equal_equal__ZT1L(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_NOT__: {
      __tmp__H1HO=__infix_equal_equal__QB0M(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_MOD__: {
      __tmp__H1HO=__infix_equal_equal__KZFO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__H1HO=__infix_equal_equal__OTEP(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_INF__: {
      __tmp__H1HO=__infix_equal_equal__UZHO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__H1HO=__infix_equal_equal__Q0HO(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_OR__: {
      __tmp__H1HO=__infix_equal_equal__32QN(__tmp__F1HO,__tmp__G1HO);
    } break;
    case __EXPR_XOR__: {
      __tmp__H1HO=__infix_equal_equal__GOVO(__tmp__F1HO,__tmp__G1HO);
    } break;
    };
    __tmp__L1HO=__tmp__H1HO;
  } else {
    __tmp__L1HO=FALSE__;
  };
  return(__tmp__L1HO);
}

static __BOOLEAN __infix_equal_equal__32QN(__EXPR_OR *Self__42QN,void *other__52QN)
// ({EXPR_OR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_OR *__tmp__D3QN,*same__B3QN;
  void *__tmp__J3QN,*__tmp__K3QN,*__tmp__S3QN,*__tmp__T3QN;
  __BOOLEAN __tmp__L3QN,__tmp__X3QN,__tmp__U3QN,__tmp__Y3QN;
  if (other__52QN==NULL) {
    __tmp__D3QN=NULL;
  } else {
    switch (((struct ___OBJ *)other__52QN)->__id) {
    case __LIST__: {
      __tmp__D3QN=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__D3QN=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__D3QN=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__D3QN=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__D3QN=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__D3QN=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__D3QN=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__D3QN=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__D3QN=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__D3QN=NULL;
    } break;
    case __ITEM__: {
      __tmp__D3QN=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__D3QN=NULL;
    } break;
    case __CAST__: {
      __tmp__D3QN=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__D3QN=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__D3QN=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__D3QN=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__D3QN=((__EXPR_OR *)other__52QN);
    } break;
    case __EXPR_XOR__: {
      __tmp__D3QN=NULL;
    } break;
    }
  };
  same__B3QN=__tmp__D3QN;
  if (((void *)__tmp__D3QN != (void *)NULL)) {
    __tmp__J3QN=Self__42QN->parent_expr_binary__ET1M.left__PP1H;
    __tmp__K3QN=__tmp__D3QN->parent_expr_binary__ET1M.left__PP1H;
    switch (((struct ___OBJ *)__tmp__J3QN)->__id) {
    case __LIST__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__L3QN=__infix_equal_equal__WF1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXTERNAL_C__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__L3QN=__infix_equal_equal__LG1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __INTEGER_CST__: {
      __tmp__L3QN=__infix_equal_equal__2G1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __READ_LOCAL__: {
      __tmp__L3QN=__infix_equal_equal__WH1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__L3QN=__infix_equal_equal__MI1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__L3QN=__infix_equal_equal__IJ1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __REAL_CST__: {
      __tmp__L3QN=__infix_equal_equal__EK1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __CHARACTER_CST__: {
      __tmp__L3QN=__infix_equal_equal__4K1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __IS_EXPANDED__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__L3QN=__infix_equal_equal__XL1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_SUB__: {
      __tmp__L3QN=__infix_equal_equal__TM1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_MUL__: {
      __tmp__L3QN=__infix_equal_equal__PN1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_DIV__: {
      __tmp__L3QN=__infix_equal_equal__LO1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_AND__: {
      __tmp__L3QN=__infix_equal_equal__HP1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__L3QN=__infix_equal_equal__DQ1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__L3QN=__infix_equal_equal__5Q1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __PUT_TO__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __CAST__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__L3QN=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__L3QN=__infix_equal_equal__LS1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __READ_GLOBAL__: {
      __tmp__L3QN=__infix_equal_equal__HT1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__L3QN=__infix_equal_equal__CZHO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__L3QN=__infix_equal_equal__SXFO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__L3QN=__infix_equal_equal__TBMO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__L3QN=__infix_equal_equal__OYFO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__L3QN=__infix_equal_equal__QCMO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_NEG__: {
      __tmp__L3QN=__infix_equal_equal__J5KM(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_ADD__: {
      __tmp__L3QN=__infix_equal_equal__ZT1L(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_NOT__: {
      __tmp__L3QN=__infix_equal_equal__QB0M(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_MOD__: {
      __tmp__L3QN=__infix_equal_equal__KZFO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__L3QN=__infix_equal_equal__OTEP(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_INF__: {
      __tmp__L3QN=__infix_equal_equal__UZHO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__L3QN=__infix_equal_equal__Q0HO(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_OR__: {
      __tmp__L3QN=__infix_equal_equal__32QN(__tmp__J3QN,__tmp__K3QN);
    } break;
    case __EXPR_XOR__: {
      __tmp__L3QN=__infix_equal_equal__GOVO(__tmp__J3QN,__tmp__K3QN);
    } break;
    };
    __tmp__X3QN=__tmp__L3QN;
  } else {
    __tmp__X3QN=FALSE__;
  };
  if (__tmp__X3QN) {
    __tmp__S3QN=Self__42QN->parent_expr_binary__ET1M.right__OP2H;
    __tmp__T3QN=__tmp__D3QN->parent_expr_binary__ET1M.right__OP2H;
    switch (((struct ___OBJ *)__tmp__S3QN)->__id) {
    case __LIST__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__U3QN=__infix_equal_equal__WF1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXTERNAL_C__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__U3QN=__infix_equal_equal__LG1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __INTEGER_CST__: {
      __tmp__U3QN=__infix_equal_equal__2G1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __READ_LOCAL__: {
      __tmp__U3QN=__infix_equal_equal__WH1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__U3QN=__infix_equal_equal__MI1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__U3QN=__infix_equal_equal__IJ1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __REAL_CST__: {
      __tmp__U3QN=__infix_equal_equal__EK1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __CHARACTER_CST__: {
      __tmp__U3QN=__infix_equal_equal__4K1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __IS_EXPANDED__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__U3QN=__infix_equal_equal__XL1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_SUB__: {
      __tmp__U3QN=__infix_equal_equal__TM1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_MUL__: {
      __tmp__U3QN=__infix_equal_equal__PN1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_DIV__: {
      __tmp__U3QN=__infix_equal_equal__LO1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_AND__: {
      __tmp__U3QN=__infix_equal_equal__HP1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__U3QN=__infix_equal_equal__DQ1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__U3QN=__infix_equal_equal__5Q1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __PUT_TO__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __CAST__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__U3QN=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__U3QN=__infix_equal_equal__LS1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __READ_GLOBAL__: {
      __tmp__U3QN=__infix_equal_equal__HT1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__U3QN=__infix_equal_equal__CZHO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__U3QN=__infix_equal_equal__SXFO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__U3QN=__infix_equal_equal__TBMO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__U3QN=__infix_equal_equal__OYFO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__U3QN=__infix_equal_equal__QCMO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_NEG__: {
      __tmp__U3QN=__infix_equal_equal__J5KM(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_ADD__: {
      __tmp__U3QN=__infix_equal_equal__ZT1L(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_NOT__: {
      __tmp__U3QN=__infix_equal_equal__QB0M(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_MOD__: {
      __tmp__U3QN=__infix_equal_equal__KZFO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__U3QN=__infix_equal_equal__OTEP(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_INF__: {
      __tmp__U3QN=__infix_equal_equal__UZHO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__U3QN=__infix_equal_equal__Q0HO(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_OR__: {
      __tmp__U3QN=__infix_equal_equal__32QN(__tmp__S3QN,__tmp__T3QN);
    } break;
    case __EXPR_XOR__: {
      __tmp__U3QN=__infix_equal_equal__GOVO(__tmp__S3QN,__tmp__T3QN);
    } break;
    };
    __tmp__Y3QN=__tmp__U3QN;
  } else {
    __tmp__Y3QN=FALSE__;
  };
  return(__tmp__Y3QN);
}

static __BOOLEAN __infix_equal_equal__GOVO(__EXPR_XOR *Self__HOVO,void *other__IOVO)
// ({EXPR_XOR},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __EXPR_XOR *__tmp__MOVO,*same__KOVO;
  void *__tmp__SOVO,*__tmp__TOVO,*__tmp__1OVO,*__tmp__2OVO;
  __BOOLEAN __tmp__UOVO,__tmp__APVO,__tmp__3OVO,__tmp__BPVO;
  if (other__IOVO==NULL) {
    __tmp__MOVO=NULL;
  } else {
    switch (((struct ___OBJ *)other__IOVO)->__id) {
    case __LIST__: {
      __tmp__MOVO=NULL;
    } break;
    case __STRING_CST__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXTERNAL_C__: {
      __tmp__MOVO=NULL;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__MOVO=NULL;
    } break;
    case __INTEGER_CST__: {
      __tmp__MOVO=NULL;
    } break;
    case __READ_LOCAL__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__MOVO=NULL;
    } break;
    case __REAL_CST__: {
      __tmp__MOVO=NULL;
    } break;
    case __CHARACTER_CST__: {
      __tmp__MOVO=NULL;
    } break;
    case __IS_EXPANDED__: {
      __tmp__MOVO=NULL;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_SUP__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_SUB__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_MUL__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_DIV__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_AND__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__MOVO=NULL;
    } break;
    case __PUT_TO__: {
      __tmp__MOVO=NULL;
    } break;
    case __ITEM__: {
      __tmp__MOVO=NULL;
    } break;
    case __SIZE_OF__: {
      __tmp__MOVO=NULL;
    } break;
    case __CAST__: {
      __tmp__MOVO=NULL;
    } break;
    case __CALL_SLOT__: {
      __tmp__MOVO=NULL;
    } break;
    case __READ_SLOT__: {
      __tmp__MOVO=NULL;
    } break;
    case __READ_GLOBAL__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_NEG__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_ADD__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_NOT__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_MOD__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_INF__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_OR__: {
      __tmp__MOVO=NULL;
    } break;
    case __EXPR_XOR__: {
      __tmp__MOVO=((__EXPR_XOR *)other__IOVO);
    } break;
    }
  };
  same__KOVO=__tmp__MOVO;
  if (((void *)__tmp__MOVO != (void *)NULL)) {
    __tmp__SOVO=Self__HOVO->parent_expr_binary__UA5N.left__PP1H;
    __tmp__TOVO=__tmp__MOVO->parent_expr_binary__UA5N.left__PP1H;
    switch (((struct ___OBJ *)__tmp__SOVO)->__id) {
    case __LIST__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__UOVO=__infix_equal_equal__WF1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__UOVO=__infix_equal_equal__LG1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __INTEGER_CST__: {
      __tmp__UOVO=__infix_equal_equal__2G1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __READ_LOCAL__: {
      __tmp__UOVO=__infix_equal_equal__WH1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__UOVO=__infix_equal_equal__MI1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__UOVO=__infix_equal_equal__IJ1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __REAL_CST__: {
      __tmp__UOVO=__infix_equal_equal__EK1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__UOVO=__infix_equal_equal__4K1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__UOVO=__infix_equal_equal__XL1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_SUB__: {
      __tmp__UOVO=__infix_equal_equal__TM1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_MUL__: {
      __tmp__UOVO=__infix_equal_equal__PN1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_DIV__: {
      __tmp__UOVO=__infix_equal_equal__LO1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_AND__: {
      __tmp__UOVO=__infix_equal_equal__HP1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__UOVO=__infix_equal_equal__DQ1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__UOVO=__infix_equal_equal__5Q1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __PUT_TO__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__UOVO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__UOVO=__infix_equal_equal__LS1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__UOVO=__infix_equal_equal__HT1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__UOVO=__infix_equal_equal__CZHO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__UOVO=__infix_equal_equal__SXFO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__UOVO=__infix_equal_equal__TBMO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__UOVO=__infix_equal_equal__OYFO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__UOVO=__infix_equal_equal__QCMO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_NEG__: {
      __tmp__UOVO=__infix_equal_equal__J5KM(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_ADD__: {
      __tmp__UOVO=__infix_equal_equal__ZT1L(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_NOT__: {
      __tmp__UOVO=__infix_equal_equal__QB0M(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_MOD__: {
      __tmp__UOVO=__infix_equal_equal__KZFO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__UOVO=__infix_equal_equal__OTEP(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_INF__: {
      __tmp__UOVO=__infix_equal_equal__UZHO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__UOVO=__infix_equal_equal__Q0HO(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_OR__: {
      __tmp__UOVO=__infix_equal_equal__32QN(__tmp__SOVO,__tmp__TOVO);
    } break;
    case __EXPR_XOR__: {
      __tmp__UOVO=__infix_equal_equal__GOVO(__tmp__SOVO,__tmp__TOVO);
    } break;
    };
    __tmp__APVO=__tmp__UOVO;
  } else {
    __tmp__APVO=FALSE__;
  };
  if (__tmp__APVO) {
    __tmp__1OVO=Self__HOVO->parent_expr_binary__UA5N.right__OP2H;
    __tmp__2OVO=__tmp__MOVO->parent_expr_binary__UA5N.right__OP2H;
    switch (((struct ___OBJ *)__tmp__1OVO)->__id) {
    case __LIST__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __STRING_CST__: {
      __tmp__3OVO=__infix_equal_equal__WF1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXTERNAL_C__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__3OVO=__infix_equal_equal__LG1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __INTEGER_CST__: {
      __tmp__3OVO=__infix_equal_equal__2G1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __READ_LOCAL__: {
      __tmp__3OVO=__infix_equal_equal__WH1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__3OVO=__infix_equal_equal__MI1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__3OVO=__infix_equal_equal__IJ1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __REAL_CST__: {
      __tmp__3OVO=__infix_equal_equal__EK1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __CHARACTER_CST__: {
      __tmp__3OVO=__infix_equal_equal__4K1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __IS_EXPANDED__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__3OVO=__infix_equal_equal__XL1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_SUB__: {
      __tmp__3OVO=__infix_equal_equal__TM1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_MUL__: {
      __tmp__3OVO=__infix_equal_equal__PN1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_DIV__: {
      __tmp__3OVO=__infix_equal_equal__LO1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_AND__: {
      __tmp__3OVO=__infix_equal_equal__HP1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__3OVO=__infix_equal_equal__DQ1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__3OVO=__infix_equal_equal__5Q1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __PUT_TO__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __ITEM__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __SIZE_OF__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __CAST__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __CALL_SLOT__: {
      __tmp__3OVO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__3OVO=__infix_equal_equal__LS1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__3OVO=__infix_equal_equal__HT1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__3OVO=__infix_equal_equal__CZHO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__3OVO=__infix_equal_equal__SXFO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__3OVO=__infix_equal_equal__TBMO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__3OVO=__infix_equal_equal__OYFO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__3OVO=__infix_equal_equal__QCMO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_NEG__: {
      __tmp__3OVO=__infix_equal_equal__J5KM(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_ADD__: {
      __tmp__3OVO=__infix_equal_equal__ZT1L(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_NOT__: {
      __tmp__3OVO=__infix_equal_equal__QB0M(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_MOD__: {
      __tmp__3OVO=__infix_equal_equal__KZFO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__3OVO=__infix_equal_equal__OTEP(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_INF__: {
      __tmp__3OVO=__infix_equal_equal__UZHO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__3OVO=__infix_equal_equal__Q0HO(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_OR__: {
      __tmp__3OVO=__infix_equal_equal__32QN(__tmp__1OVO,__tmp__2OVO);
    } break;
    case __EXPR_XOR__: {
      __tmp__3OVO=__infix_equal_equal__GOVO(__tmp__1OVO,__tmp__2OVO);
    } break;
    };
    __tmp__BPVO=__tmp__3OVO;
  } else {
    __tmp__BPVO=FALSE__;
  };
  return(__tmp__BPVO);
}

static __BOOLEAN is_seq_list__PK2M(void *l__RK2M)
// ({NULLxLIST}) With resultNo recursive, No inlinable.
{
  __INTEGER j__UK2M;
  __BOOLEAN result__TK2M;
  void **__tmp__Q45Q;
  result__TK2M=FALSE__;
  j__UK2M=((__FAST_ARRAYoLISTo *)seq_list__DXRG)->parent_arrayed_collection__CXRG.upper__SU4G;
  __tmp__Q45Q=((__FAST_ARRAYoLISTo *)seq_list__DXRG)->parent_arrayed_collection__CXRG.storage__QV4G;
  while (((j__UK2M >=  0) && (! result__TK2M))) {
    result__TK2M=((void *)((void **)__tmp__Q45Q)[j__UK2M] == (void *)l__RK2M);
    j__UK2M=(__INTEGER)(j__UK2M -  1);
  };
  return(result__TK2M);
}

static __INTEGER require_count__MNCN(__LOCAL *Self__NNCN)
// ({LOCAL}) With resultNo recursive, No inlinable.
{
  __INTEGER result__PNCN;
  result__PNCN= 0;
  if (((void *)Self__NNCN->parent_variable__B2LC.require_first__DAEH != (void *)NULL)) {
    if (((void *)Self__NNCN->parent_variable__B2LC.require_list__UAEH != (void *)NULL)) {
      result__PNCN=(__INTEGER)( 1 + (__INTEGER)(((__FAST_ARRAYoWRITEo *)Self__NNCN->parent_variable__B2LC.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI +  1));
    } else {
      result__PNCN= 1;
    };
  };
  return(result__PNCN);
}

static __INTEGER require_count__IM2M(__SLOT_DATA *Self__JM2M)
// ({SLOT_DATA}) With resultNo recursive, No inlinable.
{
  __INTEGER result__LM2M;
  result__LM2M= 0;
  if (((void *)Self__JM2M->parent_variable__AJZD.require_first__DAEH != (void *)NULL)) {
    if (((void *)Self__JM2M->parent_variable__AJZD.require_list__UAEH != (void *)NULL)) {
      result__LM2M=(__INTEGER)( 1 + (__INTEGER)(((__FAST_ARRAYoWRITEo *)Self__JM2M->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI +  1));
    } else {
      result__LM2M= 1;
    };
  };
  return(result__LM2M);
}

static __BOOLEAN is_saturated__13QN(__INTEGER_CST *Self__23QN)
// ({INTEGER_CST}) With resultNo recursive, No inlinable.
{
  void *__tmp__N4QN;
  void *__tmp__O4QN;
  __STRING_CONSTANT *Self__2FCO;
  __BOOLEAN result__43QN;
  result__43QN=FALSE__;
  if (is_signed__WFKN(Self__23QN)) {
    result__43QN=(Self__23QN->value__PAZD == (__INTEGER)(-  1));
  } else {
    __tmp__N4QN=((__TYPE_FULL *)Self__23QN->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL;
    switch (((struct ___OBJ *)__tmp__N4QN)->__id) {
    case __TYPE__: {
      __tmp__O4QN=((__PROTOTYPE *)((__TYPE *)__tmp__N4QN)->prototype__RD)->parent_named__QD.name__1QB;
    } break;
    case __TYPE_NULL__: {
      __tmp__O4QN=(&__string_59);
    } break;
    case __TYPE_VOID__: {
      __tmp__O4QN=(&__string_2);
    } break;
    case __TYPE_CONTEXT__: {
      __tmp__O4QN=(&__string_44);
    } break;
    case __TYPE_ID__: {
      __tmp__O4QN=(&__string_46);
    } break;
    case __TYPE_GENERIC__: {
      __tmp__O4QN=((__TYPE_GENERIC *)__tmp__N4QN)->name__2R2B;
    } break;
    case __PROFIL_BLOCK__: {
      __tmp__O4QN=((__PROFIL_BLOCK *)__tmp__N4QN)->parent_profil__GHAG.name__XJEI;
    } break;
    };
    Self__2FCO=((__STRING_CONSTANT *)__tmp__O4QN);
    if (((void *)Self__2FCO == (void *)(&__string_47))) {
      result__43QN=FALSE__;
    };
    if (((void *)Self__2FCO == (void *)(&__string_48))) {
      result__43QN=(Self__23QN->value__PAZD ==  4294967295LU);
    };
    if (((void *)Self__2FCO == (void *)(&__string_49))) {
      result__43QN=(Self__23QN->value__PAZD ==  65535);
    };
    if (((void *)Self__2FCO == (void *)(&__string_50))) {
      result__43QN=(Self__23QN->value__PAZD ==  255);
    };
  };
  return(result__43QN);
}

static __INTEGER_64 to_power__PCRN(__INTEGER_CST *Self__QCRN)
// ({INTEGER_CST}) With resultNo recursive, No inlinable.
{
  __INTEGER_64 result__SCRN,val__VCRN;
  result__SCRN= 0;
  val__VCRN=Self__QCRN->value__PAZD;
  if ((val__VCRN ==  0)) {
    result__SCRN=((__INTEGER_64 )(__INTEGER)(-  1));
  } else {
    while (((__INTEGER_64)(val__VCRN &  1) ==  0)) {
      val__VCRN=(__INTEGER_64)(val__VCRN >>  1);
      result__SCRN=(__INTEGER_64)(result__SCRN +  1);
    };
    if ((val__VCRN !=  1)) {
      result__SCRN=((__INTEGER_64 )(__INTEGER)(-  1));
    };
  };
  return(result__SCRN);
}

static void* get_last_value__FTPL(__SLOT_DATA *Self__GTPL,void *rec__HTPL)
// ({SLOT_DATA},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultNo recursive, No inlinable.
{
  void *result__JTPL,*__tmp__LVPL,*__tmp__JWPL,*__tmp__IYPL,*__tmp__AZPL;
  void *__tmp__C4PL,*__tmp__MDQL,*__tmp__HFQL,*__tmp__4HQL;
  void *rd__LTPL,*__tmp__QYPL,*__tmp__BZPL,*__tmp__E4PL;
  void *rd_loc__MTPL,*__tmp__FVPL,*__tmp__MVPL,*__tmp__KWPL;
  void *wrt_slot__NTPL,*__tmp__JVPL,*__tmp__HWPL,*__tmp__HYPL;
  void *__tmp__4YPL,*__tmp__GFQL,*__tmp__3HQL;
  void *l__OTPL,*__tmp__YYPL,*__tmp__R4PL;
  void *g__PTPL,*__tmp__1YPL,*__tmp__U4PL;
  __INTEGER my_require_count__RTPL,__tmp__4VPL,Self__KOJN,Self__WH3Q;
  __INTEGER up__XH3Q;
  void *pb__STPL,*__tmp__VUPL;
  void *__tmp__SUPL;
  void *__tmp__UUPL;
  void *__tmp__IVPL,*__tmp__GWPL,*__tmp__GYPL,*__tmp__3YPL,*__tmp__B4PL;
  void *__tmp__FFQL,*__tmp__SHQL,*__tmp__2HQL;
  void *__tmp__WYPL,*__tmp__ZYPL,*__tmp__LZPL,*__tmp__Z1PL,*__tmp__P4PL;
  void *__tmp__S4PL;
  __READ_LOCAL *Self__TPFQ,*Self__VPFQ,*Self__BQFQ,*Self__DQFQ;
  __READ_LOCAL *Self__FQFQ,*Self__HQFQ,*Self__WQFQ,*Self__YQFQ;
  __READ_LOCAL *Self__0QFQ,*Self__2QFQ;
  __READ_GLOBAL *Self__WPFQ,*Self__EQFQ,*Self__IQFQ,*Self__ZQFQ;
  __READ_GLOBAL *Self__3QFQ;
  __STRING_CST *Self__XPFQ;
  __PROTOTYPE_CST *Self__YPFQ;
  __INTEGER_CST *Self__ZPFQ;
  __REAL_CST *Self__1PFQ;
  __CHARACTER_CST *Self__3PFQ;
  __IS_EXPANDED *Self__4PFQ;
  __POSITION __tmp__THQL;
  __BOOLEAN is_rec_ok__QTPL,__tmp__ZXPL,__tmp__4XPL,__tmp__JYPL;
  __BOOLEAN __tmp__V3PL,__tmp__Y3PL,__tmp__W4PL,__tmp__ODQL,__tmp__RFQL;
  __BOOLEAN __tmp__YEQL,__tmp__HHQL;
  void **__tmp__205Q;
  result__JTPL=NULL;
  rd__LTPL=NULL;
  rd_loc__MTPL=NULL;
  wrt_slot__NTPL=NULL;
  l__OTPL=NULL;
  g__PTPL=NULL;
  is_rec_ok__QTPL=FALSE__;
  my_require_count__RTPL= 0;
  pb__STPL=NULL;
  if ((((! mode_recursive__WYUC) && ((void *)loop_invariant__RKAL == (void *)NULL)) && ((void *)Self__GTPL->last_write__Y5IL != (void *)NULL))) {
    my_require_count__RTPL=require_count__IM2M(Self__GTPL);
    if (((void *)rec__HTPL != (void *)NULL)) {
      switch (((struct ___OBJ *)rec__HTPL)->__id) {
      case __LIST__: {
        __tmp__SUPL=static_type__GIQG(rec__HTPL);
      } break;
      case __STRING_CST__: {
        __tmp__SUPL=((__STRING_CST *)rec__HTPL)->parent_constant__5F.static_type__F4YD;
      } break;
      case __EXTERNAL_C__: {
        __tmp__SUPL=((__EXTERNAL_C *)rec__HTPL)->static_type__UXZD;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__SUPL=((__PROTOTYPE_CST *)rec__HTPL)->parent_constant__E3LC.static_type__F4YD;
      } break;
      case __INTEGER_CST__: {
        __tmp__SUPL=((__INTEGER_CST *)rec__HTPL)->parent_constant__P3LC.static_type__F4YD;
      } break;
      case __READ_LOCAL__: {
        __tmp__SUPL=((__LOCAL *)((__READ_LOCAL *)rec__HTPL)->local__ALZD)->parent_variable__B2LC.type__125F;
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__SUPL=static_type__0N1H(rec__HTPL);
      } break;
      case __EXPR_EQUAL__: {
        __tmp__SUPL=static_type__TO1H();
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__SUPL=static_type__YO1H();
      } break;
      case __REAL_CST__: {
        __tmp__SUPL=((__REAL_CST *)rec__HTPL)->parent_constant__M3JH.static_type__F4YD;
      } break;
      case __CHARACTER_CST__: {
        __tmp__SUPL=((__CHARACTER_CST *)rec__HTPL)->parent_constant__53JH.static_type__F4YD;
      } break;
      case __IS_EXPANDED__: {
        __tmp__SUPL=static_type__3O1H();
      } break;
      case __GET_TYPE_ID__: {
        __tmp__SUPL=static_type__CP1H();
      } break;
      case __EXPR_SUP__: {
        __tmp__SUPL=static_type__HP1H();
      } break;
      case __EXPR_SUB__: {
        __tmp__SUPL=static_type__MP1H(rec__HTPL);
      } break;
      case __EXPR_MUL__: {
        __tmp__SUPL=static_type__SP1H(rec__HTPL);
      } break;
      case __EXPR_DIV__: {
        __tmp__SUPL=static_type__XP1H(rec__HTPL);
      } break;
      case __EXPR_AND__: {
        __tmp__SUPL=static_type__2P1H(rec__HTPL);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__SUPL=static_type__BQ1H(rec__HTPL);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__SUPL=static_type__GQ1H(rec__HTPL);
      } break;
      case __PUT_TO__: {
        __tmp__SUPL=TYPE_VOID__->parent_type__UIB.default__AKC;
      } break;
      case __ITEM__: {
        __tmp__SUPL=static_type__PQ1H(rec__HTPL);
      } break;
      case __SIZE_OF__: {
        __tmp__SUPL=static_type__1Q1H();
      } break;
      case __CAST__: {
        __tmp__SUPL=((__CAST *)rec__HTPL)->static_type__SO1H;
      } break;
      case __CALL_SLOT__: {
        __tmp__SUPL=static_type__GIKL(rec__HTPL);
      } break;
      case __READ_SLOT__: {
        __tmp__SUPL=((__SLOT_DATA *)((__READ_SLOT *)rec__HTPL)->slot__EVGK)->parent_variable__AJZD.type__125F;
      } break;
      case __READ_GLOBAL__: {
        __tmp__SUPL=((__SLOT_DATA *)((__READ_GLOBAL *)rec__HTPL)->global__RHJK)->parent_variable__AJZD.type__125F;
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__SUPL=static_type__JRZM();
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__SUPL=static_type__VLEO();
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__SUPL=static_type__LVIO();
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__SUPL=static_type__0LEO();
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__SUPL=static_type__RVIO();
      } break;
      case __EXPR_NEG__: {
        __tmp__SUPL=static_type__Z2IM(rec__HTPL);
      } break;
      case __EXPR_ADD__: {
        __tmp__SUPL=static_type__IXML(rec__HTPL);
      } break;
      case __EXPR_NOT__: {
        __tmp__SUPL=static_type__BTXM(rec__HTPL);
      } break;
      case __EXPR_MOD__: {
        __tmp__SUPL=static_type__5LEO(rec__HTPL);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__SUPL=static_type__W2DP();
      } break;
      case __EXPR_INF__: {
        __tmp__SUPL=static_type__FQQN();
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__SUPL=static_type__KQQN();
      } break;
      case __EXPR_OR__: {
        __tmp__SUPL=static_type__NOPN(rec__HTPL);
      } break;
      case __EXPR_XOR__: {
        __tmp__SUPL=static_type__XCSO(rec__HTPL);
      } break;
      };
      __tmp__UUPL=((__TYPE_FULL *)__tmp__SUPL)->parent_type__KTL;
      if (__tmp__UUPL==NULL) {
        __tmp__VUPL=NULL;
      } else {
        switch (((struct ___OBJ *)__tmp__UUPL)->__id) {
        case __TYPE__: {
          __tmp__VUPL=NULL;
        } break;
        case __TYPE_NULL__: {
          __tmp__VUPL=NULL;
        } break;
        case __TYPE_VOID__: {
          __tmp__VUPL=NULL;
        } break;
        case __TYPE_CONTEXT__: {
          __tmp__VUPL=NULL;
        } break;
        case __TYPE_ID__: {
          __tmp__VUPL=NULL;
        } break;
        case __TYPE_GENERIC__: {
          __tmp__VUPL=NULL;
        } break;
        case __PROFIL_BLOCK__: {
          __tmp__VUPL=((void *)__tmp__UUPL);
        } break;
        }
      };
      pb__STPL=__tmp__VUPL;
      if ((((void *)__tmp__VUPL != (void *)NULL) && ((void *)Self__GTPL->parent_variable__AJZD.require_list__UAEH != (void *)NULL))) {
        if (rec__HTPL==NULL) {
          __tmp__FVPL=NULL;
        } else {
          switch (((struct ___OBJ *)rec__HTPL)->__id) {
          case __LIST__: {
            __tmp__FVPL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__FVPL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__FVPL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__FVPL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__FVPL=((void *)rec__HTPL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__FVPL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__FVPL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__FVPL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__FVPL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__FVPL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__FVPL=NULL;
          } break;
          case __ITEM__: {
            __tmp__FVPL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__FVPL=NULL;
          } break;
          case __CAST__: {
            __tmp__FVPL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__FVPL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__FVPL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__FVPL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__FVPL=NULL;
          } break;
          }
        };
        l__OTPL=((__READ_LOCAL *)__tmp__FVPL)->local__ALZD;
        __tmp__IVPL=Self__GTPL->parent_variable__AJZD.require_first__DAEH;
        if (__tmp__IVPL==NULL) {
          __tmp__JVPL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__IVPL)->__id) {
          case __WRITE_GLOBAL__: {
            __tmp__JVPL=NULL;
          } break;
          case __WRITE_SLOT__: {
            __tmp__JVPL=((void *)__tmp__IVPL);
          } break;
          case __WRITE_LOCAL__: {
            __tmp__JVPL=NULL;
          } break;
          }
        };
        wrt_slot__NTPL=__tmp__JVPL;
        __tmp__LVPL=((__WRITE_SLOT *)__tmp__JVPL)->receiver__HU1H;
        if (__tmp__LVPL==NULL) {
          __tmp__MVPL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__LVPL)->__id) {
          case __LIST__: {
            __tmp__MVPL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__MVPL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__MVPL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__MVPL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__MVPL=((void *)__tmp__LVPL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__MVPL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__MVPL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__MVPL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__MVPL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__MVPL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__MVPL=NULL;
          } break;
          case __ITEM__: {
            __tmp__MVPL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__MVPL=NULL;
          } break;
          case __CAST__: {
            __tmp__MVPL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__MVPL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__MVPL=NULL;
          } break;
          case __READ_GLOBAL__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__MVPL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__MVPL=NULL;
          } break;
          }
        };
        rd_loc__MTPL=__tmp__MVPL;
        if (((void *)((__READ_LOCAL *)__tmp__MVPL)->local__ALZD == (void *)l__OTPL)) {
          my_require_count__RTPL= 1;
        } else {
          my_require_count__RTPL= 0;
        };
        __tmp__4VPL=((__FAST_ARRAYoWRITEo *)Self__GTPL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.upper__NPDI;
        Self__KOJN= 0;
        __tmp__205Q=((__FAST_ARRAYoWRITEo *)Self__GTPL->parent_variable__AJZD.require_list__UAEH)->parent_arrayed_collection__TAEH.storage__LQDI;
        while ((Self__KOJN <= __tmp__4VPL)) {
          __tmp__GWPL=((void **)__tmp__205Q)[Self__KOJN];
          if (__tmp__GWPL==NULL) {
            __tmp__HWPL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__GWPL)->__id) {
            case __WRITE_GLOBAL__: {
              __tmp__HWPL=NULL;
            } break;
            case __WRITE_SLOT__: {
              __tmp__HWPL=((void *)__tmp__GWPL);
            } break;
            case __WRITE_LOCAL__: {
              __tmp__HWPL=NULL;
            } break;
            }
          };
          wrt_slot__NTPL=__tmp__HWPL;
          __tmp__JWPL=((__WRITE_SLOT *)__tmp__HWPL)->receiver__HU1H;
          if (__tmp__JWPL==NULL) {
            __tmp__KWPL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__JWPL)->__id) {
            case __LIST__: {
              __tmp__KWPL=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__KWPL=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__KWPL=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__KWPL=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__KWPL=((void *)__tmp__JWPL);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__KWPL=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__KWPL=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__KWPL=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__KWPL=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__KWPL=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__KWPL=NULL;
            } break;
            case __ITEM__: {
              __tmp__KWPL=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__KWPL=NULL;
            } break;
            case __CAST__: {
              __tmp__KWPL=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__KWPL=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__KWPL=NULL;
            } break;
            case __READ_GLOBAL__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__KWPL=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__KWPL=NULL;
            } break;
            }
          };
          rd_loc__MTPL=__tmp__KWPL;
          if (((void *)((__READ_LOCAL *)__tmp__KWPL)->local__ALZD == (void *)l__OTPL)) {
            my_require_count__RTPL=(__INTEGER)(my_require_count__RTPL +  1);
          };
          Self__KOJN=(__INTEGER)(Self__KOJN +  1);
        };
      };
    };
    if ((((Self__GTPL->last_seq_call_and_loop__ZWPL == seq_call_and_loop__VREJ) && is_seq_list__HMAN(Self__GTPL->last_list_current__UAJL)) || (my_require_count__RTPL ==  1))) {
      if (((void *)rec__HTPL == (void *)NULL)) {
        is_rec_ok__QTPL=TRUE__;
        __tmp__ZXPL=TRUE__;
      } else {
        __tmp__ZXPL=FALSE__;
      };
      if ((! __tmp__ZXPL)) {
        switch (((struct ___OBJ *)rec__HTPL)->__id) {
        case __LIST__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__4XPL=TRUE__;
        } break;
        case __EXTERNAL_C__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__4XPL=TRUE__;
        } break;
        case __INTEGER_CST__: {
          __tmp__4XPL=TRUE__;
        } break;
        case __READ_LOCAL__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __REAL_CST__: {
          __tmp__4XPL=TRUE__;
        } break;
        case __CHARACTER_CST__: {
          __tmp__4XPL=TRUE__;
        } break;
        case __IS_EXPANDED__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_SUB__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_MUL__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_DIV__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_AND__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __PUT_TO__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __CAST__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __READ_GLOBAL__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_NEG__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_ADD__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_NOT__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_MOD__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_INF__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_OR__: {
          __tmp__4XPL=FALSE__;
        } break;
        case __EXPR_XOR__: {
          __tmp__4XPL=FALSE__;
        } break;
        };
        if (__tmp__4XPL) {
          __tmp__GYPL=Self__GTPL->last_write__Y5IL;
          if (__tmp__GYPL==NULL) {
            __tmp__HYPL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__GYPL)->__id) {
            case __WRITE_GLOBAL__: {
              __tmp__HYPL=NULL;
            } break;
            case __WRITE_SLOT__: {
              __tmp__HYPL=((void *)__tmp__GYPL);
            } break;
            }
          };
          wrt_slot__NTPL=__tmp__HYPL;
          __tmp__IYPL=((__WRITE_SLOT *)__tmp__HYPL)->receiver__HU1H;
          switch (((struct ___OBJ *)rec__HTPL)->__id) {
          case __LIST__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __STRING_CST__: {
            __tmp__JYPL=__infix_equal_equal__WF1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXTERNAL_C__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__JYPL=__infix_equal_equal__LG1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __INTEGER_CST__: {
            __tmp__JYPL=__infix_equal_equal__2G1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __READ_LOCAL__: {
            __tmp__JYPL=__infix_equal_equal__WH1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__JYPL=__infix_equal_equal__MI1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__JYPL=__infix_equal_equal__IJ1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __REAL_CST__: {
            __tmp__JYPL=__infix_equal_equal__EK1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __CHARACTER_CST__: {
            __tmp__JYPL=__infix_equal_equal__4K1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __IS_EXPANDED__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __EXPR_SUP__: {
            __tmp__JYPL=__infix_equal_equal__XL1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_SUB__: {
            __tmp__JYPL=__infix_equal_equal__TM1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_MUL__: {
            __tmp__JYPL=__infix_equal_equal__PN1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_DIV__: {
            __tmp__JYPL=__infix_equal_equal__LO1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_AND__: {
            __tmp__JYPL=__infix_equal_equal__HP1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__JYPL=__infix_equal_equal__DQ1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__JYPL=__infix_equal_equal__5Q1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __PUT_TO__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __ITEM__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __SIZE_OF__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __CAST__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __CALL_SLOT__: {
            __tmp__JYPL=FALSE__;
          } break;
          case __READ_SLOT__: {
            __tmp__JYPL=__infix_equal_equal__LS1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__JYPL=__infix_equal_equal__HT1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__JYPL=__infix_equal_equal__CZHO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__JYPL=__infix_equal_equal__SXFO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__JYPL=__infix_equal_equal__TBMO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__JYPL=__infix_equal_equal__OYFO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__JYPL=__infix_equal_equal__QCMO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_NEG__: {
            __tmp__JYPL=__infix_equal_equal__J5KM(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_ADD__: {
            __tmp__JYPL=__infix_equal_equal__ZT1L(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_NOT__: {
            __tmp__JYPL=__infix_equal_equal__QB0M(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_MOD__: {
            __tmp__JYPL=__infix_equal_equal__KZFO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__JYPL=__infix_equal_equal__OTEP(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_INF__: {
            __tmp__JYPL=__infix_equal_equal__UZHO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__JYPL=__infix_equal_equal__Q0HO(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_OR__: {
            __tmp__JYPL=__infix_equal_equal__32QN(rec__HTPL,__tmp__IYPL);
          } break;
          case __EXPR_XOR__: {
            __tmp__JYPL=__infix_equal_equal__GOVO(rec__HTPL,__tmp__IYPL);
          } break;
          };
          is_rec_ok__QTPL=__tmp__JYPL;
        } else {
          if (rec__HTPL==NULL) {
            __tmp__QYPL=NULL;
          } else {
            switch (((struct ___OBJ *)rec__HTPL)->__id) {
            case __LIST__: {
              __tmp__QYPL=NULL;
            } break;
            case __STRING_CST__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXTERNAL_C__: {
              __tmp__QYPL=NULL;
            } break;
            case __PROTOTYPE_CST__: {
              __tmp__QYPL=NULL;
            } break;
            case __INTEGER_CST__: {
              __tmp__QYPL=NULL;
            } break;
            case __READ_LOCAL__: {
              __tmp__QYPL=((void *)rec__HTPL);
            } break;
            case __EXPR_MULTIPLE__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_EQUAL__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_NOT_EQUAL__: {
              __tmp__QYPL=NULL;
            } break;
            case __REAL_CST__: {
              __tmp__QYPL=NULL;
            } break;
            case __CHARACTER_CST__: {
              __tmp__QYPL=NULL;
            } break;
            case __IS_EXPANDED__: {
              __tmp__QYPL=NULL;
            } break;
            case __GET_TYPE_ID__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_SUP__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_SUB__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_MUL__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_DIV__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_AND__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_SHIFT_R__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_SHIFT_L__: {
              __tmp__QYPL=NULL;
            } break;
            case __PUT_TO__: {
              __tmp__QYPL=NULL;
            } break;
            case __ITEM__: {
              __tmp__QYPL=NULL;
            } break;
            case __SIZE_OF__: {
              __tmp__QYPL=NULL;
            } break;
            case __CAST__: {
              __tmp__QYPL=NULL;
            } break;
            case __CALL_SLOT__: {
              __tmp__QYPL=NULL;
            } break;
            case __READ_SLOT__: {
              __tmp__QYPL=((void *)rec__HTPL);
            } break;
            case __READ_GLOBAL__: {
              __tmp__QYPL=((void *)rec__HTPL);
            } break;
            case __EXPR_NOT_LOGIC__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_OR_LOGIC__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_AND_LOGIC__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_NEG__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_ADD__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_NOT__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_MOD__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_SUP_EQ__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_INF__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_INF_EQ__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_OR__: {
              __tmp__QYPL=NULL;
            } break;
            case __EXPR_XOR__: {
              __tmp__QYPL=NULL;
            } break;
            }
          };
          rd__LTPL=__tmp__QYPL;
          if (((void *)__tmp__QYPL != (void *)NULL)) {
            switch (((struct ___OBJ *)__tmp__QYPL)->__id) {
            case __READ_LOCAL__: {
              __tmp__WYPL=((__READ_LOCAL *)__tmp__QYPL)->local__ALZD;
            } break;
            case __READ_SLOT__: {
              __tmp__WYPL=((__READ_SLOT *)__tmp__QYPL)->slot__EVGK;
            } break;
            case __READ_GLOBAL__: {
              __tmp__WYPL=((__READ_GLOBAL *)__tmp__QYPL)->global__RHJK;
            } break;
            };
            if (__tmp__WYPL==NULL) {
              __tmp__YYPL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__WYPL)->__id) {
              case __LOCAL__: {
                __tmp__YYPL=((void *)__tmp__WYPL);
              } break;
              case __SLOT_DATA__: {
                __tmp__YYPL=NULL;
              } break;
              }
            };
            l__OTPL=__tmp__YYPL;
            switch (((struct ___OBJ *)__tmp__QYPL)->__id) {
            case __READ_LOCAL__: {
              __tmp__ZYPL=((__READ_LOCAL *)__tmp__QYPL)->local__ALZD;
            } break;
            case __READ_SLOT__: {
              __tmp__ZYPL=((__READ_SLOT *)__tmp__QYPL)->slot__EVGK;
            } break;
            case __READ_GLOBAL__: {
              __tmp__ZYPL=((__READ_GLOBAL *)__tmp__QYPL)->global__RHJK;
            } break;
            };
            if (__tmp__ZYPL==NULL) {
              __tmp__1YPL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__ZYPL)->__id) {
              case __LOCAL__: {
                __tmp__1YPL=NULL;
              } break;
              case __SLOT_DATA__: {
                __tmp__1YPL=((void *)__tmp__ZYPL);
              } break;
              }
            };
            g__PTPL=__tmp__1YPL;
            __tmp__3YPL=Self__GTPL->last_write__Y5IL;
            if (__tmp__3YPL==NULL) {
              __tmp__4YPL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__3YPL)->__id) {
              case __WRITE_GLOBAL__: {
                __tmp__4YPL=NULL;
              } break;
              case __WRITE_SLOT__: {
                __tmp__4YPL=((void *)__tmp__3YPL);
              } break;
              }
            };
            wrt_slot__NTPL=__tmp__4YPL;
            __tmp__AZPL=((__WRITE_SLOT *)__tmp__4YPL)->receiver__HU1H;
            if (__tmp__AZPL==NULL) {
              __tmp__BZPL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__AZPL)->__id) {
              case __LIST__: {
                __tmp__BZPL=NULL;
              } break;
              case __STRING_CST__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXTERNAL_C__: {
                __tmp__BZPL=NULL;
              } break;
              case __PROTOTYPE_CST__: {
                __tmp__BZPL=NULL;
              } break;
              case __INTEGER_CST__: {
                __tmp__BZPL=NULL;
              } break;
              case __READ_LOCAL__: {
                __tmp__BZPL=((void *)__tmp__AZPL);
              } break;
              case __EXPR_MULTIPLE__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_EQUAL__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_NOT_EQUAL__: {
                __tmp__BZPL=NULL;
              } break;
              case __REAL_CST__: {
                __tmp__BZPL=NULL;
              } break;
              case __CHARACTER_CST__: {
                __tmp__BZPL=NULL;
              } break;
              case __IS_EXPANDED__: {
                __tmp__BZPL=NULL;
              } break;
              case __GET_TYPE_ID__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_SUP__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_SUB__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_MUL__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_DIV__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_AND__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_SHIFT_R__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_SHIFT_L__: {
                __tmp__BZPL=NULL;
              } break;
              case __PUT_TO__: {
                __tmp__BZPL=NULL;
              } break;
              case __ITEM__: {
                __tmp__BZPL=NULL;
              } break;
              case __SIZE_OF__: {
                __tmp__BZPL=NULL;
              } break;
              case __CAST__: {
                __tmp__BZPL=NULL;
              } break;
              case __CALL_SLOT__: {
                __tmp__BZPL=NULL;
              } break;
              case __READ_SLOT__: {
                __tmp__BZPL=((void *)__tmp__AZPL);
              } break;
              case __READ_GLOBAL__: {
                __tmp__BZPL=((void *)__tmp__AZPL);
              } break;
              case __EXPR_NOT_LOGIC__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_OR_LOGIC__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_AND_LOGIC__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_NEG__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_ADD__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_NOT__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_MOD__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_SUP_EQ__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_INF__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_INF_EQ__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_OR__: {
                __tmp__BZPL=NULL;
              } break;
              case __EXPR_XOR__: {
                __tmp__BZPL=NULL;
              } break;
              }
            };
            rd__LTPL=__tmp__BZPL;
            if (((void *)__tmp__BZPL != (void *)NULL)) {
              switch (((struct ___OBJ *)__tmp__BZPL)->__id) {
              case __READ_LOCAL__: {
                __tmp__LZPL=((__READ_LOCAL *)__tmp__BZPL)->local__ALZD;
              } break;
              case __READ_SLOT__: {
                __tmp__LZPL=((__READ_SLOT *)__tmp__BZPL)->slot__EVGK;
              } break;
              case __READ_GLOBAL__: {
                __tmp__LZPL=((__READ_GLOBAL *)__tmp__BZPL)->global__RHJK;
              } break;
              };
              if (((((void *)__tmp__YYPL == (void *)__tmp__LZPL) && is_seq_list__HMAN(Self__GTPL->last_list_current__UAJL)) && (((((((void *)((__LOCAL *)__tmp__YYPL)->last_seq__LRJJ != (void *)NULL) && ((void *)((__LOCAL_SEQ *)((__LOCAL *)__tmp__YYPL)->last_seq__LRJJ)->last_write__G1IL != (void *)NULL)) && (((__LOCAL_SEQ *)((__LOCAL *)__tmp__YYPL)->last_seq__LRJJ)->last_seq_index__43IL < Self__GTPL->last_seq_index__55IL)) && (Self__GTPL->last_seq_call_local_and_loop__S0PL == seq_call_local_and_loop__51IL)) || (require_count__MNCN(__tmp__YYPL) <=  1)) || (((__LOCAL *)__tmp__YYPL)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == ' ')))) {
                __tmp__V3PL=TRUE__;
              } else {
                switch (((struct ___OBJ *)__tmp__BZPL)->__id) {
                case __READ_LOCAL__: {
                  __tmp__Z1PL=((__READ_LOCAL *)__tmp__BZPL)->local__ALZD;
                } break;
                case __READ_SLOT__: {
                  __tmp__Z1PL=((__READ_SLOT *)__tmp__BZPL)->slot__EVGK;
                } break;
                case __READ_GLOBAL__: {
                  __tmp__Z1PL=((__READ_GLOBAL *)__tmp__BZPL)->global__RHJK;
                } break;
                };
                __tmp__V3PL=((((void *)__tmp__1YPL == (void *)__tmp__Z1PL) && (((__SLOT_DATA *)__tmp__1YPL)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) && ((((((void *)((__SLOT_DATA *)__tmp__1YPL)->last_write__Y5IL != (void *)NULL) && (((__SLOT_DATA *)__tmp__1YPL)->last_seq_index__55IL < Self__GTPL->last_seq_index__55IL)) && (Self__GTPL->last_seq_call_and_loop__ZWPL == seq_call_and_loop__VREJ)) && is_seq_list__HMAN(((__SLOT_DATA *)__tmp__1YPL)->last_list_current__UAJL)) || (require_count__IM2M(__tmp__1YPL) ==  1)));
              };
              __tmp__Y3PL=__tmp__V3PL;
            } else {
              __tmp__Y3PL=FALSE__;
            };
            is_rec_ok__QTPL=__tmp__Y3PL;
          };
        };
      };
      if (is_rec_ok__QTPL) {
        __tmp__B4PL=Self__GTPL->last_write__Y5IL;
        if (((struct ___OBJ *)__tmp__B4PL)->__id==__WRITE_GLOBAL__) {
          __tmp__C4PL=((__WRITE_GLOBAL *)__tmp__B4PL)->parent_write__QBGH.value__HBEH;
        } else {
          __tmp__C4PL=((__WRITE_SLOT *)__tmp__B4PL)->parent_write__3BGH.value__HBEH;
        };
        if (__tmp__C4PL==NULL) {
          __tmp__E4PL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__C4PL)->__id) {
          case __LIST__: {
            __tmp__E4PL=NULL;
          } break;
          case __STRING_CST__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXTERNAL_C__: {
            __tmp__E4PL=NULL;
          } break;
          case __PROTOTYPE_CST__: {
            __tmp__E4PL=NULL;
          } break;
          case __INTEGER_CST__: {
            __tmp__E4PL=NULL;
          } break;
          case __READ_LOCAL__: {
            __tmp__E4PL=((void *)__tmp__C4PL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_EQUAL__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__E4PL=NULL;
          } break;
          case __REAL_CST__: {
            __tmp__E4PL=NULL;
          } break;
          case __CHARACTER_CST__: {
            __tmp__E4PL=NULL;
          } break;
          case __IS_EXPANDED__: {
            __tmp__E4PL=NULL;
          } break;
          case __GET_TYPE_ID__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_SUP__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_SUB__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_MUL__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_DIV__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_AND__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__E4PL=NULL;
          } break;
          case __PUT_TO__: {
            __tmp__E4PL=NULL;
          } break;
          case __ITEM__: {
            __tmp__E4PL=NULL;
          } break;
          case __SIZE_OF__: {
            __tmp__E4PL=NULL;
          } break;
          case __CAST__: {
            __tmp__E4PL=NULL;
          } break;
          case __CALL_SLOT__: {
            __tmp__E4PL=NULL;
          } break;
          case __READ_SLOT__: {
            __tmp__E4PL=((void *)__tmp__C4PL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__E4PL=((void *)__tmp__C4PL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_NEG__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_ADD__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_NOT__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_MOD__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_INF__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_OR__: {
            __tmp__E4PL=NULL;
          } break;
          case __EXPR_XOR__: {
            __tmp__E4PL=NULL;
          } break;
          }
        };
        rd__LTPL=__tmp__E4PL;
        if (((void *)__tmp__E4PL == (void *)NULL)) {
          l__OTPL=NULL;
          g__PTPL=NULL;
        } else {
          switch (((struct ___OBJ *)__tmp__E4PL)->__id) {
          case __READ_LOCAL__: {
            __tmp__P4PL=((__READ_LOCAL *)__tmp__E4PL)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__P4PL=((__READ_SLOT *)__tmp__E4PL)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__P4PL=((__READ_GLOBAL *)__tmp__E4PL)->global__RHJK;
          } break;
          };
          if (__tmp__P4PL==NULL) {
            __tmp__R4PL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__P4PL)->__id) {
            case __LOCAL__: {
              __tmp__R4PL=((void *)__tmp__P4PL);
            } break;
            case __SLOT_DATA__: {
              __tmp__R4PL=NULL;
            } break;
            }
          };
          l__OTPL=__tmp__R4PL;
          switch (((struct ___OBJ *)__tmp__E4PL)->__id) {
          case __READ_LOCAL__: {
            __tmp__S4PL=((__READ_LOCAL *)__tmp__E4PL)->local__ALZD;
          } break;
          case __READ_SLOT__: {
            __tmp__S4PL=((__READ_SLOT *)__tmp__E4PL)->slot__EVGK;
          } break;
          case __READ_GLOBAL__: {
            __tmp__S4PL=((__READ_GLOBAL *)__tmp__E4PL)->global__RHJK;
          } break;
          };
          if (__tmp__S4PL==NULL) {
            __tmp__U4PL=NULL;
          } else {
            switch (((struct ___OBJ *)__tmp__S4PL)->__id) {
            case __LOCAL__: {
              __tmp__U4PL=NULL;
            } break;
            case __SLOT_DATA__: {
              __tmp__U4PL=((void *)__tmp__S4PL);
            } break;
            }
          };
          g__PTPL=__tmp__U4PL;
        };
        switch (((struct ___OBJ *)__tmp__C4PL)->__id) {
        case __LIST__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __STRING_CST__: {
          __tmp__W4PL=TRUE__;
        } break;
        case __EXTERNAL_C__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__W4PL=TRUE__;
        } break;
        case __INTEGER_CST__: {
          __tmp__W4PL=TRUE__;
        } break;
        case __READ_LOCAL__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __REAL_CST__: {
          __tmp__W4PL=TRUE__;
        } break;
        case __CHARACTER_CST__: {
          __tmp__W4PL=TRUE__;
        } break;
        case __IS_EXPANDED__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_SUB__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_MUL__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_DIV__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_AND__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __PUT_TO__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __ITEM__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __SIZE_OF__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __CAST__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __CALL_SLOT__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __READ_GLOBAL__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_NEG__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_ADD__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_NOT__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_MOD__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_INF__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_OR__: {
          __tmp__W4PL=FALSE__;
        } break;
        case __EXPR_XOR__: {
          __tmp__W4PL=FALSE__;
        } break;
        };
        if (((__tmp__W4PL || ((((void *)l__OTPL != (void *)NULL) && is_seq_list__HMAN(Self__GTPL->last_list_current__UAJL)) && (((((((void *)((__LOCAL *)l__OTPL)->last_seq__LRJJ != (void *)NULL) && ((void *)((__LOCAL_SEQ *)((__LOCAL *)l__OTPL)->last_seq__LRJJ)->last_write__G1IL != (void *)NULL)) && (((__LOCAL_SEQ *)((__LOCAL *)l__OTPL)->last_seq__LRJJ)->last_seq_index__43IL < Self__GTPL->last_seq_index__55IL)) && (Self__GTPL->last_seq_call_local_and_loop__S0PL == seq_call_local_and_loop__51IL)) || (require_count__MNCN(l__OTPL) <=  1)) || (((__LOCAL *)l__OTPL)->parent_variable__B2LC.parent_named__A2LC.style__LDGC == ' ')))) || ((((void *)g__PTPL != (void *)NULL) && (((__SLOT_DATA *)g__PTPL)->parent_variable__AJZD.parent_named__A2LC.style__LDGC == '-')) && ((((((void *)((__SLOT_DATA *)g__PTPL)->last_write__Y5IL != (void *)NULL) && (((__SLOT_DATA *)g__PTPL)->last_seq_index__55IL < Self__GTPL->last_seq_index__55IL)) && (Self__GTPL->last_seq_call_and_loop__ZWPL == seq_call_and_loop__VREJ)) && is_seq_list__HMAN(((__SLOT_DATA *)g__PTPL)->last_list_current__UAJL)) || (require_count__IM2M(g__PTPL) ==  1))))) {
          if (((void *)rec__HTPL != (void *)NULL)) {
            switch (((struct ___OBJ *)rec__HTPL)->__id) {
            case __LIST__: {
              remove__KPJJ(rec__HTPL);
            } break;
            case __STRING_CST__: {
            } break;
            case __EXTERNAL_C__: {
              remove__UUAK(rec__HTPL);
            } break;
            case __PROTOTYPE_CST__: {
            } break;
            case __INTEGER_CST__: {
            } break;
            case __READ_LOCAL__: {
              Self__TPFQ=((__READ_LOCAL *)rec__HTPL);
              unread__YVJK(Self__TPFQ->local__ALZD,Self__TPFQ);
            } break;
            case __EXPR_MULTIPLE__: {
              remove__TVAK(rec__HTPL);
            } break;
            case __EXPR_EQUAL__: {
              remove__DWAK(rec__HTPL);
            } break;
            case __EXPR_NOT_EQUAL__: {
              remove__HWAK(rec__HTPL);
            } break;
            case __REAL_CST__: {
            } break;
            case __CHARACTER_CST__: {
            } break;
            case __IS_EXPANDED__: {
              Self__VPFQ=((__READ_LOCAL *)((__IS_EXPANDED *)rec__HTPL)->receiver__OO2H);
              unread__YVJK(Self__VPFQ->local__ALZD,Self__VPFQ);
            } break;
            case __GET_TYPE_ID__: {
              remove__SWAK(rec__HTPL);
            } break;
            case __EXPR_SUP__: {
              remove__VWAK(rec__HTPL);
            } break;
            case __EXPR_SUB__: {
              remove__ZWAK(rec__HTPL);
            } break;
            case __EXPR_MUL__: {
              remove__3WAK(rec__HTPL);
            } break;
            case __EXPR_DIV__: {
              remove__BXAK(rec__HTPL);
            } break;
            case __EXPR_AND__: {
              remove__FXAK(rec__HTPL);
            } break;
            case __EXPR_SHIFT_R__: {
              remove__JXAK(rec__HTPL);
            } break;
            case __EXPR_SHIFT_L__: {
              remove__NXAK(rec__HTPL);
            } break;
            case __PUT_TO__: {
              remove__RXAK(rec__HTPL);
            } break;
            case __ITEM__: {
              remove__SYAK(rec__HTPL);
            } break;
            case __SIZE_OF__: {
              remove__WYAK(rec__HTPL);
            } break;
            case __CAST__: {
              remove__ZYAK(rec__HTPL);
            } break;
            case __CALL_SLOT__: {
              remove__2NML(rec__HTPL);
            } break;
            case __READ_SLOT__: {
              remove__4GHK(rec__HTPL);
            } break;
            case __READ_GLOBAL__: {
              Self__WPFQ=((__READ_GLOBAL *)rec__HTPL);
              unread__15ML(Self__WPFQ->global__RHJK,Self__WPFQ);
            } break;
            case __EXPR_NOT_LOGIC__: {
              remove__GWZM(rec__HTPL);
            } break;
            case __EXPR_OR_LOGIC__: {
              remove__WPEO(rec__HTPL);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              remove__WMKO(rec__HTPL);
            } break;
            case __EXPR_AND_LOGIC__: {
              remove__0PEO(rec__HTPL);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              remove__1MKO(rec__HTPL);
            } break;
            case __EXPR_NEG__: {
              remove__3KJM(rec__HTPL);
            } break;
            case __EXPR_ADD__: {
              remove__QQML(rec__HTPL);
            } break;
            case __EXPR_NOT__: {
              remove__D5YM(rec__HTPL);
            } break;
            case __EXPR_MOD__: {
              remove__4PEO(rec__HTPL);
            } break;
            case __EXPR_SUP_EQ__: {
              remove__X5DP(rec__HTPL);
            } break;
            case __EXPR_INF__: {
              remove__KZQN(rec__HTPL);
            } break;
            case __EXPR_INF_EQ__: {
              remove__OZQN(rec__HTPL);
            } break;
            case __EXPR_OR__: {
              remove__LUPN(rec__HTPL);
            } break;
            case __EXPR_XOR__: {
              remove__AQTO(rec__HTPL);
            } break;
            };
          };
          switch (((struct ___OBJ *)__tmp__C4PL)->__id) {
          case __LIST__: {
            __tmp__MDQL=my_copy__2HYM(__tmp__C4PL);
          } break;
          case __STRING_CST__: {
            Self__XPFQ=((__STRING_CST *)__tmp__C4PL);
            __tmp__MDQL=create__text__AUMH(Self__XPFQ->parent_constant__5F.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__XPFQ->string__ZK2H);
          } break;
          case __EXTERNAL_C__: {
            __tmp__MDQL=my_copy__2K2H(__tmp__C4PL);
          } break;
          case __PROTOTYPE_CST__: {
            Self__YPFQ=((__PROTOTYPE_CST *)__tmp__C4PL);
            __tmp__MDQL=create__type__CLQC(Self__YPFQ->parent_constant__E3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__YPFQ->parent_constant__E3LC.static_type__F4YD);
          } break;
          case __INTEGER_CST__: {
            Self__ZPFQ=((__INTEGER_CST *)__tmp__C4PL);
            __tmp__MDQL=create__value__type__DNQC(Self__ZPFQ->parent_constant__P3LC.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__ZPFQ->value__PAZD,Self__ZPFQ->parent_constant__P3LC.static_type__F4YD);
          } break;
          case __READ_LOCAL__: {
            __tmp__MDQL=my_copy__OAFJ(__tmp__C4PL);
          } break;
          case __EXPR_MULTIPLE__: {
            __tmp__MDQL=my_copy__KM2H(__tmp__C4PL);
          } break;
          case __EXPR_EQUAL__: {
            __tmp__MDQL=my_copy__DN2H(__tmp__C4PL);
          } break;
          case __EXPR_NOT_EQUAL__: {
            __tmp__MDQL=my_copy__QN2H(__tmp__C4PL);
          } break;
          case __REAL_CST__: {
            Self__1PFQ=((__REAL_CST *)__tmp__C4PL);
            __tmp__MDQL=create__value__type__1SMH(Self__1PFQ->parent_constant__M3JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__1PFQ->value__5N2H,Self__1PFQ->parent_constant__M3JH.static_type__F4YD);
          } break;
          case __CHARACTER_CST__: {
            Self__3PFQ=((__CHARACTER_CST *)__tmp__C4PL);
            __tmp__MDQL=create__char__WTMH(Self__3PFQ->parent_constant__53JH.parent_expr__4F.parent_instr__UE.parent_itm_object__TE.position__BJM,Self__3PFQ->text__HO2H);
          } break;
          case __IS_EXPANDED__: {
            Self__4PFQ=((__IS_EXPANDED *)__tmp__C4PL);
            __tmp__MDQL=create__receiver__WRWH(Self__4PFQ->parent_expr__S5JH.parent_instr__UE.parent_itm_object__TE.position__BJM,my_copy__OAFJ(Self__4PFQ->receiver__OO2H));
          } break;
          case __GET_TYPE_ID__: {
            __tmp__MDQL=my_copy__TO2H(__tmp__C4PL);
          } break;
          case __EXPR_SUP__: {
            __tmp__MDQL=my_copy__2O2H(__tmp__C4PL);
          } break;
          case __EXPR_SUB__: {
            __tmp__MDQL=my_copy__HP2H(__tmp__C4PL);
          } break;
          case __EXPR_MUL__: {
            __tmp__MDQL=my_copy__TP2H(__tmp__C4PL);
          } break;
          case __EXPR_DIV__: {
            __tmp__MDQL=my_copy__4P2H(__tmp__C4PL);
          } break;
          case __EXPR_AND__: {
            __tmp__MDQL=my_copy__JQ2H(__tmp__C4PL);
          } break;
          case __EXPR_SHIFT_R__: {
            __tmp__MDQL=my_copy__UQ2H(__tmp__C4PL);
          } break;
          case __EXPR_SHIFT_L__: {
            __tmp__MDQL=my_copy__5Q2H(__tmp__C4PL);
          } break;
          case __PUT_TO__: {
            __tmp__MDQL=my_copy__KR2H(__tmp__C4PL);
          } break;
          case __ITEM__: {
            __tmp__MDQL=my_copy__1R2H(__tmp__C4PL);
          } break;
          case __SIZE_OF__: {
            __tmp__MDQL=my_copy__HS2H(__tmp__C4PL);
          } break;
          case __CAST__: {
            __tmp__MDQL=my_copy__QS2H(__tmp__C4PL);
          } break;
          case __CALL_SLOT__: {
            __tmp__MDQL=my_copy__PIYM(__tmp__C4PL);
          } break;
          case __READ_SLOT__: {
            __tmp__MDQL=my_copy__AVGK(__tmp__C4PL);
          } break;
          case __READ_GLOBAL__: {
            __tmp__MDQL=my_copy__NVGK(__tmp__C4PL);
          } break;
          case __EXPR_NOT_LOGIC__: {
            __tmp__MDQL=my_copy__RFCN(__tmp__C4PL);
          } break;
          case __EXPR_OR_LOGIC__: {
            __tmp__MDQL=my_copy__JMEO(__tmp__C4PL);
          } break;
          case __EXPR_OR_OR_LOGIC__: {
            __tmp__MDQL=my_copy__RTJO(__tmp__C4PL);
          } break;
          case __EXPR_AND_LOGIC__: {
            __tmp__MDQL=my_copy__WMEO(__tmp__C4PL);
          } break;
          case __EXPR_AND_AND_LOGIC__: {
            __tmp__MDQL=my_copy__3TJO(__tmp__C4PL);
          } break;
          case __EXPR_NEG__: {
            __tmp__MDQL=my_copy__YEJM(__tmp__C4PL);
          } break;
          case __EXPR_ADD__: {
            __tmp__MDQL=my_copy__YRLL(__tmp__C4PL);
          } break;
          case __EXPR_NOT__: {
            __tmp__MDQL=my_copy__GLYM(__tmp__C4PL);
          } break;
          case __EXPR_MOD__: {
            __tmp__MDQL=my_copy__BNEO(__tmp__C4PL);
          } break;
          case __EXPR_SUP_EQ__: {
            __tmp__MDQL=my_copy__M3DP(__tmp__C4PL);
          } break;
          case __EXPR_INF__: {
            __tmp__MDQL=my_copy__PBSN(__tmp__C4PL);
          } break;
          case __EXPR_INF_EQ__: {
            __tmp__MDQL=my_copy__0BSN(__tmp__C4PL);
          } break;
          case __EXPR_OR__: {
            __tmp__MDQL=my_copy__ZOPN(__tmp__C4PL);
          } break;
          case __EXPR_XOR__: {
            __tmp__MDQL=my_copy__CYSO(__tmp__C4PL);
          } break;
          };
          result__JTPL=__tmp__MDQL;
          __tmp__ODQL=TRUE__;
        } else {
          __tmp__ODQL=FALSE__;
        };
        if (__tmp__ODQL) {
          __tmp__RFQL=TRUE__;
        } else {
          __tmp__YEQL=((((Self__GTPL->last_seq_or_and__TDQL == seq_or_and__AYRG) && (Self__GTPL->parent_variable__AJZD.ensure_count__QEAG ==  1)) && (((__LIST *)list_current__IF1)->index__PXRG >  1)) && ((void *)((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)(((__LIST *)list_current__IF1)->index__PXRG -  1) -  1)] == (void *)Self__GTPL->last_write__Y5IL));
          if (__tmp__YEQL) {
            if (((void *)rec__HTPL != (void *)NULL)) {
              switch (((struct ___OBJ *)rec__HTPL)->__id) {
              case __LIST__: {
                remove__KPJJ(rec__HTPL);
              } break;
              case __STRING_CST__: {
              } break;
              case __EXTERNAL_C__: {
                remove__UUAK(rec__HTPL);
              } break;
              case __PROTOTYPE_CST__: {
              } break;
              case __INTEGER_CST__: {
              } break;
              case __READ_LOCAL__: {
                Self__BQFQ=((__READ_LOCAL *)rec__HTPL);
                unread__YVJK(Self__BQFQ->local__ALZD,Self__BQFQ);
              } break;
              case __EXPR_MULTIPLE__: {
                remove__TVAK(rec__HTPL);
              } break;
              case __EXPR_EQUAL__: {
                remove__DWAK(rec__HTPL);
              } break;
              case __EXPR_NOT_EQUAL__: {
                remove__HWAK(rec__HTPL);
              } break;
              case __REAL_CST__: {
              } break;
              case __CHARACTER_CST__: {
              } break;
              case __IS_EXPANDED__: {
                Self__DQFQ=((__READ_LOCAL *)((__IS_EXPANDED *)rec__HTPL)->receiver__OO2H);
                unread__YVJK(Self__DQFQ->local__ALZD,Self__DQFQ);
              } break;
              case __GET_TYPE_ID__: {
                remove__SWAK(rec__HTPL);
              } break;
              case __EXPR_SUP__: {
                remove__VWAK(rec__HTPL);
              } break;
              case __EXPR_SUB__: {
                remove__ZWAK(rec__HTPL);
              } break;
              case __EXPR_MUL__: {
                remove__3WAK(rec__HTPL);
              } break;
              case __EXPR_DIV__: {
                remove__BXAK(rec__HTPL);
              } break;
              case __EXPR_AND__: {
                remove__FXAK(rec__HTPL);
              } break;
              case __EXPR_SHIFT_R__: {
                remove__JXAK(rec__HTPL);
              } break;
              case __EXPR_SHIFT_L__: {
                remove__NXAK(rec__HTPL);
              } break;
              case __PUT_TO__: {
                remove__RXAK(rec__HTPL);
              } break;
              case __ITEM__: {
                remove__SYAK(rec__HTPL);
              } break;
              case __SIZE_OF__: {
                remove__WYAK(rec__HTPL);
              } break;
              case __CAST__: {
                remove__ZYAK(rec__HTPL);
              } break;
              case __CALL_SLOT__: {
                remove__2NML(rec__HTPL);
              } break;
              case __READ_SLOT__: {
                remove__4GHK(rec__HTPL);
              } break;
              case __READ_GLOBAL__: {
                Self__EQFQ=((__READ_GLOBAL *)rec__HTPL);
                unread__15ML(Self__EQFQ->global__RHJK,Self__EQFQ);
              } break;
              case __EXPR_NOT_LOGIC__: {
                remove__GWZM(rec__HTPL);
              } break;
              case __EXPR_OR_LOGIC__: {
                remove__WPEO(rec__HTPL);
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                remove__WMKO(rec__HTPL);
              } break;
              case __EXPR_AND_LOGIC__: {
                remove__0PEO(rec__HTPL);
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                remove__1MKO(rec__HTPL);
              } break;
              case __EXPR_NEG__: {
                remove__3KJM(rec__HTPL);
              } break;
              case __EXPR_ADD__: {
                remove__QQML(rec__HTPL);
              } break;
              case __EXPR_NOT__: {
                remove__D5YM(rec__HTPL);
              } break;
              case __EXPR_MOD__: {
                remove__4PEO(rec__HTPL);
              } break;
              case __EXPR_SUP_EQ__: {
                remove__X5DP(rec__HTPL);
              } break;
              case __EXPR_INF__: {
                remove__KZQN(rec__HTPL);
              } break;
              case __EXPR_INF_EQ__: {
                remove__OZQN(rec__HTPL);
              } break;
              case __EXPR_OR__: {
                remove__LUPN(rec__HTPL);
              } break;
              case __EXPR_XOR__: {
                remove__AQTO(rec__HTPL);
              } break;
              };
              __tmp__FFQL=Self__GTPL->last_write__Y5IL;
              if (__tmp__FFQL==NULL) {
                __tmp__GFQL=NULL;
              } else {
                switch (((struct ___OBJ *)__tmp__FFQL)->__id) {
                case __WRITE_GLOBAL__: {
                  __tmp__GFQL=NULL;
                } break;
                case __WRITE_SLOT__: {
                  __tmp__GFQL=((void *)__tmp__FFQL);
                } break;
                }
              };
              wrt_slot__NTPL=__tmp__GFQL;
              __tmp__HFQL=((__WRITE_SLOT *)__tmp__GFQL)->receiver__HU1H;
              switch (((struct ___OBJ *)__tmp__HFQL)->__id) {
              case __LIST__: {
                remove__KPJJ(__tmp__HFQL);
              } break;
              case __STRING_CST__: {
              } break;
              case __EXTERNAL_C__: {
                remove__UUAK(__tmp__HFQL);
              } break;
              case __PROTOTYPE_CST__: {
              } break;
              case __INTEGER_CST__: {
              } break;
              case __READ_LOCAL__: {
                Self__FQFQ=((__READ_LOCAL *)__tmp__HFQL);
                unread__YVJK(Self__FQFQ->local__ALZD,Self__FQFQ);
              } break;
              case __EXPR_MULTIPLE__: {
                remove__TVAK(__tmp__HFQL);
              } break;
              case __EXPR_EQUAL__: {
                remove__DWAK(__tmp__HFQL);
              } break;
              case __EXPR_NOT_EQUAL__: {
                remove__HWAK(__tmp__HFQL);
              } break;
              case __REAL_CST__: {
              } break;
              case __CHARACTER_CST__: {
              } break;
              case __IS_EXPANDED__: {
                Self__HQFQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__HFQL)->receiver__OO2H);
                unread__YVJK(Self__HQFQ->local__ALZD,Self__HQFQ);
              } break;
              case __GET_TYPE_ID__: {
                remove__SWAK(__tmp__HFQL);
              } break;
              case __EXPR_SUP__: {
                remove__VWAK(__tmp__HFQL);
              } break;
              case __EXPR_SUB__: {
                remove__ZWAK(__tmp__HFQL);
              } break;
              case __EXPR_MUL__: {
                remove__3WAK(__tmp__HFQL);
              } break;
              case __EXPR_DIV__: {
                remove__BXAK(__tmp__HFQL);
              } break;
              case __EXPR_AND__: {
                remove__FXAK(__tmp__HFQL);
              } break;
              case __EXPR_SHIFT_R__: {
                remove__JXAK(__tmp__HFQL);
              } break;
              case __EXPR_SHIFT_L__: {
                remove__NXAK(__tmp__HFQL);
              } break;
              case __PUT_TO__: {
                remove__RXAK(__tmp__HFQL);
              } break;
              case __ITEM__: {
                remove__SYAK(__tmp__HFQL);
              } break;
              case __SIZE_OF__: {
                remove__WYAK(__tmp__HFQL);
              } break;
              case __CAST__: {
                remove__ZYAK(__tmp__HFQL);
              } break;
              case __CALL_SLOT__: {
                remove__2NML(__tmp__HFQL);
              } break;
              case __READ_SLOT__: {
                remove__4GHK(__tmp__HFQL);
              } break;
              case __READ_GLOBAL__: {
                Self__IQFQ=((__READ_GLOBAL *)__tmp__HFQL);
                unread__15ML(Self__IQFQ->global__RHJK,Self__IQFQ);
              } break;
              case __EXPR_NOT_LOGIC__: {
                remove__GWZM(__tmp__HFQL);
              } break;
              case __EXPR_OR_LOGIC__: {
                remove__WPEO(__tmp__HFQL);
              } break;
              case __EXPR_OR_OR_LOGIC__: {
                remove__WMKO(__tmp__HFQL);
              } break;
              case __EXPR_AND_LOGIC__: {
                remove__0PEO(__tmp__HFQL);
              } break;
              case __EXPR_AND_AND_LOGIC__: {
                remove__1MKO(__tmp__HFQL);
              } break;
              case __EXPR_NEG__: {
                remove__3KJM(__tmp__HFQL);
              } break;
              case __EXPR_ADD__: {
                remove__QQML(__tmp__HFQL);
              } break;
              case __EXPR_NOT__: {
                remove__D5YM(__tmp__HFQL);
              } break;
              case __EXPR_MOD__: {
                remove__4PEO(__tmp__HFQL);
              } break;
              case __EXPR_SUP_EQ__: {
                remove__X5DP(__tmp__HFQL);
              } break;
              case __EXPR_INF__: {
                remove__KZQN(__tmp__HFQL);
              } break;
              case __EXPR_INF_EQ__: {
                remove__OZQN(__tmp__HFQL);
              } break;
              case __EXPR_OR__: {
                remove__LUPN(__tmp__HFQL);
              } break;
              case __EXPR_XOR__: {
                remove__AQTO(__tmp__HFQL);
              } break;
              };
            };
            unwrite__CDNL(Self__GTPL,Self__GTPL->last_write__Y5IL);
            ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)list_current__IF1)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)((__INTEGER)(((__LIST *)list_current__IF1)->index__PXRG -  1) -  1)]=NOP__;
            result__JTPL=__tmp__C4PL;
          };
          __tmp__RFQL=__tmp__YEQL;
        };
        if ((! __tmp__RFQL)) {
          if ((((((void *)rec__HTPL != (void *)NULL) && is_seq_list__HMAN(Self__GTPL->last_list_current__UAJL)) && (my_require_count__RTPL ==  1)) && (Self__GTPL->parent_variable__AJZD.ensure_count__QEAG ==  1))) {
            Self__WH3Q=Self__GTPL->last_index__UOPL;
            up__XH3Q=(__INTEGER)(((__FAST_ARRAYoINSTRo *)((__LIST *)Self__GTPL->last_list_current__UAJL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG +  1);
            __tmp__HHQL=(( 1 <= Self__WH3Q) && (up__XH3Q >= Self__WH3Q));
          } else {
            __tmp__HHQL=FALSE__;
          };
          if ((__tmp__HHQL && ((void *)((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)Self__GTPL->last_list_current__UAJL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__GTPL->last_index__UOPL -  1)] == (void *)Self__GTPL->last_write__Y5IL))) {
            l__OTPL=create__name__style__type__25JG(Self__GTPL->parent_variable__AJZD.parent_named__A2LC.parent_itm_object__PD.position__BJM,(&__string_60),'+',((__TYPE_FULL *)Self__GTPL->parent_variable__AJZD.type__125F));
            __tmp__SHQL=Self__GTPL->last_write__Y5IL;
            if (((struct ___OBJ *)__tmp__SHQL)->__id==__WRITE_GLOBAL__) {
              __tmp__THQL=((__WRITE_GLOBAL *)__tmp__SHQL)->parent_write__QBGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
            } else {
              __tmp__THQL=((__WRITE_SLOT *)__tmp__SHQL)->parent_write__3BGH.parent_instr__H4OG.parent_itm_object__TE.position__BJM;
            };
            ((void **)((__FAST_ARRAYoINSTRo *)((__LIST *)Self__GTPL->last_list_current__UAJL)->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[(__INTEGER)(Self__GTPL->last_index__UOPL -  1)]=write__value__T5FH(l__OTPL,__tmp__THQL,__tmp__C4PL);
            switch (((struct ___OBJ *)rec__HTPL)->__id) {
            case __LIST__: {
            } break;
            case __STRING_CST__: {
            } break;
            case __EXTERNAL_C__: {
            } break;
            case __PROTOTYPE_CST__: {
            } break;
            case __INTEGER_CST__: {
            } break;
            case __READ_LOCAL__: {
            } break;
            case __EXPR_MULTIPLE__: {
            } break;
            case __EXPR_EQUAL__: {
            } break;
            case __EXPR_NOT_EQUAL__: {
            } break;
            case __REAL_CST__: {
            } break;
            case __CHARACTER_CST__: {
            } break;
            case __IS_EXPANDED__: {
            } break;
            case __GET_TYPE_ID__: {
            } break;
            case __EXPR_SUP__: {
            } break;
            case __EXPR_SUB__: {
            } break;
            case __EXPR_MUL__: {
            } break;
            case __EXPR_DIV__: {
            } break;
            case __EXPR_AND__: {
            } break;
            case __EXPR_SHIFT_R__: {
            } break;
            case __EXPR_SHIFT_L__: {
            } break;
            case __PUT_TO__: {
            } break;
            case __ITEM__: {
            } break;
            case __SIZE_OF__: {
            } break;
            case __CAST__: {
            } break;
            case __CALL_SLOT__: {
            } break;
            case __READ_SLOT__: {
            } break;
            case __READ_GLOBAL__: {
            } break;
            case __EXPR_NOT_LOGIC__: {
            } break;
            case __EXPR_OR_LOGIC__: {
            } break;
            case __EXPR_OR_OR_LOGIC__: {
            } break;
            case __EXPR_AND_LOGIC__: {
            } break;
            case __EXPR_AND_AND_LOGIC__: {
            } break;
            case __EXPR_NEG__: {
            } break;
            case __EXPR_ADD__: {
            } break;
            case __EXPR_NOT__: {
            } break;
            case __EXPR_MOD__: {
            } break;
            case __EXPR_SUP_EQ__: {
            } break;
            case __EXPR_INF__: {
            } break;
            case __EXPR_INF_EQ__: {
            } break;
            case __EXPR_OR__: {
            } break;
            case __EXPR_XOR__: {
            } break;
            };
            result__JTPL=read__IC5G(l__OTPL);
            switch (((struct ___OBJ *)rec__HTPL)->__id) {
            case __LIST__: {
              remove__KPJJ(rec__HTPL);
            } break;
            case __STRING_CST__: {
            } break;
            case __EXTERNAL_C__: {
              remove__UUAK(rec__HTPL);
            } break;
            case __PROTOTYPE_CST__: {
            } break;
            case __INTEGER_CST__: {
            } break;
            case __READ_LOCAL__: {
              Self__WQFQ=((__READ_LOCAL *)rec__HTPL);
              unread__YVJK(Self__WQFQ->local__ALZD,Self__WQFQ);
            } break;
            case __EXPR_MULTIPLE__: {
              remove__TVAK(rec__HTPL);
            } break;
            case __EXPR_EQUAL__: {
              remove__DWAK(rec__HTPL);
            } break;
            case __EXPR_NOT_EQUAL__: {
              remove__HWAK(rec__HTPL);
            } break;
            case __REAL_CST__: {
            } break;
            case __CHARACTER_CST__: {
            } break;
            case __IS_EXPANDED__: {
              Self__YQFQ=((__READ_LOCAL *)((__IS_EXPANDED *)rec__HTPL)->receiver__OO2H);
              unread__YVJK(Self__YQFQ->local__ALZD,Self__YQFQ);
            } break;
            case __GET_TYPE_ID__: {
              remove__SWAK(rec__HTPL);
            } break;
            case __EXPR_SUP__: {
              remove__VWAK(rec__HTPL);
            } break;
            case __EXPR_SUB__: {
              remove__ZWAK(rec__HTPL);
            } break;
            case __EXPR_MUL__: {
              remove__3WAK(rec__HTPL);
            } break;
            case __EXPR_DIV__: {
              remove__BXAK(rec__HTPL);
            } break;
            case __EXPR_AND__: {
              remove__FXAK(rec__HTPL);
            } break;
            case __EXPR_SHIFT_R__: {
              remove__JXAK(rec__HTPL);
            } break;
            case __EXPR_SHIFT_L__: {
              remove__NXAK(rec__HTPL);
            } break;
            case __PUT_TO__: {
              remove__RXAK(rec__HTPL);
            } break;
            case __ITEM__: {
              remove__SYAK(rec__HTPL);
            } break;
            case __SIZE_OF__: {
              remove__WYAK(rec__HTPL);
            } break;
            case __CAST__: {
              remove__ZYAK(rec__HTPL);
            } break;
            case __CALL_SLOT__: {
              remove__2NML(rec__HTPL);
            } break;
            case __READ_SLOT__: {
              remove__4GHK(rec__HTPL);
            } break;
            case __READ_GLOBAL__: {
              Self__ZQFQ=((__READ_GLOBAL *)rec__HTPL);
              unread__15ML(Self__ZQFQ->global__RHJK,Self__ZQFQ);
            } break;
            case __EXPR_NOT_LOGIC__: {
              remove__GWZM(rec__HTPL);
            } break;
            case __EXPR_OR_LOGIC__: {
              remove__WPEO(rec__HTPL);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              remove__WMKO(rec__HTPL);
            } break;
            case __EXPR_AND_LOGIC__: {
              remove__0PEO(rec__HTPL);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              remove__1MKO(rec__HTPL);
            } break;
            case __EXPR_NEG__: {
              remove__3KJM(rec__HTPL);
            } break;
            case __EXPR_ADD__: {
              remove__QQML(rec__HTPL);
            } break;
            case __EXPR_NOT__: {
              remove__D5YM(rec__HTPL);
            } break;
            case __EXPR_MOD__: {
              remove__4PEO(rec__HTPL);
            } break;
            case __EXPR_SUP_EQ__: {
              remove__X5DP(rec__HTPL);
            } break;
            case __EXPR_INF__: {
              remove__KZQN(rec__HTPL);
            } break;
            case __EXPR_INF_EQ__: {
              remove__OZQN(rec__HTPL);
            } break;
            case __EXPR_OR__: {
              remove__LUPN(rec__HTPL);
            } break;
            case __EXPR_XOR__: {
              remove__AQTO(rec__HTPL);
            } break;
            };
            __tmp__2HQL=Self__GTPL->last_write__Y5IL;
            if (__tmp__2HQL==NULL) {
              __tmp__3HQL=NULL;
            } else {
              switch (((struct ___OBJ *)__tmp__2HQL)->__id) {
              case __WRITE_GLOBAL__: {
                __tmp__3HQL=NULL;
              } break;
              case __WRITE_SLOT__: {
                __tmp__3HQL=((void *)__tmp__2HQL);
              } break;
              }
            };
            wrt_slot__NTPL=__tmp__3HQL;
            __tmp__4HQL=((__WRITE_SLOT *)__tmp__3HQL)->receiver__HU1H;
            switch (((struct ___OBJ *)__tmp__4HQL)->__id) {
            case __LIST__: {
              remove__KPJJ(__tmp__4HQL);
            } break;
            case __STRING_CST__: {
            } break;
            case __EXTERNAL_C__: {
              remove__UUAK(__tmp__4HQL);
            } break;
            case __PROTOTYPE_CST__: {
            } break;
            case __INTEGER_CST__: {
            } break;
            case __READ_LOCAL__: {
              Self__0QFQ=((__READ_LOCAL *)__tmp__4HQL);
              unread__YVJK(Self__0QFQ->local__ALZD,Self__0QFQ);
            } break;
            case __EXPR_MULTIPLE__: {
              remove__TVAK(__tmp__4HQL);
            } break;
            case __EXPR_EQUAL__: {
              remove__DWAK(__tmp__4HQL);
            } break;
            case __EXPR_NOT_EQUAL__: {
              remove__HWAK(__tmp__4HQL);
            } break;
            case __REAL_CST__: {
            } break;
            case __CHARACTER_CST__: {
            } break;
            case __IS_EXPANDED__: {
              Self__2QFQ=((__READ_LOCAL *)((__IS_EXPANDED *)__tmp__4HQL)->receiver__OO2H);
              unread__YVJK(Self__2QFQ->local__ALZD,Self__2QFQ);
            } break;
            case __GET_TYPE_ID__: {
              remove__SWAK(__tmp__4HQL);
            } break;
            case __EXPR_SUP__: {
              remove__VWAK(__tmp__4HQL);
            } break;
            case __EXPR_SUB__: {
              remove__ZWAK(__tmp__4HQL);
            } break;
            case __EXPR_MUL__: {
              remove__3WAK(__tmp__4HQL);
            } break;
            case __EXPR_DIV__: {
              remove__BXAK(__tmp__4HQL);
            } break;
            case __EXPR_AND__: {
              remove__FXAK(__tmp__4HQL);
            } break;
            case __EXPR_SHIFT_R__: {
              remove__JXAK(__tmp__4HQL);
            } break;
            case __EXPR_SHIFT_L__: {
              remove__NXAK(__tmp__4HQL);
            } break;
            case __PUT_TO__: {
              remove__RXAK(__tmp__4HQL);
            } break;
            case __ITEM__: {
              remove__SYAK(__tmp__4HQL);
            } break;
            case __SIZE_OF__: {
              remove__WYAK(__tmp__4HQL);
            } break;
            case __CAST__: {
              remove__ZYAK(__tmp__4HQL);
            } break;
            case __CALL_SLOT__: {
              remove__2NML(__tmp__4HQL);
            } break;
            case __READ_SLOT__: {
              remove__4GHK(__tmp__4HQL);
            } break;
            case __READ_GLOBAL__: {
              Self__3QFQ=((__READ_GLOBAL *)__tmp__4HQL);
              unread__15ML(Self__3QFQ->global__RHJK,Self__3QFQ);
            } break;
            case __EXPR_NOT_LOGIC__: {
              remove__GWZM(__tmp__4HQL);
            } break;
            case __EXPR_OR_LOGIC__: {
              remove__WPEO(__tmp__4HQL);
            } break;
            case __EXPR_OR_OR_LOGIC__: {
              remove__WMKO(__tmp__4HQL);
            } break;
            case __EXPR_AND_LOGIC__: {
              remove__0PEO(__tmp__4HQL);
            } break;
            case __EXPR_AND_AND_LOGIC__: {
              remove__1MKO(__tmp__4HQL);
            } break;
            case __EXPR_NEG__: {
              remove__3KJM(__tmp__4HQL);
            } break;
            case __EXPR_ADD__: {
              remove__QQML(__tmp__4HQL);
            } break;
            case __EXPR_NOT__: {
              remove__D5YM(__tmp__4HQL);
            } break;
            case __EXPR_MOD__: {
              remove__4PEO(__tmp__4HQL);
            } break;
            case __EXPR_SUP_EQ__: {
              remove__X5DP(__tmp__4HQL);
            } break;
            case __EXPR_INF__: {
              remove__KZQN(__tmp__4HQL);
            } break;
            case __EXPR_INF_EQ__: {
              remove__OZQN(__tmp__4HQL);
            } break;
            case __EXPR_OR__: {
              remove__LUPN(__tmp__4HQL);
            } break;
            case __EXPR_XOR__: {
              remove__AQTO(__tmp__4HQL);
            } break;
            };
            unwrite__CDNL(Self__GTPL,Self__GTPL->last_write__Y5IL);
          };
        };
      };
    };
  };
  return(result__JTPL);
}

static __BOOLEAN is_invariant__E4WL(__READ_SLOT *Self__F4WL)
// ({READ_SLOT}) With resultRecursive, No inlinable.
{
  return(is_invariant__FJ2L(Self__F4WL->slot__EVGK,Self__F4WL->receiver__I1TI));
}

static __BOOLEAN is_signed__WFKN(__INTEGER_CST *Self__XFKN)
// ({INTEGER_CST}) With resultNo recursive, No inlinable.
{
  void *__tmp__1FKN;
  void *__tmp__2FKN;
  __tmp__1FKN=((__TYPE_FULL *)Self__XFKN->parent_constant__P3LC.static_type__F4YD)->parent_type__KTL;
  switch (((struct ___OBJ *)__tmp__1FKN)->__id) {
  case __TYPE__: {
    __tmp__2FKN=((__PROTOTYPE *)((__TYPE *)__tmp__1FKN)->prototype__RD)->parent_named__QD.name__1QB;
  } break;
  case __TYPE_NULL__: {
    __tmp__2FKN=(&__string_59);
  } break;
  case __TYPE_VOID__: {
    __tmp__2FKN=(&__string_2);
  } break;
  case __TYPE_CONTEXT__: {
    __tmp__2FKN=(&__string_44);
  } break;
  case __TYPE_ID__: {
    __tmp__2FKN=(&__string_46);
  } break;
  case __TYPE_GENERIC__: {
    __tmp__2FKN=((__TYPE_GENERIC *)__tmp__1FKN)->name__2R2B;
  } break;
  case __PROFIL_BLOCK__: {
    __tmp__2FKN=((__PROFIL_BLOCK *)__tmp__1FKN)->parent_profil__GHAG.name__XJEI;
  } break;
  };
  return((((((void *)__tmp__2FKN == (void *)(&__string_51)) || ((void *)__tmp__2FKN == (void *)(&__string_52))) || ((void *)__tmp__2FKN == (void *)(&__string_53))) || ((void *)__tmp__2FKN == (void *)(&__string_54))));
}

static void remove_first__XRAM(__FAST_ARRAYoWRITEo *Self__YRAM)
// ({FAST_ARRAYoWRITEo}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__PSAM,i__KVEM;
  void **__tmp__OSAM,**Self__BVEM;
  if ((Self__YRAM->parent_arrayed_collection__TAEH.upper__NPDI ==  0)) {
    Self__YRAM->parent_arrayed_collection__TAEH.storage__LQDI=NULL;
    Self__YRAM->parent_arrayed_collection__TAEH.capacity__PPDI= 0;
    Self__YRAM->parent_arrayed_collection__TAEH.upper__NPDI=(__INTEGER)(-  1);
  } else {
    __tmp__OSAM=Self__YRAM->parent_arrayed_collection__TAEH.storage__LQDI;
    __tmp__PSAM=Self__YRAM->parent_arrayed_collection__TAEH.upper__NPDI;
    Self__BVEM=((void **)__tmp__OSAM);
    i__KVEM= 0;
    while ((i__KVEM != __tmp__PSAM)) {
      Self__BVEM[i__KVEM]=Self__BVEM[(__INTEGER)(i__KVEM +  1)];
      i__KVEM=(__INTEGER)(i__KVEM +  1);
    };
    Self__YRAM->parent_arrayed_collection__TAEH.upper__NPDI=(__INTEGER)(Self__YRAM->parent_arrayed_collection__TAEH.upper__NPDI -  1);
  };
}

static __INTEGER fast_first_index_of__NUZL(__FAST_ARRAYoWRITEo *Self__OUZL,void *element__PUZL)
// ({FAST_ARRAYoWRITEo},{WRITE_GLOBALxWRITE_SLOTxWRITE_LOCAL}) With resultNo recursive, No inlinable.
{
  __INTEGER result__RUZL,__tmp__0UZL,idx__DJCM;
  void **__tmp__ZUZL,**Self__XICM;
  result__RUZL= 0;
  if ((Self__OUZL->parent_arrayed_collection__TAEH.upper__NPDI >=  0)) {
    __tmp__ZUZL=Self__OUZL->parent_arrayed_collection__TAEH.storage__LQDI;
    __tmp__0UZL=Self__OUZL->parent_arrayed_collection__TAEH.upper__NPDI;
    Self__XICM=((void **)__tmp__ZUZL);
    idx__DJCM= 0;
    while ((! ((idx__DJCM > __tmp__0UZL) || ((void *)element__PUZL == (void *)Self__XICM[idx__DJCM])))) {
      idx__DJCM=(__INTEGER)(idx__DJCM +  1);
    };
    result__RUZL=idx__DJCM;
  };
  return(result__RUZL);
}

static void remove__KWZL(__FAST_ARRAYoWRITEo *Self__LWZL,__INTEGER index__MWZL)
// ({FAST_ARRAYoWRITEo},{INTEGER}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__VWZL,i__2E4L;
  void **__tmp__UWZL,**Self__LE4L;
  __tmp__UWZL=Self__LWZL->parent_arrayed_collection__TAEH.storage__LQDI;
  __tmp__VWZL=Self__LWZL->parent_arrayed_collection__TAEH.upper__NPDI;
  Self__LE4L=((void **)__tmp__UWZL);
  i__2E4L=index__MWZL;
  while ((i__2E4L != __tmp__VWZL)) {
    Self__LE4L[i__2E4L]=Self__LE4L[(__INTEGER)(i__2E4L +  1)];
    i__2E4L=(__INTEGER)(i__2E4L +  1);
  };
  Self__LWZL->parent_arrayed_collection__TAEH.upper__NPDI=(__INTEGER)(Self__LWZL->parent_arrayed_collection__TAEH.upper__NPDI -  1);
}

static __FAST_ARRAYoITM_LOCALo* create_with_capacity__XLGC(__INTEGER new_count__ZLGC)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __POINTER ptr__00GC;
  __INTEGER typ_id__50GC;
  __UINTEGER_32 sz__20GC,a__OI3Q,new_size__MI3Q,t__SI3Q,a__UI3Q;
  __FAST_ARRAYoITM_LOCALo *result__Z0GC,*Self__XMPC;
  result__Z0GC=NULL;
  ptr__00GC=((__POINTER )(NULL));
  typ_id__50GC= 0;
  sz__20GC=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
  if ((sz__20GC ==  0)) {
    result__Z0GC=FAST_ARRAYoITM_LOCALo__;
  } else {
    typ_id__50GC=__FAST_ARRAYoITM_LOCALo__;
    clone_allocation_size__S0C=(__UINTEGER_32)(clone_allocation_size__S0C + sz__20GC);
    if ((typ_id__50GC == (__INTEGER)(-  1))) {
      a__OI3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      new_size__MI3Q=(__UINTEGER_32)((__UINTEGER_32)(sz__20GC + a__OI3Q) & (__UINTEGER_32)(~ a__OI3Q));
      ptr__00GC=micro_alloc__table__lab__BOI(new_size__MI3Q,((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MI3Q / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))),new_size__MI3Q);
    } else {
      t__SI3Q=((__UINTEGER_32 )typ_id__50GC);
      a__UI3Q=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
      ptr__00GC=micro_alloc__table__lab__BOI((__UINTEGER_32)((__UINTEGER_32)(sz__20GC + a__UI3Q) & (__UINTEGER_32)(~ a__UI3Q)),((__POINTER )(&(table_type[(t__SI3Q)]))),(__UINTEGER_32)(t__SI3Q |  1));
    };
    result__Z0GC=((__FAST_ARRAYoITM_LOCALo *)ptr__00GC);
    *(result__Z0GC) = *(FAST_ARRAYoITM_LOCALo__);
  };
  Self__XMPC=((__FAST_ARRAYoITM_LOCALo *)result__Z0GC);
  if ((Self__XMPC->parent_arrayed_collection__WCFC.capacity__1LPC < new_count__ZLGC)) {
    Self__XMPC->parent_arrayed_collection__WCFC.storage__GMPC=create__PNBD(new_count__ZLGC);
    Self__XMPC->parent_arrayed_collection__WCFC.capacity__1LPC=new_count__ZLGC;
  };
  Self__XMPC->parent_arrayed_collection__WCFC.upper__3XGC=(__INTEGER)(-  1);
  return(result__Z0GC);
}

static void** create__PNBD(__INTEGER nb_elements__RNBD)
// ({INTEGER}) With resultNo recursive, No inlinable.
{
  __INTEGER Self__VRAE;
  void **Result__2QGD;
  Result__2QGD=((void **)alloc_dynamic__J0Y(((__UINTEGER_32 )(__INTEGER)(nb_elements__RNBD * ((__INTEGER )(sizeof(void *)))))));
  Self__VRAE=(__INTEGER)(nb_elements__RNBD -  1);
  while ((Self__VRAE >=  0)) {
    Result__2QGD[Self__VRAE]=NULL;
    Self__VRAE=(__INTEGER)(Self__VRAE -  1);
  };
  return(Result__2QGD);
}

static void* read_argument__VBLC(__PARSER *Self__WBLC)
// ({PARSER}) With resultNo recursive, No inlinable.
{
  void *result__YBLC;
  result__YBLC=read_expr_primary__EXIC(Self__WBLC);
  if ((((void *)result__YBLC == (void *)NULL) && read_identifier__OLEB())) {
    result__YBLC=create__name__Q5JC(current_position__EJG(),last_string__V1G);
  };
  return(result__YBLC);
}

static void swap__with__3GEM(__INTEGER i1__5GEM,__INTEGER i2__AHEM)
// ({INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
{
  void *__tmp__CHEM,*__tmp__EHEM,*tmp__NFFM;
  __FAST_ARRAYoPROFILo *Self__2EFM;
  __tmp__CHEM=((void **)((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.storage__P1L)[i2__AHEM];
  if (((struct ___OBJ *)__tmp__CHEM)->__id==__PROFIL_SLOT__) {
    ((__PROFIL_SLOT *)__tmp__CHEM)->parent_profil__51LC.life_index__01RI=i1__5GEM;
  } else {
    ((__PROFIL_BLOCK *)__tmp__CHEM)->parent_profil__GHAG.life_index__01RI=i1__5GEM;
  };
  __tmp__EHEM=((void **)((__FAST_ARRAYoPROFILo *)profil_list__ENB)->parent_arrayed_collection__DNB.storage__P1L)[i1__5GEM];
  if (((struct ___OBJ *)__tmp__EHEM)->__id==__PROFIL_SLOT__) {
    ((__PROFIL_SLOT *)__tmp__EHEM)->parent_profil__51LC.life_index__01RI=i2__AHEM;
  } else {
    ((__PROFIL_BLOCK *)__tmp__EHEM)->parent_profil__GHAG.life_index__01RI=i2__AHEM;
  };
  Self__2EFM=((__FAST_ARRAYoPROFILo *)profil_list__ENB);
  tmp__NFFM=((void **)Self__2EFM->parent_arrayed_collection__DNB.storage__P1L)[i1__5GEM];
  ((void **)Self__2EFM->parent_arrayed_collection__DNB.storage__P1L)[i1__5GEM]=((void **)Self__2EFM->parent_arrayed_collection__DNB.storage__P1L)[i2__AHEM];
  ((void **)Self__2EFM->parent_arrayed_collection__DNB.storage__P1L)[i2__AHEM]=tmp__NFFM;
}

static void set_life__KBCM(void *p__MBCM)
// ({PROFIL_SLOTxPROFIL_BLOCK}) VoidNo recursive, No inlinable.
{
  __INTEGER __tmp__ACCM;
  __BOOLEAN __tmp__KCCM;
  if (((struct ___OBJ *)p__MBCM)->__id==__PROFIL_SLOT__) {
    __tmp__ACCM=((__PROFIL_SLOT *)p__MBCM)->parent_profil__51LC.life_index__01RI;
  } else {
    __tmp__ACCM=((__PROFIL_BLOCK *)p__MBCM)->parent_profil__GHAG.life_index__01RI;
  };
  if ((__tmp__ACCM == life_limit__2PQC)) {
    life_limit__2PQC=(__INTEGER)(life_limit__2PQC +  1);
    __tmp__KCCM=TRUE__;
  } else {
    __tmp__KCCM=FALSE__;
  };
  if ((! __tmp__KCCM)) {
    if ((__tmp__ACCM > life_limit__2PQC)) {
      swap__with__3GEM(__tmp__ACCM,life_limit__2PQC);
      life_limit__2PQC=(__INTEGER)(life_limit__2PQC +  1);
    };
  };
}

static __BOOLEAN is_seq_list__HMAN(void *l__JMAN)
// ({NULLxLIST}) With resultNo recursive, No inlinable.
{
  __INTEGER j__MMAN;
  __BOOLEAN result__LMAN;
  void **__tmp__D15Q;
  result__LMAN=FALSE__;
  j__MMAN=((__FAST_ARRAYoLISTo *)seq_list__DXRG)->parent_arrayed_collection__CXRG.upper__SU4G;
  __tmp__D15Q=((__FAST_ARRAYoLISTo *)seq_list__DXRG)->parent_arrayed_collection__CXRG.storage__QV4G;
  while (((j__MMAN >=  0) && (! result__LMAN))) {
    result__LMAN=((void *)((void **)__tmp__D15Q)[j__MMAN] == (void *)l__JMAN);
    j__MMAN=(__INTEGER)(j__MMAN -  1);
  };
  return(result__LMAN);
}

static __BOOLEAN is_invariant__FJ2L(__SLOT_DATA *Self__GJ2L,void *rec__HJ2L)
// ({SLOT_DATA},{NULLxLISTxSTRING_CSTxEXTERNAL_CxPROTOTYPE_CSTxINTEGER_CSTxREAD_LOCALxEXPR_MULTIPLExEXPR_EQUALxEXPR_NOT_EQUALxREAL_CSTxCHARACTER_CSTxIS_EXPANDEDxGET_TYPE_IDxEXPR_SUPxEXPR_SUBxEXPR_MULxEXPR_DIVxEXPR_ANDxEXPR_SHIFT_RxEXPR_SHIFT_LxPUT_TOxITEMxSIZE_OFxCASTxCALL_SLOTxREAD_SLOTxREAD_GLOBALxEXPR_NOT_LOGICxEXPR_OR_LOGICxEXPR_OR_OR_LOGICxEXPR_AND_LOGICxEXPR_AND_AND_LOGICxEXPR_NEGxEXPR_ADDxEXPR_NOTxEXPR_MODxEXPR_SUP_EQxEXPR_INFxEXPR_INF_EQxEXPR_ORxEXPR_XOR}) With resultRecursive, No inlinable.
{
  __BOOLEAN __tmp__RJ2L,__tmp__OJ2L;
  if (((void *)rec__HJ2L == (void *)NULL)) {
    __tmp__RJ2L=TRUE__;
  } else {
    switch (((struct ___OBJ *)rec__HJ2L)->__id) {
    case __LIST__: {
      __tmp__OJ2L=is_invariant__AH0M(rec__HJ2L);
    } break;
    case __STRING_CST__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OJ2L=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__OJ2L=is_invariant__FVCM(rec__HJ2L);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OJ2L=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OJ2L=is_invariant__OVCM(rec__HJ2L);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OJ2L=is_invariant__2VCM(rec__HJ2L);
    } break;
    case __REAL_CST__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__OJ2L=is_invariant__WWCM(rec__HJ2L);
    } break;
    case __EXPR_SUB__: {
      __tmp__OJ2L=is_invariant__EXCM(rec__HJ2L);
    } break;
    case __EXPR_MUL__: {
      __tmp__OJ2L=is_invariant__SXCM(rec__HJ2L);
    } break;
    case __EXPR_DIV__: {
      __tmp__OJ2L=is_invariant__AYCM(rec__HJ2L);
    } break;
    case __EXPR_AND__: {
      __tmp__OJ2L=is_invariant__OYCM(rec__HJ2L);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OJ2L=is_invariant__2YCM(rec__HJ2L);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OJ2L=is_invariant__KZCM(rec__HJ2L);
    } break;
    case __PUT_TO__: {
      __tmp__OJ2L=is_invariant__YZCM(rec__HJ2L);
    } break;
    case __ITEM__: {
      __tmp__OJ2L=is_invariant__P0CM(rec__HJ2L);
    } break;
    case __SIZE_OF__: {
      __tmp__OJ2L=TRUE__;
    } break;
    case __CAST__: {
      __tmp__OJ2L=is_invariant__A1CM(rec__HJ2L);
    } break;
    case __CALL_SLOT__: {
      __tmp__OJ2L=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__OJ2L=is_invariant__E4WL(rec__HJ2L);
    } break;
    case __READ_GLOBAL__: {
      __tmp__OJ2L=is_invariant__FJ2L(((__READ_GLOBAL *)rec__HJ2L)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OJ2L=is_invariant__QKMN(rec__HJ2L);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OJ2L=is_invariant__M1FO(rec__HJ2L);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OJ2L=is_invariant__XFMO(rec__HJ2L);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OJ2L=is_invariant__01FO(rec__HJ2L);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OJ2L=is_invariant__GGMO(rec__HJ2L);
    } break;
    case __EXPR_NEG__: {
      __tmp__OJ2L=is_invariant__ZKLM(rec__HJ2L);
    } break;
    case __EXPR_ADD__: {
      __tmp__OJ2L=is_invariant__Q5DM(rec__HJ2L);
    } break;
    case __EXPR_NOT__: {
      __tmp__OJ2L=is_invariant__FI0M(rec__HJ2L);
    } break;
    case __EXPR_MOD__: {
      __tmp__OJ2L=is_invariant__I2FO(rec__HJ2L);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OJ2L=is_invariant__PWEP(rec__HJ2L);
    } break;
    case __EXPR_INF__: {
      __tmp__OJ2L=is_invariant__1TSN(rec__HJ2L);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OJ2L=is_invariant__JUSN(rec__HJ2L);
    } break;
    case __EXPR_OR__: {
      __tmp__OJ2L=is_invariant__LERN(rec__HJ2L);
    } break;
    case __EXPR_XOR__: {
      __tmp__OJ2L=is_invariant__QTVO(rec__HJ2L);
    } break;
    };
    __tmp__RJ2L=__tmp__OJ2L;
  };
  return((((__tmp__RJ2L && ((void *)Self__GJ2L->last_write__Y5IL != (void *)NULL)) && (loop_seq_call_and_loop__4J2L == seq_call_and_loop__VREJ)) && (Self__GJ2L->last_seq_index__55IL <= ((__UINTEGER_32 )loop_seq_index__IK2L))));
}

static __BOOLEAN is_invariant__AH0M(__LIST *Self__BH0M)
// ({LIST}) With resultRecursive, No inlinable.
{
  __INTEGER j__EH0M,j__ZKKN;
  void *__tmp__3H0M;
  __SWITCH *Self__WKKN;
  void *__tmp__0KKN,*__tmp__MMKN,*__tmp__RMKN,*__tmp__XMKN,*__tmp__DNKN;
  __WRITE_SLOT *Self__PMKN;
  __BOOLEAN result__DH0M,__tmp__4H0M,result__YKKN,__tmp__1KKN;
  __BOOLEAN __tmp__NMKN,__tmp__SMKN,__tmp__YMKN,__tmp__1MKN,__tmp__ENKN;
  result__DH0M=TRUE__;
  j__EH0M= 0;
  while (((j__EH0M <= ((__FAST_ARRAYoINSTRo *)Self__BH0M->expr_list__JUOG)->parent_arrayed_collection__IUOG.upper__THQG) & result__DH0M)) {
    __tmp__3H0M=((void **)((__FAST_ARRAYoINSTRo *)Self__BH0M->expr_list__JUOG)->parent_arrayed_collection__IUOG.storage__BM4G)[j__EH0M];
    switch (((struct ___OBJ *)__tmp__3H0M)->__id) {
    case __LIST__: {
      __tmp__4H0M=is_invariant__AH0M(__tmp__3H0M);
    } break;
    case __STRING_CST__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __PUSH__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __SWITCH__: {
      Self__WKKN=((__SWITCH *)__tmp__3H0M);
      result__YKKN=FALSE__;
      j__ZKKN= 0;
      __tmp__0KKN=Self__WKKN->expr__MMFI;
      switch (((struct ___OBJ *)__tmp__0KKN)->__id) {
      case __LIST__: {
        __tmp__1KKN=is_invariant__AH0M(__tmp__0KKN);
      } break;
      case __STRING_CST__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__1KKN=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__1KKN=is_invariant__FVCM(__tmp__0KKN);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__1KKN=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__1KKN=is_invariant__OVCM(__tmp__0KKN);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__1KKN=is_invariant__2VCM(__tmp__0KKN);
      } break;
      case __REAL_CST__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__1KKN=is_invariant__WWCM(__tmp__0KKN);
      } break;
      case __EXPR_SUB__: {
        __tmp__1KKN=is_invariant__EXCM(__tmp__0KKN);
      } break;
      case __EXPR_MUL__: {
        __tmp__1KKN=is_invariant__SXCM(__tmp__0KKN);
      } break;
      case __EXPR_DIV__: {
        __tmp__1KKN=is_invariant__AYCM(__tmp__0KKN);
      } break;
      case __EXPR_AND__: {
        __tmp__1KKN=is_invariant__OYCM(__tmp__0KKN);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__1KKN=is_invariant__2YCM(__tmp__0KKN);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__1KKN=is_invariant__KZCM(__tmp__0KKN);
      } break;
      case __PUT_TO__: {
        __tmp__1KKN=is_invariant__YZCM(__tmp__0KKN);
      } break;
      case __ITEM__: {
        __tmp__1KKN=is_invariant__P0CM(__tmp__0KKN);
      } break;
      case __SIZE_OF__: {
        __tmp__1KKN=TRUE__;
      } break;
      case __CAST__: {
        __tmp__1KKN=is_invariant__A1CM(__tmp__0KKN);
      } break;
      case __CALL_SLOT__: {
        __tmp__1KKN=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__1KKN=is_invariant__E4WL(__tmp__0KKN);
      } break;
      case __READ_GLOBAL__: {
        __tmp__1KKN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__0KKN)->global__RHJK,NULL);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__1KKN=is_invariant__QKMN(__tmp__0KKN);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__1KKN=is_invariant__M1FO(__tmp__0KKN);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__1KKN=is_invariant__XFMO(__tmp__0KKN);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__1KKN=is_invariant__01FO(__tmp__0KKN);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__1KKN=is_invariant__GGMO(__tmp__0KKN);
      } break;
      case __EXPR_NEG__: {
        __tmp__1KKN=is_invariant__ZKLM(__tmp__0KKN);
      } break;
      case __EXPR_ADD__: {
        __tmp__1KKN=is_invariant__Q5DM(__tmp__0KKN);
      } break;
      case __EXPR_NOT__: {
        __tmp__1KKN=is_invariant__FI0M(__tmp__0KKN);
      } break;
      case __EXPR_MOD__: {
        __tmp__1KKN=is_invariant__I2FO(__tmp__0KKN);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__1KKN=is_invariant__PWEP(__tmp__0KKN);
      } break;
      case __EXPR_INF__: {
        __tmp__1KKN=is_invariant__1TSN(__tmp__0KKN);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__1KKN=is_invariant__JUSN(__tmp__0KKN);
      } break;
      case __EXPR_OR__: {
        __tmp__1KKN=is_invariant__LERN(__tmp__0KKN);
      } break;
      case __EXPR_XOR__: {
        __tmp__1KKN=is_invariant__QTVO(__tmp__0KKN);
      } break;
      };
      if (__tmp__1KKN) {
        result__YKKN=TRUE__;
        j__ZKKN= 0;
        while (((j__ZKKN <= ((__FAST_ARRAYoCASEo *)Self__WKKN->list__SLAG)->parent_arrayed_collection__CHAG.upper__HMAG) & result__YKKN)) {
          result__YKKN=is_invariant__AH0M(((__CASE *)((void **)((__FAST_ARRAYoCASEo *)Self__WKKN->list__SLAG)->parent_arrayed_collection__CHAG.storage__NYEJ)[j__ZKKN])->code__BQAG);
          j__ZKKN=(__INTEGER)(j__ZKKN +  1);
        };
      };
      __tmp__4H0M=result__YKKN;
    } break;
    case __NODE_TYPE__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__4H0M=is_invariant__FVCM(__tmp__3H0M);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __NODE_STYLE__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __WRITE_GLOBAL__: {
      __tmp__MMKN=((__WRITE_GLOBAL *)__tmp__3H0M)->parent_write__QBGH.value__HBEH;
      switch (((struct ___OBJ *)__tmp__MMKN)->__id) {
      case __LIST__: {
        __tmp__NMKN=is_invariant__AH0M(__tmp__MMKN);
      } break;
      case __STRING_CST__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__NMKN=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__NMKN=is_invariant__FVCM(__tmp__MMKN);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__NMKN=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__NMKN=is_invariant__OVCM(__tmp__MMKN);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__NMKN=is_invariant__2VCM(__tmp__MMKN);
      } break;
      case __REAL_CST__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__NMKN=is_invariant__WWCM(__tmp__MMKN);
      } break;
      case __EXPR_SUB__: {
        __tmp__NMKN=is_invariant__EXCM(__tmp__MMKN);
      } break;
      case __EXPR_MUL__: {
        __tmp__NMKN=is_invariant__SXCM(__tmp__MMKN);
      } break;
      case __EXPR_DIV__: {
        __tmp__NMKN=is_invariant__AYCM(__tmp__MMKN);
      } break;
      case __EXPR_AND__: {
        __tmp__NMKN=is_invariant__OYCM(__tmp__MMKN);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__NMKN=is_invariant__2YCM(__tmp__MMKN);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__NMKN=is_invariant__KZCM(__tmp__MMKN);
      } break;
      case __PUT_TO__: {
        __tmp__NMKN=is_invariant__YZCM(__tmp__MMKN);
      } break;
      case __ITEM__: {
        __tmp__NMKN=is_invariant__P0CM(__tmp__MMKN);
      } break;
      case __SIZE_OF__: {
        __tmp__NMKN=TRUE__;
      } break;
      case __CAST__: {
        __tmp__NMKN=is_invariant__A1CM(__tmp__MMKN);
      } break;
      case __CALL_SLOT__: {
        __tmp__NMKN=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__NMKN=is_invariant__E4WL(__tmp__MMKN);
      } break;
      case __READ_GLOBAL__: {
        __tmp__NMKN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__MMKN)->global__RHJK,NULL);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__NMKN=is_invariant__QKMN(__tmp__MMKN);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__NMKN=is_invariant__M1FO(__tmp__MMKN);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__NMKN=is_invariant__XFMO(__tmp__MMKN);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__NMKN=is_invariant__01FO(__tmp__MMKN);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__NMKN=is_invariant__GGMO(__tmp__MMKN);
      } break;
      case __EXPR_NEG__: {
        __tmp__NMKN=is_invariant__ZKLM(__tmp__MMKN);
      } break;
      case __EXPR_ADD__: {
        __tmp__NMKN=is_invariant__Q5DM(__tmp__MMKN);
      } break;
      case __EXPR_NOT__: {
        __tmp__NMKN=is_invariant__FI0M(__tmp__MMKN);
      } break;
      case __EXPR_MOD__: {
        __tmp__NMKN=is_invariant__I2FO(__tmp__MMKN);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__NMKN=is_invariant__PWEP(__tmp__MMKN);
      } break;
      case __EXPR_INF__: {
        __tmp__NMKN=is_invariant__1TSN(__tmp__MMKN);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__NMKN=is_invariant__JUSN(__tmp__MMKN);
      } break;
      case __EXPR_OR__: {
        __tmp__NMKN=is_invariant__LERN(__tmp__MMKN);
      } break;
      case __EXPR_XOR__: {
        __tmp__NMKN=is_invariant__QTVO(__tmp__MMKN);
      } break;
      };
      __tmp__4H0M=__tmp__NMKN;
    } break;
    case __WRITE_SLOT__: {
      Self__PMKN=((__WRITE_SLOT *)__tmp__3H0M);
      __tmp__RMKN=Self__PMKN->receiver__HU1H;
      switch (((struct ___OBJ *)__tmp__RMKN)->__id) {
      case __LIST__: {
        __tmp__SMKN=is_invariant__AH0M(__tmp__RMKN);
      } break;
      case __STRING_CST__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__SMKN=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__SMKN=is_invariant__FVCM(__tmp__RMKN);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__SMKN=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__SMKN=is_invariant__OVCM(__tmp__RMKN);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__SMKN=is_invariant__2VCM(__tmp__RMKN);
      } break;
      case __REAL_CST__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__SMKN=is_invariant__WWCM(__tmp__RMKN);
      } break;
      case __EXPR_SUB__: {
        __tmp__SMKN=is_invariant__EXCM(__tmp__RMKN);
      } break;
      case __EXPR_MUL__: {
        __tmp__SMKN=is_invariant__SXCM(__tmp__RMKN);
      } break;
      case __EXPR_DIV__: {
        __tmp__SMKN=is_invariant__AYCM(__tmp__RMKN);
      } break;
      case __EXPR_AND__: {
        __tmp__SMKN=is_invariant__OYCM(__tmp__RMKN);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__SMKN=is_invariant__2YCM(__tmp__RMKN);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__SMKN=is_invariant__KZCM(__tmp__RMKN);
      } break;
      case __PUT_TO__: {
        __tmp__SMKN=is_invariant__YZCM(__tmp__RMKN);
      } break;
      case __ITEM__: {
        __tmp__SMKN=is_invariant__P0CM(__tmp__RMKN);
      } break;
      case __SIZE_OF__: {
        __tmp__SMKN=TRUE__;
      } break;
      case __CAST__: {
        __tmp__SMKN=is_invariant__A1CM(__tmp__RMKN);
      } break;
      case __CALL_SLOT__: {
        __tmp__SMKN=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__SMKN=is_invariant__E4WL(__tmp__RMKN);
      } break;
      case __READ_GLOBAL__: {
        __tmp__SMKN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__RMKN)->global__RHJK,NULL);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__SMKN=is_invariant__QKMN(__tmp__RMKN);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__SMKN=is_invariant__M1FO(__tmp__RMKN);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__SMKN=is_invariant__XFMO(__tmp__RMKN);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__SMKN=is_invariant__01FO(__tmp__RMKN);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__SMKN=is_invariant__GGMO(__tmp__RMKN);
      } break;
      case __EXPR_NEG__: {
        __tmp__SMKN=is_invariant__ZKLM(__tmp__RMKN);
      } break;
      case __EXPR_ADD__: {
        __tmp__SMKN=is_invariant__Q5DM(__tmp__RMKN);
      } break;
      case __EXPR_NOT__: {
        __tmp__SMKN=is_invariant__FI0M(__tmp__RMKN);
      } break;
      case __EXPR_MOD__: {
        __tmp__SMKN=is_invariant__I2FO(__tmp__RMKN);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__SMKN=is_invariant__PWEP(__tmp__RMKN);
      } break;
      case __EXPR_INF__: {
        __tmp__SMKN=is_invariant__1TSN(__tmp__RMKN);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__SMKN=is_invariant__JUSN(__tmp__RMKN);
      } break;
      case __EXPR_OR__: {
        __tmp__SMKN=is_invariant__LERN(__tmp__RMKN);
      } break;
      case __EXPR_XOR__: {
        __tmp__SMKN=is_invariant__QTVO(__tmp__RMKN);
      } break;
      };
      if (__tmp__SMKN) {
        __tmp__XMKN=Self__PMKN->parent_write__3BGH.value__HBEH;
        switch (((struct ___OBJ *)__tmp__XMKN)->__id) {
        case __LIST__: {
          __tmp__YMKN=is_invariant__AH0M(__tmp__XMKN);
        } break;
        case __STRING_CST__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __EXTERNAL_C__: {
          __tmp__YMKN=FALSE__;
        } break;
        case __PROTOTYPE_CST__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __INTEGER_CST__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __READ_LOCAL__: {
          __tmp__YMKN=is_invariant__FVCM(__tmp__XMKN);
        } break;
        case __EXPR_MULTIPLE__: {
          __tmp__YMKN=FALSE__;
        } break;
        case __EXPR_EQUAL__: {
          __tmp__YMKN=is_invariant__OVCM(__tmp__XMKN);
        } break;
        case __EXPR_NOT_EQUAL__: {
          __tmp__YMKN=is_invariant__2VCM(__tmp__XMKN);
        } break;
        case __REAL_CST__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __CHARACTER_CST__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __IS_EXPANDED__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __GET_TYPE_ID__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __EXPR_SUP__: {
          __tmp__YMKN=is_invariant__WWCM(__tmp__XMKN);
        } break;
        case __EXPR_SUB__: {
          __tmp__YMKN=is_invariant__EXCM(__tmp__XMKN);
        } break;
        case __EXPR_MUL__: {
          __tmp__YMKN=is_invariant__SXCM(__tmp__XMKN);
        } break;
        case __EXPR_DIV__: {
          __tmp__YMKN=is_invariant__AYCM(__tmp__XMKN);
        } break;
        case __EXPR_AND__: {
          __tmp__YMKN=is_invariant__OYCM(__tmp__XMKN);
        } break;
        case __EXPR_SHIFT_R__: {
          __tmp__YMKN=is_invariant__2YCM(__tmp__XMKN);
        } break;
        case __EXPR_SHIFT_L__: {
          __tmp__YMKN=is_invariant__KZCM(__tmp__XMKN);
        } break;
        case __PUT_TO__: {
          __tmp__YMKN=is_invariant__YZCM(__tmp__XMKN);
        } break;
        case __ITEM__: {
          __tmp__YMKN=is_invariant__P0CM(__tmp__XMKN);
        } break;
        case __SIZE_OF__: {
          __tmp__YMKN=TRUE__;
        } break;
        case __CAST__: {
          __tmp__YMKN=is_invariant__A1CM(__tmp__XMKN);
        } break;
        case __CALL_SLOT__: {
          __tmp__YMKN=FALSE__;
        } break;
        case __READ_SLOT__: {
          __tmp__YMKN=is_invariant__E4WL(__tmp__XMKN);
        } break;
        case __READ_GLOBAL__: {
          __tmp__YMKN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__XMKN)->global__RHJK,NULL);
        } break;
        case __EXPR_NOT_LOGIC__: {
          __tmp__YMKN=is_invariant__QKMN(__tmp__XMKN);
        } break;
        case __EXPR_OR_LOGIC__: {
          __tmp__YMKN=is_invariant__M1FO(__tmp__XMKN);
        } break;
        case __EXPR_OR_OR_LOGIC__: {
          __tmp__YMKN=is_invariant__XFMO(__tmp__XMKN);
        } break;
        case __EXPR_AND_LOGIC__: {
          __tmp__YMKN=is_invariant__01FO(__tmp__XMKN);
        } break;
        case __EXPR_AND_AND_LOGIC__: {
          __tmp__YMKN=is_invariant__GGMO(__tmp__XMKN);
        } break;
        case __EXPR_NEG__: {
          __tmp__YMKN=is_invariant__ZKLM(__tmp__XMKN);
        } break;
        case __EXPR_ADD__: {
          __tmp__YMKN=is_invariant__Q5DM(__tmp__XMKN);
        } break;
        case __EXPR_NOT__: {
          __tmp__YMKN=is_invariant__FI0M(__tmp__XMKN);
        } break;
        case __EXPR_MOD__: {
          __tmp__YMKN=is_invariant__I2FO(__tmp__XMKN);
        } break;
        case __EXPR_SUP_EQ__: {
          __tmp__YMKN=is_invariant__PWEP(__tmp__XMKN);
        } break;
        case __EXPR_INF__: {
          __tmp__YMKN=is_invariant__1TSN(__tmp__XMKN);
        } break;
        case __EXPR_INF_EQ__: {
          __tmp__YMKN=is_invariant__JUSN(__tmp__XMKN);
        } break;
        case __EXPR_OR__: {
          __tmp__YMKN=is_invariant__LERN(__tmp__XMKN);
        } break;
        case __EXPR_XOR__: {
          __tmp__YMKN=is_invariant__QTVO(__tmp__XMKN);
        } break;
        };
        __tmp__1MKN=__tmp__YMKN;
      } else {
        __tmp__1MKN=FALSE__;
      };
      __tmp__4H0M=__tmp__1MKN;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__4H0M=is_invariant__OVCM(__tmp__3H0M);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__4H0M=is_invariant__2VCM(__tmp__3H0M);
    } break;
    case __REAL_CST__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__4H0M=is_invariant__WWCM(__tmp__3H0M);
    } break;
    case __EXPR_SUB__: {
      __tmp__4H0M=is_invariant__EXCM(__tmp__3H0M);
    } break;
    case __EXPR_MUL__: {
      __tmp__4H0M=is_invariant__SXCM(__tmp__3H0M);
    } break;
    case __EXPR_DIV__: {
      __tmp__4H0M=is_invariant__AYCM(__tmp__3H0M);
    } break;
    case __EXPR_AND__: {
      __tmp__4H0M=is_invariant__OYCM(__tmp__3H0M);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__4H0M=is_invariant__2YCM(__tmp__3H0M);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__4H0M=is_invariant__KZCM(__tmp__3H0M);
    } break;
    case __PUT_TO__: {
      __tmp__4H0M=is_invariant__YZCM(__tmp__3H0M);
    } break;
    case __ITEM__: {
      __tmp__4H0M=is_invariant__P0CM(__tmp__3H0M);
    } break;
    case __SIZE_OF__: {
      __tmp__4H0M=TRUE__;
    } break;
    case __CAST__: {
      __tmp__4H0M=is_invariant__A1CM(__tmp__3H0M);
    } break;
    case __CALL_SLOT__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __NOP__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__4H0M=is_invariant__E4WL(__tmp__3H0M);
    } break;
    case __WRITE_LOCAL__: {
      __tmp__DNKN=((__WRITE_LOCAL *)__tmp__3H0M)->parent_write__X50I.value__HBEH;
      switch (((struct ___OBJ *)__tmp__DNKN)->__id) {
      case __LIST__: {
        __tmp__ENKN=is_invariant__AH0M(__tmp__DNKN);
      } break;
      case __STRING_CST__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __EXTERNAL_C__: {
        __tmp__ENKN=FALSE__;
      } break;
      case __PROTOTYPE_CST__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __INTEGER_CST__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __READ_LOCAL__: {
        __tmp__ENKN=is_invariant__FVCM(__tmp__DNKN);
      } break;
      case __EXPR_MULTIPLE__: {
        __tmp__ENKN=FALSE__;
      } break;
      case __EXPR_EQUAL__: {
        __tmp__ENKN=is_invariant__OVCM(__tmp__DNKN);
      } break;
      case __EXPR_NOT_EQUAL__: {
        __tmp__ENKN=is_invariant__2VCM(__tmp__DNKN);
      } break;
      case __REAL_CST__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __CHARACTER_CST__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __IS_EXPANDED__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __GET_TYPE_ID__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __EXPR_SUP__: {
        __tmp__ENKN=is_invariant__WWCM(__tmp__DNKN);
      } break;
      case __EXPR_SUB__: {
        __tmp__ENKN=is_invariant__EXCM(__tmp__DNKN);
      } break;
      case __EXPR_MUL__: {
        __tmp__ENKN=is_invariant__SXCM(__tmp__DNKN);
      } break;
      case __EXPR_DIV__: {
        __tmp__ENKN=is_invariant__AYCM(__tmp__DNKN);
      } break;
      case __EXPR_AND__: {
        __tmp__ENKN=is_invariant__OYCM(__tmp__DNKN);
      } break;
      case __EXPR_SHIFT_R__: {
        __tmp__ENKN=is_invariant__2YCM(__tmp__DNKN);
      } break;
      case __EXPR_SHIFT_L__: {
        __tmp__ENKN=is_invariant__KZCM(__tmp__DNKN);
      } break;
      case __PUT_TO__: {
        __tmp__ENKN=is_invariant__YZCM(__tmp__DNKN);
      } break;
      case __ITEM__: {
        __tmp__ENKN=is_invariant__P0CM(__tmp__DNKN);
      } break;
      case __SIZE_OF__: {
        __tmp__ENKN=TRUE__;
      } break;
      case __CAST__: {
        __tmp__ENKN=is_invariant__A1CM(__tmp__DNKN);
      } break;
      case __CALL_SLOT__: {
        __tmp__ENKN=FALSE__;
      } break;
      case __READ_SLOT__: {
        __tmp__ENKN=is_invariant__E4WL(__tmp__DNKN);
      } break;
      case __READ_GLOBAL__: {
        __tmp__ENKN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__DNKN)->global__RHJK,NULL);
      } break;
      case __EXPR_NOT_LOGIC__: {
        __tmp__ENKN=is_invariant__QKMN(__tmp__DNKN);
      } break;
      case __EXPR_OR_LOGIC__: {
        __tmp__ENKN=is_invariant__M1FO(__tmp__DNKN);
      } break;
      case __EXPR_OR_OR_LOGIC__: {
        __tmp__ENKN=is_invariant__XFMO(__tmp__DNKN);
      } break;
      case __EXPR_AND_LOGIC__: {
        __tmp__ENKN=is_invariant__01FO(__tmp__DNKN);
      } break;
      case __EXPR_AND_AND_LOGIC__: {
        __tmp__ENKN=is_invariant__GGMO(__tmp__DNKN);
      } break;
      case __EXPR_NEG__: {
        __tmp__ENKN=is_invariant__ZKLM(__tmp__DNKN);
      } break;
      case __EXPR_ADD__: {
        __tmp__ENKN=is_invariant__Q5DM(__tmp__DNKN);
      } break;
      case __EXPR_NOT__: {
        __tmp__ENKN=is_invariant__FI0M(__tmp__DNKN);
      } break;
      case __EXPR_MOD__: {
        __tmp__ENKN=is_invariant__I2FO(__tmp__DNKN);
      } break;
      case __EXPR_SUP_EQ__: {
        __tmp__ENKN=is_invariant__PWEP(__tmp__DNKN);
      } break;
      case __EXPR_INF__: {
        __tmp__ENKN=is_invariant__1TSN(__tmp__DNKN);
      } break;
      case __EXPR_INF_EQ__: {
        __tmp__ENKN=is_invariant__JUSN(__tmp__DNKN);
      } break;
      case __EXPR_OR__: {
        __tmp__ENKN=is_invariant__LERN(__tmp__DNKN);
      } break;
      case __EXPR_XOR__: {
        __tmp__ENKN=is_invariant__QTVO(__tmp__DNKN);
      } break;
      };
      __tmp__4H0M=__tmp__ENKN;
    } break;
    case __READ_GLOBAL__: {
      __tmp__4H0M=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__3H0M)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__4H0M=is_invariant__QKMN(__tmp__3H0M);
    } break;
    case __LOOP__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__4H0M=is_invariant__M1FO(__tmp__3H0M);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__4H0M=is_invariant__XFMO(__tmp__3H0M);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__4H0M=is_invariant__01FO(__tmp__3H0M);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__4H0M=is_invariant__GGMO(__tmp__3H0M);
    } break;
    case __EXPR_NEG__: {
      __tmp__4H0M=is_invariant__ZKLM(__tmp__3H0M);
    } break;
    case __EXPR_ADD__: {
      __tmp__4H0M=is_invariant__Q5DM(__tmp__3H0M);
    } break;
    case __EXPR_NOT__: {
      __tmp__4H0M=is_invariant__FI0M(__tmp__3H0M);
    } break;
    case __EXPR_MOD__: {
      __tmp__4H0M=is_invariant__I2FO(__tmp__3H0M);
    } break;
    case __LOOP_END__: {
      __tmp__4H0M=FALSE__;
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__4H0M=is_invariant__PWEP(__tmp__3H0M);
    } break;
    case __EXPR_INF__: {
      __tmp__4H0M=is_invariant__1TSN(__tmp__3H0M);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__4H0M=is_invariant__JUSN(__tmp__3H0M);
    } break;
    case __EXPR_OR__: {
      __tmp__4H0M=is_invariant__LERN(__tmp__3H0M);
    } break;
    case __EXPR_XOR__: {
      __tmp__4H0M=is_invariant__QTVO(__tmp__3H0M);
    } break;
    };
    result__DH0M=__tmp__4H0M;
    j__EH0M=(__INTEGER)(j__EH0M +  1);
  };
  return(result__DH0M);
}

static __BOOLEAN is_invariant__FVCM(__READ_LOCAL *Self__GVCM)
// ({READ_LOCAL}) With resultNo recursive, No inlinable.
{
  __LOCAL *Self__O3DM;
  Self__O3DM=((__LOCAL *)Self__GVCM->local__ALZD);
  return(((loop_seq_call_local_and_loop__Q3DM == seq_call_local_and_loop__51IL) && (((((void *)Self__O3DM->last_seq__LRJJ != (void *)NULL) && ((void *)((__LOCAL_SEQ *)Self__O3DM->last_seq__LRJJ)->last_write__G1IL != (void *)NULL)) && (((__LOCAL_SEQ *)Self__O3DM->last_seq__LRJJ)->last_seq_index__43IL <= ((__UINTEGER_32 )loop_seq_index__IK2L))) || (Self__O3DM->parent_variable__B2LC.parent_named__A2LC.style__LDGC == ' '))));
}

static __BOOLEAN is_invariant__OVCM(__EXPR_EQUAL *Self__PVCM)
// ({EXPR_EQUAL}) With resultRecursive, No inlinable.
{
  void *__tmp__RVCM,*__tmp__XVCM;
  __BOOLEAN __tmp__SVCM,__tmp__YVCM,__tmp__1VCM;
  __tmp__RVCM=Self__PVCM->parent_expr_binary_cmp__1LJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__RVCM)->__id) {
  case __LIST__: {
    __tmp__SVCM=is_invariant__AH0M(__tmp__RVCM);
  } break;
  case __STRING_CST__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__SVCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__SVCM=is_invariant__FVCM(__tmp__RVCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__SVCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__SVCM=is_invariant__OVCM(__tmp__RVCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__SVCM=is_invariant__2VCM(__tmp__RVCM);
  } break;
  case __REAL_CST__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__SVCM=is_invariant__WWCM(__tmp__RVCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__SVCM=is_invariant__EXCM(__tmp__RVCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__SVCM=is_invariant__SXCM(__tmp__RVCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__SVCM=is_invariant__AYCM(__tmp__RVCM);
  } break;
  case __EXPR_AND__: {
    __tmp__SVCM=is_invariant__OYCM(__tmp__RVCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__SVCM=is_invariant__2YCM(__tmp__RVCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__SVCM=is_invariant__KZCM(__tmp__RVCM);
  } break;
  case __PUT_TO__: {
    __tmp__SVCM=is_invariant__YZCM(__tmp__RVCM);
  } break;
  case __ITEM__: {
    __tmp__SVCM=is_invariant__P0CM(__tmp__RVCM);
  } break;
  case __SIZE_OF__: {
    __tmp__SVCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__SVCM=is_invariant__A1CM(__tmp__RVCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__SVCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__SVCM=is_invariant__E4WL(__tmp__RVCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__SVCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__RVCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__SVCM=is_invariant__QKMN(__tmp__RVCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__SVCM=is_invariant__M1FO(__tmp__RVCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__SVCM=is_invariant__XFMO(__tmp__RVCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__SVCM=is_invariant__01FO(__tmp__RVCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__SVCM=is_invariant__GGMO(__tmp__RVCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__SVCM=is_invariant__ZKLM(__tmp__RVCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__SVCM=is_invariant__Q5DM(__tmp__RVCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__SVCM=is_invariant__FI0M(__tmp__RVCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__SVCM=is_invariant__I2FO(__tmp__RVCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__SVCM=is_invariant__PWEP(__tmp__RVCM);
  } break;
  case __EXPR_INF__: {
    __tmp__SVCM=is_invariant__1TSN(__tmp__RVCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__SVCM=is_invariant__JUSN(__tmp__RVCM);
  } break;
  case __EXPR_OR__: {
    __tmp__SVCM=is_invariant__LERN(__tmp__RVCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__SVCM=is_invariant__QTVO(__tmp__RVCM);
  } break;
  };
  if (__tmp__SVCM) {
    __tmp__XVCM=Self__PVCM->parent_expr_binary_cmp__1LJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__XVCM)->__id) {
    case __LIST__: {
      __tmp__YVCM=is_invariant__AH0M(__tmp__XVCM);
    } break;
    case __STRING_CST__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YVCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__YVCM=is_invariant__FVCM(__tmp__XVCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YVCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YVCM=is_invariant__OVCM(__tmp__XVCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YVCM=is_invariant__2VCM(__tmp__XVCM);
    } break;
    case __REAL_CST__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__YVCM=is_invariant__WWCM(__tmp__XVCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__YVCM=is_invariant__EXCM(__tmp__XVCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__YVCM=is_invariant__SXCM(__tmp__XVCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__YVCM=is_invariant__AYCM(__tmp__XVCM);
    } break;
    case __EXPR_AND__: {
      __tmp__YVCM=is_invariant__OYCM(__tmp__XVCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YVCM=is_invariant__2YCM(__tmp__XVCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YVCM=is_invariant__KZCM(__tmp__XVCM);
    } break;
    case __PUT_TO__: {
      __tmp__YVCM=is_invariant__YZCM(__tmp__XVCM);
    } break;
    case __ITEM__: {
      __tmp__YVCM=is_invariant__P0CM(__tmp__XVCM);
    } break;
    case __SIZE_OF__: {
      __tmp__YVCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__YVCM=is_invariant__A1CM(__tmp__XVCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__YVCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__YVCM=is_invariant__E4WL(__tmp__XVCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__YVCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__XVCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YVCM=is_invariant__QKMN(__tmp__XVCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YVCM=is_invariant__M1FO(__tmp__XVCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YVCM=is_invariant__XFMO(__tmp__XVCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YVCM=is_invariant__01FO(__tmp__XVCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YVCM=is_invariant__GGMO(__tmp__XVCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__YVCM=is_invariant__ZKLM(__tmp__XVCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__YVCM=is_invariant__Q5DM(__tmp__XVCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__YVCM=is_invariant__FI0M(__tmp__XVCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__YVCM=is_invariant__I2FO(__tmp__XVCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YVCM=is_invariant__PWEP(__tmp__XVCM);
    } break;
    case __EXPR_INF__: {
      __tmp__YVCM=is_invariant__1TSN(__tmp__XVCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YVCM=is_invariant__JUSN(__tmp__XVCM);
    } break;
    case __EXPR_OR__: {
      __tmp__YVCM=is_invariant__LERN(__tmp__XVCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__YVCM=is_invariant__QTVO(__tmp__XVCM);
    } break;
    };
    __tmp__1VCM=__tmp__YVCM;
  } else {
    __tmp__1VCM=FALSE__;
  };
  return(__tmp__1VCM);
}

static __BOOLEAN is_invariant__2VCM(__EXPR_NOT_EQUAL *Self__3VCM)
// ({EXPR_NOT_EQUAL}) With resultRecursive, No inlinable.
{
  void *__tmp__5VCM,*__tmp__FWCM;
  __BOOLEAN __tmp__AWCM,__tmp__GWCM,__tmp__JWCM;
  __tmp__5VCM=Self__3VCM->parent_expr_binary_cmp__DMJH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__5VCM)->__id) {
  case __LIST__: {
    __tmp__AWCM=is_invariant__AH0M(__tmp__5VCM);
  } break;
  case __STRING_CST__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__AWCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__AWCM=is_invariant__FVCM(__tmp__5VCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__AWCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__AWCM=is_invariant__OVCM(__tmp__5VCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__AWCM=is_invariant__2VCM(__tmp__5VCM);
  } break;
  case __REAL_CST__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__AWCM=is_invariant__WWCM(__tmp__5VCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__AWCM=is_invariant__EXCM(__tmp__5VCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__AWCM=is_invariant__SXCM(__tmp__5VCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__AWCM=is_invariant__AYCM(__tmp__5VCM);
  } break;
  case __EXPR_AND__: {
    __tmp__AWCM=is_invariant__OYCM(__tmp__5VCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__AWCM=is_invariant__2YCM(__tmp__5VCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__AWCM=is_invariant__KZCM(__tmp__5VCM);
  } break;
  case __PUT_TO__: {
    __tmp__AWCM=is_invariant__YZCM(__tmp__5VCM);
  } break;
  case __ITEM__: {
    __tmp__AWCM=is_invariant__P0CM(__tmp__5VCM);
  } break;
  case __SIZE_OF__: {
    __tmp__AWCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__AWCM=is_invariant__A1CM(__tmp__5VCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__AWCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__AWCM=is_invariant__E4WL(__tmp__5VCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__AWCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__5VCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__AWCM=is_invariant__QKMN(__tmp__5VCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__AWCM=is_invariant__M1FO(__tmp__5VCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__AWCM=is_invariant__XFMO(__tmp__5VCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__AWCM=is_invariant__01FO(__tmp__5VCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__AWCM=is_invariant__GGMO(__tmp__5VCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__AWCM=is_invariant__ZKLM(__tmp__5VCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__AWCM=is_invariant__Q5DM(__tmp__5VCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__AWCM=is_invariant__FI0M(__tmp__5VCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__AWCM=is_invariant__I2FO(__tmp__5VCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__AWCM=is_invariant__PWEP(__tmp__5VCM);
  } break;
  case __EXPR_INF__: {
    __tmp__AWCM=is_invariant__1TSN(__tmp__5VCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__AWCM=is_invariant__JUSN(__tmp__5VCM);
  } break;
  case __EXPR_OR__: {
    __tmp__AWCM=is_invariant__LERN(__tmp__5VCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__AWCM=is_invariant__QTVO(__tmp__5VCM);
  } break;
  };
  if (__tmp__AWCM) {
    __tmp__FWCM=Self__3VCM->parent_expr_binary_cmp__DMJH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__FWCM)->__id) {
    case __LIST__: {
      __tmp__GWCM=is_invariant__AH0M(__tmp__FWCM);
    } break;
    case __STRING_CST__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__GWCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__GWCM=is_invariant__FVCM(__tmp__FWCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GWCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GWCM=is_invariant__OVCM(__tmp__FWCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GWCM=is_invariant__2VCM(__tmp__FWCM);
    } break;
    case __REAL_CST__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__GWCM=is_invariant__WWCM(__tmp__FWCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__GWCM=is_invariant__EXCM(__tmp__FWCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__GWCM=is_invariant__SXCM(__tmp__FWCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__GWCM=is_invariant__AYCM(__tmp__FWCM);
    } break;
    case __EXPR_AND__: {
      __tmp__GWCM=is_invariant__OYCM(__tmp__FWCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GWCM=is_invariant__2YCM(__tmp__FWCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GWCM=is_invariant__KZCM(__tmp__FWCM);
    } break;
    case __PUT_TO__: {
      __tmp__GWCM=is_invariant__YZCM(__tmp__FWCM);
    } break;
    case __ITEM__: {
      __tmp__GWCM=is_invariant__P0CM(__tmp__FWCM);
    } break;
    case __SIZE_OF__: {
      __tmp__GWCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__GWCM=is_invariant__A1CM(__tmp__FWCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__GWCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__GWCM=is_invariant__E4WL(__tmp__FWCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__GWCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__FWCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GWCM=is_invariant__QKMN(__tmp__FWCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GWCM=is_invariant__M1FO(__tmp__FWCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GWCM=is_invariant__XFMO(__tmp__FWCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GWCM=is_invariant__01FO(__tmp__FWCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GWCM=is_invariant__GGMO(__tmp__FWCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__GWCM=is_invariant__ZKLM(__tmp__FWCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__GWCM=is_invariant__Q5DM(__tmp__FWCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__GWCM=is_invariant__FI0M(__tmp__FWCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__GWCM=is_invariant__I2FO(__tmp__FWCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GWCM=is_invariant__PWEP(__tmp__FWCM);
    } break;
    case __EXPR_INF__: {
      __tmp__GWCM=is_invariant__1TSN(__tmp__FWCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GWCM=is_invariant__JUSN(__tmp__FWCM);
    } break;
    case __EXPR_OR__: {
      __tmp__GWCM=is_invariant__LERN(__tmp__FWCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__GWCM=is_invariant__QTVO(__tmp__FWCM);
    } break;
    };
    __tmp__JWCM=__tmp__GWCM;
  } else {
    __tmp__JWCM=FALSE__;
  };
  return(__tmp__JWCM);
}

static __BOOLEAN is_invariant__WWCM(__EXPR_SUP *Self__XWCM)
// ({EXPR_SUP}) With resultRecursive, No inlinable.
{
  void *__tmp__ZWCM,*__tmp__5WCM;
  __BOOLEAN __tmp__0WCM,__tmp__AXCM,__tmp__DXCM;
  __tmp__ZWCM=Self__XWCM->parent_expr_binary_cmp__TAKH.left__HN2H;
  switch (((struct ___OBJ *)__tmp__ZWCM)->__id) {
  case __LIST__: {
    __tmp__0WCM=is_invariant__AH0M(__tmp__ZWCM);
  } break;
  case __STRING_CST__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__0WCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__0WCM=is_invariant__FVCM(__tmp__ZWCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__0WCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__0WCM=is_invariant__OVCM(__tmp__ZWCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__0WCM=is_invariant__2VCM(__tmp__ZWCM);
  } break;
  case __REAL_CST__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__0WCM=is_invariant__WWCM(__tmp__ZWCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__0WCM=is_invariant__EXCM(__tmp__ZWCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__0WCM=is_invariant__SXCM(__tmp__ZWCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__0WCM=is_invariant__AYCM(__tmp__ZWCM);
  } break;
  case __EXPR_AND__: {
    __tmp__0WCM=is_invariant__OYCM(__tmp__ZWCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__0WCM=is_invariant__2YCM(__tmp__ZWCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__0WCM=is_invariant__KZCM(__tmp__ZWCM);
  } break;
  case __PUT_TO__: {
    __tmp__0WCM=is_invariant__YZCM(__tmp__ZWCM);
  } break;
  case __ITEM__: {
    __tmp__0WCM=is_invariant__P0CM(__tmp__ZWCM);
  } break;
  case __SIZE_OF__: {
    __tmp__0WCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__0WCM=is_invariant__A1CM(__tmp__ZWCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__0WCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__0WCM=is_invariant__E4WL(__tmp__ZWCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__0WCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__ZWCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__0WCM=is_invariant__QKMN(__tmp__ZWCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__0WCM=is_invariant__M1FO(__tmp__ZWCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__0WCM=is_invariant__XFMO(__tmp__ZWCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__0WCM=is_invariant__01FO(__tmp__ZWCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__0WCM=is_invariant__GGMO(__tmp__ZWCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__0WCM=is_invariant__ZKLM(__tmp__ZWCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__0WCM=is_invariant__Q5DM(__tmp__ZWCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__0WCM=is_invariant__FI0M(__tmp__ZWCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__0WCM=is_invariant__I2FO(__tmp__ZWCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__0WCM=is_invariant__PWEP(__tmp__ZWCM);
  } break;
  case __EXPR_INF__: {
    __tmp__0WCM=is_invariant__1TSN(__tmp__ZWCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__0WCM=is_invariant__JUSN(__tmp__ZWCM);
  } break;
  case __EXPR_OR__: {
    __tmp__0WCM=is_invariant__LERN(__tmp__ZWCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__0WCM=is_invariant__QTVO(__tmp__ZWCM);
  } break;
  };
  if (__tmp__0WCM) {
    __tmp__5WCM=Self__XWCM->parent_expr_binary_cmp__TAKH.right__LN2H;
    switch (((struct ___OBJ *)__tmp__5WCM)->__id) {
    case __LIST__: {
      __tmp__AXCM=is_invariant__AH0M(__tmp__5WCM);
    } break;
    case __STRING_CST__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__AXCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__AXCM=is_invariant__FVCM(__tmp__5WCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__AXCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__AXCM=is_invariant__OVCM(__tmp__5WCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__AXCM=is_invariant__2VCM(__tmp__5WCM);
    } break;
    case __REAL_CST__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__AXCM=is_invariant__WWCM(__tmp__5WCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__AXCM=is_invariant__EXCM(__tmp__5WCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__AXCM=is_invariant__SXCM(__tmp__5WCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__AXCM=is_invariant__AYCM(__tmp__5WCM);
    } break;
    case __EXPR_AND__: {
      __tmp__AXCM=is_invariant__OYCM(__tmp__5WCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__AXCM=is_invariant__2YCM(__tmp__5WCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__AXCM=is_invariant__KZCM(__tmp__5WCM);
    } break;
    case __PUT_TO__: {
      __tmp__AXCM=is_invariant__YZCM(__tmp__5WCM);
    } break;
    case __ITEM__: {
      __tmp__AXCM=is_invariant__P0CM(__tmp__5WCM);
    } break;
    case __SIZE_OF__: {
      __tmp__AXCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__AXCM=is_invariant__A1CM(__tmp__5WCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__AXCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__AXCM=is_invariant__E4WL(__tmp__5WCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__AXCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__5WCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__AXCM=is_invariant__QKMN(__tmp__5WCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__AXCM=is_invariant__M1FO(__tmp__5WCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__AXCM=is_invariant__XFMO(__tmp__5WCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__AXCM=is_invariant__01FO(__tmp__5WCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__AXCM=is_invariant__GGMO(__tmp__5WCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__AXCM=is_invariant__ZKLM(__tmp__5WCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__AXCM=is_invariant__Q5DM(__tmp__5WCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__AXCM=is_invariant__FI0M(__tmp__5WCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__AXCM=is_invariant__I2FO(__tmp__5WCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__AXCM=is_invariant__PWEP(__tmp__5WCM);
    } break;
    case __EXPR_INF__: {
      __tmp__AXCM=is_invariant__1TSN(__tmp__5WCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__AXCM=is_invariant__JUSN(__tmp__5WCM);
    } break;
    case __EXPR_OR__: {
      __tmp__AXCM=is_invariant__LERN(__tmp__5WCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__AXCM=is_invariant__QTVO(__tmp__5WCM);
    } break;
    };
    __tmp__DXCM=__tmp__AXCM;
  } else {
    __tmp__DXCM=FALSE__;
  };
  return(__tmp__DXCM);
}

static __BOOLEAN is_invariant__EXCM(__EXPR_SUB *Self__FXCM)
// ({EXPR_SUB}) With resultRecursive, No inlinable.
{
  void *__tmp__HXCM,*__tmp__NXCM;
  __BOOLEAN __tmp__IXCM,__tmp__OXCM,__tmp__RXCM;
  __tmp__HXCM=Self__FXCM->parent_expr_binary__HBKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__HXCM)->__id) {
  case __LIST__: {
    __tmp__IXCM=is_invariant__AH0M(__tmp__HXCM);
  } break;
  case __STRING_CST__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__IXCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__IXCM=is_invariant__FVCM(__tmp__HXCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__IXCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__IXCM=is_invariant__OVCM(__tmp__HXCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__IXCM=is_invariant__2VCM(__tmp__HXCM);
  } break;
  case __REAL_CST__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__IXCM=is_invariant__WWCM(__tmp__HXCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__IXCM=is_invariant__EXCM(__tmp__HXCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__IXCM=is_invariant__SXCM(__tmp__HXCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__IXCM=is_invariant__AYCM(__tmp__HXCM);
  } break;
  case __EXPR_AND__: {
    __tmp__IXCM=is_invariant__OYCM(__tmp__HXCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__IXCM=is_invariant__2YCM(__tmp__HXCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__IXCM=is_invariant__KZCM(__tmp__HXCM);
  } break;
  case __PUT_TO__: {
    __tmp__IXCM=is_invariant__YZCM(__tmp__HXCM);
  } break;
  case __ITEM__: {
    __tmp__IXCM=is_invariant__P0CM(__tmp__HXCM);
  } break;
  case __SIZE_OF__: {
    __tmp__IXCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__IXCM=is_invariant__A1CM(__tmp__HXCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__IXCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__IXCM=is_invariant__E4WL(__tmp__HXCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__IXCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__HXCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__IXCM=is_invariant__QKMN(__tmp__HXCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__IXCM=is_invariant__M1FO(__tmp__HXCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__IXCM=is_invariant__XFMO(__tmp__HXCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__IXCM=is_invariant__01FO(__tmp__HXCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__IXCM=is_invariant__GGMO(__tmp__HXCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__IXCM=is_invariant__ZKLM(__tmp__HXCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__IXCM=is_invariant__Q5DM(__tmp__HXCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__IXCM=is_invariant__FI0M(__tmp__HXCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__IXCM=is_invariant__I2FO(__tmp__HXCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__IXCM=is_invariant__PWEP(__tmp__HXCM);
  } break;
  case __EXPR_INF__: {
    __tmp__IXCM=is_invariant__1TSN(__tmp__HXCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__IXCM=is_invariant__JUSN(__tmp__HXCM);
  } break;
  case __EXPR_OR__: {
    __tmp__IXCM=is_invariant__LERN(__tmp__HXCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__IXCM=is_invariant__QTVO(__tmp__HXCM);
  } break;
  };
  if (__tmp__IXCM) {
    __tmp__NXCM=Self__FXCM->parent_expr_binary__HBKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__NXCM)->__id) {
    case __LIST__: {
      __tmp__OXCM=is_invariant__AH0M(__tmp__NXCM);
    } break;
    case __STRING_CST__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__OXCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__OXCM=is_invariant__FVCM(__tmp__NXCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__OXCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__OXCM=is_invariant__OVCM(__tmp__NXCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__OXCM=is_invariant__2VCM(__tmp__NXCM);
    } break;
    case __REAL_CST__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__OXCM=is_invariant__WWCM(__tmp__NXCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__OXCM=is_invariant__EXCM(__tmp__NXCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__OXCM=is_invariant__SXCM(__tmp__NXCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__OXCM=is_invariant__AYCM(__tmp__NXCM);
    } break;
    case __EXPR_AND__: {
      __tmp__OXCM=is_invariant__OYCM(__tmp__NXCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__OXCM=is_invariant__2YCM(__tmp__NXCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__OXCM=is_invariant__KZCM(__tmp__NXCM);
    } break;
    case __PUT_TO__: {
      __tmp__OXCM=is_invariant__YZCM(__tmp__NXCM);
    } break;
    case __ITEM__: {
      __tmp__OXCM=is_invariant__P0CM(__tmp__NXCM);
    } break;
    case __SIZE_OF__: {
      __tmp__OXCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__OXCM=is_invariant__A1CM(__tmp__NXCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__OXCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__OXCM=is_invariant__E4WL(__tmp__NXCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__OXCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__NXCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__OXCM=is_invariant__QKMN(__tmp__NXCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__OXCM=is_invariant__M1FO(__tmp__NXCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__OXCM=is_invariant__XFMO(__tmp__NXCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__OXCM=is_invariant__01FO(__tmp__NXCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__OXCM=is_invariant__GGMO(__tmp__NXCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__OXCM=is_invariant__ZKLM(__tmp__NXCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__OXCM=is_invariant__Q5DM(__tmp__NXCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__OXCM=is_invariant__FI0M(__tmp__NXCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__OXCM=is_invariant__I2FO(__tmp__NXCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__OXCM=is_invariant__PWEP(__tmp__NXCM);
    } break;
    case __EXPR_INF__: {
      __tmp__OXCM=is_invariant__1TSN(__tmp__NXCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__OXCM=is_invariant__JUSN(__tmp__NXCM);
    } break;
    case __EXPR_OR__: {
      __tmp__OXCM=is_invariant__LERN(__tmp__NXCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__OXCM=is_invariant__QTVO(__tmp__NXCM);
    } break;
    };
    __tmp__RXCM=__tmp__OXCM;
  } else {
    __tmp__RXCM=FALSE__;
  };
  return(__tmp__RXCM);
}

static __BOOLEAN is_invariant__SXCM(__EXPR_MUL *Self__TXCM)
// ({EXPR_MUL}) With resultRecursive, No inlinable.
{
  void *__tmp__VXCM,*__tmp__1XCM;
  __BOOLEAN __tmp__WXCM,__tmp__2XCM,__tmp__5XCM;
  __tmp__VXCM=Self__TXCM->parent_expr_binary__0BKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__VXCM)->__id) {
  case __LIST__: {
    __tmp__WXCM=is_invariant__AH0M(__tmp__VXCM);
  } break;
  case __STRING_CST__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__WXCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__WXCM=is_invariant__FVCM(__tmp__VXCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__WXCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__WXCM=is_invariant__OVCM(__tmp__VXCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__WXCM=is_invariant__2VCM(__tmp__VXCM);
  } break;
  case __REAL_CST__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__WXCM=is_invariant__WWCM(__tmp__VXCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__WXCM=is_invariant__EXCM(__tmp__VXCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__WXCM=is_invariant__SXCM(__tmp__VXCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__WXCM=is_invariant__AYCM(__tmp__VXCM);
  } break;
  case __EXPR_AND__: {
    __tmp__WXCM=is_invariant__OYCM(__tmp__VXCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__WXCM=is_invariant__2YCM(__tmp__VXCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__WXCM=is_invariant__KZCM(__tmp__VXCM);
  } break;
  case __PUT_TO__: {
    __tmp__WXCM=is_invariant__YZCM(__tmp__VXCM);
  } break;
  case __ITEM__: {
    __tmp__WXCM=is_invariant__P0CM(__tmp__VXCM);
  } break;
  case __SIZE_OF__: {
    __tmp__WXCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__WXCM=is_invariant__A1CM(__tmp__VXCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__WXCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__WXCM=is_invariant__E4WL(__tmp__VXCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__WXCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__VXCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__WXCM=is_invariant__QKMN(__tmp__VXCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__WXCM=is_invariant__M1FO(__tmp__VXCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__WXCM=is_invariant__XFMO(__tmp__VXCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__WXCM=is_invariant__01FO(__tmp__VXCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__WXCM=is_invariant__GGMO(__tmp__VXCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__WXCM=is_invariant__ZKLM(__tmp__VXCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__WXCM=is_invariant__Q5DM(__tmp__VXCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__WXCM=is_invariant__FI0M(__tmp__VXCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__WXCM=is_invariant__I2FO(__tmp__VXCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__WXCM=is_invariant__PWEP(__tmp__VXCM);
  } break;
  case __EXPR_INF__: {
    __tmp__WXCM=is_invariant__1TSN(__tmp__VXCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__WXCM=is_invariant__JUSN(__tmp__VXCM);
  } break;
  case __EXPR_OR__: {
    __tmp__WXCM=is_invariant__LERN(__tmp__VXCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__WXCM=is_invariant__QTVO(__tmp__VXCM);
  } break;
  };
  if (__tmp__WXCM) {
    __tmp__1XCM=Self__TXCM->parent_expr_binary__0BKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__1XCM)->__id) {
    case __LIST__: {
      __tmp__2XCM=is_invariant__AH0M(__tmp__1XCM);
    } break;
    case __STRING_CST__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__2XCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__2XCM=is_invariant__FVCM(__tmp__1XCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__2XCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__2XCM=is_invariant__OVCM(__tmp__1XCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__2XCM=is_invariant__2VCM(__tmp__1XCM);
    } break;
    case __REAL_CST__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__2XCM=is_invariant__WWCM(__tmp__1XCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__2XCM=is_invariant__EXCM(__tmp__1XCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__2XCM=is_invariant__SXCM(__tmp__1XCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__2XCM=is_invariant__AYCM(__tmp__1XCM);
    } break;
    case __EXPR_AND__: {
      __tmp__2XCM=is_invariant__OYCM(__tmp__1XCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__2XCM=is_invariant__2YCM(__tmp__1XCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__2XCM=is_invariant__KZCM(__tmp__1XCM);
    } break;
    case __PUT_TO__: {
      __tmp__2XCM=is_invariant__YZCM(__tmp__1XCM);
    } break;
    case __ITEM__: {
      __tmp__2XCM=is_invariant__P0CM(__tmp__1XCM);
    } break;
    case __SIZE_OF__: {
      __tmp__2XCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__2XCM=is_invariant__A1CM(__tmp__1XCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__2XCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__2XCM=is_invariant__E4WL(__tmp__1XCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__2XCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__1XCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__2XCM=is_invariant__QKMN(__tmp__1XCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__2XCM=is_invariant__M1FO(__tmp__1XCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__2XCM=is_invariant__XFMO(__tmp__1XCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__2XCM=is_invariant__01FO(__tmp__1XCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__2XCM=is_invariant__GGMO(__tmp__1XCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__2XCM=is_invariant__ZKLM(__tmp__1XCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__2XCM=is_invariant__Q5DM(__tmp__1XCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__2XCM=is_invariant__FI0M(__tmp__1XCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__2XCM=is_invariant__I2FO(__tmp__1XCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__2XCM=is_invariant__PWEP(__tmp__1XCM);
    } break;
    case __EXPR_INF__: {
      __tmp__2XCM=is_invariant__1TSN(__tmp__1XCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__2XCM=is_invariant__JUSN(__tmp__1XCM);
    } break;
    case __EXPR_OR__: {
      __tmp__2XCM=is_invariant__LERN(__tmp__1XCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__2XCM=is_invariant__QTVO(__tmp__1XCM);
    } break;
    };
    __tmp__5XCM=__tmp__2XCM;
  } else {
    __tmp__5XCM=FALSE__;
  };
  return(__tmp__5XCM);
}

static __BOOLEAN is_invariant__AYCM(__EXPR_DIV *Self__BYCM)
// ({EXPR_DIV}) With resultRecursive, No inlinable.
{
  void *__tmp__DYCM,*__tmp__JYCM;
  __BOOLEAN __tmp__EYCM,__tmp__KYCM,__tmp__NYCM;
  __tmp__DYCM=Self__BYCM->parent_expr_binary__NCKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__DYCM)->__id) {
  case __LIST__: {
    __tmp__EYCM=is_invariant__AH0M(__tmp__DYCM);
  } break;
  case __STRING_CST__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__EYCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__EYCM=is_invariant__FVCM(__tmp__DYCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__EYCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__EYCM=is_invariant__OVCM(__tmp__DYCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__EYCM=is_invariant__2VCM(__tmp__DYCM);
  } break;
  case __REAL_CST__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__EYCM=is_invariant__WWCM(__tmp__DYCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__EYCM=is_invariant__EXCM(__tmp__DYCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__EYCM=is_invariant__SXCM(__tmp__DYCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__EYCM=is_invariant__AYCM(__tmp__DYCM);
  } break;
  case __EXPR_AND__: {
    __tmp__EYCM=is_invariant__OYCM(__tmp__DYCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__EYCM=is_invariant__2YCM(__tmp__DYCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__EYCM=is_invariant__KZCM(__tmp__DYCM);
  } break;
  case __PUT_TO__: {
    __tmp__EYCM=is_invariant__YZCM(__tmp__DYCM);
  } break;
  case __ITEM__: {
    __tmp__EYCM=is_invariant__P0CM(__tmp__DYCM);
  } break;
  case __SIZE_OF__: {
    __tmp__EYCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__EYCM=is_invariant__A1CM(__tmp__DYCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__EYCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__EYCM=is_invariant__E4WL(__tmp__DYCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__EYCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__DYCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__EYCM=is_invariant__QKMN(__tmp__DYCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__EYCM=is_invariant__M1FO(__tmp__DYCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__EYCM=is_invariant__XFMO(__tmp__DYCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__EYCM=is_invariant__01FO(__tmp__DYCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__EYCM=is_invariant__GGMO(__tmp__DYCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__EYCM=is_invariant__ZKLM(__tmp__DYCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__EYCM=is_invariant__Q5DM(__tmp__DYCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__EYCM=is_invariant__FI0M(__tmp__DYCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__EYCM=is_invariant__I2FO(__tmp__DYCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__EYCM=is_invariant__PWEP(__tmp__DYCM);
  } break;
  case __EXPR_INF__: {
    __tmp__EYCM=is_invariant__1TSN(__tmp__DYCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__EYCM=is_invariant__JUSN(__tmp__DYCM);
  } break;
  case __EXPR_OR__: {
    __tmp__EYCM=is_invariant__LERN(__tmp__DYCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__EYCM=is_invariant__QTVO(__tmp__DYCM);
  } break;
  };
  if (__tmp__EYCM) {
    __tmp__JYCM=Self__BYCM->parent_expr_binary__NCKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__JYCM)->__id) {
    case __LIST__: {
      __tmp__KYCM=is_invariant__AH0M(__tmp__JYCM);
    } break;
    case __STRING_CST__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__KYCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__KYCM=is_invariant__FVCM(__tmp__JYCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__KYCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__KYCM=is_invariant__OVCM(__tmp__JYCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__KYCM=is_invariant__2VCM(__tmp__JYCM);
    } break;
    case __REAL_CST__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__KYCM=is_invariant__WWCM(__tmp__JYCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__KYCM=is_invariant__EXCM(__tmp__JYCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__KYCM=is_invariant__SXCM(__tmp__JYCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__KYCM=is_invariant__AYCM(__tmp__JYCM);
    } break;
    case __EXPR_AND__: {
      __tmp__KYCM=is_invariant__OYCM(__tmp__JYCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__KYCM=is_invariant__2YCM(__tmp__JYCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__KYCM=is_invariant__KZCM(__tmp__JYCM);
    } break;
    case __PUT_TO__: {
      __tmp__KYCM=is_invariant__YZCM(__tmp__JYCM);
    } break;
    case __ITEM__: {
      __tmp__KYCM=is_invariant__P0CM(__tmp__JYCM);
    } break;
    case __SIZE_OF__: {
      __tmp__KYCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__KYCM=is_invariant__A1CM(__tmp__JYCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__KYCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__KYCM=is_invariant__E4WL(__tmp__JYCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__KYCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__JYCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__KYCM=is_invariant__QKMN(__tmp__JYCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__KYCM=is_invariant__M1FO(__tmp__JYCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__KYCM=is_invariant__XFMO(__tmp__JYCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__KYCM=is_invariant__01FO(__tmp__JYCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__KYCM=is_invariant__GGMO(__tmp__JYCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__KYCM=is_invariant__ZKLM(__tmp__JYCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__KYCM=is_invariant__Q5DM(__tmp__JYCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__KYCM=is_invariant__FI0M(__tmp__JYCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__KYCM=is_invariant__I2FO(__tmp__JYCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__KYCM=is_invariant__PWEP(__tmp__JYCM);
    } break;
    case __EXPR_INF__: {
      __tmp__KYCM=is_invariant__1TSN(__tmp__JYCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__KYCM=is_invariant__JUSN(__tmp__JYCM);
    } break;
    case __EXPR_OR__: {
      __tmp__KYCM=is_invariant__LERN(__tmp__JYCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__KYCM=is_invariant__QTVO(__tmp__JYCM);
    } break;
    };
    __tmp__NYCM=__tmp__KYCM;
  } else {
    __tmp__NYCM=FALSE__;
  };
  return(__tmp__NYCM);
}

static __BOOLEAN is_invariant__OYCM(__EXPR_AND *Self__PYCM)
// ({EXPR_AND}) With resultRecursive, No inlinable.
{
  void *__tmp__RYCM,*__tmp__XYCM;
  __BOOLEAN __tmp__SYCM,__tmp__YYCM,__tmp__1YCM;
  __tmp__RYCM=Self__PYCM->parent_expr_binary__ADKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__RYCM)->__id) {
  case __LIST__: {
    __tmp__SYCM=is_invariant__AH0M(__tmp__RYCM);
  } break;
  case __STRING_CST__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__SYCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__SYCM=is_invariant__FVCM(__tmp__RYCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__SYCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__SYCM=is_invariant__OVCM(__tmp__RYCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__SYCM=is_invariant__2VCM(__tmp__RYCM);
  } break;
  case __REAL_CST__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__SYCM=is_invariant__WWCM(__tmp__RYCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__SYCM=is_invariant__EXCM(__tmp__RYCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__SYCM=is_invariant__SXCM(__tmp__RYCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__SYCM=is_invariant__AYCM(__tmp__RYCM);
  } break;
  case __EXPR_AND__: {
    __tmp__SYCM=is_invariant__OYCM(__tmp__RYCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__SYCM=is_invariant__2YCM(__tmp__RYCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__SYCM=is_invariant__KZCM(__tmp__RYCM);
  } break;
  case __PUT_TO__: {
    __tmp__SYCM=is_invariant__YZCM(__tmp__RYCM);
  } break;
  case __ITEM__: {
    __tmp__SYCM=is_invariant__P0CM(__tmp__RYCM);
  } break;
  case __SIZE_OF__: {
    __tmp__SYCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__SYCM=is_invariant__A1CM(__tmp__RYCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__SYCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__SYCM=is_invariant__E4WL(__tmp__RYCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__SYCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__RYCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__SYCM=is_invariant__QKMN(__tmp__RYCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__SYCM=is_invariant__M1FO(__tmp__RYCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__SYCM=is_invariant__XFMO(__tmp__RYCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__SYCM=is_invariant__01FO(__tmp__RYCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__SYCM=is_invariant__GGMO(__tmp__RYCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__SYCM=is_invariant__ZKLM(__tmp__RYCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__SYCM=is_invariant__Q5DM(__tmp__RYCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__SYCM=is_invariant__FI0M(__tmp__RYCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__SYCM=is_invariant__I2FO(__tmp__RYCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__SYCM=is_invariant__PWEP(__tmp__RYCM);
  } break;
  case __EXPR_INF__: {
    __tmp__SYCM=is_invariant__1TSN(__tmp__RYCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__SYCM=is_invariant__JUSN(__tmp__RYCM);
  } break;
  case __EXPR_OR__: {
    __tmp__SYCM=is_invariant__LERN(__tmp__RYCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__SYCM=is_invariant__QTVO(__tmp__RYCM);
  } break;
  };
  if (__tmp__SYCM) {
    __tmp__XYCM=Self__PYCM->parent_expr_binary__ADKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__XYCM)->__id) {
    case __LIST__: {
      __tmp__YYCM=is_invariant__AH0M(__tmp__XYCM);
    } break;
    case __STRING_CST__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__YYCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__YYCM=is_invariant__FVCM(__tmp__XYCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__YYCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__YYCM=is_invariant__OVCM(__tmp__XYCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__YYCM=is_invariant__2VCM(__tmp__XYCM);
    } break;
    case __REAL_CST__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__YYCM=is_invariant__WWCM(__tmp__XYCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__YYCM=is_invariant__EXCM(__tmp__XYCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__YYCM=is_invariant__SXCM(__tmp__XYCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__YYCM=is_invariant__AYCM(__tmp__XYCM);
    } break;
    case __EXPR_AND__: {
      __tmp__YYCM=is_invariant__OYCM(__tmp__XYCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__YYCM=is_invariant__2YCM(__tmp__XYCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__YYCM=is_invariant__KZCM(__tmp__XYCM);
    } break;
    case __PUT_TO__: {
      __tmp__YYCM=is_invariant__YZCM(__tmp__XYCM);
    } break;
    case __ITEM__: {
      __tmp__YYCM=is_invariant__P0CM(__tmp__XYCM);
    } break;
    case __SIZE_OF__: {
      __tmp__YYCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__YYCM=is_invariant__A1CM(__tmp__XYCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__YYCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__YYCM=is_invariant__E4WL(__tmp__XYCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__YYCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__XYCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__YYCM=is_invariant__QKMN(__tmp__XYCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__YYCM=is_invariant__M1FO(__tmp__XYCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__YYCM=is_invariant__XFMO(__tmp__XYCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__YYCM=is_invariant__01FO(__tmp__XYCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__YYCM=is_invariant__GGMO(__tmp__XYCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__YYCM=is_invariant__ZKLM(__tmp__XYCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__YYCM=is_invariant__Q5DM(__tmp__XYCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__YYCM=is_invariant__FI0M(__tmp__XYCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__YYCM=is_invariant__I2FO(__tmp__XYCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__YYCM=is_invariant__PWEP(__tmp__XYCM);
    } break;
    case __EXPR_INF__: {
      __tmp__YYCM=is_invariant__1TSN(__tmp__XYCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__YYCM=is_invariant__JUSN(__tmp__XYCM);
    } break;
    case __EXPR_OR__: {
      __tmp__YYCM=is_invariant__LERN(__tmp__XYCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__YYCM=is_invariant__QTVO(__tmp__XYCM);
    } break;
    };
    __tmp__1YCM=__tmp__YYCM;
  } else {
    __tmp__1YCM=FALSE__;
  };
  return(__tmp__1YCM);
}

static __BOOLEAN is_invariant__2YCM(__EXPR_SHIFT_R *Self__3YCM)
// ({EXPR_SHIFT_R}) With resultRecursive, No inlinable.
{
  void *__tmp__5YCM,*__tmp__FZCM;
  __BOOLEAN __tmp__AZCM,__tmp__GZCM,__tmp__JZCM;
  __tmp__5YCM=Self__3YCM->parent_expr_binary__TDKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__5YCM)->__id) {
  case __LIST__: {
    __tmp__AZCM=is_invariant__AH0M(__tmp__5YCM);
  } break;
  case __STRING_CST__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__AZCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__AZCM=is_invariant__FVCM(__tmp__5YCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__AZCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__AZCM=is_invariant__OVCM(__tmp__5YCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__AZCM=is_invariant__2VCM(__tmp__5YCM);
  } break;
  case __REAL_CST__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__AZCM=is_invariant__WWCM(__tmp__5YCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__AZCM=is_invariant__EXCM(__tmp__5YCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__AZCM=is_invariant__SXCM(__tmp__5YCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__AZCM=is_invariant__AYCM(__tmp__5YCM);
  } break;
  case __EXPR_AND__: {
    __tmp__AZCM=is_invariant__OYCM(__tmp__5YCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__AZCM=is_invariant__2YCM(__tmp__5YCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__AZCM=is_invariant__KZCM(__tmp__5YCM);
  } break;
  case __PUT_TO__: {
    __tmp__AZCM=is_invariant__YZCM(__tmp__5YCM);
  } break;
  case __ITEM__: {
    __tmp__AZCM=is_invariant__P0CM(__tmp__5YCM);
  } break;
  case __SIZE_OF__: {
    __tmp__AZCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__AZCM=is_invariant__A1CM(__tmp__5YCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__AZCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__AZCM=is_invariant__E4WL(__tmp__5YCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__AZCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__5YCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__AZCM=is_invariant__QKMN(__tmp__5YCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__AZCM=is_invariant__M1FO(__tmp__5YCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__AZCM=is_invariant__XFMO(__tmp__5YCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__AZCM=is_invariant__01FO(__tmp__5YCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__AZCM=is_invariant__GGMO(__tmp__5YCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__AZCM=is_invariant__ZKLM(__tmp__5YCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__AZCM=is_invariant__Q5DM(__tmp__5YCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__AZCM=is_invariant__FI0M(__tmp__5YCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__AZCM=is_invariant__I2FO(__tmp__5YCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__AZCM=is_invariant__PWEP(__tmp__5YCM);
  } break;
  case __EXPR_INF__: {
    __tmp__AZCM=is_invariant__1TSN(__tmp__5YCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__AZCM=is_invariant__JUSN(__tmp__5YCM);
  } break;
  case __EXPR_OR__: {
    __tmp__AZCM=is_invariant__LERN(__tmp__5YCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__AZCM=is_invariant__QTVO(__tmp__5YCM);
  } break;
  };
  if (__tmp__AZCM) {
    __tmp__FZCM=Self__3YCM->parent_expr_binary__TDKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__FZCM)->__id) {
    case __LIST__: {
      __tmp__GZCM=is_invariant__AH0M(__tmp__FZCM);
    } break;
    case __STRING_CST__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__GZCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__GZCM=is_invariant__FVCM(__tmp__FZCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__GZCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__GZCM=is_invariant__OVCM(__tmp__FZCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__GZCM=is_invariant__2VCM(__tmp__FZCM);
    } break;
    case __REAL_CST__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__GZCM=is_invariant__WWCM(__tmp__FZCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__GZCM=is_invariant__EXCM(__tmp__FZCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__GZCM=is_invariant__SXCM(__tmp__FZCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__GZCM=is_invariant__AYCM(__tmp__FZCM);
    } break;
    case __EXPR_AND__: {
      __tmp__GZCM=is_invariant__OYCM(__tmp__FZCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__GZCM=is_invariant__2YCM(__tmp__FZCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__GZCM=is_invariant__KZCM(__tmp__FZCM);
    } break;
    case __PUT_TO__: {
      __tmp__GZCM=is_invariant__YZCM(__tmp__FZCM);
    } break;
    case __ITEM__: {
      __tmp__GZCM=is_invariant__P0CM(__tmp__FZCM);
    } break;
    case __SIZE_OF__: {
      __tmp__GZCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__GZCM=is_invariant__A1CM(__tmp__FZCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__GZCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__GZCM=is_invariant__E4WL(__tmp__FZCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__GZCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__FZCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__GZCM=is_invariant__QKMN(__tmp__FZCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__GZCM=is_invariant__M1FO(__tmp__FZCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__GZCM=is_invariant__XFMO(__tmp__FZCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__GZCM=is_invariant__01FO(__tmp__FZCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__GZCM=is_invariant__GGMO(__tmp__FZCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__GZCM=is_invariant__ZKLM(__tmp__FZCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__GZCM=is_invariant__Q5DM(__tmp__FZCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__GZCM=is_invariant__FI0M(__tmp__FZCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__GZCM=is_invariant__I2FO(__tmp__FZCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__GZCM=is_invariant__PWEP(__tmp__FZCM);
    } break;
    case __EXPR_INF__: {
      __tmp__GZCM=is_invariant__1TSN(__tmp__FZCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__GZCM=is_invariant__JUSN(__tmp__FZCM);
    } break;
    case __EXPR_OR__: {
      __tmp__GZCM=is_invariant__LERN(__tmp__FZCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__GZCM=is_invariant__QTVO(__tmp__FZCM);
    } break;
    };
    __tmp__JZCM=__tmp__GZCM;
  } else {
    __tmp__JZCM=FALSE__;
  };
  return(__tmp__JZCM);
}

static __BOOLEAN is_invariant__KZCM(__EXPR_SHIFT_L *Self__LZCM)
// ({EXPR_SHIFT_L}) With resultRecursive, No inlinable.
{
  void *__tmp__NZCM,*__tmp__TZCM;
  __BOOLEAN __tmp__OZCM,__tmp__UZCM,__tmp__XZCM;
  __tmp__NZCM=Self__LZCM->parent_expr_binary__GEKH.left__PP1H;
  switch (((struct ___OBJ *)__tmp__NZCM)->__id) {
  case __LIST__: {
    __tmp__OZCM=is_invariant__AH0M(__tmp__NZCM);
  } break;
  case __STRING_CST__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__OZCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__OZCM=is_invariant__FVCM(__tmp__NZCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__OZCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__OZCM=is_invariant__OVCM(__tmp__NZCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__OZCM=is_invariant__2VCM(__tmp__NZCM);
  } break;
  case __REAL_CST__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__OZCM=is_invariant__WWCM(__tmp__NZCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__OZCM=is_invariant__EXCM(__tmp__NZCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__OZCM=is_invariant__SXCM(__tmp__NZCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__OZCM=is_invariant__AYCM(__tmp__NZCM);
  } break;
  case __EXPR_AND__: {
    __tmp__OZCM=is_invariant__OYCM(__tmp__NZCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__OZCM=is_invariant__2YCM(__tmp__NZCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__OZCM=is_invariant__KZCM(__tmp__NZCM);
  } break;
  case __PUT_TO__: {
    __tmp__OZCM=is_invariant__YZCM(__tmp__NZCM);
  } break;
  case __ITEM__: {
    __tmp__OZCM=is_invariant__P0CM(__tmp__NZCM);
  } break;
  case __SIZE_OF__: {
    __tmp__OZCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__OZCM=is_invariant__A1CM(__tmp__NZCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__OZCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__OZCM=is_invariant__E4WL(__tmp__NZCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__OZCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__NZCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__OZCM=is_invariant__QKMN(__tmp__NZCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__OZCM=is_invariant__M1FO(__tmp__NZCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__OZCM=is_invariant__XFMO(__tmp__NZCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__OZCM=is_invariant__01FO(__tmp__NZCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__OZCM=is_invariant__GGMO(__tmp__NZCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__OZCM=is_invariant__ZKLM(__tmp__NZCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__OZCM=is_invariant__Q5DM(__tmp__NZCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__OZCM=is_invariant__FI0M(__tmp__NZCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__OZCM=is_invariant__I2FO(__tmp__NZCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__OZCM=is_invariant__PWEP(__tmp__NZCM);
  } break;
  case __EXPR_INF__: {
    __tmp__OZCM=is_invariant__1TSN(__tmp__NZCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__OZCM=is_invariant__JUSN(__tmp__NZCM);
  } break;
  case __EXPR_OR__: {
    __tmp__OZCM=is_invariant__LERN(__tmp__NZCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__OZCM=is_invariant__QTVO(__tmp__NZCM);
  } break;
  };
  if (__tmp__OZCM) {
    __tmp__TZCM=Self__LZCM->parent_expr_binary__GEKH.right__OP2H;
    switch (((struct ___OBJ *)__tmp__TZCM)->__id) {
    case __LIST__: {
      __tmp__UZCM=is_invariant__AH0M(__tmp__TZCM);
    } break;
    case __STRING_CST__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__UZCM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__UZCM=is_invariant__FVCM(__tmp__TZCM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__UZCM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__UZCM=is_invariant__OVCM(__tmp__TZCM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__UZCM=is_invariant__2VCM(__tmp__TZCM);
    } break;
    case __REAL_CST__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__UZCM=is_invariant__WWCM(__tmp__TZCM);
    } break;
    case __EXPR_SUB__: {
      __tmp__UZCM=is_invariant__EXCM(__tmp__TZCM);
    } break;
    case __EXPR_MUL__: {
      __tmp__UZCM=is_invariant__SXCM(__tmp__TZCM);
    } break;
    case __EXPR_DIV__: {
      __tmp__UZCM=is_invariant__AYCM(__tmp__TZCM);
    } break;
    case __EXPR_AND__: {
      __tmp__UZCM=is_invariant__OYCM(__tmp__TZCM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__UZCM=is_invariant__2YCM(__tmp__TZCM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__UZCM=is_invariant__KZCM(__tmp__TZCM);
    } break;
    case __PUT_TO__: {
      __tmp__UZCM=is_invariant__YZCM(__tmp__TZCM);
    } break;
    case __ITEM__: {
      __tmp__UZCM=is_invariant__P0CM(__tmp__TZCM);
    } break;
    case __SIZE_OF__: {
      __tmp__UZCM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__UZCM=is_invariant__A1CM(__tmp__TZCM);
    } break;
    case __CALL_SLOT__: {
      __tmp__UZCM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__UZCM=is_invariant__E4WL(__tmp__TZCM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__UZCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__TZCM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__UZCM=is_invariant__QKMN(__tmp__TZCM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__UZCM=is_invariant__M1FO(__tmp__TZCM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__UZCM=is_invariant__XFMO(__tmp__TZCM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__UZCM=is_invariant__01FO(__tmp__TZCM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__UZCM=is_invariant__GGMO(__tmp__TZCM);
    } break;
    case __EXPR_NEG__: {
      __tmp__UZCM=is_invariant__ZKLM(__tmp__TZCM);
    } break;
    case __EXPR_ADD__: {
      __tmp__UZCM=is_invariant__Q5DM(__tmp__TZCM);
    } break;
    case __EXPR_NOT__: {
      __tmp__UZCM=is_invariant__FI0M(__tmp__TZCM);
    } break;
    case __EXPR_MOD__: {
      __tmp__UZCM=is_invariant__I2FO(__tmp__TZCM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__UZCM=is_invariant__PWEP(__tmp__TZCM);
    } break;
    case __EXPR_INF__: {
      __tmp__UZCM=is_invariant__1TSN(__tmp__TZCM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__UZCM=is_invariant__JUSN(__tmp__TZCM);
    } break;
    case __EXPR_OR__: {
      __tmp__UZCM=is_invariant__LERN(__tmp__TZCM);
    } break;
    case __EXPR_XOR__: {
      __tmp__UZCM=is_invariant__QTVO(__tmp__TZCM);
    } break;
    };
    __tmp__XZCM=__tmp__UZCM;
  } else {
    __tmp__XZCM=FALSE__;
  };
  return(__tmp__XZCM);
}

static __BOOLEAN is_invariant__YZCM(__PUT_TO *Self__ZZCM)
// ({PUT_TO}) With resultRecursive, No inlinable.
{
  void *__tmp__1ZCM,*__tmp__B0CM,*__tmp__J0CM;
  __BOOLEAN __tmp__2ZCM,__tmp__C0CM,__tmp__N0CM,__tmp__K0CM,__tmp__O0CM;
  __tmp__1ZCM=Self__ZZCM->receiver__OR2H;
  switch (((struct ___OBJ *)__tmp__1ZCM)->__id) {
  case __LIST__: {
    __tmp__2ZCM=is_invariant__AH0M(__tmp__1ZCM);
  } break;
  case __STRING_CST__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__2ZCM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__2ZCM=is_invariant__FVCM(__tmp__1ZCM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__2ZCM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__2ZCM=is_invariant__OVCM(__tmp__1ZCM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__2ZCM=is_invariant__2VCM(__tmp__1ZCM);
  } break;
  case __REAL_CST__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__2ZCM=is_invariant__WWCM(__tmp__1ZCM);
  } break;
  case __EXPR_SUB__: {
    __tmp__2ZCM=is_invariant__EXCM(__tmp__1ZCM);
  } break;
  case __EXPR_MUL__: {
    __tmp__2ZCM=is_invariant__SXCM(__tmp__1ZCM);
  } break;
  case __EXPR_DIV__: {
    __tmp__2ZCM=is_invariant__AYCM(__tmp__1ZCM);
  } break;
  case __EXPR_AND__: {
    __tmp__2ZCM=is_invariant__OYCM(__tmp__1ZCM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__2ZCM=is_invariant__2YCM(__tmp__1ZCM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__2ZCM=is_invariant__KZCM(__tmp__1ZCM);
  } break;
  case __PUT_TO__: {
    __tmp__2ZCM=is_invariant__YZCM(__tmp__1ZCM);
  } break;
  case __ITEM__: {
    __tmp__2ZCM=is_invariant__P0CM(__tmp__1ZCM);
  } break;
  case __SIZE_OF__: {
    __tmp__2ZCM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__2ZCM=is_invariant__A1CM(__tmp__1ZCM);
  } break;
  case __CALL_SLOT__: {
    __tmp__2ZCM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__2ZCM=is_invariant__E4WL(__tmp__1ZCM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__2ZCM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__1ZCM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__2ZCM=is_invariant__QKMN(__tmp__1ZCM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__2ZCM=is_invariant__M1FO(__tmp__1ZCM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__2ZCM=is_invariant__XFMO(__tmp__1ZCM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__2ZCM=is_invariant__01FO(__tmp__1ZCM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__2ZCM=is_invariant__GGMO(__tmp__1ZCM);
  } break;
  case __EXPR_NEG__: {
    __tmp__2ZCM=is_invariant__ZKLM(__tmp__1ZCM);
  } break;
  case __EXPR_ADD__: {
    __tmp__2ZCM=is_invariant__Q5DM(__tmp__1ZCM);
  } break;
  case __EXPR_NOT__: {
    __tmp__2ZCM=is_invariant__FI0M(__tmp__1ZCM);
  } break;
  case __EXPR_MOD__: {
    __tmp__2ZCM=is_invariant__I2FO(__tmp__1ZCM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__2ZCM=is_invariant__PWEP(__tmp__1ZCM);
  } break;
  case __EXPR_INF__: {
    __tmp__2ZCM=is_invariant__1TSN(__tmp__1ZCM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__2ZCM=is_invariant__JUSN(__tmp__1ZCM);
  } break;
  case __EXPR_OR__: {
    __tmp__2ZCM=is_invariant__LERN(__tmp__1ZCM);
  } break;
  case __EXPR_XOR__: {
    __tmp__2ZCM=is_invariant__QTVO(__tmp__1ZCM);
  } break;
  };
  if (__tmp__2ZCM) {
    __tmp__B0CM=Self__ZZCM->index__SR2H;
    switch (((struct ___OBJ *)__tmp__B0CM)->__id) {
    case __LIST__: {
      __tmp__C0CM=is_invariant__AH0M(__tmp__B0CM);
    } break;
    case __STRING_CST__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__C0CM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__C0CM=is_invariant__FVCM(__tmp__B0CM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__C0CM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__C0CM=is_invariant__OVCM(__tmp__B0CM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__C0CM=is_invariant__2VCM(__tmp__B0CM);
    } break;
    case __REAL_CST__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__C0CM=is_invariant__WWCM(__tmp__B0CM);
    } break;
    case __EXPR_SUB__: {
      __tmp__C0CM=is_invariant__EXCM(__tmp__B0CM);
    } break;
    case __EXPR_MUL__: {
      __tmp__C0CM=is_invariant__SXCM(__tmp__B0CM);
    } break;
    case __EXPR_DIV__: {
      __tmp__C0CM=is_invariant__AYCM(__tmp__B0CM);
    } break;
    case __EXPR_AND__: {
      __tmp__C0CM=is_invariant__OYCM(__tmp__B0CM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__C0CM=is_invariant__2YCM(__tmp__B0CM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__C0CM=is_invariant__KZCM(__tmp__B0CM);
    } break;
    case __PUT_TO__: {
      __tmp__C0CM=is_invariant__YZCM(__tmp__B0CM);
    } break;
    case __ITEM__: {
      __tmp__C0CM=is_invariant__P0CM(__tmp__B0CM);
    } break;
    case __SIZE_OF__: {
      __tmp__C0CM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__C0CM=is_invariant__A1CM(__tmp__B0CM);
    } break;
    case __CALL_SLOT__: {
      __tmp__C0CM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__C0CM=is_invariant__E4WL(__tmp__B0CM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__C0CM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__B0CM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__C0CM=is_invariant__QKMN(__tmp__B0CM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__C0CM=is_invariant__M1FO(__tmp__B0CM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__C0CM=is_invariant__XFMO(__tmp__B0CM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__C0CM=is_invariant__01FO(__tmp__B0CM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__C0CM=is_invariant__GGMO(__tmp__B0CM);
    } break;
    case __EXPR_NEG__: {
      __tmp__C0CM=is_invariant__ZKLM(__tmp__B0CM);
    } break;
    case __EXPR_ADD__: {
      __tmp__C0CM=is_invariant__Q5DM(__tmp__B0CM);
    } break;
    case __EXPR_NOT__: {
      __tmp__C0CM=is_invariant__FI0M(__tmp__B0CM);
    } break;
    case __EXPR_MOD__: {
      __tmp__C0CM=is_invariant__I2FO(__tmp__B0CM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__C0CM=is_invariant__PWEP(__tmp__B0CM);
    } break;
    case __EXPR_INF__: {
      __tmp__C0CM=is_invariant__1TSN(__tmp__B0CM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__C0CM=is_invariant__JUSN(__tmp__B0CM);
    } break;
    case __EXPR_OR__: {
      __tmp__C0CM=is_invariant__LERN(__tmp__B0CM);
    } break;
    case __EXPR_XOR__: {
      __tmp__C0CM=is_invariant__QTVO(__tmp__B0CM);
    } break;
    };
    __tmp__N0CM=__tmp__C0CM;
  } else {
    __tmp__N0CM=FALSE__;
  };
  if (__tmp__N0CM) {
    __tmp__J0CM=Self__ZZCM->value__WR2H;
    switch (((struct ___OBJ *)__tmp__J0CM)->__id) {
    case __LIST__: {
      __tmp__K0CM=is_invariant__AH0M(__tmp__J0CM);
    } break;
    case __STRING_CST__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__K0CM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__K0CM=is_invariant__FVCM(__tmp__J0CM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__K0CM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__K0CM=is_invariant__OVCM(__tmp__J0CM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__K0CM=is_invariant__2VCM(__tmp__J0CM);
    } break;
    case __REAL_CST__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__K0CM=is_invariant__WWCM(__tmp__J0CM);
    } break;
    case __EXPR_SUB__: {
      __tmp__K0CM=is_invariant__EXCM(__tmp__J0CM);
    } break;
    case __EXPR_MUL__: {
      __tmp__K0CM=is_invariant__SXCM(__tmp__J0CM);
    } break;
    case __EXPR_DIV__: {
      __tmp__K0CM=is_invariant__AYCM(__tmp__J0CM);
    } break;
    case __EXPR_AND__: {
      __tmp__K0CM=is_invariant__OYCM(__tmp__J0CM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__K0CM=is_invariant__2YCM(__tmp__J0CM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__K0CM=is_invariant__KZCM(__tmp__J0CM);
    } break;
    case __PUT_TO__: {
      __tmp__K0CM=is_invariant__YZCM(__tmp__J0CM);
    } break;
    case __ITEM__: {
      __tmp__K0CM=is_invariant__P0CM(__tmp__J0CM);
    } break;
    case __SIZE_OF__: {
      __tmp__K0CM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__K0CM=is_invariant__A1CM(__tmp__J0CM);
    } break;
    case __CALL_SLOT__: {
      __tmp__K0CM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__K0CM=is_invariant__E4WL(__tmp__J0CM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__K0CM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__J0CM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__K0CM=is_invariant__QKMN(__tmp__J0CM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__K0CM=is_invariant__M1FO(__tmp__J0CM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__K0CM=is_invariant__XFMO(__tmp__J0CM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__K0CM=is_invariant__01FO(__tmp__J0CM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__K0CM=is_invariant__GGMO(__tmp__J0CM);
    } break;
    case __EXPR_NEG__: {
      __tmp__K0CM=is_invariant__ZKLM(__tmp__J0CM);
    } break;
    case __EXPR_ADD__: {
      __tmp__K0CM=is_invariant__Q5DM(__tmp__J0CM);
    } break;
    case __EXPR_NOT__: {
      __tmp__K0CM=is_invariant__FI0M(__tmp__J0CM);
    } break;
    case __EXPR_MOD__: {
      __tmp__K0CM=is_invariant__I2FO(__tmp__J0CM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__K0CM=is_invariant__PWEP(__tmp__J0CM);
    } break;
    case __EXPR_INF__: {
      __tmp__K0CM=is_invariant__1TSN(__tmp__J0CM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__K0CM=is_invariant__JUSN(__tmp__J0CM);
    } break;
    case __EXPR_OR__: {
      __tmp__K0CM=is_invariant__LERN(__tmp__J0CM);
    } break;
    case __EXPR_XOR__: {
      __tmp__K0CM=is_invariant__QTVO(__tmp__J0CM);
    } break;
    };
    __tmp__O0CM=__tmp__K0CM;
  } else {
    __tmp__O0CM=FALSE__;
  };
  return(__tmp__O0CM);
}

static __BOOLEAN is_invariant__P0CM(__ITEM *Self__Q0CM)
// ({ITEM}) With resultRecursive, No inlinable.
{
  void *__tmp__S0CM,*__tmp__Y0CM;
  __BOOLEAN __tmp__T0CM,__tmp__Z0CM,__tmp__20CM;
  __tmp__S0CM=Self__Q0CM->receiver__TQ1H;
  switch (((struct ___OBJ *)__tmp__S0CM)->__id) {
  case __LIST__: {
    __tmp__T0CM=is_invariant__AH0M(__tmp__S0CM);
  } break;
  case __STRING_CST__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__T0CM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__T0CM=is_invariant__FVCM(__tmp__S0CM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__T0CM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__T0CM=is_invariant__OVCM(__tmp__S0CM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__T0CM=is_invariant__2VCM(__tmp__S0CM);
  } break;
  case __REAL_CST__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__T0CM=is_invariant__WWCM(__tmp__S0CM);
  } break;
  case __EXPR_SUB__: {
    __tmp__T0CM=is_invariant__EXCM(__tmp__S0CM);
  } break;
  case __EXPR_MUL__: {
    __tmp__T0CM=is_invariant__SXCM(__tmp__S0CM);
  } break;
  case __EXPR_DIV__: {
    __tmp__T0CM=is_invariant__AYCM(__tmp__S0CM);
  } break;
  case __EXPR_AND__: {
    __tmp__T0CM=is_invariant__OYCM(__tmp__S0CM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__T0CM=is_invariant__2YCM(__tmp__S0CM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__T0CM=is_invariant__KZCM(__tmp__S0CM);
  } break;
  case __PUT_TO__: {
    __tmp__T0CM=is_invariant__YZCM(__tmp__S0CM);
  } break;
  case __ITEM__: {
    __tmp__T0CM=is_invariant__P0CM(__tmp__S0CM);
  } break;
  case __SIZE_OF__: {
    __tmp__T0CM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__T0CM=is_invariant__A1CM(__tmp__S0CM);
  } break;
  case __CALL_SLOT__: {
    __tmp__T0CM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__T0CM=is_invariant__E4WL(__tmp__S0CM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__T0CM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__S0CM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__T0CM=is_invariant__QKMN(__tmp__S0CM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__T0CM=is_invariant__M1FO(__tmp__S0CM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__T0CM=is_invariant__XFMO(__tmp__S0CM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__T0CM=is_invariant__01FO(__tmp__S0CM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__T0CM=is_invariant__GGMO(__tmp__S0CM);
  } break;
  case __EXPR_NEG__: {
    __tmp__T0CM=is_invariant__ZKLM(__tmp__S0CM);
  } break;
  case __EXPR_ADD__: {
    __tmp__T0CM=is_invariant__Q5DM(__tmp__S0CM);
  } break;
  case __EXPR_NOT__: {
    __tmp__T0CM=is_invariant__FI0M(__tmp__S0CM);
  } break;
  case __EXPR_MOD__: {
    __tmp__T0CM=is_invariant__I2FO(__tmp__S0CM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__T0CM=is_invariant__PWEP(__tmp__S0CM);
  } break;
  case __EXPR_INF__: {
    __tmp__T0CM=is_invariant__1TSN(__tmp__S0CM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__T0CM=is_invariant__JUSN(__tmp__S0CM);
  } break;
  case __EXPR_OR__: {
    __tmp__T0CM=is_invariant__LERN(__tmp__S0CM);
  } break;
  case __EXPR_XOR__: {
    __tmp__T0CM=is_invariant__QTVO(__tmp__S0CM);
  } break;
  };
  if (__tmp__T0CM) {
    __tmp__Y0CM=Self__Q0CM->index__CS2H;
    switch (((struct ___OBJ *)__tmp__Y0CM)->__id) {
    case __LIST__: {
      __tmp__Z0CM=is_invariant__AH0M(__tmp__Y0CM);
    } break;
    case __STRING_CST__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__Z0CM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__Z0CM=is_invariant__FVCM(__tmp__Y0CM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__Z0CM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__Z0CM=is_invariant__OVCM(__tmp__Y0CM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__Z0CM=is_invariant__2VCM(__tmp__Y0CM);
    } break;
    case __REAL_CST__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__Z0CM=is_invariant__WWCM(__tmp__Y0CM);
    } break;
    case __EXPR_SUB__: {
      __tmp__Z0CM=is_invariant__EXCM(__tmp__Y0CM);
    } break;
    case __EXPR_MUL__: {
      __tmp__Z0CM=is_invariant__SXCM(__tmp__Y0CM);
    } break;
    case __EXPR_DIV__: {
      __tmp__Z0CM=is_invariant__AYCM(__tmp__Y0CM);
    } break;
    case __EXPR_AND__: {
      __tmp__Z0CM=is_invariant__OYCM(__tmp__Y0CM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__Z0CM=is_invariant__2YCM(__tmp__Y0CM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__Z0CM=is_invariant__KZCM(__tmp__Y0CM);
    } break;
    case __PUT_TO__: {
      __tmp__Z0CM=is_invariant__YZCM(__tmp__Y0CM);
    } break;
    case __ITEM__: {
      __tmp__Z0CM=is_invariant__P0CM(__tmp__Y0CM);
    } break;
    case __SIZE_OF__: {
      __tmp__Z0CM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__Z0CM=is_invariant__A1CM(__tmp__Y0CM);
    } break;
    case __CALL_SLOT__: {
      __tmp__Z0CM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__Z0CM=is_invariant__E4WL(__tmp__Y0CM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__Z0CM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__Y0CM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__Z0CM=is_invariant__QKMN(__tmp__Y0CM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__Z0CM=is_invariant__M1FO(__tmp__Y0CM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__Z0CM=is_invariant__XFMO(__tmp__Y0CM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__Z0CM=is_invariant__01FO(__tmp__Y0CM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__Z0CM=is_invariant__GGMO(__tmp__Y0CM);
    } break;
    case __EXPR_NEG__: {
      __tmp__Z0CM=is_invariant__ZKLM(__tmp__Y0CM);
    } break;
    case __EXPR_ADD__: {
      __tmp__Z0CM=is_invariant__Q5DM(__tmp__Y0CM);
    } break;
    case __EXPR_NOT__: {
      __tmp__Z0CM=is_invariant__FI0M(__tmp__Y0CM);
    } break;
    case __EXPR_MOD__: {
      __tmp__Z0CM=is_invariant__I2FO(__tmp__Y0CM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__Z0CM=is_invariant__PWEP(__tmp__Y0CM);
    } break;
    case __EXPR_INF__: {
      __tmp__Z0CM=is_invariant__1TSN(__tmp__Y0CM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__Z0CM=is_invariant__JUSN(__tmp__Y0CM);
    } break;
    case __EXPR_OR__: {
      __tmp__Z0CM=is_invariant__LERN(__tmp__Y0CM);
    } break;
    case __EXPR_XOR__: {
      __tmp__Z0CM=is_invariant__QTVO(__tmp__Y0CM);
    } break;
    };
    __tmp__20CM=__tmp__Z0CM;
  } else {
    __tmp__20CM=FALSE__;
  };
  return(__tmp__20CM);
}

static __BOOLEAN is_invariant__A1CM(__CAST *Self__B1CM)
// ({CAST}) With resultRecursive, No inlinable.
{
  void *__tmp__D1CM;
  __BOOLEAN __tmp__E1CM;
  __tmp__D1CM=Self__B1CM->value__US2H;
  switch (((struct ___OBJ *)__tmp__D1CM)->__id) {
  case __LIST__: {
    __tmp__E1CM=is_invariant__AH0M(__tmp__D1CM);
  } break;
  case __STRING_CST__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__E1CM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__E1CM=is_invariant__FVCM(__tmp__D1CM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__E1CM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__E1CM=is_invariant__OVCM(__tmp__D1CM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__E1CM=is_invariant__2VCM(__tmp__D1CM);
  } break;
  case __REAL_CST__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__E1CM=is_invariant__WWCM(__tmp__D1CM);
  } break;
  case __EXPR_SUB__: {
    __tmp__E1CM=is_invariant__EXCM(__tmp__D1CM);
  } break;
  case __EXPR_MUL__: {
    __tmp__E1CM=is_invariant__SXCM(__tmp__D1CM);
  } break;
  case __EXPR_DIV__: {
    __tmp__E1CM=is_invariant__AYCM(__tmp__D1CM);
  } break;
  case __EXPR_AND__: {
    __tmp__E1CM=is_invariant__OYCM(__tmp__D1CM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__E1CM=is_invariant__2YCM(__tmp__D1CM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__E1CM=is_invariant__KZCM(__tmp__D1CM);
  } break;
  case __PUT_TO__: {
    __tmp__E1CM=is_invariant__YZCM(__tmp__D1CM);
  } break;
  case __ITEM__: {
    __tmp__E1CM=is_invariant__P0CM(__tmp__D1CM);
  } break;
  case __SIZE_OF__: {
    __tmp__E1CM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__E1CM=is_invariant__A1CM(__tmp__D1CM);
  } break;
  case __CALL_SLOT__: {
    __tmp__E1CM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__E1CM=is_invariant__E4WL(__tmp__D1CM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__E1CM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__D1CM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__E1CM=is_invariant__QKMN(__tmp__D1CM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__E1CM=is_invariant__M1FO(__tmp__D1CM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__E1CM=is_invariant__XFMO(__tmp__D1CM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__E1CM=is_invariant__01FO(__tmp__D1CM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__E1CM=is_invariant__GGMO(__tmp__D1CM);
  } break;
  case __EXPR_NEG__: {
    __tmp__E1CM=is_invariant__ZKLM(__tmp__D1CM);
  } break;
  case __EXPR_ADD__: {
    __tmp__E1CM=is_invariant__Q5DM(__tmp__D1CM);
  } break;
  case __EXPR_NOT__: {
    __tmp__E1CM=is_invariant__FI0M(__tmp__D1CM);
  } break;
  case __EXPR_MOD__: {
    __tmp__E1CM=is_invariant__I2FO(__tmp__D1CM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__E1CM=is_invariant__PWEP(__tmp__D1CM);
  } break;
  case __EXPR_INF__: {
    __tmp__E1CM=is_invariant__1TSN(__tmp__D1CM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__E1CM=is_invariant__JUSN(__tmp__D1CM);
  } break;
  case __EXPR_OR__: {
    __tmp__E1CM=is_invariant__LERN(__tmp__D1CM);
  } break;
  case __EXPR_XOR__: {
    __tmp__E1CM=is_invariant__QTVO(__tmp__D1CM);
  } break;
  };
  return(__tmp__E1CM);
}

static __BOOLEAN is_invariant__QKMN(__EXPR_NOT_LOGIC *Self__RKMN)
// ({EXPR_NOT_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__TKMN;
  __BOOLEAN __tmp__UKMN;
  __tmp__TKMN=Self__RKMN->parent_expr_unary_logic__0EUK.right__AQZM;
  switch (((struct ___OBJ *)__tmp__TKMN)->__id) {
  case __LIST__: {
    __tmp__UKMN=is_invariant__AH0M(__tmp__TKMN);
  } break;
  case __STRING_CST__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__UKMN=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__UKMN=is_invariant__FVCM(__tmp__TKMN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UKMN=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UKMN=is_invariant__OVCM(__tmp__TKMN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UKMN=is_invariant__2VCM(__tmp__TKMN);
  } break;
  case __REAL_CST__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__UKMN=is_invariant__WWCM(__tmp__TKMN);
  } break;
  case __EXPR_SUB__: {
    __tmp__UKMN=is_invariant__EXCM(__tmp__TKMN);
  } break;
  case __EXPR_MUL__: {
    __tmp__UKMN=is_invariant__SXCM(__tmp__TKMN);
  } break;
  case __EXPR_DIV__: {
    __tmp__UKMN=is_invariant__AYCM(__tmp__TKMN);
  } break;
  case __EXPR_AND__: {
    __tmp__UKMN=is_invariant__OYCM(__tmp__TKMN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UKMN=is_invariant__2YCM(__tmp__TKMN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UKMN=is_invariant__KZCM(__tmp__TKMN);
  } break;
  case __PUT_TO__: {
    __tmp__UKMN=is_invariant__YZCM(__tmp__TKMN);
  } break;
  case __ITEM__: {
    __tmp__UKMN=is_invariant__P0CM(__tmp__TKMN);
  } break;
  case __SIZE_OF__: {
    __tmp__UKMN=TRUE__;
  } break;
  case __CAST__: {
    __tmp__UKMN=is_invariant__A1CM(__tmp__TKMN);
  } break;
  case __CALL_SLOT__: {
    __tmp__UKMN=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__UKMN=is_invariant__E4WL(__tmp__TKMN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__UKMN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__TKMN)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UKMN=is_invariant__QKMN(__tmp__TKMN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UKMN=is_invariant__M1FO(__tmp__TKMN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UKMN=is_invariant__XFMO(__tmp__TKMN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UKMN=is_invariant__01FO(__tmp__TKMN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UKMN=is_invariant__GGMO(__tmp__TKMN);
  } break;
  case __EXPR_NEG__: {
    __tmp__UKMN=is_invariant__ZKLM(__tmp__TKMN);
  } break;
  case __EXPR_ADD__: {
    __tmp__UKMN=is_invariant__Q5DM(__tmp__TKMN);
  } break;
  case __EXPR_NOT__: {
    __tmp__UKMN=is_invariant__FI0M(__tmp__TKMN);
  } break;
  case __EXPR_MOD__: {
    __tmp__UKMN=is_invariant__I2FO(__tmp__TKMN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UKMN=is_invariant__PWEP(__tmp__TKMN);
  } break;
  case __EXPR_INF__: {
    __tmp__UKMN=is_invariant__1TSN(__tmp__TKMN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UKMN=is_invariant__JUSN(__tmp__TKMN);
  } break;
  case __EXPR_OR__: {
    __tmp__UKMN=is_invariant__LERN(__tmp__TKMN);
  } break;
  case __EXPR_XOR__: {
    __tmp__UKMN=is_invariant__QTVO(__tmp__TKMN);
  } break;
  };
  return(__tmp__UKMN);
}

static __BOOLEAN is_invariant__M1FO(__EXPR_OR_LOGIC *Self__N1FO)
// ({EXPR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__P1FO,*__tmp__V1FO;
  __BOOLEAN __tmp__Q1FO,__tmp__W1FO,__tmp__Z1FO;
  __tmp__P1FO=Self__N1FO->parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__P1FO)->__id) {
  case __LIST__: {
    __tmp__Q1FO=is_invariant__AH0M(__tmp__P1FO);
  } break;
  case __STRING_CST__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__Q1FO=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__Q1FO=is_invariant__FVCM(__tmp__P1FO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__Q1FO=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__Q1FO=is_invariant__OVCM(__tmp__P1FO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__Q1FO=is_invariant__2VCM(__tmp__P1FO);
  } break;
  case __REAL_CST__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__Q1FO=is_invariant__WWCM(__tmp__P1FO);
  } break;
  case __EXPR_SUB__: {
    __tmp__Q1FO=is_invariant__EXCM(__tmp__P1FO);
  } break;
  case __EXPR_MUL__: {
    __tmp__Q1FO=is_invariant__SXCM(__tmp__P1FO);
  } break;
  case __EXPR_DIV__: {
    __tmp__Q1FO=is_invariant__AYCM(__tmp__P1FO);
  } break;
  case __EXPR_AND__: {
    __tmp__Q1FO=is_invariant__OYCM(__tmp__P1FO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__Q1FO=is_invariant__2YCM(__tmp__P1FO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__Q1FO=is_invariant__KZCM(__tmp__P1FO);
  } break;
  case __PUT_TO__: {
    __tmp__Q1FO=is_invariant__YZCM(__tmp__P1FO);
  } break;
  case __ITEM__: {
    __tmp__Q1FO=is_invariant__P0CM(__tmp__P1FO);
  } break;
  case __SIZE_OF__: {
    __tmp__Q1FO=TRUE__;
  } break;
  case __CAST__: {
    __tmp__Q1FO=is_invariant__A1CM(__tmp__P1FO);
  } break;
  case __CALL_SLOT__: {
    __tmp__Q1FO=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__Q1FO=is_invariant__E4WL(__tmp__P1FO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__Q1FO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__P1FO)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__Q1FO=is_invariant__QKMN(__tmp__P1FO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__Q1FO=is_invariant__M1FO(__tmp__P1FO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__Q1FO=is_invariant__XFMO(__tmp__P1FO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__Q1FO=is_invariant__01FO(__tmp__P1FO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__Q1FO=is_invariant__GGMO(__tmp__P1FO);
  } break;
  case __EXPR_NEG__: {
    __tmp__Q1FO=is_invariant__ZKLM(__tmp__P1FO);
  } break;
  case __EXPR_ADD__: {
    __tmp__Q1FO=is_invariant__Q5DM(__tmp__P1FO);
  } break;
  case __EXPR_NOT__: {
    __tmp__Q1FO=is_invariant__FI0M(__tmp__P1FO);
  } break;
  case __EXPR_MOD__: {
    __tmp__Q1FO=is_invariant__I2FO(__tmp__P1FO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__Q1FO=is_invariant__PWEP(__tmp__P1FO);
  } break;
  case __EXPR_INF__: {
    __tmp__Q1FO=is_invariant__1TSN(__tmp__P1FO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__Q1FO=is_invariant__JUSN(__tmp__P1FO);
  } break;
  case __EXPR_OR__: {
    __tmp__Q1FO=is_invariant__LERN(__tmp__P1FO);
  } break;
  case __EXPR_XOR__: {
    __tmp__Q1FO=is_invariant__QTVO(__tmp__P1FO);
  } break;
  };
  if (__tmp__Q1FO) {
    __tmp__V1FO=Self__N1FO->parent_expr_binary_logic__WHCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__V1FO)->__id) {
    case __LIST__: {
      __tmp__W1FO=is_invariant__AH0M(__tmp__V1FO);
    } break;
    case __STRING_CST__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__W1FO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__W1FO=is_invariant__FVCM(__tmp__V1FO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__W1FO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__W1FO=is_invariant__OVCM(__tmp__V1FO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__W1FO=is_invariant__2VCM(__tmp__V1FO);
    } break;
    case __REAL_CST__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__W1FO=is_invariant__WWCM(__tmp__V1FO);
    } break;
    case __EXPR_SUB__: {
      __tmp__W1FO=is_invariant__EXCM(__tmp__V1FO);
    } break;
    case __EXPR_MUL__: {
      __tmp__W1FO=is_invariant__SXCM(__tmp__V1FO);
    } break;
    case __EXPR_DIV__: {
      __tmp__W1FO=is_invariant__AYCM(__tmp__V1FO);
    } break;
    case __EXPR_AND__: {
      __tmp__W1FO=is_invariant__OYCM(__tmp__V1FO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__W1FO=is_invariant__2YCM(__tmp__V1FO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__W1FO=is_invariant__KZCM(__tmp__V1FO);
    } break;
    case __PUT_TO__: {
      __tmp__W1FO=is_invariant__YZCM(__tmp__V1FO);
    } break;
    case __ITEM__: {
      __tmp__W1FO=is_invariant__P0CM(__tmp__V1FO);
    } break;
    case __SIZE_OF__: {
      __tmp__W1FO=TRUE__;
    } break;
    case __CAST__: {
      __tmp__W1FO=is_invariant__A1CM(__tmp__V1FO);
    } break;
    case __CALL_SLOT__: {
      __tmp__W1FO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__W1FO=is_invariant__E4WL(__tmp__V1FO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__W1FO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__V1FO)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__W1FO=is_invariant__QKMN(__tmp__V1FO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__W1FO=is_invariant__M1FO(__tmp__V1FO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__W1FO=is_invariant__XFMO(__tmp__V1FO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__W1FO=is_invariant__01FO(__tmp__V1FO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__W1FO=is_invariant__GGMO(__tmp__V1FO);
    } break;
    case __EXPR_NEG__: {
      __tmp__W1FO=is_invariant__ZKLM(__tmp__V1FO);
    } break;
    case __EXPR_ADD__: {
      __tmp__W1FO=is_invariant__Q5DM(__tmp__V1FO);
    } break;
    case __EXPR_NOT__: {
      __tmp__W1FO=is_invariant__FI0M(__tmp__V1FO);
    } break;
    case __EXPR_MOD__: {
      __tmp__W1FO=is_invariant__I2FO(__tmp__V1FO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__W1FO=is_invariant__PWEP(__tmp__V1FO);
    } break;
    case __EXPR_INF__: {
      __tmp__W1FO=is_invariant__1TSN(__tmp__V1FO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__W1FO=is_invariant__JUSN(__tmp__V1FO);
    } break;
    case __EXPR_OR__: {
      __tmp__W1FO=is_invariant__LERN(__tmp__V1FO);
    } break;
    case __EXPR_XOR__: {
      __tmp__W1FO=is_invariant__QTVO(__tmp__V1FO);
    } break;
    };
    __tmp__Z1FO=__tmp__W1FO;
  } else {
    __tmp__Z1FO=FALSE__;
  };
  return(__tmp__Z1FO);
}

static __BOOLEAN is_invariant__XFMO(__EXPR_OR_OR_LOGIC *Self__YFMO)
// ({EXPR_OR_OR_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__0FMO,*__tmp__AGMO;
  __BOOLEAN __tmp__1FMO,__tmp__BGMO,__tmp__EGMO;
  __tmp__0FMO=Self__YFMO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__0FMO)->__id) {
  case __LIST__: {
    __tmp__1FMO=is_invariant__AH0M(__tmp__0FMO);
  } break;
  case __STRING_CST__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__1FMO=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__1FMO=is_invariant__FVCM(__tmp__0FMO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__1FMO=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__1FMO=is_invariant__OVCM(__tmp__0FMO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__1FMO=is_invariant__2VCM(__tmp__0FMO);
  } break;
  case __REAL_CST__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__1FMO=is_invariant__WWCM(__tmp__0FMO);
  } break;
  case __EXPR_SUB__: {
    __tmp__1FMO=is_invariant__EXCM(__tmp__0FMO);
  } break;
  case __EXPR_MUL__: {
    __tmp__1FMO=is_invariant__SXCM(__tmp__0FMO);
  } break;
  case __EXPR_DIV__: {
    __tmp__1FMO=is_invariant__AYCM(__tmp__0FMO);
  } break;
  case __EXPR_AND__: {
    __tmp__1FMO=is_invariant__OYCM(__tmp__0FMO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__1FMO=is_invariant__2YCM(__tmp__0FMO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__1FMO=is_invariant__KZCM(__tmp__0FMO);
  } break;
  case __PUT_TO__: {
    __tmp__1FMO=is_invariant__YZCM(__tmp__0FMO);
  } break;
  case __ITEM__: {
    __tmp__1FMO=is_invariant__P0CM(__tmp__0FMO);
  } break;
  case __SIZE_OF__: {
    __tmp__1FMO=TRUE__;
  } break;
  case __CAST__: {
    __tmp__1FMO=is_invariant__A1CM(__tmp__0FMO);
  } break;
  case __CALL_SLOT__: {
    __tmp__1FMO=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__1FMO=is_invariant__E4WL(__tmp__0FMO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__1FMO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__0FMO)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__1FMO=is_invariant__QKMN(__tmp__0FMO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__1FMO=is_invariant__M1FO(__tmp__0FMO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__1FMO=is_invariant__XFMO(__tmp__0FMO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__1FMO=is_invariant__01FO(__tmp__0FMO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__1FMO=is_invariant__GGMO(__tmp__0FMO);
  } break;
  case __EXPR_NEG__: {
    __tmp__1FMO=is_invariant__ZKLM(__tmp__0FMO);
  } break;
  case __EXPR_ADD__: {
    __tmp__1FMO=is_invariant__Q5DM(__tmp__0FMO);
  } break;
  case __EXPR_NOT__: {
    __tmp__1FMO=is_invariant__FI0M(__tmp__0FMO);
  } break;
  case __EXPR_MOD__: {
    __tmp__1FMO=is_invariant__I2FO(__tmp__0FMO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__1FMO=is_invariant__PWEP(__tmp__0FMO);
  } break;
  case __EXPR_INF__: {
    __tmp__1FMO=is_invariant__1TSN(__tmp__0FMO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__1FMO=is_invariant__JUSN(__tmp__0FMO);
  } break;
  case __EXPR_OR__: {
    __tmp__1FMO=is_invariant__LERN(__tmp__0FMO);
  } break;
  case __EXPR_XOR__: {
    __tmp__1FMO=is_invariant__QTVO(__tmp__0FMO);
  } break;
  };
  if (__tmp__1FMO) {
    __tmp__AGMO=Self__YFMO->parent_expr_or_logic__QICL.parent_expr_binary_logic__WHCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__AGMO)->__id) {
    case __LIST__: {
      __tmp__BGMO=is_invariant__AH0M(__tmp__AGMO);
    } break;
    case __STRING_CST__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__BGMO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__BGMO=is_invariant__FVCM(__tmp__AGMO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__BGMO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__BGMO=is_invariant__OVCM(__tmp__AGMO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__BGMO=is_invariant__2VCM(__tmp__AGMO);
    } break;
    case __REAL_CST__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__BGMO=is_invariant__WWCM(__tmp__AGMO);
    } break;
    case __EXPR_SUB__: {
      __tmp__BGMO=is_invariant__EXCM(__tmp__AGMO);
    } break;
    case __EXPR_MUL__: {
      __tmp__BGMO=is_invariant__SXCM(__tmp__AGMO);
    } break;
    case __EXPR_DIV__: {
      __tmp__BGMO=is_invariant__AYCM(__tmp__AGMO);
    } break;
    case __EXPR_AND__: {
      __tmp__BGMO=is_invariant__OYCM(__tmp__AGMO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__BGMO=is_invariant__2YCM(__tmp__AGMO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__BGMO=is_invariant__KZCM(__tmp__AGMO);
    } break;
    case __PUT_TO__: {
      __tmp__BGMO=is_invariant__YZCM(__tmp__AGMO);
    } break;
    case __ITEM__: {
      __tmp__BGMO=is_invariant__P0CM(__tmp__AGMO);
    } break;
    case __SIZE_OF__: {
      __tmp__BGMO=TRUE__;
    } break;
    case __CAST__: {
      __tmp__BGMO=is_invariant__A1CM(__tmp__AGMO);
    } break;
    case __CALL_SLOT__: {
      __tmp__BGMO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__BGMO=is_invariant__E4WL(__tmp__AGMO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__BGMO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__AGMO)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__BGMO=is_invariant__QKMN(__tmp__AGMO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__BGMO=is_invariant__M1FO(__tmp__AGMO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__BGMO=is_invariant__XFMO(__tmp__AGMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__BGMO=is_invariant__01FO(__tmp__AGMO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__BGMO=is_invariant__GGMO(__tmp__AGMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__BGMO=is_invariant__ZKLM(__tmp__AGMO);
    } break;
    case __EXPR_ADD__: {
      __tmp__BGMO=is_invariant__Q5DM(__tmp__AGMO);
    } break;
    case __EXPR_NOT__: {
      __tmp__BGMO=is_invariant__FI0M(__tmp__AGMO);
    } break;
    case __EXPR_MOD__: {
      __tmp__BGMO=is_invariant__I2FO(__tmp__AGMO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__BGMO=is_invariant__PWEP(__tmp__AGMO);
    } break;
    case __EXPR_INF__: {
      __tmp__BGMO=is_invariant__1TSN(__tmp__AGMO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__BGMO=is_invariant__JUSN(__tmp__AGMO);
    } break;
    case __EXPR_OR__: {
      __tmp__BGMO=is_invariant__LERN(__tmp__AGMO);
    } break;
    case __EXPR_XOR__: {
      __tmp__BGMO=is_invariant__QTVO(__tmp__AGMO);
    } break;
    };
    __tmp__EGMO=__tmp__BGMO;
  } else {
    __tmp__EGMO=FALSE__;
  };
  return(__tmp__EGMO);
}

static __BOOLEAN is_invariant__01FO(__EXPR_AND_LOGIC *Self__11FO)
// ({EXPR_AND_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__31FO,*__tmp__D2FO;
  __BOOLEAN __tmp__41FO,__tmp__E2FO,__tmp__H2FO;
  __tmp__31FO=Self__11FO->parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__31FO)->__id) {
  case __LIST__: {
    __tmp__41FO=is_invariant__AH0M(__tmp__31FO);
  } break;
  case __STRING_CST__: {
    __tmp__41FO=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__41FO=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__41FO=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__41FO=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__41FO=is_invariant__FVCM(__tmp__31FO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__41FO=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__41FO=is_invariant__OVCM(__tmp__31FO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__41FO=is_invariant__2VCM(__tmp__31FO);
  } break;
  case __REAL_CST__: {
    __tmp__41FO=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__41FO=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__41FO=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__41FO=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__41FO=is_invariant__WWCM(__tmp__31FO);
  } break;
  case __EXPR_SUB__: {
    __tmp__41FO=is_invariant__EXCM(__tmp__31FO);
  } break;
  case __EXPR_MUL__: {
    __tmp__41FO=is_invariant__SXCM(__tmp__31FO);
  } break;
  case __EXPR_DIV__: {
    __tmp__41FO=is_invariant__AYCM(__tmp__31FO);
  } break;
  case __EXPR_AND__: {
    __tmp__41FO=is_invariant__OYCM(__tmp__31FO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__41FO=is_invariant__2YCM(__tmp__31FO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__41FO=is_invariant__KZCM(__tmp__31FO);
  } break;
  case __PUT_TO__: {
    __tmp__41FO=is_invariant__YZCM(__tmp__31FO);
  } break;
  case __ITEM__: {
    __tmp__41FO=is_invariant__P0CM(__tmp__31FO);
  } break;
  case __SIZE_OF__: {
    __tmp__41FO=TRUE__;
  } break;
  case __CAST__: {
    __tmp__41FO=is_invariant__A1CM(__tmp__31FO);
  } break;
  case __CALL_SLOT__: {
    __tmp__41FO=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__41FO=is_invariant__E4WL(__tmp__31FO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__41FO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__31FO)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__41FO=is_invariant__QKMN(__tmp__31FO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__41FO=is_invariant__M1FO(__tmp__31FO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__41FO=is_invariant__XFMO(__tmp__31FO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__41FO=is_invariant__01FO(__tmp__31FO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__41FO=is_invariant__GGMO(__tmp__31FO);
  } break;
  case __EXPR_NEG__: {
    __tmp__41FO=is_invariant__ZKLM(__tmp__31FO);
  } break;
  case __EXPR_ADD__: {
    __tmp__41FO=is_invariant__Q5DM(__tmp__31FO);
  } break;
  case __EXPR_NOT__: {
    __tmp__41FO=is_invariant__FI0M(__tmp__31FO);
  } break;
  case __EXPR_MOD__: {
    __tmp__41FO=is_invariant__I2FO(__tmp__31FO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__41FO=is_invariant__PWEP(__tmp__31FO);
  } break;
  case __EXPR_INF__: {
    __tmp__41FO=is_invariant__1TSN(__tmp__31FO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__41FO=is_invariant__JUSN(__tmp__31FO);
  } break;
  case __EXPR_OR__: {
    __tmp__41FO=is_invariant__LERN(__tmp__31FO);
  } break;
  case __EXPR_XOR__: {
    __tmp__41FO=is_invariant__QTVO(__tmp__31FO);
  } break;
  };
  if (__tmp__41FO) {
    __tmp__D2FO=Self__11FO->parent_expr_binary_logic__WJCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__D2FO)->__id) {
    case __LIST__: {
      __tmp__E2FO=is_invariant__AH0M(__tmp__D2FO);
    } break;
    case __STRING_CST__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__E2FO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__E2FO=is_invariant__FVCM(__tmp__D2FO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__E2FO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__E2FO=is_invariant__OVCM(__tmp__D2FO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__E2FO=is_invariant__2VCM(__tmp__D2FO);
    } break;
    case __REAL_CST__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__E2FO=is_invariant__WWCM(__tmp__D2FO);
    } break;
    case __EXPR_SUB__: {
      __tmp__E2FO=is_invariant__EXCM(__tmp__D2FO);
    } break;
    case __EXPR_MUL__: {
      __tmp__E2FO=is_invariant__SXCM(__tmp__D2FO);
    } break;
    case __EXPR_DIV__: {
      __tmp__E2FO=is_invariant__AYCM(__tmp__D2FO);
    } break;
    case __EXPR_AND__: {
      __tmp__E2FO=is_invariant__OYCM(__tmp__D2FO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__E2FO=is_invariant__2YCM(__tmp__D2FO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__E2FO=is_invariant__KZCM(__tmp__D2FO);
    } break;
    case __PUT_TO__: {
      __tmp__E2FO=is_invariant__YZCM(__tmp__D2FO);
    } break;
    case __ITEM__: {
      __tmp__E2FO=is_invariant__P0CM(__tmp__D2FO);
    } break;
    case __SIZE_OF__: {
      __tmp__E2FO=TRUE__;
    } break;
    case __CAST__: {
      __tmp__E2FO=is_invariant__A1CM(__tmp__D2FO);
    } break;
    case __CALL_SLOT__: {
      __tmp__E2FO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__E2FO=is_invariant__E4WL(__tmp__D2FO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__E2FO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__D2FO)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__E2FO=is_invariant__QKMN(__tmp__D2FO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__E2FO=is_invariant__M1FO(__tmp__D2FO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__E2FO=is_invariant__XFMO(__tmp__D2FO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__E2FO=is_invariant__01FO(__tmp__D2FO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__E2FO=is_invariant__GGMO(__tmp__D2FO);
    } break;
    case __EXPR_NEG__: {
      __tmp__E2FO=is_invariant__ZKLM(__tmp__D2FO);
    } break;
    case __EXPR_ADD__: {
      __tmp__E2FO=is_invariant__Q5DM(__tmp__D2FO);
    } break;
    case __EXPR_NOT__: {
      __tmp__E2FO=is_invariant__FI0M(__tmp__D2FO);
    } break;
    case __EXPR_MOD__: {
      __tmp__E2FO=is_invariant__I2FO(__tmp__D2FO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__E2FO=is_invariant__PWEP(__tmp__D2FO);
    } break;
    case __EXPR_INF__: {
      __tmp__E2FO=is_invariant__1TSN(__tmp__D2FO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__E2FO=is_invariant__JUSN(__tmp__D2FO);
    } break;
    case __EXPR_OR__: {
      __tmp__E2FO=is_invariant__LERN(__tmp__D2FO);
    } break;
    case __EXPR_XOR__: {
      __tmp__E2FO=is_invariant__QTVO(__tmp__D2FO);
    } break;
    };
    __tmp__H2FO=__tmp__E2FO;
  } else {
    __tmp__H2FO=FALSE__;
  };
  return(__tmp__H2FO);
}

static __BOOLEAN is_invariant__GGMO(__EXPR_AND_AND_LOGIC *Self__HGMO)
// ({EXPR_AND_AND_LOGIC}) With resultRecursive, No inlinable.
{
  void *__tmp__JGMO,*__tmp__PGMO;
  __BOOLEAN __tmp__KGMO,__tmp__QGMO,__tmp__TGMO;
  __tmp__JGMO=Self__HGMO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.left__NMEO;
  switch (((struct ___OBJ *)__tmp__JGMO)->__id) {
  case __LIST__: {
    __tmp__KGMO=is_invariant__AH0M(__tmp__JGMO);
  } break;
  case __STRING_CST__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__KGMO=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__KGMO=is_invariant__FVCM(__tmp__JGMO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__KGMO=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__KGMO=is_invariant__OVCM(__tmp__JGMO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__KGMO=is_invariant__2VCM(__tmp__JGMO);
  } break;
  case __REAL_CST__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__KGMO=is_invariant__WWCM(__tmp__JGMO);
  } break;
  case __EXPR_SUB__: {
    __tmp__KGMO=is_invariant__EXCM(__tmp__JGMO);
  } break;
  case __EXPR_MUL__: {
    __tmp__KGMO=is_invariant__SXCM(__tmp__JGMO);
  } break;
  case __EXPR_DIV__: {
    __tmp__KGMO=is_invariant__AYCM(__tmp__JGMO);
  } break;
  case __EXPR_AND__: {
    __tmp__KGMO=is_invariant__OYCM(__tmp__JGMO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__KGMO=is_invariant__2YCM(__tmp__JGMO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__KGMO=is_invariant__KZCM(__tmp__JGMO);
  } break;
  case __PUT_TO__: {
    __tmp__KGMO=is_invariant__YZCM(__tmp__JGMO);
  } break;
  case __ITEM__: {
    __tmp__KGMO=is_invariant__P0CM(__tmp__JGMO);
  } break;
  case __SIZE_OF__: {
    __tmp__KGMO=TRUE__;
  } break;
  case __CAST__: {
    __tmp__KGMO=is_invariant__A1CM(__tmp__JGMO);
  } break;
  case __CALL_SLOT__: {
    __tmp__KGMO=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__KGMO=is_invariant__E4WL(__tmp__JGMO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__KGMO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__JGMO)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__KGMO=is_invariant__QKMN(__tmp__JGMO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__KGMO=is_invariant__M1FO(__tmp__JGMO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__KGMO=is_invariant__XFMO(__tmp__JGMO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__KGMO=is_invariant__01FO(__tmp__JGMO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__KGMO=is_invariant__GGMO(__tmp__JGMO);
  } break;
  case __EXPR_NEG__: {
    __tmp__KGMO=is_invariant__ZKLM(__tmp__JGMO);
  } break;
  case __EXPR_ADD__: {
    __tmp__KGMO=is_invariant__Q5DM(__tmp__JGMO);
  } break;
  case __EXPR_NOT__: {
    __tmp__KGMO=is_invariant__FI0M(__tmp__JGMO);
  } break;
  case __EXPR_MOD__: {
    __tmp__KGMO=is_invariant__I2FO(__tmp__JGMO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__KGMO=is_invariant__PWEP(__tmp__JGMO);
  } break;
  case __EXPR_INF__: {
    __tmp__KGMO=is_invariant__1TSN(__tmp__JGMO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__KGMO=is_invariant__JUSN(__tmp__JGMO);
  } break;
  case __EXPR_OR__: {
    __tmp__KGMO=is_invariant__LERN(__tmp__JGMO);
  } break;
  case __EXPR_XOR__: {
    __tmp__KGMO=is_invariant__QTVO(__tmp__JGMO);
  } break;
  };
  if (__tmp__KGMO) {
    __tmp__PGMO=Self__HGMO->parent_expr_and_logic__QKCL.parent_expr_binary_logic__WJCL.right__RMEO;
    switch (((struct ___OBJ *)__tmp__PGMO)->__id) {
    case __LIST__: {
      __tmp__QGMO=is_invariant__AH0M(__tmp__PGMO);
    } break;
    case __STRING_CST__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__QGMO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__QGMO=is_invariant__FVCM(__tmp__PGMO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__QGMO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__QGMO=is_invariant__OVCM(__tmp__PGMO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__QGMO=is_invariant__2VCM(__tmp__PGMO);
    } break;
    case __REAL_CST__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__QGMO=is_invariant__WWCM(__tmp__PGMO);
    } break;
    case __EXPR_SUB__: {
      __tmp__QGMO=is_invariant__EXCM(__tmp__PGMO);
    } break;
    case __EXPR_MUL__: {
      __tmp__QGMO=is_invariant__SXCM(__tmp__PGMO);
    } break;
    case __EXPR_DIV__: {
      __tmp__QGMO=is_invariant__AYCM(__tmp__PGMO);
    } break;
    case __EXPR_AND__: {
      __tmp__QGMO=is_invariant__OYCM(__tmp__PGMO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__QGMO=is_invariant__2YCM(__tmp__PGMO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__QGMO=is_invariant__KZCM(__tmp__PGMO);
    } break;
    case __PUT_TO__: {
      __tmp__QGMO=is_invariant__YZCM(__tmp__PGMO);
    } break;
    case __ITEM__: {
      __tmp__QGMO=is_invariant__P0CM(__tmp__PGMO);
    } break;
    case __SIZE_OF__: {
      __tmp__QGMO=TRUE__;
    } break;
    case __CAST__: {
      __tmp__QGMO=is_invariant__A1CM(__tmp__PGMO);
    } break;
    case __CALL_SLOT__: {
      __tmp__QGMO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__QGMO=is_invariant__E4WL(__tmp__PGMO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__QGMO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__PGMO)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__QGMO=is_invariant__QKMN(__tmp__PGMO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__QGMO=is_invariant__M1FO(__tmp__PGMO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__QGMO=is_invariant__XFMO(__tmp__PGMO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__QGMO=is_invariant__01FO(__tmp__PGMO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__QGMO=is_invariant__GGMO(__tmp__PGMO);
    } break;
    case __EXPR_NEG__: {
      __tmp__QGMO=is_invariant__ZKLM(__tmp__PGMO);
    } break;
    case __EXPR_ADD__: {
      __tmp__QGMO=is_invariant__Q5DM(__tmp__PGMO);
    } break;
    case __EXPR_NOT__: {
      __tmp__QGMO=is_invariant__FI0M(__tmp__PGMO);
    } break;
    case __EXPR_MOD__: {
      __tmp__QGMO=is_invariant__I2FO(__tmp__PGMO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__QGMO=is_invariant__PWEP(__tmp__PGMO);
    } break;
    case __EXPR_INF__: {
      __tmp__QGMO=is_invariant__1TSN(__tmp__PGMO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__QGMO=is_invariant__JUSN(__tmp__PGMO);
    } break;
    case __EXPR_OR__: {
      __tmp__QGMO=is_invariant__LERN(__tmp__PGMO);
    } break;
    case __EXPR_XOR__: {
      __tmp__QGMO=is_invariant__QTVO(__tmp__PGMO);
    } break;
    };
    __tmp__TGMO=__tmp__QGMO;
  } else {
    __tmp__TGMO=FALSE__;
  };
  return(__tmp__TGMO);
}

static __BOOLEAN is_invariant__ZKLM(__EXPR_NEG *Self__0KLM)
// ({EXPR_NEG}) With resultRecursive, No inlinable.
{
  void *__tmp__2KLM;
  __BOOLEAN __tmp__3KLM;
  __tmp__2KLM=Self__0KLM->parent_expr_unary__JZDL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__2KLM)->__id) {
  case __LIST__: {
    __tmp__3KLM=is_invariant__AH0M(__tmp__2KLM);
  } break;
  case __STRING_CST__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__3KLM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__3KLM=is_invariant__FVCM(__tmp__2KLM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__3KLM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__3KLM=is_invariant__OVCM(__tmp__2KLM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__3KLM=is_invariant__2VCM(__tmp__2KLM);
  } break;
  case __REAL_CST__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__3KLM=is_invariant__WWCM(__tmp__2KLM);
  } break;
  case __EXPR_SUB__: {
    __tmp__3KLM=is_invariant__EXCM(__tmp__2KLM);
  } break;
  case __EXPR_MUL__: {
    __tmp__3KLM=is_invariant__SXCM(__tmp__2KLM);
  } break;
  case __EXPR_DIV__: {
    __tmp__3KLM=is_invariant__AYCM(__tmp__2KLM);
  } break;
  case __EXPR_AND__: {
    __tmp__3KLM=is_invariant__OYCM(__tmp__2KLM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__3KLM=is_invariant__2YCM(__tmp__2KLM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__3KLM=is_invariant__KZCM(__tmp__2KLM);
  } break;
  case __PUT_TO__: {
    __tmp__3KLM=is_invariant__YZCM(__tmp__2KLM);
  } break;
  case __ITEM__: {
    __tmp__3KLM=is_invariant__P0CM(__tmp__2KLM);
  } break;
  case __SIZE_OF__: {
    __tmp__3KLM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__3KLM=is_invariant__A1CM(__tmp__2KLM);
  } break;
  case __CALL_SLOT__: {
    __tmp__3KLM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__3KLM=is_invariant__E4WL(__tmp__2KLM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__3KLM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__2KLM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__3KLM=is_invariant__QKMN(__tmp__2KLM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__3KLM=is_invariant__M1FO(__tmp__2KLM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__3KLM=is_invariant__XFMO(__tmp__2KLM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__3KLM=is_invariant__01FO(__tmp__2KLM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__3KLM=is_invariant__GGMO(__tmp__2KLM);
  } break;
  case __EXPR_NEG__: {
    __tmp__3KLM=is_invariant__ZKLM(__tmp__2KLM);
  } break;
  case __EXPR_ADD__: {
    __tmp__3KLM=is_invariant__Q5DM(__tmp__2KLM);
  } break;
  case __EXPR_NOT__: {
    __tmp__3KLM=is_invariant__FI0M(__tmp__2KLM);
  } break;
  case __EXPR_MOD__: {
    __tmp__3KLM=is_invariant__I2FO(__tmp__2KLM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__3KLM=is_invariant__PWEP(__tmp__2KLM);
  } break;
  case __EXPR_INF__: {
    __tmp__3KLM=is_invariant__1TSN(__tmp__2KLM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__3KLM=is_invariant__JUSN(__tmp__2KLM);
  } break;
  case __EXPR_OR__: {
    __tmp__3KLM=is_invariant__LERN(__tmp__2KLM);
  } break;
  case __EXPR_XOR__: {
    __tmp__3KLM=is_invariant__QTVO(__tmp__2KLM);
  } break;
  };
  return(__tmp__3KLM);
}

static __BOOLEAN is_invariant__Q5DM(__EXPR_ADD *Self__R5DM)
// ({EXPR_ADD}) With resultRecursive, No inlinable.
{
  void *__tmp__T5DM,*__tmp__Z5DM;
  __BOOLEAN __tmp__U5DM,__tmp__05DM,__tmp__35DM;
  __tmp__T5DM=Self__R5DM->parent_expr_binary__UZDL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__T5DM)->__id) {
  case __LIST__: {
    __tmp__U5DM=is_invariant__AH0M(__tmp__T5DM);
  } break;
  case __STRING_CST__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__U5DM=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__U5DM=is_invariant__FVCM(__tmp__T5DM);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__U5DM=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__U5DM=is_invariant__OVCM(__tmp__T5DM);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__U5DM=is_invariant__2VCM(__tmp__T5DM);
  } break;
  case __REAL_CST__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__U5DM=is_invariant__WWCM(__tmp__T5DM);
  } break;
  case __EXPR_SUB__: {
    __tmp__U5DM=is_invariant__EXCM(__tmp__T5DM);
  } break;
  case __EXPR_MUL__: {
    __tmp__U5DM=is_invariant__SXCM(__tmp__T5DM);
  } break;
  case __EXPR_DIV__: {
    __tmp__U5DM=is_invariant__AYCM(__tmp__T5DM);
  } break;
  case __EXPR_AND__: {
    __tmp__U5DM=is_invariant__OYCM(__tmp__T5DM);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__U5DM=is_invariant__2YCM(__tmp__T5DM);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__U5DM=is_invariant__KZCM(__tmp__T5DM);
  } break;
  case __PUT_TO__: {
    __tmp__U5DM=is_invariant__YZCM(__tmp__T5DM);
  } break;
  case __ITEM__: {
    __tmp__U5DM=is_invariant__P0CM(__tmp__T5DM);
  } break;
  case __SIZE_OF__: {
    __tmp__U5DM=TRUE__;
  } break;
  case __CAST__: {
    __tmp__U5DM=is_invariant__A1CM(__tmp__T5DM);
  } break;
  case __CALL_SLOT__: {
    __tmp__U5DM=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__U5DM=is_invariant__E4WL(__tmp__T5DM);
  } break;
  case __READ_GLOBAL__: {
    __tmp__U5DM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__T5DM)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__U5DM=is_invariant__QKMN(__tmp__T5DM);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__U5DM=is_invariant__M1FO(__tmp__T5DM);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__U5DM=is_invariant__XFMO(__tmp__T5DM);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__U5DM=is_invariant__01FO(__tmp__T5DM);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__U5DM=is_invariant__GGMO(__tmp__T5DM);
  } break;
  case __EXPR_NEG__: {
    __tmp__U5DM=is_invariant__ZKLM(__tmp__T5DM);
  } break;
  case __EXPR_ADD__: {
    __tmp__U5DM=is_invariant__Q5DM(__tmp__T5DM);
  } break;
  case __EXPR_NOT__: {
    __tmp__U5DM=is_invariant__FI0M(__tmp__T5DM);
  } break;
  case __EXPR_MOD__: {
    __tmp__U5DM=is_invariant__I2FO(__tmp__T5DM);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__U5DM=is_invariant__PWEP(__tmp__T5DM);
  } break;
  case __EXPR_INF__: {
    __tmp__U5DM=is_invariant__1TSN(__tmp__T5DM);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__U5DM=is_invariant__JUSN(__tmp__T5DM);
  } break;
  case __EXPR_OR__: {
    __tmp__U5DM=is_invariant__LERN(__tmp__T5DM);
  } break;
  case __EXPR_XOR__: {
    __tmp__U5DM=is_invariant__QTVO(__tmp__T5DM);
  } break;
  };
  if (__tmp__U5DM) {
    __tmp__Z5DM=Self__R5DM->parent_expr_binary__UZDL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__Z5DM)->__id) {
    case __LIST__: {
      __tmp__05DM=is_invariant__AH0M(__tmp__Z5DM);
    } break;
    case __STRING_CST__: {
      __tmp__05DM=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__05DM=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__05DM=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__05DM=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__05DM=is_invariant__FVCM(__tmp__Z5DM);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__05DM=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__05DM=is_invariant__OVCM(__tmp__Z5DM);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__05DM=is_invariant__2VCM(__tmp__Z5DM);
    } break;
    case __REAL_CST__: {
      __tmp__05DM=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__05DM=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__05DM=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__05DM=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__05DM=is_invariant__WWCM(__tmp__Z5DM);
    } break;
    case __EXPR_SUB__: {
      __tmp__05DM=is_invariant__EXCM(__tmp__Z5DM);
    } break;
    case __EXPR_MUL__: {
      __tmp__05DM=is_invariant__SXCM(__tmp__Z5DM);
    } break;
    case __EXPR_DIV__: {
      __tmp__05DM=is_invariant__AYCM(__tmp__Z5DM);
    } break;
    case __EXPR_AND__: {
      __tmp__05DM=is_invariant__OYCM(__tmp__Z5DM);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__05DM=is_invariant__2YCM(__tmp__Z5DM);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__05DM=is_invariant__KZCM(__tmp__Z5DM);
    } break;
    case __PUT_TO__: {
      __tmp__05DM=is_invariant__YZCM(__tmp__Z5DM);
    } break;
    case __ITEM__: {
      __tmp__05DM=is_invariant__P0CM(__tmp__Z5DM);
    } break;
    case __SIZE_OF__: {
      __tmp__05DM=TRUE__;
    } break;
    case __CAST__: {
      __tmp__05DM=is_invariant__A1CM(__tmp__Z5DM);
    } break;
    case __CALL_SLOT__: {
      __tmp__05DM=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__05DM=is_invariant__E4WL(__tmp__Z5DM);
    } break;
    case __READ_GLOBAL__: {
      __tmp__05DM=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__Z5DM)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__05DM=is_invariant__QKMN(__tmp__Z5DM);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__05DM=is_invariant__M1FO(__tmp__Z5DM);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__05DM=is_invariant__XFMO(__tmp__Z5DM);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__05DM=is_invariant__01FO(__tmp__Z5DM);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__05DM=is_invariant__GGMO(__tmp__Z5DM);
    } break;
    case __EXPR_NEG__: {
      __tmp__05DM=is_invariant__ZKLM(__tmp__Z5DM);
    } break;
    case __EXPR_ADD__: {
      __tmp__05DM=is_invariant__Q5DM(__tmp__Z5DM);
    } break;
    case __EXPR_NOT__: {
      __tmp__05DM=is_invariant__FI0M(__tmp__Z5DM);
    } break;
    case __EXPR_MOD__: {
      __tmp__05DM=is_invariant__I2FO(__tmp__Z5DM);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__05DM=is_invariant__PWEP(__tmp__Z5DM);
    } break;
    case __EXPR_INF__: {
      __tmp__05DM=is_invariant__1TSN(__tmp__Z5DM);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__05DM=is_invariant__JUSN(__tmp__Z5DM);
    } break;
    case __EXPR_OR__: {
      __tmp__05DM=is_invariant__LERN(__tmp__Z5DM);
    } break;
    case __EXPR_XOR__: {
      __tmp__05DM=is_invariant__QTVO(__tmp__Z5DM);
    } break;
    };
    __tmp__35DM=__tmp__05DM;
  } else {
    __tmp__35DM=FALSE__;
  };
  return(__tmp__35DM);
}

static __BOOLEAN is_invariant__FI0M(__EXPR_NOT *Self__GI0M)
// ({EXPR_NOT}) With resultRecursive, No inlinable.
{
  void *__tmp__II0M;
  __BOOLEAN __tmp__JI0M;
  __tmp__II0M=Self__GI0M->parent_expr_unary__M5VL.right__XZDL;
  switch (((struct ___OBJ *)__tmp__II0M)->__id) {
  case __LIST__: {
    __tmp__JI0M=is_invariant__AH0M(__tmp__II0M);
  } break;
  case __STRING_CST__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__JI0M=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__JI0M=is_invariant__FVCM(__tmp__II0M);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__JI0M=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__JI0M=is_invariant__OVCM(__tmp__II0M);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__JI0M=is_invariant__2VCM(__tmp__II0M);
  } break;
  case __REAL_CST__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__JI0M=is_invariant__WWCM(__tmp__II0M);
  } break;
  case __EXPR_SUB__: {
    __tmp__JI0M=is_invariant__EXCM(__tmp__II0M);
  } break;
  case __EXPR_MUL__: {
    __tmp__JI0M=is_invariant__SXCM(__tmp__II0M);
  } break;
  case __EXPR_DIV__: {
    __tmp__JI0M=is_invariant__AYCM(__tmp__II0M);
  } break;
  case __EXPR_AND__: {
    __tmp__JI0M=is_invariant__OYCM(__tmp__II0M);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__JI0M=is_invariant__2YCM(__tmp__II0M);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__JI0M=is_invariant__KZCM(__tmp__II0M);
  } break;
  case __PUT_TO__: {
    __tmp__JI0M=is_invariant__YZCM(__tmp__II0M);
  } break;
  case __ITEM__: {
    __tmp__JI0M=is_invariant__P0CM(__tmp__II0M);
  } break;
  case __SIZE_OF__: {
    __tmp__JI0M=TRUE__;
  } break;
  case __CAST__: {
    __tmp__JI0M=is_invariant__A1CM(__tmp__II0M);
  } break;
  case __CALL_SLOT__: {
    __tmp__JI0M=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__JI0M=is_invariant__E4WL(__tmp__II0M);
  } break;
  case __READ_GLOBAL__: {
    __tmp__JI0M=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__II0M)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__JI0M=is_invariant__QKMN(__tmp__II0M);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__JI0M=is_invariant__M1FO(__tmp__II0M);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__JI0M=is_invariant__XFMO(__tmp__II0M);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__JI0M=is_invariant__01FO(__tmp__II0M);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__JI0M=is_invariant__GGMO(__tmp__II0M);
  } break;
  case __EXPR_NEG__: {
    __tmp__JI0M=is_invariant__ZKLM(__tmp__II0M);
  } break;
  case __EXPR_ADD__: {
    __tmp__JI0M=is_invariant__Q5DM(__tmp__II0M);
  } break;
  case __EXPR_NOT__: {
    __tmp__JI0M=is_invariant__FI0M(__tmp__II0M);
  } break;
  case __EXPR_MOD__: {
    __tmp__JI0M=is_invariant__I2FO(__tmp__II0M);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__JI0M=is_invariant__PWEP(__tmp__II0M);
  } break;
  case __EXPR_INF__: {
    __tmp__JI0M=is_invariant__1TSN(__tmp__II0M);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__JI0M=is_invariant__JUSN(__tmp__II0M);
  } break;
  case __EXPR_OR__: {
    __tmp__JI0M=is_invariant__LERN(__tmp__II0M);
  } break;
  case __EXPR_XOR__: {
    __tmp__JI0M=is_invariant__QTVO(__tmp__II0M);
  } break;
  };
  return(__tmp__JI0M);
}

static __BOOLEAN is_invariant__I2FO(__EXPR_MOD *Self__J2FO)
// ({EXPR_MOD}) With resultRecursive, No inlinable.
{
  void *__tmp__L2FO,*__tmp__R2FO;
  __BOOLEAN __tmp__M2FO,__tmp__S2FO,__tmp__V2FO;
  __tmp__L2FO=Self__J2FO->parent_expr_binary__PDWL.left__PP1H;
  switch (((struct ___OBJ *)__tmp__L2FO)->__id) {
  case __LIST__: {
    __tmp__M2FO=is_invariant__AH0M(__tmp__L2FO);
  } break;
  case __STRING_CST__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__M2FO=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__M2FO=is_invariant__FVCM(__tmp__L2FO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__M2FO=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__M2FO=is_invariant__OVCM(__tmp__L2FO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__M2FO=is_invariant__2VCM(__tmp__L2FO);
  } break;
  case __REAL_CST__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__M2FO=is_invariant__WWCM(__tmp__L2FO);
  } break;
  case __EXPR_SUB__: {
    __tmp__M2FO=is_invariant__EXCM(__tmp__L2FO);
  } break;
  case __EXPR_MUL__: {
    __tmp__M2FO=is_invariant__SXCM(__tmp__L2FO);
  } break;
  case __EXPR_DIV__: {
    __tmp__M2FO=is_invariant__AYCM(__tmp__L2FO);
  } break;
  case __EXPR_AND__: {
    __tmp__M2FO=is_invariant__OYCM(__tmp__L2FO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__M2FO=is_invariant__2YCM(__tmp__L2FO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__M2FO=is_invariant__KZCM(__tmp__L2FO);
  } break;
  case __PUT_TO__: {
    __tmp__M2FO=is_invariant__YZCM(__tmp__L2FO);
  } break;
  case __ITEM__: {
    __tmp__M2FO=is_invariant__P0CM(__tmp__L2FO);
  } break;
  case __SIZE_OF__: {
    __tmp__M2FO=TRUE__;
  } break;
  case __CAST__: {
    __tmp__M2FO=is_invariant__A1CM(__tmp__L2FO);
  } break;
  case __CALL_SLOT__: {
    __tmp__M2FO=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__M2FO=is_invariant__E4WL(__tmp__L2FO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__M2FO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__L2FO)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__M2FO=is_invariant__QKMN(__tmp__L2FO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__M2FO=is_invariant__M1FO(__tmp__L2FO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__M2FO=is_invariant__XFMO(__tmp__L2FO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__M2FO=is_invariant__01FO(__tmp__L2FO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__M2FO=is_invariant__GGMO(__tmp__L2FO);
  } break;
  case __EXPR_NEG__: {
    __tmp__M2FO=is_invariant__ZKLM(__tmp__L2FO);
  } break;
  case __EXPR_ADD__: {
    __tmp__M2FO=is_invariant__Q5DM(__tmp__L2FO);
  } break;
  case __EXPR_NOT__: {
    __tmp__M2FO=is_invariant__FI0M(__tmp__L2FO);
  } break;
  case __EXPR_MOD__: {
    __tmp__M2FO=is_invariant__I2FO(__tmp__L2FO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__M2FO=is_invariant__PWEP(__tmp__L2FO);
  } break;
  case __EXPR_INF__: {
    __tmp__M2FO=is_invariant__1TSN(__tmp__L2FO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__M2FO=is_invariant__JUSN(__tmp__L2FO);
  } break;
  case __EXPR_OR__: {
    __tmp__M2FO=is_invariant__LERN(__tmp__L2FO);
  } break;
  case __EXPR_XOR__: {
    __tmp__M2FO=is_invariant__QTVO(__tmp__L2FO);
  } break;
  };
  if (__tmp__M2FO) {
    __tmp__R2FO=Self__J2FO->parent_expr_binary__PDWL.right__OP2H;
    switch (((struct ___OBJ *)__tmp__R2FO)->__id) {
    case __LIST__: {
      __tmp__S2FO=is_invariant__AH0M(__tmp__R2FO);
    } break;
    case __STRING_CST__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__S2FO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__S2FO=is_invariant__FVCM(__tmp__R2FO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__S2FO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__S2FO=is_invariant__OVCM(__tmp__R2FO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__S2FO=is_invariant__2VCM(__tmp__R2FO);
    } break;
    case __REAL_CST__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__S2FO=is_invariant__WWCM(__tmp__R2FO);
    } break;
    case __EXPR_SUB__: {
      __tmp__S2FO=is_invariant__EXCM(__tmp__R2FO);
    } break;
    case __EXPR_MUL__: {
      __tmp__S2FO=is_invariant__SXCM(__tmp__R2FO);
    } break;
    case __EXPR_DIV__: {
      __tmp__S2FO=is_invariant__AYCM(__tmp__R2FO);
    } break;
    case __EXPR_AND__: {
      __tmp__S2FO=is_invariant__OYCM(__tmp__R2FO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__S2FO=is_invariant__2YCM(__tmp__R2FO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__S2FO=is_invariant__KZCM(__tmp__R2FO);
    } break;
    case __PUT_TO__: {
      __tmp__S2FO=is_invariant__YZCM(__tmp__R2FO);
    } break;
    case __ITEM__: {
      __tmp__S2FO=is_invariant__P0CM(__tmp__R2FO);
    } break;
    case __SIZE_OF__: {
      __tmp__S2FO=TRUE__;
    } break;
    case __CAST__: {
      __tmp__S2FO=is_invariant__A1CM(__tmp__R2FO);
    } break;
    case __CALL_SLOT__: {
      __tmp__S2FO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__S2FO=is_invariant__E4WL(__tmp__R2FO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__S2FO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__R2FO)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__S2FO=is_invariant__QKMN(__tmp__R2FO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__S2FO=is_invariant__M1FO(__tmp__R2FO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__S2FO=is_invariant__XFMO(__tmp__R2FO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__S2FO=is_invariant__01FO(__tmp__R2FO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__S2FO=is_invariant__GGMO(__tmp__R2FO);
    } break;
    case __EXPR_NEG__: {
      __tmp__S2FO=is_invariant__ZKLM(__tmp__R2FO);
    } break;
    case __EXPR_ADD__: {
      __tmp__S2FO=is_invariant__Q5DM(__tmp__R2FO);
    } break;
    case __EXPR_NOT__: {
      __tmp__S2FO=is_invariant__FI0M(__tmp__R2FO);
    } break;
    case __EXPR_MOD__: {
      __tmp__S2FO=is_invariant__I2FO(__tmp__R2FO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__S2FO=is_invariant__PWEP(__tmp__R2FO);
    } break;
    case __EXPR_INF__: {
      __tmp__S2FO=is_invariant__1TSN(__tmp__R2FO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__S2FO=is_invariant__JUSN(__tmp__R2FO);
    } break;
    case __EXPR_OR__: {
      __tmp__S2FO=is_invariant__LERN(__tmp__R2FO);
    } break;
    case __EXPR_XOR__: {
      __tmp__S2FO=is_invariant__QTVO(__tmp__R2FO);
    } break;
    };
    __tmp__V2FO=__tmp__S2FO;
  } else {
    __tmp__V2FO=FALSE__;
  };
  return(__tmp__V2FO);
}

static __BOOLEAN is_invariant__PWEP(__EXPR_SUP_EQ *Self__QWEP)
// ({EXPR_SUP_EQ}) With resultRecursive, No inlinable.
{
  void *__tmp__SWEP,*__tmp__YWEP;
  __BOOLEAN __tmp__TWEP,__tmp__ZWEP,__tmp__2WEP;
  __tmp__SWEP=Self__QWEP->parent_expr_binary_cmp__EP1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__SWEP)->__id) {
  case __LIST__: {
    __tmp__TWEP=is_invariant__AH0M(__tmp__SWEP);
  } break;
  case __STRING_CST__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__TWEP=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__TWEP=is_invariant__FVCM(__tmp__SWEP);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__TWEP=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__TWEP=is_invariant__OVCM(__tmp__SWEP);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__TWEP=is_invariant__2VCM(__tmp__SWEP);
  } break;
  case __REAL_CST__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__TWEP=is_invariant__WWCM(__tmp__SWEP);
  } break;
  case __EXPR_SUB__: {
    __tmp__TWEP=is_invariant__EXCM(__tmp__SWEP);
  } break;
  case __EXPR_MUL__: {
    __tmp__TWEP=is_invariant__SXCM(__tmp__SWEP);
  } break;
  case __EXPR_DIV__: {
    __tmp__TWEP=is_invariant__AYCM(__tmp__SWEP);
  } break;
  case __EXPR_AND__: {
    __tmp__TWEP=is_invariant__OYCM(__tmp__SWEP);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__TWEP=is_invariant__2YCM(__tmp__SWEP);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__TWEP=is_invariant__KZCM(__tmp__SWEP);
  } break;
  case __PUT_TO__: {
    __tmp__TWEP=is_invariant__YZCM(__tmp__SWEP);
  } break;
  case __ITEM__: {
    __tmp__TWEP=is_invariant__P0CM(__tmp__SWEP);
  } break;
  case __SIZE_OF__: {
    __tmp__TWEP=TRUE__;
  } break;
  case __CAST__: {
    __tmp__TWEP=is_invariant__A1CM(__tmp__SWEP);
  } break;
  case __CALL_SLOT__: {
    __tmp__TWEP=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__TWEP=is_invariant__E4WL(__tmp__SWEP);
  } break;
  case __READ_GLOBAL__: {
    __tmp__TWEP=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__SWEP)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__TWEP=is_invariant__QKMN(__tmp__SWEP);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__TWEP=is_invariant__M1FO(__tmp__SWEP);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__TWEP=is_invariant__XFMO(__tmp__SWEP);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__TWEP=is_invariant__01FO(__tmp__SWEP);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__TWEP=is_invariant__GGMO(__tmp__SWEP);
  } break;
  case __EXPR_NEG__: {
    __tmp__TWEP=is_invariant__ZKLM(__tmp__SWEP);
  } break;
  case __EXPR_ADD__: {
    __tmp__TWEP=is_invariant__Q5DM(__tmp__SWEP);
  } break;
  case __EXPR_NOT__: {
    __tmp__TWEP=is_invariant__FI0M(__tmp__SWEP);
  } break;
  case __EXPR_MOD__: {
    __tmp__TWEP=is_invariant__I2FO(__tmp__SWEP);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__TWEP=is_invariant__PWEP(__tmp__SWEP);
  } break;
  case __EXPR_INF__: {
    __tmp__TWEP=is_invariant__1TSN(__tmp__SWEP);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__TWEP=is_invariant__JUSN(__tmp__SWEP);
  } break;
  case __EXPR_OR__: {
    __tmp__TWEP=is_invariant__LERN(__tmp__SWEP);
  } break;
  case __EXPR_XOR__: {
    __tmp__TWEP=is_invariant__QTVO(__tmp__SWEP);
  } break;
  };
  if (__tmp__TWEP) {
    __tmp__YWEP=Self__QWEP->parent_expr_binary_cmp__EP1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__YWEP)->__id) {
    case __LIST__: {
      __tmp__ZWEP=is_invariant__AH0M(__tmp__YWEP);
    } break;
    case __STRING_CST__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__ZWEP=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__ZWEP=is_invariant__FVCM(__tmp__YWEP);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__ZWEP=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__ZWEP=is_invariant__OVCM(__tmp__YWEP);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__ZWEP=is_invariant__2VCM(__tmp__YWEP);
    } break;
    case __REAL_CST__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__ZWEP=is_invariant__WWCM(__tmp__YWEP);
    } break;
    case __EXPR_SUB__: {
      __tmp__ZWEP=is_invariant__EXCM(__tmp__YWEP);
    } break;
    case __EXPR_MUL__: {
      __tmp__ZWEP=is_invariant__SXCM(__tmp__YWEP);
    } break;
    case __EXPR_DIV__: {
      __tmp__ZWEP=is_invariant__AYCM(__tmp__YWEP);
    } break;
    case __EXPR_AND__: {
      __tmp__ZWEP=is_invariant__OYCM(__tmp__YWEP);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__ZWEP=is_invariant__2YCM(__tmp__YWEP);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__ZWEP=is_invariant__KZCM(__tmp__YWEP);
    } break;
    case __PUT_TO__: {
      __tmp__ZWEP=is_invariant__YZCM(__tmp__YWEP);
    } break;
    case __ITEM__: {
      __tmp__ZWEP=is_invariant__P0CM(__tmp__YWEP);
    } break;
    case __SIZE_OF__: {
      __tmp__ZWEP=TRUE__;
    } break;
    case __CAST__: {
      __tmp__ZWEP=is_invariant__A1CM(__tmp__YWEP);
    } break;
    case __CALL_SLOT__: {
      __tmp__ZWEP=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__ZWEP=is_invariant__E4WL(__tmp__YWEP);
    } break;
    case __READ_GLOBAL__: {
      __tmp__ZWEP=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__YWEP)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__ZWEP=is_invariant__QKMN(__tmp__YWEP);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__ZWEP=is_invariant__M1FO(__tmp__YWEP);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__ZWEP=is_invariant__XFMO(__tmp__YWEP);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__ZWEP=is_invariant__01FO(__tmp__YWEP);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__ZWEP=is_invariant__GGMO(__tmp__YWEP);
    } break;
    case __EXPR_NEG__: {
      __tmp__ZWEP=is_invariant__ZKLM(__tmp__YWEP);
    } break;
    case __EXPR_ADD__: {
      __tmp__ZWEP=is_invariant__Q5DM(__tmp__YWEP);
    } break;
    case __EXPR_NOT__: {
      __tmp__ZWEP=is_invariant__FI0M(__tmp__YWEP);
    } break;
    case __EXPR_MOD__: {
      __tmp__ZWEP=is_invariant__I2FO(__tmp__YWEP);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__ZWEP=is_invariant__PWEP(__tmp__YWEP);
    } break;
    case __EXPR_INF__: {
      __tmp__ZWEP=is_invariant__1TSN(__tmp__YWEP);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__ZWEP=is_invariant__JUSN(__tmp__YWEP);
    } break;
    case __EXPR_OR__: {
      __tmp__ZWEP=is_invariant__LERN(__tmp__YWEP);
    } break;
    case __EXPR_XOR__: {
      __tmp__ZWEP=is_invariant__QTVO(__tmp__YWEP);
    } break;
    };
    __tmp__2WEP=__tmp__ZWEP;
  } else {
    __tmp__2WEP=FALSE__;
  };
  return(__tmp__2WEP);
}

static __BOOLEAN is_invariant__1TSN(__EXPR_INF *Self__2TSN)
// ({EXPR_INF}) With resultRecursive, No inlinable.
{
  void *__tmp__4TSN,*__tmp__EUSN;
  __BOOLEAN __tmp__5TSN,__tmp__FUSN,__tmp__IUSN;
  __tmp__4TSN=Self__2TSN->parent_expr_binary_cmp__WQ1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__4TSN)->__id) {
  case __LIST__: {
    __tmp__5TSN=is_invariant__AH0M(__tmp__4TSN);
  } break;
  case __STRING_CST__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__5TSN=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__5TSN=is_invariant__FVCM(__tmp__4TSN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__5TSN=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__5TSN=is_invariant__OVCM(__tmp__4TSN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__5TSN=is_invariant__2VCM(__tmp__4TSN);
  } break;
  case __REAL_CST__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__5TSN=is_invariant__WWCM(__tmp__4TSN);
  } break;
  case __EXPR_SUB__: {
    __tmp__5TSN=is_invariant__EXCM(__tmp__4TSN);
  } break;
  case __EXPR_MUL__: {
    __tmp__5TSN=is_invariant__SXCM(__tmp__4TSN);
  } break;
  case __EXPR_DIV__: {
    __tmp__5TSN=is_invariant__AYCM(__tmp__4TSN);
  } break;
  case __EXPR_AND__: {
    __tmp__5TSN=is_invariant__OYCM(__tmp__4TSN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__5TSN=is_invariant__2YCM(__tmp__4TSN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__5TSN=is_invariant__KZCM(__tmp__4TSN);
  } break;
  case __PUT_TO__: {
    __tmp__5TSN=is_invariant__YZCM(__tmp__4TSN);
  } break;
  case __ITEM__: {
    __tmp__5TSN=is_invariant__P0CM(__tmp__4TSN);
  } break;
  case __SIZE_OF__: {
    __tmp__5TSN=TRUE__;
  } break;
  case __CAST__: {
    __tmp__5TSN=is_invariant__A1CM(__tmp__4TSN);
  } break;
  case __CALL_SLOT__: {
    __tmp__5TSN=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__5TSN=is_invariant__E4WL(__tmp__4TSN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__5TSN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__4TSN)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__5TSN=is_invariant__QKMN(__tmp__4TSN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__5TSN=is_invariant__M1FO(__tmp__4TSN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__5TSN=is_invariant__XFMO(__tmp__4TSN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__5TSN=is_invariant__01FO(__tmp__4TSN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__5TSN=is_invariant__GGMO(__tmp__4TSN);
  } break;
  case __EXPR_NEG__: {
    __tmp__5TSN=is_invariant__ZKLM(__tmp__4TSN);
  } break;
  case __EXPR_ADD__: {
    __tmp__5TSN=is_invariant__Q5DM(__tmp__4TSN);
  } break;
  case __EXPR_NOT__: {
    __tmp__5TSN=is_invariant__FI0M(__tmp__4TSN);
  } break;
  case __EXPR_MOD__: {
    __tmp__5TSN=is_invariant__I2FO(__tmp__4TSN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__5TSN=is_invariant__PWEP(__tmp__4TSN);
  } break;
  case __EXPR_INF__: {
    __tmp__5TSN=is_invariant__1TSN(__tmp__4TSN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__5TSN=is_invariant__JUSN(__tmp__4TSN);
  } break;
  case __EXPR_OR__: {
    __tmp__5TSN=is_invariant__LERN(__tmp__4TSN);
  } break;
  case __EXPR_XOR__: {
    __tmp__5TSN=is_invariant__QTVO(__tmp__4TSN);
  } break;
  };
  if (__tmp__5TSN) {
    __tmp__EUSN=Self__2TSN->parent_expr_binary_cmp__WQ1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__EUSN)->__id) {
    case __LIST__: {
      __tmp__FUSN=is_invariant__AH0M(__tmp__EUSN);
    } break;
    case __STRING_CST__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__FUSN=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__FUSN=is_invariant__FVCM(__tmp__EUSN);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__FUSN=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__FUSN=is_invariant__OVCM(__tmp__EUSN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__FUSN=is_invariant__2VCM(__tmp__EUSN);
    } break;
    case __REAL_CST__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__FUSN=is_invariant__WWCM(__tmp__EUSN);
    } break;
    case __EXPR_SUB__: {
      __tmp__FUSN=is_invariant__EXCM(__tmp__EUSN);
    } break;
    case __EXPR_MUL__: {
      __tmp__FUSN=is_invariant__SXCM(__tmp__EUSN);
    } break;
    case __EXPR_DIV__: {
      __tmp__FUSN=is_invariant__AYCM(__tmp__EUSN);
    } break;
    case __EXPR_AND__: {
      __tmp__FUSN=is_invariant__OYCM(__tmp__EUSN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__FUSN=is_invariant__2YCM(__tmp__EUSN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__FUSN=is_invariant__KZCM(__tmp__EUSN);
    } break;
    case __PUT_TO__: {
      __tmp__FUSN=is_invariant__YZCM(__tmp__EUSN);
    } break;
    case __ITEM__: {
      __tmp__FUSN=is_invariant__P0CM(__tmp__EUSN);
    } break;
    case __SIZE_OF__: {
      __tmp__FUSN=TRUE__;
    } break;
    case __CAST__: {
      __tmp__FUSN=is_invariant__A1CM(__tmp__EUSN);
    } break;
    case __CALL_SLOT__: {
      __tmp__FUSN=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__FUSN=is_invariant__E4WL(__tmp__EUSN);
    } break;
    case __READ_GLOBAL__: {
      __tmp__FUSN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__EUSN)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__FUSN=is_invariant__QKMN(__tmp__EUSN);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__FUSN=is_invariant__M1FO(__tmp__EUSN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__FUSN=is_invariant__XFMO(__tmp__EUSN);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__FUSN=is_invariant__01FO(__tmp__EUSN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__FUSN=is_invariant__GGMO(__tmp__EUSN);
    } break;
    case __EXPR_NEG__: {
      __tmp__FUSN=is_invariant__ZKLM(__tmp__EUSN);
    } break;
    case __EXPR_ADD__: {
      __tmp__FUSN=is_invariant__Q5DM(__tmp__EUSN);
    } break;
    case __EXPR_NOT__: {
      __tmp__FUSN=is_invariant__FI0M(__tmp__EUSN);
    } break;
    case __EXPR_MOD__: {
      __tmp__FUSN=is_invariant__I2FO(__tmp__EUSN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__FUSN=is_invariant__PWEP(__tmp__EUSN);
    } break;
    case __EXPR_INF__: {
      __tmp__FUSN=is_invariant__1TSN(__tmp__EUSN);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__FUSN=is_invariant__JUSN(__tmp__EUSN);
    } break;
    case __EXPR_OR__: {
      __tmp__FUSN=is_invariant__LERN(__tmp__EUSN);
    } break;
    case __EXPR_XOR__: {
      __tmp__FUSN=is_invariant__QTVO(__tmp__EUSN);
    } break;
    };
    __tmp__IUSN=__tmp__FUSN;
  } else {
    __tmp__IUSN=FALSE__;
  };
  return(__tmp__IUSN);
}

static __BOOLEAN is_invariant__JUSN(__EXPR_INF_EQ *Self__KUSN)
// ({EXPR_INF_EQ}) With resultRecursive, No inlinable.
{
  void *__tmp__MUSN,*__tmp__SUSN;
  __BOOLEAN __tmp__NUSN,__tmp__TUSN,__tmp__WUSN;
  __tmp__MUSN=Self__KUSN->parent_expr_binary_cmp__MR1M.left__HN2H;
  switch (((struct ___OBJ *)__tmp__MUSN)->__id) {
  case __LIST__: {
    __tmp__NUSN=is_invariant__AH0M(__tmp__MUSN);
  } break;
  case __STRING_CST__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__NUSN=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__NUSN=is_invariant__FVCM(__tmp__MUSN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__NUSN=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__NUSN=is_invariant__OVCM(__tmp__MUSN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__NUSN=is_invariant__2VCM(__tmp__MUSN);
  } break;
  case __REAL_CST__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__NUSN=is_invariant__WWCM(__tmp__MUSN);
  } break;
  case __EXPR_SUB__: {
    __tmp__NUSN=is_invariant__EXCM(__tmp__MUSN);
  } break;
  case __EXPR_MUL__: {
    __tmp__NUSN=is_invariant__SXCM(__tmp__MUSN);
  } break;
  case __EXPR_DIV__: {
    __tmp__NUSN=is_invariant__AYCM(__tmp__MUSN);
  } break;
  case __EXPR_AND__: {
    __tmp__NUSN=is_invariant__OYCM(__tmp__MUSN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__NUSN=is_invariant__2YCM(__tmp__MUSN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__NUSN=is_invariant__KZCM(__tmp__MUSN);
  } break;
  case __PUT_TO__: {
    __tmp__NUSN=is_invariant__YZCM(__tmp__MUSN);
  } break;
  case __ITEM__: {
    __tmp__NUSN=is_invariant__P0CM(__tmp__MUSN);
  } break;
  case __SIZE_OF__: {
    __tmp__NUSN=TRUE__;
  } break;
  case __CAST__: {
    __tmp__NUSN=is_invariant__A1CM(__tmp__MUSN);
  } break;
  case __CALL_SLOT__: {
    __tmp__NUSN=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__NUSN=is_invariant__E4WL(__tmp__MUSN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__NUSN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__MUSN)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__NUSN=is_invariant__QKMN(__tmp__MUSN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__NUSN=is_invariant__M1FO(__tmp__MUSN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__NUSN=is_invariant__XFMO(__tmp__MUSN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__NUSN=is_invariant__01FO(__tmp__MUSN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__NUSN=is_invariant__GGMO(__tmp__MUSN);
  } break;
  case __EXPR_NEG__: {
    __tmp__NUSN=is_invariant__ZKLM(__tmp__MUSN);
  } break;
  case __EXPR_ADD__: {
    __tmp__NUSN=is_invariant__Q5DM(__tmp__MUSN);
  } break;
  case __EXPR_NOT__: {
    __tmp__NUSN=is_invariant__FI0M(__tmp__MUSN);
  } break;
  case __EXPR_MOD__: {
    __tmp__NUSN=is_invariant__I2FO(__tmp__MUSN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__NUSN=is_invariant__PWEP(__tmp__MUSN);
  } break;
  case __EXPR_INF__: {
    __tmp__NUSN=is_invariant__1TSN(__tmp__MUSN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__NUSN=is_invariant__JUSN(__tmp__MUSN);
  } break;
  case __EXPR_OR__: {
    __tmp__NUSN=is_invariant__LERN(__tmp__MUSN);
  } break;
  case __EXPR_XOR__: {
    __tmp__NUSN=is_invariant__QTVO(__tmp__MUSN);
  } break;
  };
  if (__tmp__NUSN) {
    __tmp__SUSN=Self__KUSN->parent_expr_binary_cmp__MR1M.right__LN2H;
    switch (((struct ___OBJ *)__tmp__SUSN)->__id) {
    case __LIST__: {
      __tmp__TUSN=is_invariant__AH0M(__tmp__SUSN);
    } break;
    case __STRING_CST__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__TUSN=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__TUSN=is_invariant__FVCM(__tmp__SUSN);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__TUSN=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__TUSN=is_invariant__OVCM(__tmp__SUSN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__TUSN=is_invariant__2VCM(__tmp__SUSN);
    } break;
    case __REAL_CST__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__TUSN=is_invariant__WWCM(__tmp__SUSN);
    } break;
    case __EXPR_SUB__: {
      __tmp__TUSN=is_invariant__EXCM(__tmp__SUSN);
    } break;
    case __EXPR_MUL__: {
      __tmp__TUSN=is_invariant__SXCM(__tmp__SUSN);
    } break;
    case __EXPR_DIV__: {
      __tmp__TUSN=is_invariant__AYCM(__tmp__SUSN);
    } break;
    case __EXPR_AND__: {
      __tmp__TUSN=is_invariant__OYCM(__tmp__SUSN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__TUSN=is_invariant__2YCM(__tmp__SUSN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__TUSN=is_invariant__KZCM(__tmp__SUSN);
    } break;
    case __PUT_TO__: {
      __tmp__TUSN=is_invariant__YZCM(__tmp__SUSN);
    } break;
    case __ITEM__: {
      __tmp__TUSN=is_invariant__P0CM(__tmp__SUSN);
    } break;
    case __SIZE_OF__: {
      __tmp__TUSN=TRUE__;
    } break;
    case __CAST__: {
      __tmp__TUSN=is_invariant__A1CM(__tmp__SUSN);
    } break;
    case __CALL_SLOT__: {
      __tmp__TUSN=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__TUSN=is_invariant__E4WL(__tmp__SUSN);
    } break;
    case __READ_GLOBAL__: {
      __tmp__TUSN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__SUSN)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__TUSN=is_invariant__QKMN(__tmp__SUSN);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__TUSN=is_invariant__M1FO(__tmp__SUSN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__TUSN=is_invariant__XFMO(__tmp__SUSN);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__TUSN=is_invariant__01FO(__tmp__SUSN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__TUSN=is_invariant__GGMO(__tmp__SUSN);
    } break;
    case __EXPR_NEG__: {
      __tmp__TUSN=is_invariant__ZKLM(__tmp__SUSN);
    } break;
    case __EXPR_ADD__: {
      __tmp__TUSN=is_invariant__Q5DM(__tmp__SUSN);
    } break;
    case __EXPR_NOT__: {
      __tmp__TUSN=is_invariant__FI0M(__tmp__SUSN);
    } break;
    case __EXPR_MOD__: {
      __tmp__TUSN=is_invariant__I2FO(__tmp__SUSN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__TUSN=is_invariant__PWEP(__tmp__SUSN);
    } break;
    case __EXPR_INF__: {
      __tmp__TUSN=is_invariant__1TSN(__tmp__SUSN);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__TUSN=is_invariant__JUSN(__tmp__SUSN);
    } break;
    case __EXPR_OR__: {
      __tmp__TUSN=is_invariant__LERN(__tmp__SUSN);
    } break;
    case __EXPR_XOR__: {
      __tmp__TUSN=is_invariant__QTVO(__tmp__SUSN);
    } break;
    };
    __tmp__WUSN=__tmp__TUSN;
  } else {
    __tmp__WUSN=FALSE__;
  };
  return(__tmp__WUSN);
}

static __BOOLEAN is_invariant__LERN(__EXPR_OR *Self__MERN)
// ({EXPR_OR}) With resultRecursive, No inlinable.
{
  void *__tmp__OERN,*__tmp__UERN;
  __BOOLEAN __tmp__PERN,__tmp__VERN,__tmp__YERN;
  __tmp__OERN=Self__MERN->parent_expr_binary__ET1M.left__PP1H;
  switch (((struct ___OBJ *)__tmp__OERN)->__id) {
  case __LIST__: {
    __tmp__PERN=is_invariant__AH0M(__tmp__OERN);
  } break;
  case __STRING_CST__: {
    __tmp__PERN=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__PERN=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__PERN=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__PERN=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__PERN=is_invariant__FVCM(__tmp__OERN);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__PERN=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__PERN=is_invariant__OVCM(__tmp__OERN);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__PERN=is_invariant__2VCM(__tmp__OERN);
  } break;
  case __REAL_CST__: {
    __tmp__PERN=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__PERN=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__PERN=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__PERN=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__PERN=is_invariant__WWCM(__tmp__OERN);
  } break;
  case __EXPR_SUB__: {
    __tmp__PERN=is_invariant__EXCM(__tmp__OERN);
  } break;
  case __EXPR_MUL__: {
    __tmp__PERN=is_invariant__SXCM(__tmp__OERN);
  } break;
  case __EXPR_DIV__: {
    __tmp__PERN=is_invariant__AYCM(__tmp__OERN);
  } break;
  case __EXPR_AND__: {
    __tmp__PERN=is_invariant__OYCM(__tmp__OERN);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__PERN=is_invariant__2YCM(__tmp__OERN);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__PERN=is_invariant__KZCM(__tmp__OERN);
  } break;
  case __PUT_TO__: {
    __tmp__PERN=is_invariant__YZCM(__tmp__OERN);
  } break;
  case __ITEM__: {
    __tmp__PERN=is_invariant__P0CM(__tmp__OERN);
  } break;
  case __SIZE_OF__: {
    __tmp__PERN=TRUE__;
  } break;
  case __CAST__: {
    __tmp__PERN=is_invariant__A1CM(__tmp__OERN);
  } break;
  case __CALL_SLOT__: {
    __tmp__PERN=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__PERN=is_invariant__E4WL(__tmp__OERN);
  } break;
  case __READ_GLOBAL__: {
    __tmp__PERN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__OERN)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__PERN=is_invariant__QKMN(__tmp__OERN);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__PERN=is_invariant__M1FO(__tmp__OERN);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__PERN=is_invariant__XFMO(__tmp__OERN);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__PERN=is_invariant__01FO(__tmp__OERN);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__PERN=is_invariant__GGMO(__tmp__OERN);
  } break;
  case __EXPR_NEG__: {
    __tmp__PERN=is_invariant__ZKLM(__tmp__OERN);
  } break;
  case __EXPR_ADD__: {
    __tmp__PERN=is_invariant__Q5DM(__tmp__OERN);
  } break;
  case __EXPR_NOT__: {
    __tmp__PERN=is_invariant__FI0M(__tmp__OERN);
  } break;
  case __EXPR_MOD__: {
    __tmp__PERN=is_invariant__I2FO(__tmp__OERN);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__PERN=is_invariant__PWEP(__tmp__OERN);
  } break;
  case __EXPR_INF__: {
    __tmp__PERN=is_invariant__1TSN(__tmp__OERN);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__PERN=is_invariant__JUSN(__tmp__OERN);
  } break;
  case __EXPR_OR__: {
    __tmp__PERN=is_invariant__LERN(__tmp__OERN);
  } break;
  case __EXPR_XOR__: {
    __tmp__PERN=is_invariant__QTVO(__tmp__OERN);
  } break;
  };
  if (__tmp__PERN) {
    __tmp__UERN=Self__MERN->parent_expr_binary__ET1M.right__OP2H;
    switch (((struct ___OBJ *)__tmp__UERN)->__id) {
    case __LIST__: {
      __tmp__VERN=is_invariant__AH0M(__tmp__UERN);
    } break;
    case __STRING_CST__: {
      __tmp__VERN=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__VERN=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__VERN=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__VERN=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__VERN=is_invariant__FVCM(__tmp__UERN);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__VERN=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__VERN=is_invariant__OVCM(__tmp__UERN);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__VERN=is_invariant__2VCM(__tmp__UERN);
    } break;
    case __REAL_CST__: {
      __tmp__VERN=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__VERN=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__VERN=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__VERN=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__VERN=is_invariant__WWCM(__tmp__UERN);
    } break;
    case __EXPR_SUB__: {
      __tmp__VERN=is_invariant__EXCM(__tmp__UERN);
    } break;
    case __EXPR_MUL__: {
      __tmp__VERN=is_invariant__SXCM(__tmp__UERN);
    } break;
    case __EXPR_DIV__: {
      __tmp__VERN=is_invariant__AYCM(__tmp__UERN);
    } break;
    case __EXPR_AND__: {
      __tmp__VERN=is_invariant__OYCM(__tmp__UERN);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__VERN=is_invariant__2YCM(__tmp__UERN);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__VERN=is_invariant__KZCM(__tmp__UERN);
    } break;
    case __PUT_TO__: {
      __tmp__VERN=is_invariant__YZCM(__tmp__UERN);
    } break;
    case __ITEM__: {
      __tmp__VERN=is_invariant__P0CM(__tmp__UERN);
    } break;
    case __SIZE_OF__: {
      __tmp__VERN=TRUE__;
    } break;
    case __CAST__: {
      __tmp__VERN=is_invariant__A1CM(__tmp__UERN);
    } break;
    case __CALL_SLOT__: {
      __tmp__VERN=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__VERN=is_invariant__E4WL(__tmp__UERN);
    } break;
    case __READ_GLOBAL__: {
      __tmp__VERN=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__UERN)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__VERN=is_invariant__QKMN(__tmp__UERN);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__VERN=is_invariant__M1FO(__tmp__UERN);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__VERN=is_invariant__XFMO(__tmp__UERN);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__VERN=is_invariant__01FO(__tmp__UERN);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__VERN=is_invariant__GGMO(__tmp__UERN);
    } break;
    case __EXPR_NEG__: {
      __tmp__VERN=is_invariant__ZKLM(__tmp__UERN);
    } break;
    case __EXPR_ADD__: {
      __tmp__VERN=is_invariant__Q5DM(__tmp__UERN);
    } break;
    case __EXPR_NOT__: {
      __tmp__VERN=is_invariant__FI0M(__tmp__UERN);
    } break;
    case __EXPR_MOD__: {
      __tmp__VERN=is_invariant__I2FO(__tmp__UERN);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__VERN=is_invariant__PWEP(__tmp__UERN);
    } break;
    case __EXPR_INF__: {
      __tmp__VERN=is_invariant__1TSN(__tmp__UERN);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__VERN=is_invariant__JUSN(__tmp__UERN);
    } break;
    case __EXPR_OR__: {
      __tmp__VERN=is_invariant__LERN(__tmp__UERN);
    } break;
    case __EXPR_XOR__: {
      __tmp__VERN=is_invariant__QTVO(__tmp__UERN);
    } break;
    };
    __tmp__YERN=__tmp__VERN;
  } else {
    __tmp__YERN=FALSE__;
  };
  return(__tmp__YERN);
}

static __BOOLEAN is_invariant__QTVO(__EXPR_XOR *Self__RTVO)
// ({EXPR_XOR}) With resultRecursive, No inlinable.
{
  void *__tmp__TTVO,*__tmp__ZTVO;
  __BOOLEAN __tmp__UTVO,__tmp__0TVO,__tmp__3TVO;
  __tmp__TTVO=Self__RTVO->parent_expr_binary__UA5N.left__PP1H;
  switch (((struct ___OBJ *)__tmp__TTVO)->__id) {
  case __LIST__: {
    __tmp__UTVO=is_invariant__AH0M(__tmp__TTVO);
  } break;
  case __STRING_CST__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __EXTERNAL_C__: {
    __tmp__UTVO=FALSE__;
  } break;
  case __PROTOTYPE_CST__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __INTEGER_CST__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __READ_LOCAL__: {
    __tmp__UTVO=is_invariant__FVCM(__tmp__TTVO);
  } break;
  case __EXPR_MULTIPLE__: {
    __tmp__UTVO=FALSE__;
  } break;
  case __EXPR_EQUAL__: {
    __tmp__UTVO=is_invariant__OVCM(__tmp__TTVO);
  } break;
  case __EXPR_NOT_EQUAL__: {
    __tmp__UTVO=is_invariant__2VCM(__tmp__TTVO);
  } break;
  case __REAL_CST__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __CHARACTER_CST__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __IS_EXPANDED__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __GET_TYPE_ID__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __EXPR_SUP__: {
    __tmp__UTVO=is_invariant__WWCM(__tmp__TTVO);
  } break;
  case __EXPR_SUB__: {
    __tmp__UTVO=is_invariant__EXCM(__tmp__TTVO);
  } break;
  case __EXPR_MUL__: {
    __tmp__UTVO=is_invariant__SXCM(__tmp__TTVO);
  } break;
  case __EXPR_DIV__: {
    __tmp__UTVO=is_invariant__AYCM(__tmp__TTVO);
  } break;
  case __EXPR_AND__: {
    __tmp__UTVO=is_invariant__OYCM(__tmp__TTVO);
  } break;
  case __EXPR_SHIFT_R__: {
    __tmp__UTVO=is_invariant__2YCM(__tmp__TTVO);
  } break;
  case __EXPR_SHIFT_L__: {
    __tmp__UTVO=is_invariant__KZCM(__tmp__TTVO);
  } break;
  case __PUT_TO__: {
    __tmp__UTVO=is_invariant__YZCM(__tmp__TTVO);
  } break;
  case __ITEM__: {
    __tmp__UTVO=is_invariant__P0CM(__tmp__TTVO);
  } break;
  case __SIZE_OF__: {
    __tmp__UTVO=TRUE__;
  } break;
  case __CAST__: {
    __tmp__UTVO=is_invariant__A1CM(__tmp__TTVO);
  } break;
  case __CALL_SLOT__: {
    __tmp__UTVO=FALSE__;
  } break;
  case __READ_SLOT__: {
    __tmp__UTVO=is_invariant__E4WL(__tmp__TTVO);
  } break;
  case __READ_GLOBAL__: {
    __tmp__UTVO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__TTVO)->global__RHJK,NULL);
  } break;
  case __EXPR_NOT_LOGIC__: {
    __tmp__UTVO=is_invariant__QKMN(__tmp__TTVO);
  } break;
  case __EXPR_OR_LOGIC__: {
    __tmp__UTVO=is_invariant__M1FO(__tmp__TTVO);
  } break;
  case __EXPR_OR_OR_LOGIC__: {
    __tmp__UTVO=is_invariant__XFMO(__tmp__TTVO);
  } break;
  case __EXPR_AND_LOGIC__: {
    __tmp__UTVO=is_invariant__01FO(__tmp__TTVO);
  } break;
  case __EXPR_AND_AND_LOGIC__: {
    __tmp__UTVO=is_invariant__GGMO(__tmp__TTVO);
  } break;
  case __EXPR_NEG__: {
    __tmp__UTVO=is_invariant__ZKLM(__tmp__TTVO);
  } break;
  case __EXPR_ADD__: {
    __tmp__UTVO=is_invariant__Q5DM(__tmp__TTVO);
  } break;
  case __EXPR_NOT__: {
    __tmp__UTVO=is_invariant__FI0M(__tmp__TTVO);
  } break;
  case __EXPR_MOD__: {
    __tmp__UTVO=is_invariant__I2FO(__tmp__TTVO);
  } break;
  case __EXPR_SUP_EQ__: {
    __tmp__UTVO=is_invariant__PWEP(__tmp__TTVO);
  } break;
  case __EXPR_INF__: {
    __tmp__UTVO=is_invariant__1TSN(__tmp__TTVO);
  } break;
  case __EXPR_INF_EQ__: {
    __tmp__UTVO=is_invariant__JUSN(__tmp__TTVO);
  } break;
  case __EXPR_OR__: {
    __tmp__UTVO=is_invariant__LERN(__tmp__TTVO);
  } break;
  case __EXPR_XOR__: {
    __tmp__UTVO=is_invariant__QTVO(__tmp__TTVO);
  } break;
  };
  if (__tmp__UTVO) {
    __tmp__ZTVO=Self__RTVO->parent_expr_binary__UA5N.right__OP2H;
    switch (((struct ___OBJ *)__tmp__ZTVO)->__id) {
    case __LIST__: {
      __tmp__0TVO=is_invariant__AH0M(__tmp__ZTVO);
    } break;
    case __STRING_CST__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __EXTERNAL_C__: {
      __tmp__0TVO=FALSE__;
    } break;
    case __PROTOTYPE_CST__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __INTEGER_CST__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __READ_LOCAL__: {
      __tmp__0TVO=is_invariant__FVCM(__tmp__ZTVO);
    } break;
    case __EXPR_MULTIPLE__: {
      __tmp__0TVO=FALSE__;
    } break;
    case __EXPR_EQUAL__: {
      __tmp__0TVO=is_invariant__OVCM(__tmp__ZTVO);
    } break;
    case __EXPR_NOT_EQUAL__: {
      __tmp__0TVO=is_invariant__2VCM(__tmp__ZTVO);
    } break;
    case __REAL_CST__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __CHARACTER_CST__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __IS_EXPANDED__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __GET_TYPE_ID__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __EXPR_SUP__: {
      __tmp__0TVO=is_invariant__WWCM(__tmp__ZTVO);
    } break;
    case __EXPR_SUB__: {
      __tmp__0TVO=is_invariant__EXCM(__tmp__ZTVO);
    } break;
    case __EXPR_MUL__: {
      __tmp__0TVO=is_invariant__SXCM(__tmp__ZTVO);
    } break;
    case __EXPR_DIV__: {
      __tmp__0TVO=is_invariant__AYCM(__tmp__ZTVO);
    } break;
    case __EXPR_AND__: {
      __tmp__0TVO=is_invariant__OYCM(__tmp__ZTVO);
    } break;
    case __EXPR_SHIFT_R__: {
      __tmp__0TVO=is_invariant__2YCM(__tmp__ZTVO);
    } break;
    case __EXPR_SHIFT_L__: {
      __tmp__0TVO=is_invariant__KZCM(__tmp__ZTVO);
    } break;
    case __PUT_TO__: {
      __tmp__0TVO=is_invariant__YZCM(__tmp__ZTVO);
    } break;
    case __ITEM__: {
      __tmp__0TVO=is_invariant__P0CM(__tmp__ZTVO);
    } break;
    case __SIZE_OF__: {
      __tmp__0TVO=TRUE__;
    } break;
    case __CAST__: {
      __tmp__0TVO=is_invariant__A1CM(__tmp__ZTVO);
    } break;
    case __CALL_SLOT__: {
      __tmp__0TVO=FALSE__;
    } break;
    case __READ_SLOT__: {
      __tmp__0TVO=is_invariant__E4WL(__tmp__ZTVO);
    } break;
    case __READ_GLOBAL__: {
      __tmp__0TVO=is_invariant__FJ2L(((__READ_GLOBAL *)__tmp__ZTVO)->global__RHJK,NULL);
    } break;
    case __EXPR_NOT_LOGIC__: {
      __tmp__0TVO=is_invariant__QKMN(__tmp__ZTVO);
    } break;
    case __EXPR_OR_LOGIC__: {
      __tmp__0TVO=is_invariant__M1FO(__tmp__ZTVO);
    } break;
    case __EXPR_OR_OR_LOGIC__: {
      __tmp__0TVO=is_invariant__XFMO(__tmp__ZTVO);
    } break;
    case __EXPR_AND_LOGIC__: {
      __tmp__0TVO=is_invariant__01FO(__tmp__ZTVO);
    } break;
    case __EXPR_AND_AND_LOGIC__: {
      __tmp__0TVO=is_invariant__GGMO(__tmp__ZTVO);
    } break;
    case __EXPR_NEG__: {
      __tmp__0TVO=is_invariant__ZKLM(__tmp__ZTVO);
    } break;
    case __EXPR_ADD__: {
      __tmp__0TVO=is_invariant__Q5DM(__tmp__ZTVO);
    } break;
    case __EXPR_NOT__: {
      __tmp__0TVO=is_invariant__FI0M(__tmp__ZTVO);
    } break;
    case __EXPR_MOD__: {
      __tmp__0TVO=is_invariant__I2FO(__tmp__ZTVO);
    } break;
    case __EXPR_SUP_EQ__: {
      __tmp__0TVO=is_invariant__PWEP(__tmp__ZTVO);
    } break;
    case __EXPR_INF__: {
      __tmp__0TVO=is_invariant__1TSN(__tmp__ZTVO);
    } break;
    case __EXPR_INF_EQ__: {
      __tmp__0TVO=is_invariant__JUSN(__tmp__ZTVO);
    } break;
    case __EXPR_OR__: {
      __tmp__0TVO=is_invariant__LERN(__tmp__ZTVO);
    } break;
    case __EXPR_XOR__: {
      __tmp__0TVO=is_invariant__QTVO(__tmp__ZTVO);
    } break;
    };
    __tmp__3TVO=__tmp__0TVO;
  } else {
    __tmp__3TVO=FALSE__;
  };
  return(__tmp__3TVO);
}

//==========================//
// DEBUG MANAGER            //
//==========================//

void print_string(char *str) 
{ 
  while (*str!=0) {
    print_char(*str); 
    str++; 
  };
}  

